Jump to content

Thanna

Members
  • Posts

    271
  • Joined

  • Last visited

Everything posted by Thanna

  1. I updated my svn and make a novice, when I killed a poring the Job Level is higher than Base Level, my rate is 20x/20x, rates are set correctly, I'll just ask if this is official just like on iRO or there's something wrong with my server, I hope someone can clarify it on me thanks
  2. yes I patch source mod manually, it is still working before I updated my svn, I have my working copy of it somehow I need to update. Edit: problem already solved, thanks for your help
  3. I do have other source mod bu t in the svn update log there is no conflict, this happened to me before but I when a new update has come the error has been fixed, I just wanna know if someone is experiencing this
  4. Hello rA, there is a little problem I encountered when I updated my svn to r17132, I'll post a screen shot below so anyone can see it, is there anybody there that encountered this or its just me? I dont think some of my source mod have made this error because there is no conflict, I hope that someone can help me out thanks.
  5. why do you put the word lame? you always help and make scripts for random person that ask you, like me I do owe you
  6. Hello rAthena, I would like to request a custom refining system something like this http://rathena.org/b...rok-from-flyff/ but instead of a usable item, it would be better if its just in the inventory, for example let say that you have the item "Protection" - item ID 123, if you are refining with this item on your inventory the item you are refining will not be gone or reduce its + instead the item "Protection" will be gone. note: the NPC that will be use will be the default refiner rathena have. thanks in advance, if there is any clarification just drop me a PM UPDATE: Please close this thread I already made it by myself.
  7. How can I enable sura sp consumption delay when I disabled the renewal features of my server because Im using the 150 instant cast for trans and 180 dex for 3rd class, I hope someone can help me.
  8. can this be use for the IP of the server, because I think asura hosting server's disabled pinging.
  9. Thanna

    RO2

    I search google and find out that there is ragnarok 2 private servers, who knows the community in making ro2 like rathena?
  10. thanks Ms.AnnieRuru when ever I need help your always there xD
  11. Hi I just wonder if you can modify the script that I have which is pvp rank system, here's the explanation, if player 1 killed player 2 and they have the same IP he will not received a point, but when player 1 killed player 2 and they dont have the same IP he will receive a point, thanks in advance - script PVP Kill -1,{ OnPCKillEvent: if ( killedrid == getcharid(3) ) end; if (getcharid(0)) { set pkill,pkill+1; } }
  12. thank you very much guys for improving the script
  13. Thanna

    Miruku

    you can download it here, a member of rathena made this mirror http://www.mediafire.com/?x5nutrs7garrk
  14. this is the script that I used, its working fine somehow I added the disablenpc "Emperium Hill#1"; and enablenpc "Emperium Hill#1"; to enable the warper when the koe start and to disable when it ends somehow I still got this error [Error]: script_rid2sd: fatal error ! player not attached! [Debug]: Function: getcharid (1 parameter) [Debug]: Data: number value=2 [Debug]: Source (NPC): KingOfEmperium (invisible/not on map) here's the scrip //********************************************************************************** // ____ _ _ _ ____ //| _ \ ___ ___ ____ | | ___ ____ ___ ___ __ ___ _ _ | |_| |/ __ | //| |__// _ \ / _ \ | _ \| | / _ \ | _ \ / _ \ / _| / _)/ _ \ | \| || ___ |\__ | //| | | __/ || _ || | |__/ || | __/ | |__/| __/ | | _\ \ || _ || | \\ | | | | | //|_|___\___|_\___/_| |___|_|_\___|_| |____\___|_|_|_(___/ \___/_|_|\_|____|_|___|_| //------------------|_|-------------|_|--------------------------------------------- //********************************************************************************** //===== rAthena Script ============================================================= //= King Of Emperium Hill //===== By: ======================================================================== //= Peopleperson49 (Eddie) //===== Start Date: ================================================================ //= 27AUG2012 //===== Current Version: =========================================================== //= 4.6 //===== Compatible With: =========================================================== //= rAthena SVN //===== Description: =============================================================== //= My version of King Of Emperium Hill. It was make for donkeyg on rAthena.org. //= I did not use the other versions as a base. You can set it to give both a //= zeny and item prizes to the guild leader through the Emperium Assistant. They //= can collect once after each time the KoE ends. //===== Version Control: =========================================================== //= 1.0 First Version. //= 1.1 Minor Bug Fixes. //= 1.2 Small Optomizations. Added Assitant to give rewards daily. //= 1.3 Only guild master man collect rewards. //= 1.4 Rewards changed from daily to only be collected once after KoE ends. //= 1.5 Changed the days and time that KoE happens. //= 1.6 Removed all KoE functions from script and based just on start and stop time. //= 1.7 Added warp portals from prontera to any character that is in a guild. //= 1.8 Added GM feature to allow adjustment of zeny and item prizes in game. //= 1.9 Added restriction to prevent changing prizes while KoE is running. //= 2.0 Added KoE prizes to OnInit to reset prizes each time scripts are reloaded. //= 2.1 Added $KoEPrizeTracker to the OnInit however I suggest that you keep it //= commented out unless you want to allow prizes to be collected again //= everytime you reload scripts. I mainly added it for easy testing. //= 2.2 Moved flags to a better location that was not hanging over the edge of the //= steps. //= 2.3 Commented out the $KoEPrizeTracker in the OnInit section. //= 2.4 Moved location of emperium from 49,49 to 50,50 so that is is centered in the //= block. //= 2.5 Changed the mapannounce when the emperium is broken. //= 2.6 Changed the OnClock gettime(4) to use&&instead of || . Now the check //= actually works! //= 2.7 Added gettime(3) and KoEActualStart to the OnInit incase scripts are //= reloaded during the time that KoE is set to be running. //= 2.8 Added $KoEStatus to ending OnClock to prevent it from running ending portion //= of the script when KoE was not already going. //= 2.9 Adding missing mapflag loadevent. //= 3.0 Changed item prize to allow 5 seperate prizes to be given. //= 3.1 Added the option for monster or guildmonster function using the variable //= $EmpSpawnMode to control which mode to use. //= 3.2 Removed the next; after case 255: that was causing error. //= 3.3 Removed $EmpSpawnMode because it still detected the guildmonster command //= even if it was not being used. //= 3.4 Removed the guildmonster command completely since it just confused people //= who did not have command. //= 3.5 Added ability to set KoE time in game. //= 3.6 Expanded the ability to set KoE time in game by allowing 4 different times. //= 3.7 Removed zeny/item prize setting from script and made completely controlled //= in game by GM. //= 3.8 Added alot of next; where they should have been. //= 3.9 Added set @KoEAddMenu$,0; to prevent it from displaying menu itmes more than //= once. //= 4.0 Added .@RandomFinalize to allow finalize number to change each time. //= 4.1 Fixed error that prevented KoE from ending at the set time. //= 4.2 Added option to switch between PvP and GvG. //= 4.3 Fixed incorrect variable. Changed GvGPvP to $GvGPvP. //= 4.4 Added function to clear zeny and item prizes when you Clear All KoE Events. //= 4.5 Fixed finalize zeny prize to allow you to finalize prize. //= 4.6 Added OnWhisperGlobal to script to all starting and stopping KoE manually //= using commands. Uses NPC:KingOfEmperium<TAB>StartKoE and NPC:KingOfEmperium //= <TAB>EndKoE. //===== Additional Comments: ======================================================= //= Need to remove the random '0' before the first event slot in the Add New KoE //= Event section. //================================================================================== Welgaia,113,121,4 script Emperium Assistant 606,{ if(getgmlevel()>98) { goto GMEmpMenu; end; } if($KOEGUILD==0) { mes "[Emperium Assistant]"; mes "Only the King Of Emperium Hill can reap the rewards!"; close; } if(strcharinfo(2)!=GetGuildName($KOEGUILD)) { mes "[Emperium Assistant]"; mes "Your guild is not the King Of Emperium Hill!"; close; } if(strcharinfo(0)!=GetGuildMaster($KOEGUILD)) { mes "[Emperium Assistant]"; mes "Only the guild master may collect the rewards for the guild as King Of Emperium Hill!"; close; } goto EmpAssStart; end; EmpAssStart: mes "[Emperium Assistant]"; mes "Your guild is the King Of Emperium Hill!"; next; if($KoEStatus==1) { mes "[Emperium Assistant]"; mes "You cannot access my services at this time."; close; } if($KoEPrizeTracker==1) { mes "[Emperium Assistant]"; mes "You can only reap the rewards of being the King Of Emperium Hill once after each battle for the Hill!"; close; } mes "[Emperium Assistant]"; mes "Your rewards await you!"; next; if($KoEZenyPrize>0) { set zeny,zeny+$KoEZenyPrize; } if($KoEItemPrize1!=0&&$KoEItemAmount1!=0) { getitem $KoEItemPrize1,$KoEItemAmount1; } if($KoEItemPrize2!=0&&$KoEItemAmount2!=0) { getitem $KoEItemPrize2,$KoEItemAmount2; } if($KoEItemPrize3!=0&&$KoEItemAmount3!=0) { getitem $KoEItemPrize3,$KoEItemAmount3; } if($KoEItemPrize4!=0&&$KoEItemAmount4!=0) { getitem $KoEItemPrize4,$KoEItemAmount4; } if($KoEItemPrize5!=0&&$KoEItemAmount5!=0) { getitem $KoEItemPrize5,$KoEItemAmount5; } set $KoEPrizeTracker,1; mes "[Emperium Assistant]"; mes "You have been rewarded for your victory!"; close; GMEmpMenu: mes "[GM Menu]"; mes "From this menu you can set event times, zeny prize, and item prizes."; switch(prompt("Add New KoE Event:Clear All KoE Events:View KoE Events:Stop Current KoE Event:Change Zeny Prize:Change Item Prize 1:Change Item Prize 2:Change Item Prize 3:Change Item Prize 4:Change Item Prize 5:Return To Non-GM Menu")) { case 1: next; mes "[GM Menu]"; mes "From here you can add new KoE events."; set .KoE,0; set @KoEAddMenu$,0; AddCountCheck: if($KoEStartDay[.KoE]==0&&$KoEEndDay[.KoE]==0&&$KoEStartTime[.KoE]==0&&$KoEEndTime[.KoE]==0) { goto AddCountCheck2; } set .KoE,.KoE+1; goto AddCountCheck; AddCountCheck2: for( set .@i,1; .@i<=7; set .@i,.@i+1 ) { set @KoEAddMenu$,@KoEAddMenu$+((getd("KoEEvent_"+.@i+"$")=="")?"No Event Set":getd("KoEEvent_"+.@i+"$"))+":"; } set .KoE,select(@KoEAddMenu$); next; mes "[GM Menu]"; mes "Which day do you want KoE to ^00FF00start^000000?"; switch(select("Sunday:Monday:Tuesday:Wednesday:Thursday:Friday:Saturday")) { case 1: set $KoEStartDay[.KoE],0; break; case 2: set $KoEStartDay[.KoE],1; break; case 3: set $KoEStartDay[.KoE],2; break; case 4: set $KoEStartDay[.KoE],3; break; case 5: set $KoEStartDay[.KoE],4; break; case 6: set $KoEStartDay[.KoE],5; break; case 7: set $KoEStartDay[.KoE],6; break; } next; mes "[GM Menu]"; mes "When do you want KoE to ^00FF00start^000000?"; switch(select("1AM:2AM:3AM:4AM:5AM:6AM:7AM:8AM:9AM:10AM:11AM:Noon:1PM:2PM:3PM:4PM:5PM:6PM:7PM:8PM:9PM:10PM:11PM:Midnight")) { case 1: set $KoEStartTime[.KoE],"01"; break; case 2: set $KoEStartTime[.KoE],"02"; break; case 3: set $KoEStartTime[.KoE],"03"; break; case 4: set $KoEStartTime[.KoE],"04"; break; case 5: set $KoEStartTime[.KoE],"05"; break; case 6: set $KoEStartTime[.KoE],"06"; break; case 7: set $KoEStartTime[.KoE],"07"; break; case 8: set $KoEStartTime[.KoE],"08"; break; case 9: set $KoEStartTime[.KoE],"09"; break; case 10: set $KoEStartTime[.KoE],"10"; break; case 11: set $KoEStartTime[.KoE],"11"; break; case 12: set $KoEStartTime[.KoE],"12"; break; case 13: set $KoEStartTime[.KoE],"13"; break; case 14: set $KoEStartTime[.KoE],"14"; break; case 15: set $KoEStartTime[.KoE],"15"; break; case 16: set $KoEStartTime[.KoE],"16"; break; case 17: set $KoEStartTime[.KoE],"17"; break; case 18: set $KoEStartTime[.KoE],"18"; break; case 19: set $KoEStartTime[.KoE],"19"; break; case 20: set $KoEStartTime[.KoE],"20"; break; case 21: set $KoEStartTime[.KoE],"21"; break; case 22: set $KoEStartTime[.KoE],"22"; break; case 23: set $KoEStartTime[.KoE],"23"; break; case 24: set $KoEStartTime[.KoE],"00"; break; } next; mes "[GM Menu]"; mes "Which day do you want KoE to ^00FF00finish^000000?"; next; switch(select("Same Day:Sunday:Monday:Tuesday:Wednesday:Thursday:Friday:Saturday")) { case 1: set $KoEEndDay[.KoE],$KoEStartDay[.KoE]; break; case 2: set $KoEEndDay[.KoE],0; break; case 3: set $KoEEndDay[.KoE],1; break; case 4: set $KoEEndDay[.KoE],2; break; case 5: set $KoEEndDay[.KoE],3; break; case 6: set $KoEEndDay[.KoE],4; break; case 7: set $KoEEndDay[.KoE],5; break; case 8: set $KoEEndDay[.KoE],6; break; } next; mes "[GM Menu]"; mes "When do you want KoE to ^00FF00finish^000000?"; switch(select("1AM:2AM:3AM:4AM:5AM:6AM:7AM:8AM:9AM:10AM:11AM:Noon:1PM:2PM:3PM:4PM:5PM:6PM:7PM:8PM:9PM:10PM:11PM:Midnight")) { case 1: set $KoEEndTime[.KoE],"01"; break; case 2: set $KoEEndTime[.KoE],"02"; break; case 3: set $KoEEndTime[.KoE],"03"; break; case 4: set $KoEEndTime[.KoE],"04"; break; case 5: set $KoEEndTime[.KoE],"05"; break; case 6: set $KoEEndTime[.KoE],"06"; break; case 7: set $KoEEndTime[.KoE],"07"; break; case 8: set $KoEEndTime[.KoE],"08"; break; case 9: set $KoEEndTime[.KoE],"09"; break; case 10: set $KoEEndTime[.KoE],"10"; break; case 11: set $KoEEndTime[.KoE],"11"; break; case 12: set $KoEEndTime[.KoE],"12"; break; case 13: set $KoEEndTime[.KoE],"13"; break; case 14: set $KoEEndTime[.KoE],"14"; break; case 15: set $KoEEndTime[.KoE],"15"; break; case 16: set $KoEEndTime[.KoE],"16"; break; case 17: set $KoEEndTime[.KoE],"17"; break; case 18: set $KoEEndTime[.KoE],"18"; break; case 19: set $KoEEndTime[.KoE],"19"; break; case 20: set $KoEEndTime[.KoE],"20"; break; case 21: set $KoEEndTime[.KoE],"21"; break; case 22: set $KoEEndTime[.KoE],"22"; break; case 23: set $KoEEndTime[.KoE],"23"; break; case 24: set $KoEEndTime[.KoE],"00"; break; } next; mes "[GM Menu]"; set .@RandomFinalize,rand(100,999); mes "Are you sure you want to set a new KoE event? To finalize the new KoE event? If your 100% sure type the number ^0000FF"+.@RandomFinalize+"^000000."; input .@Finalize; if(.@Finalize!=.@RandomFinalize) { next; mes "[GM Menu]"; mes "It is probably for the best that you don't adjust KoE event times!"; close2; goto GMEmpMenu; end; } if($KoEStartDay[.KoE]==0&&$KoEEndDay[.KoE]==0&&$KoETime[.KoE]==0&&$KoEEndTime[.KoE]==0) { close2; goto GMEmpMenu; end; } if($KoEStartDay[.KoE]==0) { set $@KoEStartDayName$,"Sunday"; } if($KoEStartDay[.KoE]==1) { set $@KoEStartDayName$,"Monday"; } if($KoEStartDay[.KoE]==2) { set $@KoEStartDayName$,"Tuesday"; } if($KoEStartDay[.KoE]==3) { set $@KoEStartDayName$,"Wednesday"; } if($KoEStartDay[.KoE]==4) { set $@KoEStartDayName$,"Thursday"; } if($KoEStartDay[.KoE]==5) { set $@KoEStartDayName$,"Friday"; } if($KoEStartDay[.KoE]==6) { set $@KoEStartDayName$,"Saturday"; } if($KoEEndDay[.KoE]==0) { set $@KoEEndDayName$,"Sunday"; } if($KoEEndDay[.KoE]==1) { set $@KoEEndDayName$,"Monday"; } if($KoEEndDay[.KoE]==2) { set $@KoEEndDayName$,"Tuesday"; } if($KoEEndDay[.KoE]==3) { set $@KoEEndDayName$,"Wednesday"; } if($KoEEndDay[.KoE]==4) { set $@KoEEndDayName$,"Thursday"; } if($KoEEndDay[.KoE]==5) { set $@KoEEndDayName$,"Friday"; } if($KoEEndDay[.KoE]==6) { set $@KoEEndDayName$,"Saturday"; } next; mes "[GM Menu]"; mes ""+$@KoEStartDayName$+" from "+$KoEStartTime[.KoE]+":00 till "+$@KoEStartDayName$+" at "+$KoEEndTime[.KoE]+":00"; setd("KoEEvent_"+.KoE+"$"),"Event "+.KoE+" Set"; close2; goto GMEmpMenu; end; case 2: next; if($KoEStatus==1) { mes "[GM Menu]"; mes "KoE events cannot be cleared at this time. You must stop the current KoE event first."; close2; goto GMEmpMenu; end; } mes "[GM Menu]"; set .@RandomFinalize,rand(100,999); mes "You are about to clear all the set KoE events and prizes set for them. If your 100% sure type the number ^0000FF"+.@RandomFinalize+"^000000."; input .@Finalize; if(.@Finalize!=.@RandomFinalize) { next; mes "[GM Menu]"; mes "It is probably for the best that you don't clear KoE events!"; close2; goto GMEmpMenu; end; } set $KoEZenyPrize,0; set $KoEItemPrize1,0; set $KoEItemAmount1,0; set $KoEItemPrize2,0; set $KoEItemAmount2,0; set $KoEItemPrize3,0; set $KoEItemAmount3,0; set $KoEItemPrize4,0; set $KoEItemAmount4,0; set $KoEItemPrize5,0; set $KoEItemAmount5,0; set .KoE,0; ResetLoop: set $KoEStartDay[.KoE],0; set $KoEEndDay[.KoE],0; set $KoEStartTime[.KoE],0; set $KoEEndTime[.KoE],0; setd("KoEEvent_"+.KoE+"$"),"No Event Set"; set .KoE,.KoE+1; if(.KoE>7) { next; mes "[GM Menu]"; mes "All KoE events have been cleared."; close2; goto GMEmpMenu; end; } goto ResetLoop; end; case 3: next; mes "Current KoE Event Times:"; set .KoE,1; KoEDayCheck: if($KoEStartDay[.KoE]==0) { set $@KoEStartDayName$,"Sunday"; } if($KoEStartDay[.KoE]==1) { set $@KoEStartDayName$,"Monday"; } if($KoEStartDay[.KoE]==2) { set $@KoEStartDayName$,"Tuesday"; } if($KoEStartDay[.KoE]==3) { set $@KoEStartDayName$,"Wednesday"; } if($KoEStartDay[.KoE]==4) { set $@KoEStartDayName$,"Thursday"; } if($KoEStartDay[.KoE]==5) { set $@KoEStartDayName$,"Friday"; } if($KoEStartDay[.KoE]==6) { set $@KoEStartDayName$,"Saturday"; } if($KoEEndDay[.KoE]==0) { set $@KoEEndDayName$,"Sunday"; } if($KoEEndDay[.KoE]==1) { set $@KoEEndDayName$,"Monday"; } if($KoEEndDay[.KoE]==2) { set $@KoEEndDayName$,"Tuesday"; } if($KoEEndDay[.KoE]==3) { set $@KoEEndDayName$,"Wednesday"; } if($KoEEndDay[.KoE]==4) { set $@KoEEndDayName$,"Thursday"; } if($KoEEndDay[.KoE]==5) { set $@KoEEndDayName$,"Friday"; } if($KoEEndDay[.KoE]==6) { set $@KoEEndDayName$,"Saturday"; } mes "^FF0000Event "+.KoE+"^000000"; if($KoEStartDay[.KoE]==0&&$KoEEndDay[.KoE]==0&&$KoEStartTime[.KoE]==0&&$KoEEndTime[.KoE]==0) { mes "No Event Set"; } else { mes ""+$@KoEStartDayName$+" at "+$KoEStartTime[.KoE]+":00 till "+$@KoEEndDayName$+" at "+$KoEEndTime[.KoE]+":00"; } set .KoE,.KoE+1; if(.KoE>7) { close2; goto GMEmpMenu; end; } goto KoEDayCheck; end; case 4: next; if($KoEStatus==0) { mes "[GM Menu]"; mes "There is currently no KoE event running."; close2; goto GMEmpMenu; end; } mes "[GM Menu]"; set .@RandomFinalize,rand(100,999); mes "You are about to stop the current KoE event. If your 100% sure type the number ^0000FF"+.@RandomFinalize+"^000000."; input .@Finalize; if(.@Finalize!=.@RandomFinalize) { next; mes "[GM Menu]"; mes "It is probably for the best that you don't stop KoE events while there going!"; close2; goto GMEmpMenu; end; } set $KoEStatus,0; gvgoff "vmorocc"; if(getmapusers("vmorocc")>0) { MapRespawnGuildID "vmorocc",$KOEGUILD,7; } killmonsterall "vmorocc",0; set .@name$,GetGuildMaster($KOEGUILD); if($KOEGUILD!=0) { Announce "The King of Emperium Hill has ended! The King Of Emperium Hill is the ["+GetGuildName($KOEGUILD)+"] guild.",bc_all|bc_WoE; } else { Announce "The King of Emperium Hill has ended! No guild has proven themselves King Of Emperium Hill!",bc_all|bc_WoE; } close2; goto GMEmpMenu; end; case 5: next; if($KoEStatus==1) { mes "[GM Menu]"; mes "You cannot adjust the Zeny Prize at this time."; close2; goto GMEmpMenu; end; } mes "[GM Menu]"; mes "The current Zeny Prize amount is ^ff0000"+$KoEZenyPrize+"^000000."; mes "NOTE: If it says 'NULL' or '0' then that value has not been set."; mes " "; mes "Enter what you want the new Zeny Prize to be."; input .@GMAdjust; if(.@GMAdjust<0) { next; mes "[GM Menu]"; mes "The Zeny Prize cannot be less than 0."; next; goto GMEmpMenu; end; } next; mes "[GM Menu]"; set .@RandomFinalize,rand(100,999); mes "Are you sure you want to modify the Zeny Prize to ^ff0000"+.@GMAdjust+"^000000? To finalize the change in Zeny Prize type the number ^0000FF"+.@RandomFinalize+"^000000."; input .@Finalize; if(.@Finalize==.@RandomFinalize) { next; set $KoEZenyPrize,.@GMAdjust; mes "[GM Menu]"; mes "The Zeny Prize amount has been changed to ^ff0000"+$KoEZenyPrize+"^000000."; next; goto GMEmpMenu; end; } next; mes "[GM Menu]"; mes "It is probably for the best that you don't adjust the Zeny Prize!"; close2; goto GMEmpMenu; end; case 6: next; if($KoEStatus==1) { mes "[GM Menu]"; mes "You cannot adjust the Item Prize at this time."; close2; goto GMEmpMenu; end; } mes "[GM Menu]"; mes "From this menu you can adjust the item prize. The current Reward is: ^ff0000"+$KoEItemAmount1+"^000000 ^ff0000"+getitemname($KoEItemPrize1)+"^000000."; mes "NOTE: If it says 'NULL' or '0' then that value has not been set."; mes " "; mes "Enter what you want the new Item Prize to be. WARNING: If you input an invalid itemID it will error everytime a player tries to recieve it!"; input .@GMAdjust; next; set $KoEItemPrize1,.@GMAdjust; mes "The Item Prize amount has been changed to ^ff0000"+getitemname($KoEItemPrize1)+"^000000[^ff0000"+$KoEItemPrize1+"^000000]."; next; mes "[GM Menu]"; mes "The current Item Prize Amount is ^ff0000"+$KoEItemAmount1+"^000000."; mes "NOTE: If it says 'NULL' or '0' then that value has not been set."; mes "Enter what you want the new Item Prize Amount to be."; input .@GMAdjust; if(.@GMAdjust<1) { next; mes "[GM Menu]"; mes "The Item Prize Amount cannot be less than 1."; next; goto GMEmpMenu; end; } next; mes "[GM Menu]"; set .@RandomFinalize,rand(100,999); mes "Are you sure you want to modify the Item Prize Amount to ^ff0000"+.@GMAdjust+"^000000 "+getitemname($KoEItemPrize1)+"? To finalize the change in Item Prize type the number ^0000FF"+.@RandomFinalize+"^000000."; input .@Finalize; if(.@Finalize!=.@RandomFinalize) { next; mes "[GM Menu]"; mes "It is probably for the best that you don't adjust the Item Prize!"; next; goto GMEmpMenu; end; } next; mes "[GM Menu]"; set $KoEItemAmount1,.@GMAdjust; mes "The Item Prize amount has been changed to ^ff0000"+$KoEItemAmount1+"^000000 ^ff0000"+getitemname($KoEItemPrize1)+"^000000."; close2; goto GMEmpMenu; end; case 7: if($KoEStatus==1) { mes "[GM Menu]"; mes "You cannot adjust the Item Prize at this time."; close2; goto GMEmpMenu; end; } mes "[GM Menu]"; mes "From this menu you can adjust the item prize. The current Reward is: ^ff0000"+$KoEItemAmount2+"^000000 ^ff0000"+getitemname($KoEItemPrize2)+"^000000."; mes "NOTE: If it says 'NULL' or '0' then that value has not been set."; mes " "; mes "Enter what you want the new Item Prize to be. WARNING: If you input an invalid itemID it will error everytime a player tries to recieve it!"; input .@GMAdjust; next; set $KoEItemPrize2,.@GMAdjust; mes "The Item Prize amount has been changed to ^ff0000"+getitemname($KoEItemPrize2)+"^000000[^ff0000"+$KoEItemPrize2+"^000000]."; next; mes "[GM Menu]"; mes "The current Item Prize Amount is ^ff0000"+$KoEItemAmount2+"^000000."; mes "NOTE: If it says 'NULL' or '0' then that value has not been set."; mes "Enter what you want the new Item Prize Amount to be."; input .@GMAdjust; if(.@GMAdjust<1) { next; mes "[GM Menu]"; mes "The Item Prize Amount cannot be less than 1."; next; goto GMEmpMenu; end; } next; mes "[GM Menu]"; set .@RandomFinalize,rand(100,999); mes "Are you sure you want to modify the Item Prize Amount to ^ff0000"+.@GMAdjust+"^000000 "+getitemname($KoEItemPrize2)+"? To finalize the change in Item Prize type the number ^0000FF"+.@RandomFinalize+"^000000."; input .@Finalize; if(.@Finalize!=.@RandomFinalize) { next; mes "[GM Menu]"; mes "It is probably for the best that you don't adjust the Item Prize!"; next; goto GMEmpMenu; end; } next; mes "[GM Menu]"; set $KoEItemAmount2,.@GMAdjust; mes "The Item Prize amount has been changed to ^ff0000"+$KoEItemAmount2+"^000000 ^ff0000"+getitemname($KoEItemPrize2)+"^000000."; close2; goto GMEmpMenu; end; case 8: next; if($KoEStatus==1) { mes "[GM Menu]"; mes "You cannot adjust the Item Prize at this time."; close2; goto GMEmpMenu; end; } mes "[GM Menu]"; mes "From this menu you can adjust the item prize. The current Reward is: ^ff0000"+$KoEItemAmount3+"^000000 ^ff0000"+getitemname($KoEItemPrize3)+"^000000."; mes "NOTE: If it says 'NULL' or '0' then that value has not been set."; mes " "; mes "Enter what you want the new Item Prize to be. WARNING: If you input an invalid itemID it will error everytime a player tries to recieve it!"; input .@GMAdjust; next; set $KoEItemPrize3,.@GMAdjust; mes "The Item Prize amount has been changed to ^ff0000"+getitemname($KoEItemPrize3)+"^000000[^ff0000"+$KoEItemPrize3+"^000000]."; next; mes "[GM Menu]"; mes "The current Item Prize Amount is ^ff0000"+$KoEItemAmount3+"^000000."; mes "NOTE: If it says 'NULL' or '0' then that value has not been set."; mes "Enter what you want the new Item Prize Amount to be."; input .@GMAdjust; if(.@GMAdjust<1) { next; mes "[GM Menu]"; mes "The Item Prize Amount cannot be less than 1."; next; goto GMEmpMenu; end; } next; mes "[GM Menu]"; set .@RandomFinalize,rand(100,999); mes "Are you sure you want to modify the Item Prize Amount to ^ff0000"+.@GMAdjust+"^000000 "+getitemname($KoEItemPrize3)+"? To finalize the change in Item Prize type the number ^0000FF"+.@RandomFinalize+"^000000."; input .@Finalize; if(.@Finalize!=.@RandomFinalize) { next; mes "[GM Menu]"; mes "It is probably for the best that you don't adjust the Item Prize!"; next; goto GMEmpMenu; end; } next; mes "[GM Menu]"; set $KoEItemAmount3,.@GMAdjust; mes "The Item Prize amount has been changed to ^ff0000"+$KoEItemAmount3+"^000000 ^ff0000"+getitemname($KoEItemPrize3)+"^000000."; close2; goto GMEmpMenu; end; case 9: next; if($KoEStatus==1) { mes "[GM Menu]"; mes "You cannot adjust the Item Prize at this time."; close2; goto GMEmpMenu; end; } mes "[GM Menu]"; mes "From this menu you can adjust the item prize. The current Reward is: ^ff0000"+$KoEItemAmount4+"^000000 ^ff0000"+getitemname($KoEItemPrize4)+"^000000."; mes "NOTE: If it says 'NULL' or '0' then that value has not been set."; mes " "; mes "Enter what you want the new Item Prize to be. WARNING: If you input an invalid itemID it will error everytime a player tries to recieve it!"; input .@GMAdjust; next; set $KoEItemPrize4,.@GMAdjust; mes "The Item Prize amount has been changed to ^ff0000"+getitemname($KoEItemPrize4)+"^000000[^ff0000"+$KoEItemPrize4+"^000000]."; next; mes "[GM Menu]"; mes "The current Item Prize Amount is ^ff0000"+$KoEItemAmount4+"^000000."; mes "NOTE: If it says 'NULL' or '0' then that value has not been set."; mes "Enter what you want the new Item Prize Amount to be."; input .@GMAdjust; if(.@GMAdjust<1) { next; mes "[GM Menu]"; mes "The Item Prize Amount cannot be less than 1."; next; goto GMEmpMenu; end; } next; mes "[GM Menu]"; set .@RandomFinalize,rand(100,999); mes "Are you sure you want to modify the Item Prize Amount to ^ff0000"+.@GMAdjust+"^000000 "+getitemname($KoEItemPrize4)+"? To finalize the change in Item Prize type the number ^0000FF"+.@RandomFinalize+"^000000."; input .@Finalize; if(.@Finalize!=.@RandomFinalize) { next; mes "[GM Menu]"; mes "It is probably for the best that you don't adjust the Item Prize!"; next; goto GMEmpMenu; end; } next; mes "[GM Menu]"; set $KoEItemAmount4,.@GMAdjust; mes "The Item Prize amount has been changed to ^ff0000"+$KoEItemAmount4+"^000000 ^ff0000"+getitemname($KoEItemPrize4)+"^000000."; close2; goto GMEmpMenu; end; case 10: next; if($KoEStatus==1) { mes "[GM Menu]"; mes "You cannot adjust the Item Prize at this time."; close2; goto GMEmpMenu; end; } mes "[GM Menu]"; mes "From this menu you can adjust the item prize. The current Reward is: ^ff0000"+$KoEItemAmount5+"^000000 ^ff0000"+getitemname($KoEItemPrize5)+"^000000."; mes "NOTE: If it says 'NULL' or '0' then that value has not been set."; mes " "; mes "Enter what you want the new Item Prize to be. WARNING: If you input an invalid itemID it will error everytime a player tries to recieve it!"; input .@GMAdjust; next; set $KoEItemPrize5,.@GMAdjust; mes "The Item Prize amount has been changed to ^ff0000"+getitemname($KoEItemPrize5)+"^000000[^ff0000"+$KoEItemPrize5+"^000000]."; next; mes "[GM Menu]"; mes "The current Item Prize Amount is ^ff0000"+$KoEItemAmount5+"^000000."; mes "NOTE: If it says 'NULL' or '0' then that value has not been set."; mes "Enter what you want the new Item Prize Amount to be."; input .@GMAdjust; if(.@GMAdjust<1) { next; mes "[GM Menu]"; mes "The Item Prize Amount cannot be less than 1."; next; goto GMEmpMenu; end; } next; mes "[GM Menu]"; set .@RandomFinalize,rand(100,999); mes "Are you sure you want to modify the Item Prize Amount to ^ff0000"+.@GMAdjust+"^000000 "+getitemname($KoEItemPrize5)+"? To finalize the change in Item Prize type the number ^0000FF"+.@RandomFinalize+"^000000."; input .@Finalize; if(.@Finalize!=.@RandomFinalize) { next; mes "[GM Menu]"; mes "It is probably for the best that you don't adjust the Item Prize!"; next; goto GMEmpMenu; end; } next; mes "[GM Menu]"; set $KoEItemAmount5,.@GMAdjust; mes "The Item Prize amount has been changed to ^ff0000"+$KoEItemAmount5+"^000000 ^ff0000"+getitemname($KoEItemPrize5)+"^000000."; close2; goto GMEmpMenu; end; case 11: next; goto EmpAssStart; end; case 255: goto EmpAssStart; end; } } - script KingOfEmperium -1,{ end; OnInit: disablenpc "Emperium Hill#1"; set $GvGPvP,0; //Set to 0 for GvG and 1 for PvP set $KoEStatus,0; OnMinute00: set .KoE,0; StartLoop: if(gettime(4)==$KoEEndDay[.KoE]&&gettime(3)==$KoEEndTime[.KoE]) { goto KoEActualEnd; end; } if(gettime(4)==$KoEStartDay[.KoE]&&gettime(3)>=$KoEStartTime[.KoE]&&(gettime(3)<$KoEEndTime[.KoE] || $KoEStartDay[.KoE]!=$KoEEndDay[.KoE])) { goto KoEActualStart; end; } set .KoE,.KoE+1; if(.KoE>4) { goto StartLoopEnd; } goto StartLoop; end; KoEActualStart: enablenpc "Emperium Hill#1"; if($KoEStatus==1) { end; } set $KoEStatus,1; set $KoEPrizeTracker,0; if($KOEGUILD!=0) { Announce "The King of Emperium Hill has begun! The King Of Emperium Hill is the ["+GetGuildName($KOEGUILD)+"] guild.",bc_all|bc_WoE; } else { Announce "King Of Emperium Hill has began! Which guild will prove their worth?",bc_all|bc_WoE; } if(getmapusers("vmorocc")>0) { MapRespawnGuildID "vmorocc",$KOEGUILD,6; } if($GvGPvP==0) { gvgon "vmorocc"; } else { pvpon "vmorocc"; } monster "vmorocc",0,0,"EMPERIUM",1288,1,"KingOfEmperium::OnEmperiumBreak"; end; StartLoopEnd: set .KoE,0; EndLoop: if((gettime(4)==$KoEEndDay[.KoE])&&(gettime(3)==$KoEEndTime[.KoE])) { goto KoEActualEnd; end; } if($KoEEndDay[.KoE]==0&&$KoEStartTime[.KoE]==0&&$KoEEndTime[.KoE]==0) { end; } set .KoE,.KoE+1; if(.KoE>4) { end; } goto EndLoop; end; KoEActualEnd: disablenpc "Emperium Hill#1"; if($KoEStatus==0) { end; } set $KoEStatus,0; if($GvGPvP==0) { gvgoff "vmorocc"; } else { pvpoff "vmorocc"; } if(getmapusers("vmorocc")>0) { MapRespawnGuildID "vmorocc",$KOEGUILD,7; } killmonsterall "vmorocc",0; set .@name$,GetGuildMaster($KOEGUILD); if($KOEGUILD!=0) { Announce "The King of Emperium Hill has ended! The King Of Emperium Hill is the ["+GetGuildName($KOEGUILD)+"] guild.",bc_all|bc_WoE; } else { Announce "The King of Emperium Hill has ended! No guild has proven themselves King Of Emperium Hill!",bc_all|bc_WoE; } query_sql "UPDATE guild SET guild_points=guild_points +1 WHERE guild_id="+ getcharid(2); end; OnEmperiumBreak: if(getskilllv(10000)!=1) { announce "Only a guild with the Guild Approval skill can kill the Emperium!",bc_self; monster "vmorocc",0,0,"EMPERIUM",1288,1,"KingOfEmperium::OnEmperiumBreak"; end; } killmonsterall "vmorocc",0; set .@breaker2$,strcharinfo(0); set $KOEGUILD,getcharid(2); if (getcharid(2)) query_sql "UPDATE `char` SET `break_points`=break_points + '1' WHERE `char_id` ="+ getcharid(0); mapannounce "vmorocc","["+.@breaker2$+"] has broken the emperium for the ["+GetGuildName($KOEGUILD)+"] guild.",bc_map|bc_WoE,"0x00CCFF",FW_NORMAL,12; sleep 2000; if(getmapusers("vmorocc")>0) { MapRespawnGuildID "vmorocc",$KOEGUILD,6; } announce "The ["+getguildName($KOEGUILD)+"] guild has became the King Of Emperium Hill!",bc_all|bc_WoE; sleep 5000; if($KoEStatus==1) { monster "vmorocc",0,0,"EMPERIUM",1288,1,"KingOfEmperium::OnEmperiumBreak"; } end; OnWhisperGlobal: if(getgmlevel()<99) { end; } if(@whispervar0$=="StartKoe") { if($KoEStatus==1) { dispbottom "KoE is already running."; end; } goto KoEActualStart; end; } if(@whispervar0$=="StopKoe") { if($KoEStatus==0) { dispbottom "KoE is currently not running."; end; }goto KoEActualEnd; end; } end; } //================================================================================== //--------|King Of Emperium Hill Guild Protection|---------------------------------- //================================================================================== - script KoEGuildProtection -1,{ OnInit: end; OnPCLoadMapEvent: if(getgmlevel()<20&&strcharinfo(3)=="vmorocc"&&getcharid(2)==0) { announce "You must be in a guild to enter Emperium Hill!",bc_self; warp "SavePoint",0,0; end; } end; } //================================================================================== //--------|KoE Flag Script|--------------------------------------------------------- //================================================================================== - script KoEFlag 723,-1,-1,{ mes "[Emperium Hill]"; if($KOEGUILD!=0) { mes "The King Of Emperium Hill is the ["+GetGuildName($KOEGUILD)+"] guild."; } else { mes "Only the strongest warriors should may over take Emperium Hill!"; } close; } Welgaia,154,128,4 duplicate(KoEFlag) Emperium Hill#EH1 722 vmorocc,133,121,4 duplicate(KoEFlag) Emperium Hill#EH2 722 vmorocc,124,94,4 duplicate(KoEFlag) Emperium Hill#EH3 722 vmorocc,144,94,4 duplicate(KoEFlag) Emperium Hill#EH4 722 vmorocc,94,144,2 duplicate(KoEFlag) Emperium Hill#EH5 722 vmorocc,94,124,2 duplicate(KoEFlag) Emperium Hill#EH6 722 vmorocc,173,124,6 duplicate(KoEFlag) Emperium Hill#EH7 722 vmorocc,173,144,6 duplicate(KoEFlag) Emperium Hill#EH8 722 vmorocc,124,173,8 duplicate(KoEFlag) Emperium Hill#EH9 722 vmorocc,144,173,8 duplicate(KoEFlag) Emperium Hill#EH10 722 //================================================================================== //--------|KoE Waper Script|-------------------------------------------------------- //================================================================================== - script KoEWarper 723,-1,-1,{ mes "[King of Emperium]"; mes "Only the strongest warriors should pass through the portal to Emperium Hill"; next; switch(prompt("Proceed to the Emperium Hill:Nevermind")) { case 1: next; if(getgmlevel()<20&&getcharid(2)==0) { mes "[Notice:]"; mes " "; mes "You must be in a guild to enter Emperium Hill!"; close; } warp "vmorocc",0,0; close; case 2: close; case 255: close; } } Welgaia,165,92,0 duplicate(KoEWarper) Emperium Hill#1 723 //prontera,147,203,0 duplicate(KoEWarper) Emperium Hill#2 723 //prontera,164,204,0 duplicate(KoEWarper) Emperium Hill#3 723 //prontera,164,203,0 duplicate(KoEWarper) Emperium Hill#4 723 //================================================================================== //--------|Map Flags|--------------------------------------------------------------- //================================================================================== vmorocc mapflag nobranch vmorocc mapflag nomemo vmorocc mapflag nopenalty vmorocc mapflag noreturn vmorocc mapflag nosave SavePoint vmorocc mapflag noteleport vmorocc mapflag nowarp vmorocc mapflag nowarpto vmorocc mapflag loadevent Note: its working when using OnWhisperGlobal there are no errors but when you set a time for KOE and when it end on the set time that error will appear, its a little bit weird though
  15. credit goes to Judas, this is a very simple and detailed tutorial which is proven effective http://supportmii.com/ro1/Clients/Judas_Setups/Guides/Judas_ClientSide_Area.pdf
  16. Hello rAthena community, can I request for a source mod where the asura sp delay consumption will be enabled on the pre-re casting and it will only affect Sura because our server is supporting trans and 3rd jobs, thanks in advance good day rAthena
  17. its not the monster race its the monster element, thats what it means
  18. I already fixed it 3 minutes after I edited my post, sorry dont have much time to post it here, btw thanks to all who helped me
  19. its not a script, its just a sql query
  20. you must install GD on your webhost
  21. I dont know if this is possible but I'll just post it here, maybe someone who's very good in scripting can make my idea come to life Explanation: this npc can only be used by party leader, the NPC will ask how much their party will bet (Min 10 Max 30k POD), and will check if the party leader will have that amount of POD and if he/she have that amount of pod it will be taken by the NPC and will also check if the party members count is 7, and if all the requirements are met the NPC will announce "The party (PartyName) have bet (PodAmount) on the BG Party vs Party challenge, and if another party is interested in taking the challenge their party leader will talk to the NPC and will put the same amount that the 1st party put and if the requirements are met they will be both warp on the Battle Ground map. the npc that will be use for the Bg will be base on the (BG_Emp) script that is made by Ms.AnnieRuru Explanation of the BG_Emp: the first team to break the enemies crystal will gain 1 point, first team to gain 2 points will win, and the winner party can get their bet + the opponents bet. I really appreciate all the help and assistance that she gave me when I requested this script bg_emp0.2.txt
  22. thanks for this, I will try it and when there's a problem I will post it here, thanks Edit: Not working, it says @ec is unknown command
×
×
  • Create New...