Jump to content

elements

Members
  • Posts

    9
  • Joined

  • Last visited

About elements

  • Birthday 10/10/1989

Profile Information

  • Gender
    Male
  • Location
    himamaylan

Contact Methods

Recent Profile Visitors

1486 profile views

elements's Achievements

Poring

Poring (1/15)

0

Reputation

  1. that is also my problem damp that script haha!
  2. comodo,196,112,6 script School of Fish 723,{ if (isequipped(2764)) && (isequipped(2775)){ specialeffect2 EF_BUBBLE; set .@fcast,15; if (isequipped(2550)) { //Fisher's_Muffler set .@fcast,.@fcast - 3; } if (isequipped(2443)) { //Fish_Shoes set .@fcast,.@fcast - 2; } if (isequipped(5380)) { //Fish_Shoes set .@fcast,.@fcast - 5; } progressbar "ffffff",.@fcast; if (rand(1,20) == 2) { getitem 6096,5; //Big Fish specialeffect EF_BUBBLE; mapannounce "comodo","" + strcharinfo(0) + " has caught a 5 Tuna!!!",bc_map,"0xff77ff"; end; } set .@rhea_ran,rand(1,70); if (.@rhea_ran < 20) { getitem 6096,1; //Fresh Fish } else if (.@rhea_ran == 20) { getitem 6096,1; //Spawn } else if (.@rhea_ran == 21) { getitem 7405,1; //Jellopy } else if (.@rhea_ran == 22) { getitem 6096,2; //Sharp_Scale } else if (.@rhea_ran == 23) { getitem 6096,2; //Gill } else if (.@rhea_ran == 24) { getitem 7405,1; //Marlin } else if (.@rhea_ran == 25) { getitem 6096,1; //Sticky_Webfoot } else if (.@rhea_ran == 26) { getitem 6096,1; //Nipper } else if (.@rhea_ran == 27) { getitem 7405,1; //Garlet } else if (.@rhea_ran == 28) { getitem 6096,1; //Sticky_Mucus } else if ((.@rhea_ran > 28) && (.@rhea_ran < 40)) { getitem 7405,1; //Rotten Fish } else { mes "Nothing was caught."; close; } if (rand(1,200) == 3) { getitem 6096,20; //Gift_Box mapannounce "comodo","" + strcharinfo(0) + " has caught a 20 Tuna Fish!!",bc_map,"0x0000ff"; } if (rand(1,500) == 3) { getitem 6096,30; //Old_Blue_Box mapannounce "comodo","" + strcharinfo(0) + " has caught an 30 Tuna Fish!",bc_map,"0x00ffff"; } if (rand(1,3000) == 3) { getitem 6096,50; //Old_Violet_Box mapannounce "comodo","" + strcharinfo(0) + " has caught an 50 Tuna Fish!!",bc_map,"0x44ff44"; } end; } else { mes "Fish are swimming in the water."; close; } } comodo.gat,189,108,4 duplicate(School of Fish) School of Fish#1 1158 comodo.gat,183,111,4 duplicate(School of Fish) Tilapya#20 2082 comodo.gat,218,108,4 duplicate(School of Fish) School of Fish#21 1069 comodo.gat,228,108,3 duplicate(School of Fish) School of Fish#22 1158 comodo.gat,214,112,4 duplicate(School of Fish) School of Fish#23 723 comodo.gat,189,122,4 duplicate(School of Fish) Mr Crab#23 1073 comodo.gat,192,106,4 duplicate(School of Fish) Octopus#23 1144 --- try this One ~ comodo,205,112,4 shop Bulantiro 1543,2764:50000000,2775:50000000,2550:100000000,2443:200000000 More Fun~ if (rand(1,3000) == 3) { getitem 7179,1; //Old_Violet_Box mapannounce "comodo","" + strcharinfo(0) + " has caught an Proof Of Donation!!",bc_map,"0x44ff44";
  3. i like it! no comment! can u give ur website... i like ur website to add to my server... im sory im not good 2 create theme... ^^, Nice Work
  4. Pa inge naman ng link ng ceres na website na na set up na haha! d aq sanay! pag aralan q lang~
  5. //===== eAthena Script ======================================= //= Scavenger Hunt NPC //===== By: ================================================== //= Iceandrews and MagnusG87 //= Contact: caiaphas(at)hotmail.com //= eAthena ID: Iceandrews //===== Description: ========================================= //= //= This NPC initiates a server wide Scavenger Hunt. //= The NPC generates a list of 10 items that are to be prontera,150,162,5 script ScavengerHunt 856,{ //Main Menu Choices. mes "[scavenger Hunt]"; mes "Welcome to the Scavenger Hunt!"; next; menu "View Current Scavenger Hunt Items",ViewItems, "Hand in Current Scavenger Hunt Items",CheckForItems, "Leave",QuitHunt, "Initiate New Scavenger Hunt",GMCheck; // Diplays the list of items and their item ID number // that is valid for the current hunt. ViewItems: mes "[scavenger Hunt]"; mes "This is the current list of items."; mes ""; for(set .@i,0; .@i < 10; set .@i,.@i+1) { mes .@i+1 + ". " + getitemname($@scavengerList[.@i]) + " - Item ID:" + $@scavengerList[.@i]; } next; menu "Leave",QuitHunt; // Check to make sure you have all the required items // in your inventory. If you do, you get the rewards. // If not, the NPC interactions ends. CheckForItems: for(set .@i,0; .@i < 10; set .@i,.@i+1) { if(countitem($@scavengerList[.@i]) == 0) { goto DoesNotHaveItems; } } goto HasRequiredItems; // Player has the required items. // The player can turn in the items for a reward. // They can also not turn anything in and just leave. HasRequiredItems: mes "[scavenger Hunt]"; mes "Congratulations! You've collected all the items in this Scavenger Hunt. Would you like to turn them in for the reward?"; next; menu "Yes",HandInItems, "No",DoNotHandInItems; // Takes the items from the players inventory. // Player receives an experience reward. HandInItems: for(set .@i,0; .@i < 10; set .@i,.@i+1) { delitem $@scavengerList[.@i],1; } getitem 6153,1; // Instead of experience, this reward is for a // specified number of base and job levels. // Change the numbers accordingly for your server. //atcommand "@blvl 5"; //atcommand "@jlvl 5"; callfunc "setScavengerList"; announce "Attention! A new scavenger hunt has begun! Come and get the new item list!",bc_all; mes "[scavenger Hunt]"; mes "You've gained base and job experience."; next; menu "Leave",QuitHunt; // Check to make sure player is a GM. // If they player is a GM, generate a new item list. // If they are not, provide a message and leave the NPC. GMCheck: if (getgmlevel()) { callfunc "setScavengerList"; mes "[scavenger Hunt]"; mes "A new list of item has been generated. Thanks!"; next; menu "View Current Scavenger Hunt Items",viewItems, "Leave",QuitHunt; } else { mes "[scavenger Hunt]"; mes "Sorry, you don't have the rights to start a new Scavenger Hunt."; next; menu "Leave",QuitHunt; } // Player does not have the required items. DoesNotHaveItems: mes "[scavenger Hunt]"; mes "Sorry, but it looks like you are missing some items. Come back when you've collected everything."; next; menu "Leave",QuitHunt; // Player chooses not to hand in the items. DoNotHandInItems: mes "[scavenger Hunt]"; mes "Aww, but you're missing out on a great reward!"; next; menu "Leave",QuitHunt; // Ends NPC interaction. QuitHunt: mes "[scavenger Hunt]"; mes "Good luck finding everything!"; close; // NPC Intialization OnInit: callfunc "setScavengerList"; end; } function script setScavengerList { //initializes list of scavenger items for( set .@i,0; .@i < 10 ; set .@i,.@i+1 ) { set .@valid, 0; //continue generating random numbers until a valid item is found while(.@valid == 0) { // This is the range of item IDs that can be produced // for any given scavenger hunt. This can be changed. set .@j, rand(701, 1060); // This takes the random number above and does 2 things. // First it check to see if the item exists at all. // If getiteminfo() returns -1, then an item with that // number is not in the item database. If that item does // exist, then it returns the maximum drop rate for that // item from the entier mosnter set. For example, if the // item is a 'Apple', and both Porings (5%) and Luncatis (1%) // drop this item, the function will return 5. This verifies // that the item ID gernerated is dropped by a monster. // If the returned number is 10000, this means it is // sold by an NPC. So this generates a list of random // items that are either dropped by a mosnter or sold // by and NPC. if(getiteminfo(.@j,3) > 0) { set $@scavengerList[.@i], .@j; set .@valid , 1; } } } return; } dont reload script or loadnpc restart server is better to effect that script i simple edit that script and add to my server
  6. wala bang link para maka 2lung panu e set up ng tama??
×
×
  • Create New...