mrlongshen

@@Winterfox how about to link the item databse ?

Hello, how to make like this ? An clickable item or an popup windows. On event coin click

@@Mysterious aw you are so kind mr admin hihi

@@Zhao Chow thanks alot, its working! +1

@@Winterfox yeah like that ! its will disguise other job. hihi @@Zhao Chow thanks alot. will test it !

@@Winterfox ok thanks for that. its that possible to make a script on item database for this list of item ? 2765 2766 2767 2768 2769 2770 2771

hi. how to do this? for example a lord knight wear a archer figure. the appearance will change to archer ?

@@Winterfox oic. thanks alot. nvm hehe

@@Dastgir thanks ! its working. now mob are imba hahaha @@Angelmelody will lets u know once try

@@Winterfox how about @spawn ?

@@evilpuncker ok thanks you.

@@evilpuncker thanks its working. how about this ? //===== Hercules Script =======================================//= Poring Summoner//===== Created By: ===========================================//= Mysterious//===== Current Version: ======================================//= 1.2//===== Link: =================================================//= Old - http://www.eathena.ws/board/index.php?showtopic=236779//===== Description: ==========================================//= Basically what this event does is summon a set of Normal//= and Special Porings. Normal Porings don't drop anything,//= Special Porings do.//=============================================================new_4-4,148,169,4 script Poring Summoner 99,{mes "[Poring Summoner]";if(getgroupid() < 10) { if(.Event) mes "There is no Poring Summon Event on now."; else { mes "There is a Poring Summon Event on now!"; mes "Location: " + .Map$; mes "Special Porings: " + .SpecialPorings[1]; mes "Normal Porings: " + .NormalPorings[0]; } close;}mes "Please customize the Poring Summon Event:";Main:next;mes "[Poring Summoner]"; switch(select("Item [" + getitemname(.ItemID) + "]:Special Porings [" + .SpecialPorings + "]:Normal Porings [" + .NormalPorings + "]:Start Event:End Event")) { case 1: mes "Which item would you like Special Porings to drop?"; mes "Please input the item ID:"; input .ItemID; goto Main; case 2: mes "How many Special Porings would you like me to summon?"; input .SpecialPorings; goto Main; case 3: mes "How many Normal Porings would you like me to summon?"; input .NormalPorings; goto Main; case 4: mes "Starting the event now...";OnMinute30: //Triggers at each new hour, so 1:30, 2:30, 3:30, 4:30 etc. set $@ran, rand(1,24); if ($@ran == 24) set .Map$,"morroc"; if ($@ran == 23) set .Map$,"geffen"; if ($@ran == 22) set .Map$,"payon"; if ($@ran == 21) set .Map$,"alberta"; if ($@ran == 20) set .Map$,"izlude"; if ($@ran == 19) set .Map$,"aldebaran"; if ($@ran == 18) set .Map$,"comodo"; if ($@ran == 17) set .Map$,"yuno"; if ($@ran == 16) set .Map$,"amatsu"; if ($@ran == 15) set .Map$,"gonryun"; if ($@ran == 14) set .Map$,"umbala"; if ($@ran == 13) set .Map$,"niflheim"; if ($@ran == 12) set .Map$,"louyang"; if ($@ran == 11) set .Map$,"jawaii"; if ($@ran == 10) set .Map$,"ayothaya"; if ($@ran == 9) set .Map$,"einbroch"; if ($@ran == 8) set .Map$,"lighthalzen"; if ($@ran == 7) set .Map$,"einbech"; if ($@ran == 6) set .Map$,"hugel"; if ($@ran == 5) set .Map$,"rachel"; if ($@ran == 4) set .Map$,"veins"; if ($@ran == 3) set .Map$,"moscovia"; if ($@ran == 2) set .Map$,"manuk"; if ($@ran == 1) set .Map$,"splendide"; set .Event,1; monster .Map$,0,0,"Poring",1002,.SpecialPorings,"Poring Summoner::OnSpecialKill"; monster .Map$,0,0,"Poring",1002,.NormalPorings,"Poring Summoner::OnNormalKill"; set .SpecialPorings[1],.SpecialPorings; set .NormalPorings[1],.NormalPorings; OnInit: set .ItemID, 7539; set .NormalPorings,40; set .SpecialPorings,20; announce "The Poring Event has begun!",bc_all; announce "Location: " + .Map$,bc_all; announce "Special Porings: " + .SpecialPorings,bc_all; announce "Normal Porings: " + .NormalPorings,bc_all; close; end; case 5: mes "Ending the event now..."; goto EndEvent; }OnTimer216000000: announce "Poring Summoner has ended. No one killed the Porings.",bc_all; killmonster .Map$,"All"; set .Event,0; stopnpctimer; end;OnSpecialKill: set .SpecialPorings[1],.SpecialPorings[1]-1; announce strcharinfo(0) + " got a " + getitemname(.ItemID) + "!",bc_map; getitem .ItemID,1; goto PoringCount;OnNormalKill: set .NormalPorings[1],.NormalPorings[1]-1; goto PoringCount;PoringCount: announce "Special Porings: " + .SpecialPorings[1] + " || Normal Porings: " + .NormalPorings[1],bc_map; if(!.SpecialPorings[1]) goto EndEvent; end;EndEvent: if(.Event) announce "The Poring Summon Event is now over!",bc_all; killmonster .Map$,"All"; set .Event,0; set .SpecialPorings[1],0; set .NormalPorings[1],0; close; [Error]: script_rid2sd: fatal error ! player not attached![Debug]: Function: close (no parameters)[Debug]: Source (NPC): Poring Summoner at new_4-4 (148,169)

