Jump to content

mrlongshen

Members
  • Content Count

    1126
  • Joined

  • Last visited

  • Days Won

    3

Everything posted by mrlongshen

  1. @@Winterfox @@AnnieRuru wah thanks alot so much ! hehe~
  2. @@AnnieRuru im using it. nah there are some bugs on it. @@Aeromesi later will online skype. hehe
  3. @@Aeromesi after changes to $@Map
  4. prontera,165,177,3 script PVP Warper 106,{if (!agitcheck() || !agitcheck2()) { if (select("Yes!","No thanks.") == 2) close; warp "guild_vs5",0,0; announce strcharinfo(0) + " has entered the PVP Room.",0; announce "There are ["+getmapusers("guild_vs5")+"/30] players inside.",0; end; } end;} Can someone edit, if player kill same person for 5 time, auto kick from pvp map and cannot enter for 5 minutes? on player click pvp warper. disbottom message, you need a rest for 5 minute.
  5. @@AnnieRuru thanks alot +1
  6. //===== 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 4W_M_03,{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]; } end;}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...";OnMinute41: //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 "Kill The Poring : The Poring Event has begin!",bc_all; sleep 5000; announce "Kill The Poring : Each special poring rewarded Poring Coin",bc_all; sleep 5000; announce "Location: " + .Map$,bc_all; sleep 5000; announce "Special Porings: " + .SpecialPorings,bc_all; sleep 5000; announce "Normal Porings: " + .NormalPorings,bc_all; sleep 5000; end; case 5: mes "Ending the event now..."; goto EndEvent; }OnTimer1800000: 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; end;} hi all, im using this script. each time i @reloadscript, this npc will respawn poring at unknown place. can someone make it not spawn after @reloadscript or make it spawn on specific map that I have set on the script ?
  7. @@AnnieRuru no miss. I need job change on click.
  8. @@Winterfox maybe because my request is item database ?
  9. @@Winterfox thanks for that information. +1 for you
  10. Hi, I'm requesting simple script. When user click an item, a selection 2nd job change popup show. For example current job is Lord Knight, when player click, they can choose what job they want, and automatic change into that class.
  11. @@Aeromesi there are no such table for cash point..
  12. @@Winterfox thanks alot @@Aeromesi Thanks bro ! hehe. There are some player have many cash. About 10k above. its all my fault actually. haha I use some script from @@Winterfox, mvp and pvp reward that get a cash point haha. So the problem is there are player have imba cashpoint hehe. I need to reset back. I know they will angry, but I have give them some special item. hehe . By the way how to check player cashpoint or kafrapoint ?
  13. Can someone post any method how to delete cashpoint using sql or script? By the way, how to check player cashpoint in sql database?
  14. Hi. How to enable this command and the mount renewal in pre-renewal ?
  15. Hi all. How to make when the official hunting mission script generate a quest, the quest will popup on user screen. When player open quest (alt+u) the generate quest will be on there. Please.. Tq
  16. wow. ragnarok will become other rpg hahaha nice !
  17. Hi all. I want to request a script. My server have normal mvp (dungeon map) and mvp room. I plan to make mvp monster drop a TCG Card after killed. Is that possible to different it ? I want only mvp (dungeon map) drop the TCG Card but not it MVP room ?
  18. @@vBrenth I love many color. how you do that ? let me know.
  19. Need a careful studies before upgrade to this format. BTW is AWESOME!
  20. @@AnnieRuru thanks miss for the explanation.
×
×
  • Create New...

Important Information

By using this site, you agree to our Terms of Use.