Leaderboard

something like that //===== rAthena Script ======================================= //= Find the Mushroom //===== By: ================================================== //= Mysterious //===== Current Version: ===================================== //= 3.6a //===== Compatible With: ===================================== //= rAthena SVN //===== Description: ========================================= //= Find the Mushroom - random amount of Mushrooms spawns in random maps. //= Players need to find these mushrooms and kill them to gain prizes! //===== Additional Comments: ================================= //= 3.0 Fully Functional with Rewritten script. [Mysterious] //= 3.6a Slightly edited. [Euphy] //============================================================ prontera,142,228,6 script Find the Mushroom 1014,{ mes "[ Find The Mushroom ]"; if (!.Status) mes "There is no event at the moment!"; else { mes "There are "+.Spawn+" Mushrooms left in "+.Map$+"!"; mes "Find and kill the mushrooms to gain "+getitemname(.Prize)+"!"; } if (.Status || getgmlevel() < .GM) close; mes "Start the event?"; next; if(select("- No:- Yes") == 1) close; donpcevent strnpcinfo(0)+"::OnMinute10"; mes "[ Find The Mushroom ]"; mes "Event started!"; close; OnInit: set .Prize,677; // Reward item ID set .Amount,1; // Reward item amount set .GM,60; // GM level required to access NPC setarray .Maps$[0],"izlude","geffen","morocc","prontera","payon","lighthalzen","aldebaran","hyrule"; // Possible maps end; OnMinute10: // Start time (every hour) if (.Status) end; set .Status,1; set .Spawn,rand(1,5); // How many Mushrooms should spawn? set .Map$,.Maps$[rand(getarraysize(.Maps$))]; killmonster .Map$,"All"; initnpctimer; // start timer monster .Map$,0,0,"Please don't kill me!",1084,.Spawn,strnpcinfo(0)+"::OnMobKilled"; announce "Find the Mushroom : Total of "+.Spawn+" Mushrooms have been spawned in "+.Map$+"!",0; sleep 2500; announce "Find the Mushroom : Every Mushroom you kill will give you "+getitemname(.Prize)+"!",0; end; // If nobody kill all mobs // 1800 seconds = 30 minutes OnTimer1800000: stopnpctimer; if(.Spawn || .Status) { killmonster .Map$,"All"; announce "The Find the Mushroom Event has ended. All the Mushrooms have been killed.",0; set .Status,0; } end; OnMobKilled: stopnpctimer; set .Spawn, .Spawn - 1; getitem .Prize, .Amount; if (.Spawn) announce "[ "+strcharinfo(0)+" ] has killed a Mushroom. There are now "+.Spawn+" Mushroom(s) left.",bc_map; else { announce "The Find the Mushroom Event has ended. All the Mushrooms have been killed.",0; set .Status,0; } end; }

try <?xml version="1.0" encoding="euc-kr" ?> <clientinfo> <desc>Ragnarok Client Information</desc> <servicetype>america</servicetype> <servertype>primary</servertype> <connection> <display>Local</display> <address>127.0.0.1</address> <port>6900</port> <version>55</version> <langtype>1</langtype> <registrationweb></registrationweb> <admin>1000000</admin> <admin>2000000</admin> <admin>2000118</admin> <admin>2000129</admin> <loading> <image>loading00.jpg</image> <image>loading01.jpg</image> <image>loading02.jpg</image> <image>loading03.jpg</image> <image>loading04.jpg</image> </loading> </connection> </clientinfo>

Change item type to 11. Then add below monster line monster "this",-1,-1,"--ja--",-1,1,""; to monster "this",-1,-1,"--ja--",-1,1,""; delitem 604,1;

change while( .@idn < @inventorylist_count ){ to while( .@idn < @inventorylist_count && Zeny >= 1000 ){

make sure you have configured your LUA/LUB files correctly ...and your sprite files.