@@Winterfox As I see, all is official mobs. become stupid. Dont know why.

Here I attach my script. //Created by youtubenew_4-4,131,169,5 script Find the Baphomet 736,{mes "[ Find The Baphomet ]";if(getgmlevel() < 50) { if(.Event==0) mes "There is no Find the Baphomet event."; else { mes "There is a Find the Baphomet event on now!"; mes "Location: "+ .Map$; mes "Prize: " + getitemname(.ItemID); mes "Number of Baphomets: " + .Baphomets; } close;} mes "Hello "+strcharinfo(0)+"! Please customize this event:";Main:next;mes "[ Find The Baphomet ]"; switch(select("Item [" + getitemname(.ItemID) + "]:Start Event:End Event")) { case 1: mes "Which item would you like the Baphomet to drop?"; mes "Please input the item ID:"; OnInit: set .ItemID, 7227; //input .ItemID, 7227; goto Main; case 2: mes "Starting the event now..."; set .Event,1; close2; goto OnStart; case 3: mes "Ending the event now..."; if(.Event) announce ""+strcharinfo(0)+" ended Find the Baphomet Event!",bc_all; killmonster .Map$,"All"; set .Event,0; close;}OnMinute45: //CHANGE THIS TO THE MINUTE YOU WOULD LIKE THIS EVENT TO LOAD!OnStart: announce "Find the Baphomet : It's time to play Find the Baphomet!",0; sleep2 1000; set $@ran, rand(1,11); if ($@ran == 11) set .Map$,"splendide"; if ($@ran == 10) set .Map$,"hugel"; if ($@ran == 9) set .Map$,"yuno"; if ($@ran == 8) set .Map$,"comodo"; if ($@ran == 7) set .Map$,"xmas"; if ($@ran == 6) set .Map$,"aldebaran"; if ($@ran == 5) set .Map$,"izlude"; if ($@ran == 4) set .Map$,"payon"; if ($@ran == 3) set .Map$,"geffen"; if ($@ran == 2) set .Map$,"morocc"; if ($@ran == 1) set .Map$,"prontera"; sleep2 1000; set $@ran2, rand(1,5); if ($@ran2 == 5) set .Baphomets,"5"; if ($@ran2 == 4) set .Baphomets,"4"; if ($@ran2 == 3) set .Baphomets,"3"; if ($@ran2 == 2) set .Baphomets,"2"; if ($@ran2 == 1) set .Baphomets,"1"; announce "Find the Baphomet : The Baphomet has spawned in "+ .Map$ +"!",0; sleep2 10000; announce "Find the Baphomet : " + .Baphomets + " Baphomets have spawned in "+ .Map$ +"!",0; sleep2 10000; monster .Map$,0,0,"PLEASE DONT HIT ME!",1039,.Baphomets,"Find the Baphomet::OnMobKilled"; end;OnMobKilled: mapannounce .Map$,"We've got a winner: " + strcharinfo(0) + " Congrats!",0; set Zeny,Zeny+100000000; getitem .7227,30; set .Event,0; end;} An error will coming like this. [Error]: script_rid2sd: fatal error ! player not attached![Debug]: Function: next (no parameters)[Debug]: Source (NPC): Find the Baphomet at new_4-4 (131,169)[Error]: script_rid2sd: fatal error ! player not attached! can someone make it clean ?

@@Winterfox oooo. hmm. I see the MVP like stupid. Just standing and spam skill. Its not attacking. Dont know why ?

Hi all, Is that possible to increase mob damage ? All mvp or all normal mobs? Increase 20% damage or maybe 100% ? With current git, I see the mvp like passive, and wont attack player. Not aggressive. Why ? Do you feel same ?

@@Dogpatch thanks bro sharing

@@Winterfox ok thanks alot. Just need confirmation hehe

@@Winterfox this script dont need to edit MVP id ? its detect automatically right ? but I can add manually mob id on .@mobIdListStr$ = ""; Right ?

@@Winterfox ok thanks alot ! I need to edit it manually +3 for you hehe

@@Winterfox Sorry my mistakes, forgot to reloadscript so now I need to edit 1 by 1 the mvp mob id ? where you generate the mvp id and mvp card? hmm

@@Winterfox Directly to your inventory ?

@@Winterfox ups sory. ok I done edit this. - script MVP_CARD_ANNOUNCER -1,{ OnInit: setarray( .@mvpIdList, 1871, 1874, 1719, 1492, 1147, 1688, 1583, 1623, 1389, 1046, 1087, 1190, 1272, 1115, 1418, 1779, 1157, 1685, 1734, 1658, 1647, 1649, 1651, 1646, 1650, 1648, 1630, 1059, 1159, 1038, 1511, 1373, 1751, 1150, 1039, 1086, 1785, 1768, 1832, 1112, 1312, 1251, 1252 ); setarray( .mvpCardIds, 4441, 4145, 4386, 4263, 4146, 4376, 4302, 4342, 4134, 4142, 4143, 4135, 4168, 4123, 4330, 4419, 4148, 4374, 4403, 4352, 4359, 4363, 4365, 4357, 4367, 4361, 4372, 4132, 4121, 4144, 4236, 4276, 4407, 4131, 4147, 4128, 4425, 4408, 4430, 4137, 4305, 4318, 4324 ); // Rate : 1 = 0.01% / 1000 = 10% / 10000 = 100% setarray( .mvpCardRates, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 10000, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 ); for(.@i = 0; .@i < getarraysize( .@mvpIdList ); .@i++ ) { .mvpIds[ .@mvpIdList[ .@i ] ] = .@i; delmonsterdrop( .@mvpIdList[ .@i ], .mvpCardIds[ .@i ] ); } end; OnNPCKillEvent: .@mvpIndex = .mvpIds[ killedrid ]; if( .@mvpIndex == 0) end; if( rand( 10000 ) <= .mvpCardRates[ .@mvpIndex ] ){ getitem( .mvpCardIds[ .@mvpIndex ], 1 ); announce( "[ " + strcharinfo(PC_NAME) + " ] just got a " + getitemname( .mvpCardIds[.@mvpIndex] ), bc_all ); } end;} so that means, eddga card, 100% drop. I killed 100 eddga nothing happen

@@Winterfox so now all mvp card are 1% ? // Rate : 1 = 0.01% / 1000 = 10% / 10000 = 100% setarray( .mvpCardRates, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 ); Right?

@@Winterfox hahaha. lol sir, i need to pickup, no mvp will go to inventory directly the card hihihi