-
Posts
22 -
Joined
-
Last visited
Profile Information
-
Gender
Not Telling
Recent Profile Visitors
727 profile views
Miemie's Achievements
-
Hi rathena, Huhu, i'm facing this issue. Can anyone help me? I saw many issue regarding this, but i don't know how specifically to fix this. Huhu.
-
The solution is as mentioned by Benching: https://rathena.org/board/topic/105448-loadnpc-did-not-work/?p=300409 use double slash ( // ) @loadnpc npc//pre-re//custom//quest//mission_board.txt Anyway, thank you guys! ^^
-
Hi, Can anyone help me with this scripts? I'm facing: 1. Unable to re-do the hunting. It keeps saying, even after time laps. (Even killing Lunatic, doesnt count anymore) Here is the script: //======Name======================================== // Daily Monster Hunt //======Version===================================== // 1.2 //======Author(s)=================================== // Sandbox //======Comments==================================== // This NPC allows your player to hunt a random amount // of a random monster, within a random time // *randomception!* // If the player successfully hunts the monster // within the time limit, he'll receive a reward! //======Credits===================================== // KeyWorld, nanakiwurtz, NeoMind, Kido // Thanks for helping me out guize! //================================================== prontera,161,150,3 script Hunting Challenge 869,{ mes .Npc_Name$; if(Hunter) { mes "You have killed ^880000"+HuntCount+"^000000/^0000FF"+Amt +"^000000 "+getmonsterinfo(Hunt,0)+"s, keep it up!"; close; } // if(gettimetick(2) < HuntDelay) { // mes "You can only do this quest once a day!"; // close; // } mes "Hello, do you want to take on the Monster Hunting Challenge?","I will give you a random time limit to kill a random amount of a monster, If you manage to kill them within the given time, you'll receive a reward!"; next; mes "Your reward will be ^0000FFRefine Ticket^000000. So, get ready ..."; next; mes "A timer on top of the screen is ^0000FFslightly faster than accurate timer^000000, I'm just making you a little bit panic! Hehe! You can still hunting until I announced time-out."; if(select("Bring it on!:How about no?")==2) { mes .Npc_Name$; mes "Fine!"; close; } next; mes .Npc_Name$; Hunt = .Mob_List[rand(getarraysize(.Mob_List))]; Time = rand(60,99); //Timer Amt = rand (50,100); //Amount of mob to hunt Hunter++; mes "You have to hunt ^0000FF"+Amt+" "+getmonsterinfo(Hunt,0)+"^000000 in ^AA0000"+Time+"^000000 seconds!"; next; mes .Npc_Name$; mes "Go go go!"; close2; showdigit Time,3; // HuntDelay = gettimetick(2)+86400; //Once a day only. HuntStart = gettimetick(2)+Time; sleep2 1000*Time; if(Hunter) dispbottom strnpcinfo(1)+": I'm sorry, you didn't make it!"; HuntStart = 0; //Reset all variables Hunt = 0; Hunter = 0; HuntCount = 0; Time = 0; Amt = 0; end; //----------Config---------- OnInit: .Npc_Name$ = "[^0000FF NPC ^000000]"; setarray .Mob_List[0],1002,1007,1063; //Mobs to hunt. Default: Poring, Fabre, Lunatic .Reward = 696; //Reward ID .RewAmt = 1; //Reward Amount end; OnNPCKillEvent: if(Hunter > 0) { if(gettimetick(2) < HuntStart) { if(killedrid == Hunt) { HuntCount++; dispbottom "You have killed "+HuntCount+"/"+Amt+" "+getmonsterinfo(Hunt,0)+"s, keep it up!"; if(HuntCount >= Amt) { dispbottom strnpcinfo(1)+": Congratulations! You did it!"; getitem .Reward,.RewAmt; HuntStart = 0; Hunt = 0; Hunter = 0; HuntCount = 0; Time = 0; Amt = 0; showdigit 1,3; } } } } end; } Okay, FIXED. Just, add "=" From this: OnNPCKillEvent: if(Hunter > 0) { if(gettimetick(2) < HuntStart) { To this: OnNPCKillEvent: if(Hunter >= 0) { if(gettimetick(2) < HuntStart) {
-
Thank you Anakawai! I will this out ;D
-
This would be great! I'm using green flux cp! Anyone? Any updates? Huhu.
-
Hi Guys, Love this script. But, how to make this script as Auto-Event? Instead of making GM to start the event. They will automatically run at 1. 12:00 pm 2. 16:00 pm 3. 20:00 pm 4. 24:00 am 5. 4:00am (in the other word, 4 hours interval) // Copyrights Notice // ======================================================== // This work is licensed under the Creative Commons Attribution-NonCommercial 4.0 International License. // To view a copy of this license, visit http://creativecommons.org/licenses/by-nc/4.0/. // ======================================================== // Introduction // ======================================================== // Copyrights 2015-2020 Jordan Lacandula All rights reserved // ======================================================== // Script: Mob Kill Ranking // ======================================================== // Programmer: Jordan Lacandula // Website: For more info, visit http://jordanlacandula.tk/ // ======================================================== // Bug Report/Job Request // ======================================================== // Email: [email protected]<script data-cfhash='f9e31' type="text/javascript">/* */</script> // Skype: jordan.lacandula // ======================================================== // NPC Information // ======================================================== // This NPC will summon a given amount monster in a given map // Every time the player kill a monster, he will be given a point // The player that have the 3 highest points will be rewarded // Ranking will reset, when the Event is started // ======================================================== // Thanks to Aureon, for the idea of this NPC // ======================================================== prontera,150,150,5 script Event Ranking 717,{ if(getgmlevel() < 99){ mes "Rank 1 receive "+ .r1p[1] +" piece(s) of "+ getitemname(.r1p[0]) +"."; next; mes "Rank 2 receive "+ .r2p[1] +" piece(s) of "+ getitemname(.r2p[0]) +"."; next; mes "Rank 3 receive "+ .r3p[1] +" piece(s) of "+ getitemname(.r3p[0]) +"."; close; } switch(select("Nothing:Start:End")){ case 1: close; break; case 2: callsub OnStart; close; break; case 3: callsub OnEventEnd; break; } OnTimer6000: set [email protected],[email protected]+1; if([email protected] >= .event_duration){ callsub OnEventEnd; }else{ announce "Monster Left: " [email protected],0; } end; OnMinute00: callsub OnStart; end; OnStart: set ep,0; killmonster .event_location$,.mob_name$; set [email protected],0; set .rank1_id,0; set .rank2_id,0; set .rank3_id,0; set .r1po,0; set .r2po,0; set .r3po,0; monster .event_location$,0,0,.mob_name$,.event_mobid,.mob_count,strnpcinfo(0)+"::OnEventMobKill"; announce "Monster Invasion has been started",0; end; OnEventMobKill: set ep,ep+1; dispbottom "Event Points: "+ep; set [email protected],[email protected]+1; set @mob_ep,@mob_ep+1; if(ep > .r1po){ set .rank1_id,getcharid(0); }else if(ep > .r2po){ set .rank2_id,getcharid(0); }else if(ep > .r3po){ set .rank3_id,getcharid(0); } if([email protected] >= .mob_count){ callsub OnEventEnd; } end; OnEventEnd: announce "Monster Invasion has ended",0; getitem .r1p[0],.r1p[1],.rank1_id; getitem .r2p[0],.r2p[1],.rank2_id; getitem .r3p[0],.r3p[1],.rank3_id; killmonster .event_location$,"All"; set [email protected],0; end; OnInit: set .event_location$,"prontera"; // where's the rumor? set .event_duration,2; // in minutes set .mob_name$,"Benching"; // who's event monster? set .event_mobid,1113; // what monster? set .mob_count,100; // how many monster? //setarray .r#p[0],item_id,amount; setarray .r1p[0],607,5; // rank 1 reward setarray .r2p[0],608,5; // rank 2 reward setarray .r3p[0],609,5; // rank 2 reward // can't touch this! ( te-nenene te-ne) set .rank1_id,0; set .rank2_id,0; set .rank3_id,0; set .r1po,0; set .r2po,0; set .r3po,0; set [email protected],0; end; }
-
Thank you Promise and Anacondaqq! For enlightening me. What a relief. ^^ If so, maybe duplicated NPC scripts could cause the crashes? (Server logs detected duplicates, saying "debug, changing NPC names" sounds like that). p/s: it is been awhile my map server not crashing, but then yesterday it does, after i added a new NPC (initially i didnt realize it was duplicated npc scripts) in the server, crashed after few hours. Could be this is the reason, duplicated npcs?
-
Hi Guys, Just a quick question, can the MAP server CRASH if the memory turn fulled? Any suggestion for me after you seen my memory? ^^
-
What is the difference between this TWO Scripts?
Miemie replied to Miemie's question in Scripting Support
Thank you so much Radian for your useful information! -
What is the difference between this TWO Scripts?
Miemie replied to Miemie's question in Scripting Support
Hi Radian, thank you for enlightening me, Means that, we can run those two scripts concurrently? Because currently, i'm running scripts from (b ) Euphy (WoE controller). Like Euphy stated in his/her script to disable these: //== npc\guild\agit_controller.txt //== npc\guild2\agit_start_se.txt I'm eager to run (a) scripts because it has Castle Drops/Treasure Room. In the meant time, scripts (b ) also giving perfect scripts in-game. So, I'm a bit worried if scripts (a) War of Emperium Guild Template File, could bring another AGITSTART. It won't right? -
Hi you uols, May I know, 1. what is the different between these two scripts? [WOE] (a) War of Emperium Guild Template File: //===== rAthena Script ======================================= //= War of Emperium Guild Template File //===== By: ================================================== //= L0ne_W0lf //===== Current Version: ===================================== //= 1.9 //===== Compatible With: ===================================== //= rAthena SVN //===== Description: ========================================= //= [ Aegis Conversion] //= ---------------------------------------------------------- //= - THIS FILE IS REQUIRED FOR GUILD CASTLES TO FUNCTION. //= ---------------------------------------------------------- //= - Enables AGIT Manager inside Guild Strongholds. //= Visible Name required: Agit //= Manages the various functions used in and out of WoE. //= //= - Enables Stewards inside Guild Strongholds which let's //= the guild master invest in Defense and Economy, and //= to summon guardians, a Kafra, and enter master's room. //= //= - Guardian Spawning Template //= Visible Name required: Guardian //= Spawn guardians when guild castle data is recieved. //= //= - Enables Kafra Services inside Guild Strongholds. //= Visible Name required: Kafra Employee //= Storage, Guild Storage, Teleport Service, Cart rental. //= //= - Treasure Chest spawning. //= Chests will NOT be saved anymore in the event of crashes. //= Treasures will NOT spawn on a location that already has //= treasure chest spawned. //===== Additional Comments: ================================= //= 1.0 First Version. No longer uses functions. [L0ne_W0lf] //= 1.1 Daily investement will now be reset. [L0ne_W0lf] //= Template will no longer try to spawn chests. //= 1.2 Fixed Eco Invest option charging twice. [L0ne_W0lf] //= 1.3 Fixed a loading flag emblem for Payon 1. [L0ne_W0lf] //= Fixed two typos regarding Guild Steward name. //= 1.4 Fixed a typo in defense investment. [L0ne_W0lf] //= 1.5 Fixed spawn point of the emperium in Payon 1. [L0ne_W0lf] //= Double-investing doubles the price now. //= 1.6 Corrected Zeny check when summoning guardians. [L0ne_W0lf] //= Corrected cost for investing, thanks to Ai4rei. //= Second invest is now quadruple the value of the first //= Investing now happens at the turn of the day. //= 1.6a Corrected conditions in the new investing blocks. [L0ne_W0lf] //= 1.6b Moved where investments are added to eco/def. [L0ne_W0lf] //= 1.7 Updated Agitbreak announcements, added bc_woe [L0ne_W0lf] //= and added extended anouncement format for mapannounce. //= 1.8 Fixed a possible exploit in guild castle investment. [Brian] //= 1.9 Partially rewrote Script. [Masao] //============================================================ // WoE : Main Functions //============================================================ - script Gld_Agit_Manager::Gld_Agit_Manager -1,{ end; // War of Emperium has started. OnAgitStart: if (strnpcinfo(0) == "Gld_Agit_Manager") end; MapRespawnGuildID strnpcinfo(2),GetCastleData(strnpcinfo(2),1),6; GvgOn strnpcinfo(2); // Spawn (fall through), or respawn the Emperium once it has been broken. OnStartArena: // OnAgitStart will fall through and spawn the Emperium. if (strnpcinfo(2) == "aldeg_cas01") { setarray [email protected][0],216,23; } else if (strnpcinfo(2) == "aldeg_cas02") { setarray [email protected][0],213,23; } else if (strnpcinfo(2) == "aldeg_cas03") { setarray [email protected][0],205,31; } else if (strnpcinfo(2) == "aldeg_cas04") { setarray [email protected][0],36,217; } else if (strnpcinfo(2) == "aldeg_cas05") { setarray [email protected][0],27,101; } else if (strnpcinfo(2) == "gefg_cas01") { setarray [email protected][0],197,181; } else if (strnpcinfo(2) == "gefg_cas02") { setarray [email protected][0],176,178; } else if (strnpcinfo(2) == "gefg_cas03") { setarray [email protected][0],244,166; } else if (strnpcinfo(2) == "gefg_cas04") { setarray [email protected][0],174,177; } else if (strnpcinfo(2) == "gefg_cas05") { setarray [email protected][0],194,184; } else if (strnpcinfo(2) == "payg_cas01") { setarray [email protected][0],139,139; } else if (strnpcinfo(2) == "payg_cas02") { setarray [email protected][0],38,25; } else if (strnpcinfo(2) == "payg_cas03") { setarray [email protected][0],269,265; } else if (strnpcinfo(2) == "payg_cas04") { setarray [email protected][0],270,28; } else if (strnpcinfo(2) == "payg_cas05") { setarray [email protected][0],30,30; } else if (strnpcinfo(2) == "prtg_cas01") { setarray [email protected][0],197,197; } else if (strnpcinfo(2) == "prtg_cas02") { setarray [email protected][0],157,174; } else if (strnpcinfo(2) == "prtg_cas03") { setarray [email protected][0],16,220; } else if (strnpcinfo(2) == "prtg_cas04") { setarray [email protected][0],291,14; } else if (strnpcinfo(2) == "prtg_cas05") { setarray [email protected][0],266,266; } // Add custom Guild Castles here. else { end; } if (!mobcount(strnpcinfo(2),"Agit#"+strnpcinfo(2)+"::OnAgitBreak")) { monster strnpcinfo(2),[email protected][0],[email protected][1],"Emperium",1288,1,"Agit#"+strnpcinfo(2)+"::OnAgitBreak"; } end; // The Emperium has been broken. OnAgitBreak: set brokeemp,brokeemp+1; set [email protected],getcharid(2); // Show and log error if an unguilded player breaks the Emperium. (Should NEVER happen) if ([email protected] <= 0) { set [email protected]$,"Character "+strcharinfo(0)+" ("+getcharid(0)+") broke the Emperium in Castle: "+strnpcinfo(2)+" while guildless. No data will be saved and Emperium respawned."; logmes [email protected]$; debugmes [email protected]$; donpcevent "Agit#"+strnpcinfo(2)+"::OnStartArena"; end; } // Adjust Economy Invest Level for Castle set [email protected],GetCastleData(strnpcinfo(2),2) - 5; if ([email protected] < 0) set [email protected], 0; SetCastleData strnpcinfo(2), 2, [email protected]; // Adjust Defense Invest Level for Castle set [email protected],GetCastleData(strnpcinfo(2),3) - 5; if ([email protected] < 0) set [email protected], 0; SetCastleData strnpcinfo(2), 3, [email protected]; // Set new Castle Occupant SetCastleData strnpcinfo(2),1, [email protected]; // Announce that the Emperium is destroyed, and respawn all but new castle-occupants. announce "[" + strcharinfo(0) + "] conquered [" + getcastlename(strnpcinfo(2)) + "] castle for [" + getguildName([email protected]) + "] guild!",bc_all|bc_woe; MapRespawnGuildID strnpcinfo(2),[email protected],6; // Refresh castle data, disable Kafra and reset Invest information. donpcevent strnpcinfo(0)+"::OnRecvCastle"; disablenpc "Kafra Staff#"+strnpcinfo(2); for( set [email protected], 4; [email protected] <= 9; set [email protected], [email protected]+1 ) { SetCastleData strnpcinfo(2), [email protected], 0; } // Erase Guardian Database information if the new owners do not have Guardian Research. if( getgdskilllv([email protected],10002) == 0 ) { for( set [email protected], 10; [email protected] <= 17; set [email protected], [email protected]+1 ) { SetCastleData strnpcinfo(2), [email protected], 0; } } // Respawn the Emperium, and display new owners. sleep 500; // Slow down script execution slightly. if( agitcheck() ) donpcevent "Agit#"+strnpcinfo(2)+"::OnStartArena"; sleep 7000; Announce "[" + strcharinfo(0) + "] conquered [" + getcastlename(strnpcinfo(2)) + "] castle for [" + getguildName([email protected]) + "] guild!",bc_all|bc_woe; end; // War of Emperium has ended. OnAgitEnd: if (strnpcinfo(0) == "Gld_Agit_Manager") end; GvgOff strnpcinfo(2); // If the castle has no owner at the end of WoE, do not kill Emperium. if (GetCastleData(strnpcinfo(2),1)) { KillMonster strnpcinfo(2),"Agit#"+strnpcinfo(2)+"::OnAgitBreak"; } end; // Occupying Guild has been disbanded. OnGuildBreak: if (strnpcinfo(0) == "Gld_Agit_Manager") end; // Kill guardians, disable the Kafra, and set owner to 0. killmonster strnpcinfo(2),"Guardian#"+strnpcinfo(2)+"::OnGuardianDied"; disablenpc "Kafra Staff#"+strnpcinfo(2); SetCastleData strnpcinfo(2),0,0; // Wait before refreshing guild information. sleep 7000; Announce "Guild Base [" + GetCastleName(strnpcinfo(2)) + "] has been abandoned.",0; donpcevent strnpcinfo(0)+"::OnRecvCastle"; end; OnAgitInit: OnRecvCastle: if (strnpcinfo(0) == "Gld_Agit_Manager") end; // Spawn Monsters if the castle is empty. set [email protected], GetCastleData(strnpcinfo(2),1); if ([email protected] == 0) { killmonsterall strnpcinfo(2); if (compare(strnpcinfo(2),"aldeg")) { // Normal Spawns monster strnpcinfo(2),0,0,"Evil Druid",1117,10; monster strnpcinfo(2),0,0,"Khalitzburg",1132,4; monster strnpcinfo(2),0,0,"Abysmal Knight",1219,2; monster strnpcinfo(2),0,0,"Executioner",1205,1; monster strnpcinfo(2),0,0,"Penomena",1216,10; monster strnpcinfo(2),0,0,"Alarm",1193,18; monster strnpcinfo(2),0,0,"Clock",1269,9; monster strnpcinfo(2),0,0,"Raydric Archer",1276,7; monster strnpcinfo(2),0,0,"Wanderer",1208,3; monster strnpcinfo(2),0,0,"Alice",1275,1; monster strnpcinfo(2),0,0,"Bloody Knight",1268,1; monster strnpcinfo(2),0,0,"Dark Lord",1272,1; // Set Emperium room spawn coordinates and spawn monsters. if (strnpcinfo(2) == "aldeg_cas01") { setarray [email protected][0],216,23; } else if (strnpcinfo(2) == "aldeg_cas02") { setarray [email protected][0],213,23; } else if (strnpcinfo(2) == "aldeg_cas03") { setarray [email protected][0],205,31; } else if (strnpcinfo(2) == "aldeg_cas04") { setarray [email protected][0],36,217; } else if (strnpcinfo(2) == "aldeg_cas05") { setarray [email protected][0],27,101; } monster strnpcinfo(2),[email protected][0],[email protected][1],"Dark Lord",1272,1; monster strnpcinfo(2),[email protected][0],[email protected][1],"Tower Keeper",1270,4; monster strnpcinfo(2),[email protected][0],[email protected][1],"Bloody Knight",1268,1; monster strnpcinfo(2),[email protected][0],[email protected][1],"Abysmal Knight",1219,1; monster strnpcinfo(2),[email protected][0],[email protected][1],"Raydric Archer",1276,5; } else if (compare(strnpcinfo(2),"gefg")) { // Normal Spawns monster strnpcinfo(2),0,0,"Evil Druid",1117,10; monster strnpcinfo(2),0,0,"Wind Ghost",1263,11; monster strnpcinfo(2),0,0,"Bathory",1102,10; monster strnpcinfo(2),0,0,"Jakk",1130,10; monster strnpcinfo(2),0,0,"Marduk",1140,20; monster strnpcinfo(2),0,0,"Raydric",1163,9; monster strnpcinfo(2),0,0,"Alice",1275,1; monster strnpcinfo(2),0,0,"Abysmal Knight",1219,1; monster strnpcinfo(2),0,0,"Moonlight Flower",1150,1; monster strnpcinfo(2),0,0,"Phreeoni",1159,1; // Set Emperium room spawn coordinates and spawn monsters. if (strnpcinfo(2) == "gefg_cas01") { setarray [email protected][0],197,181; } else if (strnpcinfo(2) == "gefg_cas02") { setarray [email protected][0],176,178; } else if (strnpcinfo(2) == "gefg_cas03") { setarray [email protected][0],244,166; } else if (strnpcinfo(2) == "gefg_cas04") { setarray [email protected][0],174,177; } else if (strnpcinfo(2) == "gefg_cas05") { setarray [email protected][0],194,184; } monster strnpcinfo(2),[email protected][0],[email protected][1],"Mysteltainn",1203,1; monster strnpcinfo(2),[email protected][0],[email protected][1],"Orc Hero",1087,1; monster strnpcinfo(2),[email protected][0],[email protected][1],"High Orc",1213,10; monster strnpcinfo(2),[email protected][0],[email protected][1],"Orc Archer",1189,10; } else if (compare(strnpcinfo(2),"payg")) { // Normal Spawns monster strnpcinfo(2),0,0,"Greatest General",1277,9; monster strnpcinfo(2),0,0,"Wanderer",1208,10; monster strnpcinfo(2),0,0,"Mutant Dragonoid",1262,5; monster strnpcinfo(2),0,0,"Bathory",1102,5; monster strnpcinfo(2),0,0,"Moonlight Flower",1150,1; monster strnpcinfo(2),0,0,"Eddga",1115,1; monster strnpcinfo(2),0,0,"Horong",1129,11; monster strnpcinfo(2),0,0,"Raydric Archer",1276,5; monster strnpcinfo(2),0,0,"Kobold Archer",1282,4; monster strnpcinfo(2),0,0,"Gargoyle",1253,5; // Set Emperium room spawn coordinates and spawn monsters. if (strnpcinfo(2) == "payg_cas01") { setarray [email protected][0],139,139; } else if (strnpcinfo(2) == "payg_cas02") { setarray [email protected][0],38,25; } else if (strnpcinfo(2) == "payg_cas03") { setarray [email protected][0],269,265; } else if (strnpcinfo(2) == "payg_cas04") { setarray [email protected][0],270,28; } else if (strnpcinfo(2) == "payg_cas05") { setarray [email protected][0],30,30; } monster strnpcinfo(2),[email protected][0],[email protected][1],"Moonlight Flower",1150,1; monster strnpcinfo(2),[email protected][0],[email protected][1],"Eddga",1115,1; monster strnpcinfo(2),[email protected][0],[email protected][1],"Wanderer",1208,6; monster strnpcinfo(2),[email protected][0],[email protected][1],"Raydric Archer",1276,5; } else if (compare(strnpcinfo(2),"prtg")) { // Normal Spawns monster strnpcinfo(2),0,0,"Raydric",1163,1; monster strnpcinfo(2),0,0,"Khalitzburg",1132,10; monster strnpcinfo(2),0,0,"Abysmal Knight",1219,5; monster strnpcinfo(2),0,0,"Bloody Knight",1268,5; monster strnpcinfo(2),0,0,"Stormy Knight",1251,1; monster strnpcinfo(2),0,0,"Hatii",1252,1; monster strnpcinfo(2),0,0,"Raydric Archer",1276,5; monster strnpcinfo(2),0,0,"Gryphon",1259,2; monster strnpcinfo(2),0,0,"Chimera",1283,3; monster strnpcinfo(2),0,0,"Alice",1275,1; monster strnpcinfo(2),0,0,"Zealotus",1200,1; // Set Emperium room spawn coordinates and spawn monsters. if (strnpcinfo(2) == "prtg_cas01") { setarray [email protected][0],197,197; } else if (strnpcinfo(2) == "prtg_cas02") { setarray [email protected][0],157,174; } else if (strnpcinfo(2) == "prtg_cas03") { setarray [email protected][0],16,220; } else if (strnpcinfo(2) == "prtg_cas04") { setarray [email protected][0],291,14; } else if (strnpcinfo(2) == "prtg_cas05") { setarray [email protected][0],266,266; } monster strnpcinfo(2),[email protected][0],[email protected][1],"Guardian Knight",1268,1; monster strnpcinfo(2),[email protected][0],[email protected][1],"Guardian Master",1251,1; monster strnpcinfo(2),[email protected][0],[email protected][1],"Hatii",1252,1; monster strnpcinfo(2),[email protected][0],[email protected][1],"Guardian Knight",1219,1; monster strnpcinfo(2),[email protected][0],[email protected][1],"Raydric Archer",1276,5; } // Add custom Guild Castles here. else { end; } donpcevent "Agit#"+strnpcinfo(2)+"::OnStartArena"; // Disable Kafra Staff... disablenpc "Kafra Staff#"+strnpcinfo(2); end; } else { OnInterIfInitOnce: // Otherwise place the guild emblem on flags. if (strnpcinfo(2) == "aldeg_cas01") { donpcevent "::OnRecvCastleA01"; } else if (strnpcinfo(2) == "aldeg_cas02") { donpcevent "::OnRecvCastleA02"; } else if (strnpcinfo(2) == "aldeg_cas03") { donpcevent "::OnRecvCastleA03"; } else if (strnpcinfo(2) == "aldeg_cas04") { donpcevent "::OnRecvCastleA04"; } else if (strnpcinfo(2) == "aldeg_cas05") { donpcevent "::OnRecvCastleA05"; } else if (strnpcinfo(2) == "gefg_cas01") { donpcevent "::OnRecvCastleG01"; } else if (strnpcinfo(2) == "gefg_cas02") { donpcevent "::OnRecvCastleG02"; } else if (strnpcinfo(2) == "gefg_cas03") { donpcevent "::OnRecvCastleG03"; } else if (strnpcinfo(2) == "gefg_cas04") { donpcevent "::OnRecvCastleG04"; } else if (strnpcinfo(2) == "gefg_cas05") { donpcevent "::OnRecvCastleG05"; } else if (strnpcinfo(2) == "payg_cas01") { donpcevent "::OnRecvCastlePy01"; } else if (strnpcinfo(2) == "payg_cas02") { donpcevent "::OnRecvCastlePy02"; } else if (strnpcinfo(2) == "payg_cas03") { donpcevent "::OnRecvCastlePy03"; } else if (strnpcinfo(2) == "payg_cas04") { donpcevent "::OnRecvCastlePy04"; } else if (strnpcinfo(2) == "payg_cas05") { donpcevent "::OnRecvCastlePy05"; } else if (strnpcinfo(2) == "prtg_cas01") { donpcevent "::OnRecvCastlePt01"; } else if (strnpcinfo(2) == "prtg_cas02") { donpcevent "::OnRecvCastlePt02"; } else if (strnpcinfo(2) == "prtg_cas03") { donpcevent "::OnRecvCastlePt03"; } else if (strnpcinfo(2) == "prtg_cas04") { donpcevent "::OnRecvCastlePt04"; } else if (strnpcinfo(2) == "prtg_cas05") { donpcevent "::OnRecvCastlePt05"; } // Add custom Guild Castles here. else { end; } // And load purchased Guardian in castles. donpcevent "Guardian#"+strnpcinfo(2)+"::OnSpawnGuardians"; // And display Kafra if purchased. if (GetCastleData(strnpcinfo(2),9) < 1) disablenpc "Kafra Staff#"+strnpcinfo(2); } end; } // WoE : Guild Kafras //============================================================ - script Kafra Staff#woe::guildkafra -1,{ set [email protected],GetCastleData(strnpcinfo(2),1); if (compare(strnpcinfo(2),"aldeg")) { setarray [email protected]$[0],"Al De Baran","aldebaran"; setarray [email protected][0],132,103; } else if (compare(strnpcinfo(2),"gefg")) { setarray [email protected]$[0],"Geffen","geffen"; setarray [email protected][0],120,39; } else if (compare(strnpcinfo(2),"payg")) { setarray [email protected]$[0],"Payon","payon"; setarray [email protected][0],70,100; } else if (compare(strnpcinfo(2),"prtg")) { setarray [email protected]$[0],"Prontera","prontera"; setarray [email protected][0],278,211; } // Add custom Guild Castles here. else { end; } cutin "kafra_01",2; if (getcharid(2) == [email protected]) { mes "[Kafra Employee]"; mes "Welcome. ^ff0000" + GetGuildName([email protected]) + "^000000 Member."; mes "The Kafra Corporation will stay with you wherever you go."; next; switch (select("Use Storage:Use Teleport Service:Rent a Pushcart:Cancel")) { case 1: if (getskilllv("NV_BASIC") < 6) { mes "[Kafra Employee]"; mes "I'm sorry, but you"; mes "need the Novice's"; mes "Basic Skill Level 6 to"; mes "use the Storage Service."; close2; cutin "",255; end; } mes "[Kafra Employee]"; mes "Here, let me open"; mes "your Storage for you."; mes "Thank you for using"; mes "the Kafra Service."; close2; cutin "",255; openstorage; end; case 2: mes "[Kafra Employee]"; mes "Please choose"; mes "your destination."; next; switch (select([email protected]$+" -> 200z:Cancel")) { case 1: if (Zeny < 200) { mes "[Kafra Employee]"; mes "I'm sorry, but you don't have"; mes "enough zeny for the Teleport"; mes "Service. The fee to teleport"; mes "to "[email protected]$+" is 200 zeny."; close2; cutin "",255; end; } set Zeny, Zeny - 200; set RESRVPTS,RESRVPTS+2; close2; warp [email protected]$[1],[email protected][0],[email protected][1]; end; case 2: close2; cutin "",255; end; } case 3: if (BaseClass != Job_Merchant) { mes "[Kafra Employee]"; mes "I'm sorry, but the"; mes "Pushcart rental service"; mes "is only available to Merchants,"; mes "Blacksmiths, Master Smiths,"; mes "Alchemists, Biochemists,"; mes "Mechanics and Geneticists."; close2; cutin "",255; end; } if (checkcart()) { mes "[Kafra Employee]"; mes "You already have"; mes "a Pushcart equipped."; mes "Unfortunately, we can't"; mes "rent more than one to"; mes "each customer at a time."; close2; cutin "",255; end; } mes "[Kafra Employee]"; mes "The Pushcart rental"; mes "fee is 800 zeny. Would"; mes "you like to rent a Pushcart?"; next; switch (select("Rent a Pushcart.:Cancel")) { case 1: if (Zeny < 800) { mes "[Kafra Employee]"; mes "I'm sorry, but you"; mes "don't have enough"; mes "zeny to pay the Pushcart"; mes "rental fee of 800 zeny."; close2; cutin "",255; end; } set RESRVPTS,RESRVPTS+8; set Zeny, Zeny - 800; setcart; close2; cutin "",255; end; case 2: close2; cutin "",255; end; } case 4: mes "[Kafra Employee]"; mes "We, here at Kafra Corporation,"; mes "are always endeavoring to provide you with the best services. We hope that we meet your adventuring needs and standards of excellence."; close2; cutin "",255; end; } } mes "[Kafra Employee]"; mes "I am instructed to only offer my services to the ^ff0000"+GetGuildName([email protected])+"^000000 Guild. Please try another Kafra Employee around here. Sorry for the inconvenience."; close2; cutin "",255; end; } // WoE : Castle Managers //============================================================ - script Castle Manager#cm::cm -1,{ set [email protected],GetCastleData(strnpcinfo(2),1); // [email protected] = Defines the types of guardians per castle basis. // 1 - Soldier Guardian, 2 - Archer Guardian, 3 - Knight Guardian // [email protected] = Define the x spawn point for each uardian. // [0] = 1st guardian's x spawn point. // [email protected] = Define the y spawn point for each guardian. // [0] = 1st guardian's y spawn point. // [email protected] = Defines the coordinates of the Treasure Room. if (strnpcinfo(2) == "aldeg_cas01") { setarray [email protected][0],1,2,2,2,2,3,3,3; setarray [email protected][0],17,39,38,45,21,218,213,73; setarray [email protected][0],218,208,196,228,194,24,24,70; setarray [email protected][0],113,223; } else if (strnpcinfo(2) == "aldeg_cas02") { setarray [email protected][0],3,3,3,1,1,2,2,2; setarray [email protected][0],27,88,117,60,51,21,36,210; setarray [email protected][0],184,43,46,202,183,177,183,7; setarray [email protected][0],134,225; } else if (strnpcinfo(2) == "aldeg_cas03") { setarray [email protected][0],3,3,1,1,1,2,2,2; setarray [email protected][0],90,116,86,116,64,212,195,110; setarray [email protected][0],112,112,120,76,103,160,151,217; setarray [email protected][0],229,267; } else if (strnpcinfo(2) == "aldeg_cas04") { setarray [email protected][0],2,2,2,1,1,1,3,3; setarray [email protected][0],187,192,148,145,169,198,48,55; setarray [email protected][0],100,42,88,209,53,77,72,88; setarray [email protected][0],83,17; } else if (strnpcinfo(2) == "aldeg_cas05") { setarray [email protected][0],2,2,1,1,3,3,3,3; setarray [email protected][0],51,188,157,157,27,145,156,41; setarray [email protected][0],202,79,192,74,221,78,73,112; setarray [email protected][0],64,8; } // Geffen (Britoniah) Castles else if (strnpcinfo(2) == "gefg_cas01") { setarray [email protected][0],1,1,1,2,2,3,3,3; setarray [email protected][0],67,184,62,36,50,50,189,200; setarray [email protected][0],179,20,41,186,186,67,41,167; setarray [email protected][0],152,117; } else if (strnpcinfo(2) == "gefg_cas02") { setarray [email protected][0],1,1,1,2,2,3,3,3; setarray [email protected][0],64,56,166,35,20,19,166,159; setarray [email protected][0],168,41,25,148,150,41,42,188; setarray [email protected][0],145,115; } else if (strnpcinfo(2) == "gefg_cas03") { setarray [email protected][0],2,2,1,1,1,3,3,3; setarray [email protected][0],48,113,48,157,243,157,234,238; setarray [email protected][0],176,214,207,62,41,45,25,160; setarray [email protected][0],275,289; } else if (strnpcinfo(2) == "gefg_cas04") { setarray [email protected][0],2,2,1,1,1,3,3,3; setarray [email protected][0],53,31,49,29,147,57,160,148; setarray [email protected][0],191,178,220,46,65,46,50,189; setarray [email protected][0],116,123; } else if (strnpcinfo(2) == "gefg_cas05") { setarray [email protected][0],2,2,1,1,1,3,3,3; setarray [email protected][0],45,71,72,66,177,66,177,193; setarray [email protected][0],149,163,142,47,50,17,35,166; setarray [email protected][0],149,106; } // Payon (Baulder) Castles else if (strnpcinfo(2) == "payg_cas01") { setarray [email protected][0],2,2,2,2,2,2,2,3; setarray [email protected][0],229,225,222,99,65,36,51,138; setarray [email protected][0],92,80,111,45,31,127,144,133; setarray [email protected][0],295,8; } else if (strnpcinfo(2) == "payg_cas02") { setarray [email protected][0],2,2,2,2,2,2,2,3; setarray [email protected][0],237,228,210,57,42,287,264,27; setarray [email protected][0],54,72,41,241,241,257,272,20; setarray [email protected][0],141,149; } else if (strnpcinfo(2) == "payg_cas03") { setarray [email protected][0],2,2,2,2,2,2,2,3; setarray [email protected][0],245,269,36,41,39,19,37,268; setarray [email protected][0],37,51,39,39,65,276,277,244; setarray [email protected][0],163,167; } else if (strnpcinfo(2) == "payg_cas04") { setarray [email protected][0],2,2,2,2,2,2,2,3; setarray [email protected][0],251,232,231,32,32,35,36,270; setarray [email protected][0],212,212,175,287,232,45,17,41; setarray [email protected][0],151,47; } else if (strnpcinfo(2) == "payg_cas05") { setarray [email protected][0],2,2,2,2,2,2,2,3; setarray [email protected][0],19,33,266,266,263,263,250,36; setarray [email protected][0],279,260,234,279,37,21,22,36; setarray [email protected][0],153,137; } // Prontera (Valkyrie Realms) Castles else if (strnpcinfo(2) == "prtg_cas01") { setarray [email protected][0],1,1,1,2,2,3,3,3; setarray [email protected][0],182,182,153,59,50,184,196,107; setarray [email protected][0],62,116,86,28,36,183,189,179; setarray [email protected][0],15,209; } else if (strnpcinfo(2) == "prtg_cas02") { setarray [email protected][0],3,3,3,1,1,2,2,2; setarray [email protected][0],161,153,178,71,49,64,7,75; setarray [email protected][0],161,161,44,75,28,186,196,175; setarray [email protected][0],207,229; } else if (strnpcinfo(2) == "prtg_cas03") { setarray [email protected][0],3,3,3,1,1,2,2,2; setarray [email protected][0],191,137,45,50,41,191,179,191; setarray [email protected][0],190,190,99,87,87,42,43,72; setarray [email protected][0],190,130; } else if (strnpcinfo(2) == "prtg_cas04") { setarray [email protected][0],3,3,3,1,1,1,2,2; setarray [email protected][0],276,274,246,38,29,33,78,36; setarray [email protected][0],14,35,246,240,240,258,48,61; setarray [email protected][0],275,160; } else if (strnpcinfo(2) == "prtg_cas05") { setarray [email protected][0],3,3,3,1,1,1,2,2; setarray [email protected][0],266,287,245,236,251,278,32,44; setarray [email protected][0],262,280,250,63,63,253,253,248; setarray [email protected][0],281,176; } // Add custom Guild Castles here. else { end; } if ([email protected] == 0) { mes "["+strnpcinfo(1)+"]"; mes "I have been waiting for a master to fulfill my destiny."; mes "Brave soul... fate will guide you towards your future..."; close; } if (GetGuildMaster([email protected]) != strcharinfo(0)) { mes "["+strnpcinfo(1)+"]"; mes "No matter how much you pester me, I'll still follow my master ^ff0000"+GetGuildMaster([email protected])+"^000000. Where are the Guardians?! Send these ruffians away right now!"; close; } mes "["+strnpcinfo(1)+"]"; mes "Welcome. My honorable master, ^ff0000"+strcharinfo(0)+"^000000..."; mes "Your humble servent, "+strnpcinfo(1)+", is here to serve you."; next; switch (select("Castle briefing:Invest in commercial growth:Invest in Castle Defenses:Summon Guardian:Hire / Fire a Kafra Employee:Go into Master's room")) { case 1: mes "["+strnpcinfo(1)+"]"; mes "I will report the Castle briefing, Master."; mes " "; mes "^0000ffNow, the commercial growth level is "+GetCastleData(strnpcinfo(2),2)+"."; if (GetCastleData(strnpcinfo(2),4)) { mes " You invested "+GetCastleData(strnpcinfo(2),4)+" times in past 1 day."; } mes " Now, the Castle Defense level is "+GetCastleData(strnpcinfo(2),3)+".^000000"; if (GetCastleData(strnpcinfo(2),5)) { mes " ^0000ff- You invested "+GetCastleData(strnpcinfo(2),5)+" times in past 1 day.^000000"; } mes " "; mes "That's all I have to report, Master."; close; case 2: set [email protected],GetCastleData(strnpcinfo(2),2); if ([email protected] < 6) { set [email protected]_invest,5000; } else if (([email protected] >= 6) && ([email protected] <= 10)) { set [email protected]_invest,10000; } else if (([email protected] >= 11) && ([email protected] <= 15)) { set [email protected]_invest,20000; } else if (([email protected] >= 16) && ([email protected] <= 20)) { set [email protected]_invest,35000; } else if (([email protected] >= 21) && ([email protected] <= 25)) { set [email protected]_invest,55000; } else if (([email protected] >= 26) && ([email protected] <= 30)) { set [email protected]_invest,80000; } else if (([email protected] >= 31) && ([email protected] <= 35)) { set [email protected]_invest,110000; } else if (([email protected] >= 36) && ([email protected] <= 40)) { set [email protected]_invest,145000; } else if (([email protected] >= 41) && ([email protected] <= 45)) { set [email protected]_invest,185000; } else if (([email protected] >= 46) && ([email protected] <= 50)) { set [email protected]_invest,230000; } else if (([email protected] >= 51) && ([email protected] <= 55)) { set [email protected]_invest,280000; } else if (([email protected] >= 56) && ([email protected] <= 60)) { set [email protected]_invest,335000; } else if (([email protected] >= 61) && ([email protected] <= 65)) { set [email protected]_invest,395000; } else if (([email protected] >= 66) && ([email protected] <= 70)) { set [email protected]_invest,460000; } else if (([email protected] >= 71) && ([email protected] <= 75)) { set [email protected]_invest,530000; } else if (([email protected] >= 76) && ([email protected] <= 80)) { set [email protected]_invest,605000; } else if (([email protected] >= 81) && ([email protected] <= 85)) { set [email protected]_invest,685000; } else if (([email protected] >= 86) && ([email protected] <= 90)) { set [email protected]_invest,770000; } else if (([email protected] >= 91) && ([email protected] <= 95)) { set [email protected]_invest,860000; } else if (([email protected] >= 96) && ([email protected] <= 100)) { set [email protected]_invest,955000; } //Quadruple the cost of investing if you've already invested once. if (GetCastleData(strnpcinfo(2),4)) { set [email protected]_invest,[email protected]_invest*4; } mes "["+strnpcinfo(1)+"]"; mes "If you invest in commercial growth, the quantity of goods made by the guild will increase. Therfore, if you consider our future, investments will be a necessity."; mes " "; mes "Initially, you are able to invest just once but if you pay more money, you will be able to invest twice."; if ([email protected] >= 100) { mes " "; mes "^ff0000The commercial growth level of our Castle is at it's highest, 100%. No more investments are needed. Just as I have expected from a great economist like you, Master.^000000"; close; } if (GetCastleData(strnpcinfo(2),4) >= 2) { mes " "; mes "^ff0000You have already invested twice today. You cannot invest any more.^000000 I expect riches of the guild to grow at a high rate."; close; } if (GetCastleData(strnpcinfo(2),4) == 0) { mes " "; mes "The current investment amount required is ^ff0000"[email protected]_invest+"^000000 zeny. Will you invest?"; } else { mes " "; mes "You've invested once today... if you wish to invest once more, ^ff0000"[email protected]_invest+"^000000 more zeny will be needed."; } next; switch (select("Invest in commercial growth:Cancel")) { case 1: if (Zeny < [email protected]_invest) { mes "["+strnpcinfo(1)+"]"; mes "I'm sorry but there is not enough zeny to invest. You will have to try again when you have the funds, Master."; close; } set Zeny, Zeny - [email protected]_invest; SetCastleData strnpcinfo(2),4,GetCastleData(strnpcinfo(2),4)+1; mes "[ "+strnpcinfo(1)+"]"; mes "We finished the investment safely. I expect that our growth level will be increased by tomorrow."; close; case 2: mes "["+strnpcinfo(1)+"]"; mes "I'll do as you bid, my master... There is no hurry. We will do our best."; close; } case 3: set [email protected],GetCastleData(strnpcinfo(2),3); if ([email protected] < 6) { set [email protected]_invest,10000; } else if (([email protected] >= 6) && ([email protected] <= 10)) { set [email protected]_invest,20000; } else if (([email protected] >= 11) && ([email protected] <= 15)) { set [email protected]_invest,40000; } else if (([email protected] >= 16) && ([email protected] <= 20)) { set [email protected]_invest,70000; } else if (([email protected] >= 21) && ([email protected] <= 25)) { set [email protected]_invest,110000; } else if (([email protected] >= 26) && ([email protected] <= 30)) { set [email protected]_invest,160000; } else if (([email protected] >= 31) && ([email protected] <= 35)) { set [email protected]_invest,220000; } else if (([email protected] >= 36) && ([email protected] <= 40)) { set [email protected]_invest,290000; } else if (([email protected] >= 41) && ([email protected] <= 45)) { set [email protected]_invest,370000; } else if (([email protected] >= 46) && ([email protected] <= 50)) { set [email protected]_invest,460000; } else if (([email protected] >= 51) && ([email protected] <= 55)) { set [email protected]_invest,560000; } else if (([email protected] >= 56) && ([email protected] <= 60)) { set [email protected]_invest,670000; } else if (([email protected] >= 61) && ([email protected] <= 65)) { set [email protected]_invest,790000; } else if (([email protected] >= 66) && ([email protected] <= 70)) { set [email protected]_invest,920000; } else if (([email protected] >= 71) && ([email protected] <= 75)) { set [email protected]_invest,1060000; } else if (([email protected] >= 76) && ([email protected] <= 80)) { set [email protected]_invest,1210000; } else if (([email protected] >= 81) && ([email protected] <= 85)) { set [email protected]_invest,1370000; } else if (([email protected] >= 86) && ([email protected] <= 90)) { set [email protected]_invest,1540000; } else if (([email protected] >= 91) && ([email protected] <= 95)) { set [email protected]_invest,1720000; } else if (([email protected] >= 96) && ([email protected] <= 100)) { set [email protected]_invest,1910000; } //Quadruple the cost of investing if you've already invested once. if (GetCastleData(strnpcinfo(2),5)) { set [email protected]_invest,[email protected]_invest*4; } mes "["+strnpcinfo(1)+"]"; mes "If you raise Castle Defenses, the durability of Guardians and the Emperium will increase. Therefore, if you consider our coming battles, some investment in this area will be required."; mes " "; mes "Originally you can invest just once but if you pay more money, you can invest twice."; if ([email protected] >= 100) { mes " "; mes "^ff0000But the Castle Defense level of our Castle is at it's highest, 100%. No more investments are needed. Just as I have expected from a great strategist like you, Master.^000000"; close; } if (GetCastleData(strnpcinfo(2),5) >= 2) { mes " "; mes "^ff0000You have already invested twice today. You cannot invest any more.^000000 I expect the Defenses of the guild to grow at a high rate."; close; } if (GetCastleData(strnpcinfo(2),5) == 0) { mes " "; mes "The current investment amount required is ^ff0000"[email protected]_invest+"^000000 zeny. Will you invest?"; } else { mes " "; mes "You've invested once today... if you wish to invest once more, ^ff0000"[email protected]_invest+"^000000 more zeny will be needed."; } next; switch (select("Invest in Castle Defenses.:Cancel")) { case 1: if (Zeny < [email protected]_invest) { mes "["+strnpcinfo(1)+"]"; mes "I'm sorry but there is not enough zeny to invest. You will have to try again when you have the funds, Master."; close; } set Zeny, Zeny - [email protected]_invest; SetCastleData strnpcinfo(2),5,GetCastleData(strnpcinfo(2),5)+1; mes "[ "+strnpcinfo(1)+"]"; mes "We finished the investment safely. I expect that our Castle Defense level will be increased by tomorrow."; close; case 2: mes "["+strnpcinfo(1)+"]"; mes "I'll do as you bid, my master... There is no hurry. We will do our best."; close; } case 4: mes "["+strnpcinfo(1)+"]"; mes "Will you summon a Guardian? It'll be a protector to defend us loyally."; mes "Please select a guardian to defend us."; next; for( set [email protected], 0; [email protected] <= 7 ; set [email protected], [email protected]+1 ) { if ([email protected][[email protected]] == 1) { set [email protected]$,"Guardian Soldier"; } else if ([email protected][[email protected]] == 2) { set [email protected]$,"Guardian Archer"; } else { set [email protected]$,"Guardian Knight"; } if (guardianinfo(strnpcinfo(2),[email protected],0)) { setarray [email protected]$[[email protected]], [email protected]$ + " - Implemented (" + guardianinfo(strnpcinfo(2),[email protected],2) + "/" + guardianinfo(strnpcinfo(2),[email protected],1) + ")"; } else { setarray [email protected]$[[email protected]], [email protected]$ + " - Not Implemented"; } } set [email protected]$,[email protected]$[0]+":"[email protected]$[1]+":"[email protected]$[2]+":"[email protected]$[3]+":"[email protected]$[4]+":"[email protected]$[5]+":"[email protected]$[6]+":"[email protected]$[7]; set [email protected],select([email protected]$)+9; mes "["+strnpcinfo(1)+"]"; mes "Will you summon the chosen guardian? 10,000 zeny are required to summon a Guardian."; next; switch (select("Summon:Cancel")) { case 1: if (getgdskilllv([email protected],10002) == 0) { mes "["+strnpcinfo(1)+"]"; mes "Master, we have not the resources to Summon the Guardian. If you want to accumulate them, you have to learn the Guild skill. We failed to summon the Guardian."; close; } if (GetCastleData(strnpcinfo(2),[email protected]) == 1) { mes "["+strnpcinfo(1)+"]"; mes "Master, you already have summoned that Guardian. We cannot summon another."; close; } if (Zeny < 10000) { mes "["+strnpcinfo(1)+"]"; mes "Well... I'm sorry but we don't have funds to summon the Guardian. We failed to summon the Guardian."; close; } set Zeny, Zeny - 10000; SetCastleData strnpcinfo(2),[email protected],1; // mark as 'installed' set [email protected],[email protected] - 10; if ([email protected][[email protected]] == 1) { set [email protected],1287; } else if ([email protected][[email protected]] == 2) { set [email protected],1285; } else { set [email protected],1286; } guardian strnpcinfo(2),[email protected][[email protected]],[email protected][[email protected]],strmobinfo(2,[email protected]),[email protected],"Guardian#"+strnpcinfo(2)+"::OnGuardianDied",[email protected]; mes "["+strnpcinfo(1)+"]"; mes "We completed the summoning of the Guardian. Our defenses are now increased with it in place."; close; case 2: mes "["+strnpcinfo(1)+"]"; mes "I did as you ordered. But please remember if you the have money to spare, it'll be better to set it up."; close; } case 5: if (GetCastleData(strnpcinfo(2),9) == 1) { mes "["+strnpcinfo(1)+"]"; mes "We are currently hiring a Kafra Employee... Do you want to fire the Kafra Employee?"; next; switch (select("Fire:Cancel")) { case 1: cutin "kafra_01",2; mes "[ Hired Kafra Employee ]"; mes "I worked so hard... How can you do that, Master?... Please... Please reconsider... Check it again, Master... Please..."; next; switch (select("Fire:Cancel")) { case 1: mes "[ Hired Kafra Employee ]"; mes "Oh, my goodness! This is nonsense!"; next; cutin "",255; close; case 2: mes "[ Hired Kafra Employee ]"; mes "I'll work hard for you... Thank you!"; close; } case 2: mes "["+strnpcinfo(1)+"]"; mes "She worked hard in my opinion. It was a good decision to keep her."; close; } disablenpc "Kafra Staff#"+strnpcinfo(2); SetCastleData strnpcinfo(2),9,0; mes "["+strnpcinfo(1)+"]"; mes "...."; mes "I have discharged the Kafra Employee... But... are you unsatisfied with something?"; close; } mes "["+strnpcinfo(1)+"]"; mes "Will you contact the kafra Main Office and Hire a Employee for our Castle?"; mes "^ff0000 10,000 zeny is required for their services. "; next; switch (select("Hire.:Cancel")) { case 1: if (getgdskilllv([email protected],10001) == 0) { mes "["+strnpcinfo(1)+"]"; mes "Master, we can't hire a Kafra Employee because we don't have a contract with the Kafra Main Office. If you want to obtain a contract with the Kafra Main Office, you will need to learn the Guild skill first."; close; } if (Zeny < 10000) { mes "["+strnpcinfo(1)+"]"; mes "Well... I'm sorry but we don't have enough funds to hire a Kafra Employee."; close; } set Zeny, Zeny - 10000; enablenpc "Kafra Staff#"+strnpcinfo(2); SetCastleData strnpcinfo(2),9,1; mes "["+strnpcinfo(1)+"]"; mes "We obtained a contract with the kafra Main Office, and hired a Kafra Employee."; next; cutin "kafra_01",2; mes "[ Hired Kafra Employee ]"; mes "How do you do? I was dispatched from the Main Office."; mes "I'll do my best to not tarnish the reputation of the Guild."; next; cutin "",255; mes "["+strnpcinfo(1)+"]"; mes "The Contract terms of the hired Kafra Employee are for 1 month and after this term, you will need to to pay an additional fee."; mes "It will be useful for our members."; close; case 2: mes "["+strnpcinfo(1)+"]"; mes "I did as you ordered, but some of our members will be unhappy. It will be better to hire a Kafra Employee quickly."; close; } case 6: mes "["+strnpcinfo(1)+"]"; mes "Do you want to visit the room where our valuables are stored?"; mes "That room is restricted to you... you are the only one with access to it."; next; switch (select("Go into Master's room.:Cancel")) { case 1: mes "["+strnpcinfo(1)+"]"; mes "I'll show you the secret path. Follow me...please."; mes "When you want to return here, please press the secret switch."; close2; warp strnpcinfo(2),[email protected][0],[email protected][1]; end; case 2: mes "["+strnpcinfo(1)+"]"; mes "Goods are produced once a day... if you don't remove them in time, they will not be produced anymore."; mes "Therefore, it will be better if you check up on them from time to time."; close; } } } // WoE : Guild Dungeon Entrances //============================================================ - script Lever#gd::gdlever -1,{ set [email protected],GetCastleData(strnpcinfo(2),1); if ([email protected] == 0) { mes "[Ringing Voice]"; mes "'Those who overcome an ordeal shows a great deal of bravery... and will find their way to another ordeal.'"; close; } if (compare(strnpcinfo(2),"aldeg")) { set [email protected]$,"gld_dun02"; if (compare(strnpcinfo(2),"cas01")) setarray [email protected][0],32,122; else if (compare(strnpcinfo(2),"cas02")) setarray [email protected][0],79,30; else if (compare(strnpcinfo(2),"cas03")) setarray [email protected][0],165,38; else if (compare(strnpcinfo(2),"cas04")) setarray [email protected][0],160,148; else if (compare(strnpcinfo(2),"cas05")) setarray [email protected][0],103,169; } else if (compare(strnpcinfo(2),"gefg")) { set [email protected]$,"gld_dun04"; if (compare(strnpcinfo(2),"cas01")) setarray [email protected][0],39,258; else if (compare(strnpcinfo(2),"cas02")) setarray [email protected][0],125,270; else if (compare(strnpcinfo(2),"cas03")) setarray [email protected][0],268,251; else if (compare(strnpcinfo(2),"cas04")) setarray [email protected][0],268,108; else if (compare(strnpcinfo(2),"cas05")) setarray [email protected][0],230,35; } else if (compare(strnpcinfo(2),"payg")) { set [email protected]$,"gld_dun01"; if (compare(strnpcinfo(2),"cas01")) setarray [email protected][0],186,165; else if (compare(strnpcinfo(2),"cas02")) setarray [email protected]ates[0],54,165; else if (compare(strnpcinfo(2),"cas03")) setarray [email protected][0],54,39; else if (compare(strnpcinfo(2),"cas04")) setarray [email protected][0],186,39; else if (compare(strnpcinfo(2),"cas05")) setarray [email protected][0],223,202; } else if (compare(strnpcinfo(2),"prtg")) { set [email protected]$,"gld_dun03"; if (compare(strnpcinfo(2),"cas01")) setarray [email protected][0],28,251; else if (compare(strnpcinfo(2),"cas02")) setarray [email protected][0],164,268; else if (compare(strnpcinfo(2),"cas03")) setarray [email protected][0],164,179; else if (compare(strnpcinfo(2),"cas04")) setarray [email protected][0],268,203; else if (compare(strnpcinfo(2),"cas05")) setarray [email protected][0],199,28; } // Add custom Guild Castles here. else { end; } mes "[Ringing Voice]"; mes "'Only the truly brave can take the test.'"; next; mes " "; mes "There's a small lever. Will you pull it?"; next; if(select("Pull.:Don't pull.") == 1) { if (getcharid(2) == [email protected]) { close2; warp [email protected]$,[email protected][0],[email protected][1]; end; } mes " "; mes "Nothing happened."; close; } close; } // Guardian Spawner Template //============================================================ - script Gld_Guard_Template::Gld_Guard_Template -1,{ // Spawn Guardians in castles // When adding new castles, ensure that the coordinates coincide // with the coordinates defined in the Guild Steward template. OnSpawnGuardians: // Define the types of guardians on a per castle basis. // 1 - Soldier Guardian; 2 - Archer Guardian; 3 - Knight Guardian // Define the x spawn point for each uardian. // [0] = 1st guardian's x spawn point. // Define the y spawn point for each uardian. // [0] = 1st guardian's y spawn point. // Aldebaran (Luina) Castles if (strnpcinfo(2) == "aldeg_cas01") { setarray [email protected][0],1,2,2,2,2,3,3,3; setarray [email protected][0],17,39,38,45,21,218,213,73; setarray [email protected][0],218,208,196,228,194,24,24,70; } else if (strnpcinfo(2) == "aldeg_cas02") { setarray [email protected][0],3,3,3,1,1,2,2,2; setarray [email protected][0],27,88,117,60,51,21,36,210; setarray [email protected][0],184,43,46,202,183,177,183,7; } else if (strnpcinfo(2) == "aldeg_cas03") { setarray [email protected][0],3,3,1,1,1,2,2,2; setarray [email protected][0],90,116,86,116,64,212,195,110; setarray [email protected][0],112,112,120,76,103,160,151,217; } else if (strnpcinfo(2) == "aldeg_cas04") { setarray [email protected][0],2,2,2,1,1,1,3,3; setarray [email protected][0],187,192,148,145,169,198,48,55; setarray [email protected][0],100,42,88,209,53,77,72,88; } else if (strnpcinfo(2) == "aldeg_cas05") { setarray [email protected][0],2,2,1,1,3,3,3,3; setarray [email protected][0],51,188,157,157,27,145,156,41; setarray [email protected][0],202,79,192,74,221,78,73,112; } // Geffen (Britoniah) Castles else if (strnpcinfo(2) == "gefg_cas01") { setarray [email protected][0],1,1,1,2,2,3,3,3; setarray [email protected][0],67,184,62,36,50,50,189,200; setarray [email protected][0],179,20,41,186,186,67,41,167; } else if (strnpcinfo(2) == "gefg_cas02") { setarray [email protected][0],1,1,1,2,2,3,3,3; setarray [email protected][0],64,56,166,35,20,19,166,159; setarray [email protected][0],168,41,25,148,150,41,42,188; } else if (strnpcinfo(2) == "gefg_cas03") { setarray [email protected][0],2,2,1,1,1,3,3,3; setarray [email protected][0],48,113,48,157,243,157,234,238; setarray [email protected][0],176,214,207,62,41,45,25,160; } else if (strnpcinfo(2) == "gefg_cas04") { setarray [email protected][0],2,2,1,1,1,3,3,3; setarray [email protected][0],53,31,49,29,147,57,160,148; setarray [email protected][0],191,178,220,46,65,46,50,189; } else if (strnpcinfo(2) == "gefg_cas05") { setarray [email protected][0],2,2,1,1,1,3,3,3; setarray [email protected][0],45,71,72,66,177,66,177,193; setarray [email protected][0],149,163,142,47,50,17,35,166; } // Payon (Baulder) Castles else if (strnpcinfo(2) == "payg_cas01") { setarray [email protected][0],2,2,2,2,2,2,2,3; setarray [email protected][0],229,225,222,99,65,36,51,138; setarray [email protected][0],92,80,111,45,31,127,144,133; } else if (strnpcinfo(2) == "payg_cas02") { setarray [email protected][0],2,2,2,2,2,2,2,3; setarray [email protected][0],237,228,210,57,42,287,264,27; setarray [email protected][0],54,72,41,241,241,257,272,20; } else if (strnpcinfo(2) == "payg_cas03") { setarray [email protected][0],2,2,2,2,2,2,2,3; setarray [email protected][0],245,269,36,41,39,19,37,268; setarray [email protected][0],37,51,39,39,65,276,277,244; } else if (strnpcinfo(2) == "payg_cas04") { setarray [email protected][0],2,2,2,2,2,2,2,3; setarray [email protected][0],251,232,231,32,32,35,36,270; setarray [email protected][0],212,212,175,287,232,45,17,41; } else if (strnpcinfo(2) == "payg_cas05") { setarray [email protected][0],2,2,2,2,2,2,2,3; setarray [email protected][0],19,33,266,266,263,263,250,36; setarray [email protected][0],279,260,234,279,37,21,22,36; } // Prontera (Valkyrie Realms) Castles else if (strnpcinfo(2) == "prtg_cas01") { setarray [email protected][0],1,1,1,2,2,3,3,3; setarray [email protected][0],182,182,153,59,50,184,196,107; setarray [email protected][0],62,116,86,28,36,183,189,179; } else if (strnpcinfo(2) == "prtg_cas02") { setarray [email protected][0],3,3,3,1,1,2,2,2; setarray [email protected][0],161,153,178,71,49,64,7,75; setarray [email protected][0],161,161,44,75,28,186,196,175; } else if (strnpcinfo(2) == "prtg_cas03") { setarray [email protected][0],3,3,3,1,1,2,2,2; setarray [email protected][0],191,137,45,50,41,191,179,191; setarray [email protected][0],190,190,99,87,87,42,43,72; } else if (strnpcinfo(2) == "prtg_cas04") { setarray [email protected][0],3,3,3,1,1,1,2,2; setarray [email protected][0],276,274,246,38,29,33,78,36; setarray [email protected][0],14,35,246,240,240,258,48,61; } else if (strnpcinfo(2) == "prtg_cas05") { setarray [email protected][0],3,3,3,1,1,1,2,2; setarray [email protected][0],266,287,245,236,251,278,32,44; setarray [email protected][0],262,280,250,63,63,253,253,248; } // Add custom Guild Castles here. else { end; } // Kill all existing guardians before spawning new ones. // This should prevent duplicating Guardians when char Server disconnects. killmonster strnpcinfo(2),strnpcinfo(0)+"::OnGuardianDied"; for( set [email protected], 0; [email protected] <= 7 ; set [email protected], [email protected]+1 ) { set [email protected],[email protected] + 10; if ([email protected][[email protected]] == 1) { set [email protected],1287; } else if ([email protected][[email protected]] == 2) { set [email protected],1285; } else { set [email protected],1286; } if (GetCastleData(strnpcinfo(2),[email protected])) { guardian strnpcinfo(2),[email protected][[email protected]],[email protected][[email protected]],strmobinfo(2,[email protected]),[email protected],"Guardian#"+strnpcinfo(2)+"::OnGuardianDied",[email protected]; } } end; OnGuardianDied: end; } // Treasure Room Spawn Template //============================================================ - script Gld_Trea_Spawn::Gld_Trea_Spawn -1,{ end; OnClock2200: // Do nothing if this script is the template. if (strnpcinfo(1) == "Gld_Trea_Spawn") end; set [email protected], GetCastleData(strnpcinfo(2),1); // If there is no owner, do nothing. if ([email protected]) end; // Is there Economy in this castle? set [email protected],GetCastleData(strnpcinfo(2),2)/5+4; // Set information if (strnpcinfo(2) == "aldeg_cas01") { set [email protected],1324; setarray [email protected][0],115,122,115,122,116,117,118,119,120,121,121,121,121,121,121,120,119,118,117,116,116,116,116,116; setarray [email protected][0],226,226,219,219,225,225,225,225,225,225,224,223,222,221,220,220,220,220,220,220,221,222,223,224; } else if (strnpcinfo(2) == "aldeg_cas02") { set [email protected],1326; setarray [email protected][0],134,135,135,134,132,133,134,135,136,137,137,137,137,137,137,136,135,134,133,132,132,132,132,132; setarray [email protected][0],231,231,230,230,233,233,233,233,233,233,232,231,230,229,228,228,228,228,228,228,229,230,231,232; } else if (strnpcinfo(2) == "aldeg_cas03") { set [email protected],1328; setarray [email protected][0],224,225,225,224,222,223,224,225,226,227,227,227,227,227,227,226,225,224,223,222,222,222,222,222; setarray [email protected][0],269,269,268,268,271,271,271,271,271,271,270,269,268,267,266,266,266,266,266,266,267,268,269,270; } else if (strnpcinfo(2) == "aldeg_cas04") { set [email protected],1330; setarray [email protected][0],84,85,85,84,82,83,84,85,86,87,87,87,87,87,87,86,85,84,83,82,82,82,82,82; setarray [email protected][0],13,13,12,12,15,15,15,15,15,15,14,13,12,11,10,10,10,10,10,10,11,12,13,14; } else if (strnpcinfo(2) == "aldeg_cas05") { set [email protected],1332; setarray [email protected][0],61,62,62,61,59,60,61,62,63,64,64,64,64,64,64,63,62,61,60,59,59,59,59,59; setarray [email protected][0],12,12,11,11,14,14,14,14,14,14,13,12,11,10,9,9,9,9,9,9,10,11,12,13; } else if (strnpcinfo(2) == "gefg_cas01") { set [email protected],1334; setarray [email protected][0],153,154,154,153,151,152,153,154,155,156,156,156,156,156,156,155,154,153,152,151,151,151,151,151; setarray [email protected][0],113,113,112,112,115,115,115,115,115,115,114,113,112,111,110,110,110,110,110,110,111,112,113,114; } else if (strnpcinfo(2) == "gefg_cas02") { set [email protected],1336; setarray [email protected][0],139,140,140,139,137,138,139,140,141,142,142,142,142,142,142,141,140,139,138,137,137,137,137,137; setarray [email protected][0],115,115,114,114,117,117,117,117,117,117,116,115,114,113,112,112,112,112,112,112,113,114,115,116; } else if (strnpcinfo(2) == "gefg_cas03") { set [email protected],1338; setarray [email protected][0],269,270,270,269,267,268,269,270,271,272,272,272,272,272,272,271,270,269,268,267,267,267,267,267; setarray [email protected][0],291,291,290,290,293,293,293,293,293,293,292,291,290,289,288,288,288,288,288,288,289,290,291,292; } else if (strnpcinfo(2) == "gefg_cas04") { set [email protected],1340; setarray [email protected][0],115,116,116,115,113,114,115,116,117,118,118,118,118,118,118,117,116,115,114,113,113,113,113,113; setarray [email protected][0],119,119,118,118,121,121,121,121,121,121,120,119,118,117,116,116,116,116,116,116,117,118,119,120; } else if (strnpcinfo(2) == "gefg_cas05") { set [email protected],1342; setarray [email protected][0],143,144,144,143,141,142,143,144,145,146,146,146,146,146,146,145,144,143,142,141,141,141,141,141; setarray [email protected][0],110,110,109,109,112,112,112,112,112,112,111,110,109,108,107,107,107,107,107,107,108,109,110,111; } else if (strnpcinfo(2) == "payg_cas01") { set [email protected],1344; setarray [email protected][0],289,292,292,289,288,289,290,291,292,293,293,293,293,293,293,292,291,290,289,288,288,288,288,288; setarray [email protected][0],10,10,7,7,11,11,11,11,11,11,10,9,8,7,6,6,6,6,6,6,7,8,9,10; } else if (strnpcinfo(2) == "payg_cas02") { set [email protected],1346; setarray [email protected][0],143,146,146,143,142,143,144,145,146,147,147,147,147,147,147,146,145,144,143,142,142,142,142,142; setarray [email protected][0],146,146,143,143,147,147,147,147,147,147,146,145,144,143,142,142,142,142,142,142,143,144,145,146; } else if (strnpcinfo(2) == "payg_cas03") { set [email protected],1348; setarray [email protected][0],158,159,159,158,156,157,158,159,160,161,161,161,161,161,161,160,159,158,157,156,156,156,156,156; setarray [email protected][0],169,169,168,168,171,171,171,171,171,171,170,169,168,167,166,166,166,166,166,166,167,168,169,170; } else if (strnpcinfo(2) == "payg_cas04") { set [email protected],1350; setarray [email protected][0],146,147,147,146,144,145,146,147,148,149,149,149,149,149,149,148,147,146,145,144,144,144,144,144; setarray [email protected][0],48,48,47,47,50,50,50,50,50,50,49,48,47,46,45,45,45,45,45,45,46,47,48,49; } else if (strnpcinfo(2) == "payg_cas05") { set [email protected],1352; setarray [email protected][0],155,158,158,155,154,155,156,157,158,159,159,159,159,159,159,158,157,156,155,154,154,154,154,154; setarray [email protected][0],134,134,131,131,135,135,135,135,135,135,134,133,132,131,130,130,130,130,130,130,131,132,133,134; } else if (strnpcinfo(2) == "prtg_cas01") { set [email protected],1354; setarray [email protected][0],10,11,11,10,8,9,10,11,12,13,13,13,13,13,13,12,11,10,9,8,8,8,8,8; setarray [email protected][0],209,209,208,208,211,211,211,211,211,211,210,209,208,207,206,206,206,206,206,206,207,208,209,210; } else if (strnpcinfo(2) == "prtg_cas02") { set [email protected],1356; setarray [email protected][0],201,202,202,201,199,200,201,202,203,204,204,204,204,204,204,203,202,201,200,199,199,199,199,199; setarray [email protected][0],228,228,227,227,230,230,230,230,230,230,229,228,227,226,225,225,225,225,225,225,226,227,228,229; } else if (strnpcinfo(2) == "prtg_cas03") { set [email protected],1358; setarray [email protected][0],187,188,188,187,185,186,187,188,189,190,190,190,190,190,190,189,188,187,186,185,185,185,185,185; setarray [email protected][0],132,132,131,131,134,134,134,134,134,134,133,132,131,130,129,129,129,129,129,129,130,131,132,133; } else if (strnpcinfo(2) == "prtg_cas04") { set [email protected],1360; setarray [email protected][0],269,270,270,269,267,268,269,270,271,272,272,272,272,272,272,271,270,269,268,267,267,267,267,267; setarray [email protected][0],162,162,161,161,164,164,164,164,164,164,163,162,161,160,159,159,159,159,159,159,160,161,162,163; } else if (strnpcinfo(2) == "prtg_cas05") { set [email protected],1362; setarray [email protected][0],275,276,276,275,273,274,275,276,277,278,278,278,278,278,278,277,276,275,274,273,273,273,273,273; setarray [email protected][0],178,178,177,177,180,180,180,180,180,180,179,178,177,176,175,175,175,175,175,175,176,177,178,179; } // Add custom Guild Castles here. else { end; } // Apply investment to Eco. and Def. Only happens if there were investments made. // Permanent Development can only happen once per day. if (GetCastleData(strnpcinfo(2),4)) { set [email protected],GetCastleData(strnpcinfo(2),2); SetCastleData strnpcinfo(2),2,[email protected] + GetCastleData(strnpcinfo(2),4) + (rand(2) && getgdskilllv([email protected],10014)); if (GetCastleData(strnpcinfo(2),2) > 100) SetCastleData strnpcinfo(2),2,100; } if (GetCastleData(strnpcinfo(2),5)) { set [email protected],GetCastleData(strnpcinfo(2),3); SetCastleData strnpcinfo(2),3,[email protected] + GetCastleData(strnpcinfo(2),5); if (GetCastleData(strnpcinfo(2),3) > 100) SetCastleData strnpcinfo(2),3,100; } // Reset daily investment limits. setcastledata strnpcinfo(2),4,0; setcastledata strnpcinfo(2),5,0; // Spawn boxes in proper order. for (set [email protected],0; [email protected] < [email protected] ; set [email protected],[email protected]+1) { // set treasure box ID set [email protected], [email protected] + ([email protected]+2) % 2; set [email protected],1 << [email protected]; // Spawn or do not spawn chests if one already exists. if ((getd("[email protected]"+strnpcinfo(2)+"_treasure") & [email protected]) == 0) { monster strnpcinfo(2),[email protected][[email protected]],[email protected][[email protected]],"Treasure Chest",[email protected],1,"Treasure#"+strnpcinfo(2)+"::OnTreasureDied"[email protected]; setd "[email protected]"+strnpcinfo(2)+"_treasure",getd("[email protected]"+strnpcinfo(2)+"_treasure") | [email protected]; } } end; // Individual "You killed a chest" events to ensure proper spawning at the change of day. OnTreasureDied0: setd "[email protected]"+strnpcinfo(2)+"_treasure",getd("[email protected]"+strnpcinfo(2)+"_treasure") & ~1; end; OnTreasureDied1: setd "[email protected]"+strnpcinfo(2)+"_treasure",getd("[email protected]"+strnpcinfo(2)+"_treasure") & ~2; end; OnTreasureDied2: setd "[email protected]"+strnpcinfo(2)+"_treasure",getd("[email protected]"+strnpcinfo(2)+"_treasure") & ~4; end; OnTreasureDied3: setd "[email protected]"+strnpcinfo(2)+"_treasure",getd("[email protected]"+strnpcinfo(2)+"_treasure") & ~8; end; OnTreasureDied4: setd "[email protected]"+strnpcinfo(2)+"_treasure",getd("[email protected]"+strnpcinfo(2)+"_treasure") & ~16; end; OnTreasureDied5: setd "[email protected]"+strnpcinfo(2)+"_treasure",getd("[email protected]"+strnpcinfo(2)+"_treasure") & ~32; end; OnTreasureDied6: setd "[email protected]"+strnpcinfo(2)+"_treasure",getd("[email protected]"+strnpcinfo(2)+"_treasure") & ~64; end; OnTreasureDied7: setd "[email protected]"+strnpcinfo(2)+"_treasure",getd("[email protected]"+strnpcinfo(2)+"_treasure") & ~128; end; OnTreasureDied8: setd "[email protected]"+strnpcinfo(2)+"_treasure",getd("[email protected]"+strnpcinfo(2)+"_treasure") & ~256; end; OnTreasureDied9: setd "[email protected]"+strnpcinfo(2)+"_treasure",getd("[email protected]"+strnpcinfo(2)+"_treasure") & ~512; end; OnTreasureDied10: setd "[email protected]"+strnpcinfo(2)+"_treasure",getd("[email protected]"+strnpcinfo(2)+"_treasure") & ~1024; end; OnTreasureDied11: setd "[email protected]"+strnpcinfo(2)+"_treasure",getd("[email protected]"+strnpcinfo(2)+"_treasure") & ~2048; end; OnTreasureDied12: setd "[email protected]"+strnpcinfo(2)+"_treasure",getd("[email protected]"+strnpcinfo(2)+"_treasure") & ~4096; end; OnTreasureDied13: setd "[email protected]"+strnpcinfo(2)+"_treasure",getd("[email protected]"+strnpcinfo(2)+"_treasure") & ~8192; end; OnTreasureDied14: setd "[email protected]"+strnpcinfo(2)+"_treasure",getd("[email protected]"+strnpcinfo(2)+"_treasure") & ~16384; end; OnTreasureDied15: setd "[email protected]"+strnpcinfo(2)+"_treasure",getd("[email protected]"+strnpcinfo(2)+"_treasure") & ~32768; end; OnTreasureDied16: setd "[email protected]"+strnpcinfo(2)+"_treasure",getd("[email protected]"+strnpcinfo(2)+"_treasure") & ~65536; end; OnTreasureDied17: setd "[email protected]"+strnpcinfo(2)+"_treasure",getd("[email protected]"+strnpcinfo(2)+"_treasure") & ~131072; end; OnTreasureDied18: setd "[email protected]"+strnpcinfo(2)+"_treasure",getd("[email protected]"+strnpcinfo(2)+"_treasure") & ~262144; end; OnTreasureDied19: setd "[email protected]"+strnpcinfo(2)+"_treasure",getd("[email protected]"+strnpcinfo(2)+"_treasure") & ~524288; end; OnTreasureDied20: setd "[email protected]"+strnpcinfo(2)+"_treasure",getd("[email protected]"+strnpcinfo(2)+"_treasure") & ~1048576; end; OnTreasureDied21: setd "[email protected]"+strnpcinfo(2)+"_treasure",getd("[email protected]"+strnpcinfo(2)+"_treasure") & ~2097152; end; OnTreasureDied22: setd "[email protected]"+strnpcinfo(2)+"_treasure",getd("[email protected]"+strnpcinfo(2)+"_treasure") & ~4194304; end; OnTreasureDied23: setd "[email protected]"+strnpcinfo(2)+"_treasure",getd("[email protected]"+strnpcinfo(2)+"_treasure") & ~8388608; end; } and, (b ) WOE Controller: //===== rAthena Script ======================================= //= Euphy's WOE Controller //===== By: ================================================== //= Euphy //===== Current Version: ===================================== //= 1.5 //===== Compatible With: ===================================== //= rAthena Project //===== Description: ========================================= //= A controller for War of Emperium designed for //= simplicity and ease of use. //= Many concepts taken from ToastOfDoom's script, //= and "rewards" function originally by Goddameit. //===== Additional Comments: ================================= //= Be sure to disable the default agit controllers! //== npc\guild\agit_controller.txt //== npc\guild2\agit_start_se.txt //============================================================ // Information NPC //============================================================ prontera,149,193,4 script WOE Information 835,{ doevent "WOE_CONTROL::OnMenu"; end; OnAgitStart: while(agitcheck()) { specialeffect EF_BEGINSPELL6; sleep 425; } end; } // Script Core //============================================================ - script WOE_CONTROL -1,{ function Disp_Owner; function Add_Zero; OnInit: // ----------------------------------------------------------- // Configuration settings. // ----------------------------------------------------------- set .CastleWarp,0; // 1: Always enable all castle warps. | 0: Warp only to active castles. set .AutoKick,1; // Automatically kick players from inactive castles during WOE? (1:yes / 0:no) set .NoOwner,0; // Automatically kick players from unconquered castles outside of WOE? (1:yes / 0:no) set .ExitWarp,0; // Warp all players from castles when WOE ends? (1:yes / 0:no) set .GMAccess,99; // GM level required to access Session Manager. // ----------------------------------------------------------- // Reward options. // ----------------------------------------------------------- // [1] Enable rewards. // [2] Mail all rewards. // - If not set, players receive items in their inventory. // - Only ONE item can be sent via mail, plus Zeny. // - Note that offline players do NOT receive rewards. // [4] Only reward Guild Masters. // - If not set, all guild members are rewarded. // - If mailing is enabled (option 2), offline Guild Masters WILL receive rewards. // [8] Duplicate IP check. // - Members in a guild with the same IP address are not rewarded. // - If Guild Masters is enabled (option 4), this feature is not used. // ----------------------------------------------------------- // Combine values as needed (e.g. 1|8 = 1+8 = 9). set .Options, 1|8; // Rewards per castle. // -- when given directly: <itemID>,<amount>{,<itemID>,<amount>,...} // -- via mail (option 2): <itemID>,<amount>,<Zeny> setarray .Reward[0],14001,1; // ----------------------------------------------------------- // Constants (leave this section alone). // ----------------------------------------------------------- setarray .Castles$[0], "prtg_cas01","prtg_cas02","prtg_cas03","prtg_cas04","prtg_cas05", "payg_cas01","payg_cas02","payg_cas03","payg_cas04","payg_cas05", "gefg_cas01","gefg_cas02","gefg_cas03","gefg_cas04","gefg_cas05", "aldeg_cas01","aldeg_cas02","aldeg_cas03","aldeg_cas04","aldeg_cas05", "arug_cas01","arug_cas02","arug_cas03","arug_cas04","arug_cas05", "schg_cas01","schg_cas02","schg_cas03","schg_cas04","schg_cas05"; setarray .EndLabel$[0],"ar01","ar02","ar03","ar04","ar05","sc01","sc02","sc03","sc04","sc05"; setarray .Days$[0],"Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday"; setarray .Regions$[0],"Prontera","Payon","Geffen","Aldebaran","Arunafeltz","Schwaltzvalt"; setarray .Map$[0],"prt_gld","pay_gld","gef_fild13","alde_gld","aru_gld","sch_gld"; setarray .MapX[0],134,240,153,111,208,121,295,317,140,204,214,308,143,193,305,48, 95,142,239,264,158,83, 68,299,292,293,288, 97,137, 71; setarray .MapY[0], 65,128,137,240,240,233,116,293,160,266, 75,240,240,278, 87,83,249, 85,242, 90,272,47,155,345,107,100,252,196, 90,315; // ----------------------------------------------------------- set .Size, getarraysize($WOE_CONTROL); if (.AutoKick || .NoOwner) for(set [email protected],0; [email protected]<30; set [email protected],[email protected]+1) { setmapflag .Castles$[[email protected]], mf_loadevent; setd "."+.Castles$[[email protected]], [email protected]; } if (!agitcheck() && !agitcheck2()) sleep 4000; set .Init,1; OnMinute00: freeloop(1); if (agitcheck() || agitcheck2()) { for(set [email protected],0; [email protected]<.Size; set [email protected],[email protected]+4) if (gettime(4) == $WOE_CONTROL[[email protected]] && gettime(3) == $WOE_CONTROL[[email protected]+2]) { OnWOEEnd: announce "The War Of Emperium is over!",bc_all|bc_woe; AgitEnd; AgitEnd2; sleep 1000; for(set [email protected],0; [email protected]<30; set [email protected],[email protected]+1) { if (.Active[0]&(1<<[email protected])) Disp_Owner(.Castles$[[email protected]],1); if (.ExitWarp) maprespawnguildid .Castles$[[email protected]],0,3; } if (.Options&1 && .Active[0] && .ForceEnd != 2) callsub OnReward, .Active[0]; deletearray .Active[0],2; if (.ForceEnd) { set .ForceEnd,0; end; } break; } } if ((!agitcheck() && !agitcheck2()) || .Init) { if (!agitcheck() && !agitcheck2()) set .Init,0; for(set [email protected],0; [email protected]<.Size; set [email protected],[email protected]+4) if (gettime(4) == $WOE_CONTROL[[email protected]] && gettime(3) >= $WOE_CONTROL[[email protected]+1] && gettime(3) < $WOE_CONTROL[[email protected]+2]) { deletearray .Active[0],2; set .Active[0], $WOE_CONTROL[[email protected]+3]; if (.Init) { AgitEnd; AgitEnd2; } else announce "The War Of Emperium has begun!",bc_all|bc_woe; sleep 1000; AgitStart; AgitStart2; for(set [email protected],0; [email protected]<30; set [email protected],[email protected]+1) { if (.Active[0]&(1<<[email protected])) { if (!.Init) Disp_Owner(.Castles$[[email protected]],0); set .Active[1], .Active[1] | (1<<(([email protected]/5)+1)); } else { if ([email protected]<20) { donpcevent "Agit#"+.Castles$[[email protected]]+"::OnAgitEnd"; killmonster .Castles$[[email protected]], "Agit#"+.Castles$[[email protected]]+"::OnAgitBreak"; } else { donpcevent "Manager#"+.Castles$[[email protected]]+"::OnAgitEnd2"; killmonster .Castles$[[email protected]], "Steward#"+.EndLabel$[[email protected]]+"::OnStartArena"; } } } break; } } set .Init,0; end; function Disp_Owner { set [email protected], getcastledata(getarg(0),1); if ([email protected]) announce "The ["+getcastlename(getarg(0))+"] castle "+((getarg(1))?"has been conquered":"is currently held")+" by the ["+getguildname([email protected])+"] guild.",bc_all|bc_woe; else announce "The ["+getcastlename(getarg(0))+"] castle is currently unoccupied.",bc_all|bc_woe; return; } function Add_Zero { return ((getarg(0)<10)?"0":"")+getarg(0)+(getarg(1,0)?".":":")+"00"; } OnReward: set [email protected]$, ((.Options&4)?"position = 0":"online = 1"); if (.Options&2) set [email protected]$,gettimestr("%B %d, %Y",21); freeloop(1); for(set [email protected],0; [email protected]<30; set [email protected],[email protected]+1) if (getarg(0)&(1<<[email protected])) { set [email protected], getcastledata(.Castles$[[email protected]],1); if ([email protected]) continue; set [email protected], query_sql("SELECT account_id,char_id FROM `guild_member` WHERE guild_id = '"[email protected]+"' AND "[email protected]$,[email protected],[email protected]); for(set [email protected],0; [email protected]<[email protected]; set [email protected],[email protected]+1) { if (.Options&8 && !(.Options&4)) { set [email protected]$, replacestr(getcharip([email protected][[email protected]]),".","a"); if (getd("[email protected]_"[email protected]+"_"[email protected]$)) continue; setd "[email protected]_"[email protected]+"_"[email protected]$,1; } if (.Options&2) { query_sql("INSERT INTO `mail` (send_name,dest_id,title,message,nameid,amount,identify,zeny,time) VALUES ("+ "'no-reply',"[email protected][[email protected]]+",'** Siege Reward: "+getcastlename(.Castles$[[email protected]])+" **',"+ "'Brave one,% % Congratulations!% Your guild has successfully occupied% territory in the War of Emperium on% "[email protected]$+".% % % % % [ Your reward is attached. ]',"+ .Reward[0]+","+.Reward[1]+",0,"+.Reward[2]+",UNIX_TIMESTAMP(NOW()))"); if (!getd("[email protected]_"[email protected][[email protected]]) && isloggedin([email protected][[email protected]],[email protected][[email protected]])) { setd "[email protected]_"[email protected][[email protected]],1; message rid2name([email protected][[email protected]]),"You've got mail! Please re-login to update your mailing list."; } } else if (isloggedin([email protected][[email protected]])) { for(set [email protected],0; [email protected]<getarraysize(.Reward); set [email protected],[email protected]+2) getitem .Reward[[email protected]], .Reward[[email protected]+1], [email protected][[email protected]]; message rid2name([email protected][[email protected]]),"You have been rewarded for conquering "+getcastlename(.Castles$[[email protected]])+"."; } } } if (.Options&2) query_sql("UPDATE `mail` SET message = REPLACE(message,'%',CHAR(13)) WHERE send_name = 'no-reply'"); return; OnPCLoadMapEvent: if (!compare(strcharinfo(3),"g_cas")) end; if (((.AutoKick && .Active[0]) || (.NoOwner && !getcastledata(strcharinfo(3),1))) && !(.Active[0]&(1<<getd("."+strcharinfo(3))))) { if (getcharid(2) && getcastledata(strcharinfo(3),1) == getcharid(2)) end; sleep2 1000; message strcharinfo(0), getcastlename(strcharinfo(3))+" is currently inactive."; sleep2 5000; if (compare(strcharinfo(3),"g_cas")) warp "SavePoint",0,0; } end; OnMenu: while(1) { mes "[WOE Information]"; if (agitcheck() || agitcheck2()) { if (.Active[0]) { for(set [email protected],0; [email protected]<.Size; set [email protected],[email protected]+4) if (gettime(4) == $WOE_CONTROL[[email protected]] && gettime(3) >= $WOE_CONTROL[[email protected]+1] && gettime(3) < $WOE_CONTROL[[email protected]+2]) { set [email protected], $WOE_CONTROL[[email protected]+2]; break; } mes "The War of Emperium is ^0055FFactive^000000 until ^FF0000"+Add_Zero([email protected])+"^000000 in the following regions:"; mes " "; for(set [email protected],0; [email protected]<6; set [email protected],[email protected]+1) if (.Active[1]&(1<<([email protected]+1))) mes " > ^777777"+.Regions$[[email protected]]+"^000000"; } else mes "The War of Emperium is ^0055FFactive^000000."; } else { for(set [email protected],0; [email protected]<.Size; set [email protected],[email protected]+4) if ((gettime(4) == $WOE_CONTROL[[email protected]] && gettime(3) <= $WOE_CONTROL[[email protected]+1]) || gettime(4) < $WOE_CONTROL[[email protected]]) { setarray [email protected][0],$WOE_CONTROL[[email protected]],$WOE_CONTROL[[email protected]+1]; break; } if (!getarraysize([email protected])) setarray [email protected][0],$WOE_CONTROL[0],$WOE_CONTROL[1]; mes "The War of Emperium is ^777777inactive^000000."; if (.Size) { mes " "; mes "The next session will begin"; mes "on ^0055FF"+.Days$[[email protected][0]]+"^000000 at "+Add_Zero([email protected][1])+"^000000."; } } next; switch(select(""+((.CastleWarp || .Active[1])?" ~ Warp to castles...":"")+": ~ Check schedule...: ~ View castle owners...:"+((getgmlevel()<.GMAccess || !getgmlevel())?"":" ~ Manage sessions...")+": ~ ^777777Cancel^000000")) { case 1: if (.CastleWarp) set [email protected]$,"^0055FF"; set [email protected]$,""; for(set [email protected],0; [email protected]<6; set [email protected],[email protected]+1) { if (.CastleWarp || .Active[1]&(1<<([email protected]+1))) set [email protected]$, [email protected]$+" ~ "+((.Active[1]&(1<<([email protected]+1)))[email protected]$:"^777777")+.Regions$[[email protected]]+" Castles^000000"; set [email protected]$, [email protected]$+":"; } set [email protected], select([email protected]$)-1; set [email protected]$,""; for(set [email protected],[email protected]*5; [email protected]<([email protected]*5)+5; set [email protected],[email protected]+1) { if (.CastleWarp || .Active[0]&(1<<[email protected])) set [email protected]$, [email protected]$+" ~ "+((.Active[0]&(1<<[email protected]))[email protected]$:"^777777")+getcastlename(.Castles$[[email protected]])+"^000000"; set [email protected]$, [email protected]$+":"; } set [email protected], select([email protected]$)-1; warp .Map$[[email protected]],.MapX[([email protected]*5)[email protected]],.MapY[([email protected]*5)[email protected]]; close; case 2: mes "[Schedule]"; if (.Size) { freeloop(1); for(set [email protected],0; [email protected]<.Size; set [email protected],[email protected]+4) { mes "> ^FF0000"+.Days$[$WOE_CONTROL[[email protected]]]+" ("+Add_Zero($WOE_CONTROL[[email protected]+1])+"-"+Add_Zero($WOE_CONTROL[[email protected]+2])+")^000000"; for(set [email protected],0; [email protected]<30; set [email protected],[email protected]+1) if ($WOE_CONTROL[[email protected]+3]&(1<<[email protected])) mes " ~ "+getcastlename(.Castles$[[email protected]])+" ^777777("+.Castles$[[email protected]]+")^000000"; if ([email protected]+4 < .Size) mes " "; } freeloop(0); } else mes "No times are configured."; next; break; case 3: mes "[Castle Ownership]"; for(set [email protected],0; [email protected]<6; set [email protected],[email protected]+1) { set [email protected], [email protected]*5; mes "> ^FF0000"+.Regions$[[email protected]]+"^000000"; for(set [email protected],[email protected]; [email protected]<([email protected]+5); set [email protected],[email protected]+1) { set [email protected], getcastledata(.Castles$[[email protected]],1); mes " ~ "+getcastlename(.Castles$[[email protected]])+": "+(([email protected])?"^0055FF"+getguildname([email protected]):"^777777unoccupied")+"^000000"; } if ([email protected] < 5) mes " "; } next; break; case 4: while(1) { mes "[Session Manager]"; mes "There are ^0055FF"+(.Size/4)+" session(s)^000000 configured."; mes "What would you like to do?"; next; switch(select(" ~ Add a session...: ~ Delete a session...: ~ Reload settings...:"+((agitcheck() || agitcheck2())?" ~ End WOE session...":"")+": ~ ^777777Go back^000000")) { case 1: mes "[New Session]"; if (.Size > 127) { mes "You have already reached the maximum of 32 sessions."; next; break; } mes "Select a day."; next; set [email protected], select(" ~ "+implode(.Days$,": ~ "))-1; mes "[New Session]"; mes "Select a start time for ^0055FF"+.Days$[[email protected]]+"^000000."; next; set [email protected]$,""; for(set [email protected],0; [email protected]<23; set [email protected],[email protected]+1) set [email protected]$, [email protected]$+" ~ "+Add_Zero([email protected],1)+":"; set [email protected], select([email protected]$)-1; mes "[New Session]"; mes "Select an end time for ^0055FF"+.Days$[[email protected]]+"^000000."; next; set [email protected]$,""; for(set [email protected],[email protected]+1; [email protected]<24; [email protected],[email protected]+1) set [email protected]$, [email protected]$+" ~ "+Add_Zero([email protected],1)+":"; set [email protected], select([email protected]$)[email protected]; for(set [email protected],0; [email protected]<.Size; set [email protected],[email protected]+4) if ([email protected] == $WOE_CONTROL[[email protected]] && (([email protected] >= $WOE_CONTROL[[email protected]+1] && [email protected] < $WOE_CONTROL[[email protected]+2]) || ([email protected] > $WOE_CONTROL[[email protected]+1] && [email protected] <= $WOE_CONTROL[[email protected]+2]) || ([email protected] <= $WOE_CONTROL[[email protected]+1] && [email protected] >= $WOE_CONTROL[[email protected]+2]))) { mes "[New Session]"; mes "The chosen times overlap with an existing session."; next; set [email protected],1; break; } if ([email protected]) { set [email protected],0; break; } set [email protected],0; while(1) { mes "[New Session]"; mes "^0055FF"+.Days$[[email protected]]+" ("+Add_Zero([email protected])+"-"+Add_Zero([email protected])+")^000000"; mes " > Castles:"; if ([email protected]) mes " ~ ^777777(none selected)^000000"; else for(set [email protected],0; [email protected]<30; set [email protected],[email protected]+1) if ([email protected]&(1<<[email protected])) mes " ~ "+getcastlename(.Castles$[[email protected]])+" ("+.Castles$[[email protected]]+")"; next; set [email protected]$,(([email protected])?" ~ ^FF0000Finished...^000000":"")+":"; for(set [email protected],0; [email protected]<30; set [email protected],[email protected]+1) set [email protected]$, [email protected]$+" ~ "+(([email protected]&(1<<[email protected]))?"^0055FF":"")+getcastlename(.Castles$[[email protected]])+" ("+.Castles$[[email protected]]+")^000000:"; set [email protected], select([email protected]$)-1; if ([email protected]) set [email protected], [email protected]^(1<<([email protected])); else { mes "[New Session]"; mes "Are you sure?"; next; switch(select(" ~ ^0055FFAdd session...^000000: ~ Continue selecting castles...: ~ ^777777Cancel^000000")) { case 1: for(set [email protected],0; [email protected]<.Size; set [email protected],[email protected]+4) if (([email protected] == $WOE_CONTROL[[email protected]] && [email protected] <= $WOE_CONTROL[[email protected]+1]) || [email protected] < $WOE_CONTROL[[email protected]]) { set [email protected],1; break; } if ([email protected]) { set [email protected],1; set [email protected],.Size; } copyarray $WOE_CONTROL[[email protected]+4], $WOE_CONTROL[[email protected]], [email protected]; setarray $WOE_CONTROL[[email protected]], [email protected], [email protected], [email protected], [email protected]; set .Size, getarraysize($WOE_CONTROL); case 3: mes "[New Session]"; mes (([email protected])?"Session added.":"Cancelled."); next; set [email protected],1; case 2: break; } if ([email protected]) { set [email protected],0; break; } } } break; case 2: mes "[Remove Session]"; if (!.Size) { mes "There are no sessions configured."; next; break; } mes "Select a session to remove."; next; set [email protected]$,""; for(set [email protected],0; [email protected]<.Size; set [email protected],[email protected]+4) set [email protected]$, [email protected]$+" ~ "+.Days$[$WOE_CONTROL[[email protected]]]+" ("+Add_Zero($WOE_CONTROL[[email protected]+1],1)+"-"+Add_Zero($WOE_CONTROL[[email protected]+2],1)+"):"; set [email protected]$, [email protected]$+" ~ ^777777Cancel^000000"; set [email protected], select([email protected]$)-1; if ([email protected] == (.Size/4)) break; mes "[Remove Session]"; mes "Delete ^0055FF"+.Days$[$WOE_CONTROL[[email protected]*4]]+"'s^000000 session?"; mes "This action cannot be undone."; next; set [email protected], select(" ~ ^FF0000Delete session...^000000: ~ ^777777Cancel^000000"); mes "[Remove Session]"; if ([email protected] == 2) mes "Cancelled."; else { deletearray $WOE_CONTROL[[email protected]*4],4; set .Size, getarraysize($WOE_CONTROL); mes "Session deleted."; } next; break; case 3: mes "[Reload Settings]"; mes "This will trigger all events related to new session configurations, if any."; if (agitcheck() || agitcheck2()) { mes " "; mes "Be aware that this will disrupt the current WOE session."; } next; set [email protected], select(" ~ ^0055FFReload settings...^000000: ~ ^777777Cancel^000000"); mes "[Reload Settings]"; if ([email protected] == 2) mes "Cancelled."; else { set .Init,1; donpcevent "WOE_CONTROL::OnMinute00"; mes "Variables have been re-initialized."; } next; break; case 4: mes "[Force Agit End]"; if (!agitcheck() && !agitcheck2()) { mes "WOE has already ended."; next; break; } mes "This command will safely execute all AgitEnd events."; mes " "; mes "Kill the current WOE session?"; next; set [email protected], select(" ~ ^FF0000End session...^000000:"+((.Options&1)?" ~ ^FF0000End session without rewards...^000000":"")+": ~ ^777777Cancel^000000"); mes "[Force Agit End]"; if ([email protected] == 3) mes "Cancelled."; else { set .ForceEnd, [email protected]; donpcevent "WOE_CONTROL::OnWOEEnd"; mes "WOE session terminated."; } next; break; case 5: set [email protected],1; break; } if ([email protected]) { set [email protected],0; break; } } break; case 5: close; } } } 2. After WOE end, we want to request "castle drops" (or treasure room) which only available in scripts (a). So, can these two scripts be loaded concurrently? Please. your guidance are much appreciated. War of Emperium Guild Template File.txt woe_controller.txt
-
Hi you all, Sorry for asking, may I know how to solve this? My rebellion skills are there, but can't level up. All my gunslinger skills are level-up already.
-
Same goes to mine. For more details, you have to generate your COREDUMP, to identify which error cause that crashed. As for me, I found my solution, I'm not sure either we are facing the same issue. I realize that my server crashed because of MOB SKILLS. My scenario is, "Everytime you hit some certain Mob, they will cast their skills, then, it crashed." Then it is definitely from Mob Skill errors. You have to determine which skill cause crashed. Might as well, you can try to remove all MOB SKILLS in db/pre-re/mob_skill_db.txt. To ensure is it really that crashed come from Mob Skills.
-
Thank you promise, you always helping me! ^^
-
Hi guys, Can you help me with this? Here is the script //===== rAthena Script ======================================= //= Job Master //===== By: ================================================== //= Euphy //===== Current Version: ===================================== //= 1.4 //===== Compatible With: ===================================== //= rAthena Project //===== Description: ========================================= //= A fully functional job changer. //===== Additional Comments: ================================= //= 1.0 Initial script. //= 1.1 Fixed reset on Baby job change. //= 1.2 Added Expanded Super Novice support and initial Kagerou/Oboro support. //= 1.3 Kagerou/Oboro added. //= 1.4 Rebellion added. //============================================================ prontera,153,193,6 script Job Master 123,{ function Job_Menu; mes "[Job Master]"; if (Class > Job_Soul_Linker) { mes "No more jobs are available."; close; } if (checkfalcon() || checkcart() || checkriding() || ismounting()) { mes "Please remove your " + ((checkfalcon()) ? "falcon" : "") + ((checkcart()) ? "cart" : "") + ((checkriding()) ? "Peco" : "") + ((ismounting()) ? "mount" : "") + " before proceeding."; close; } if (.SkillPointCheck && SkillPoint) { mes "Please use all your skill points before proceeding."; close; } [email protected] = eaclass(); [email protected] = ((.ThirdClass) ? roclass([email protected]&EAJ_UPPERMASK) : Class); if ([email protected] >= Job_Knight && [email protected] <= Job_Crusader2) { if (BaseLevel < .Rebirth[0] || JobLevel < .Rebirth[1]) { [email protected] = .Rebirth[0] - BaseLevel; [email protected] = .Rebirth[1] - JobLevel; mes "You need " + (([email protected] > 0) ? [email protected] + " more base levels " + (([email protected] > 0) ? "/ " : "") : "") + (([email protected] > 0) ? [email protected] + " more job levels " : "") + "to continue."; close; } if (Class > Job_Crusader2) { mes "Switch to third class?"; next; Job_Menu(roclass([email protected]|EAJL_THIRD)); close; } while(1) { mes "Select an option."; next; [email protected] = select(" ~ ^0055FFRebirth^000000:" + ((.ThirdClass) ? " ~ ^FF0000Third Class^000000" : "") + ": ~ ^777777Cancel^000000"); if ([email protected] == 3) close; mes "[Job Master]"; mes "Are you sure?"; next; Job_Menu((([email protected] == 1) ? Job_Novice_High : roclass([email protected]|EAJL_THIRD))); mes "[Job Master]"; } } [email protected] = roclass([email protected]|EAJL_2_1); [email protected] = roclass([email protected]|EAJL_2_2); if (([email protected]&EAJ_UPPERMASK) == EAJ_SUPER_NOVICE) setarray [email protected][0], roclass([email protected]|EAJL_THIRD), 99; if (Class == Job_Ninja || Class == Job_Gunslinger) setarray [email protected][0], [email protected], 70; if ([email protected][0] && .SecondExpanded) { if (BaseLevel < .Rebirth[0] || JobLevel < [email protected][1]) { [email protected] = .Rebirth[0] - BaseLevel; [email protected] = [email protected][1] - JobLevel; mes "You need " + (([email protected] > 0) ? [email protected] + " more base levels " + (([email protected] > 0) ? "/ " : "") : "") + (([email protected] > 0) ? [email protected] + " more job levels " : "") + "to continue."; close; } mes "Switch to " + jobname([email protected][0]) + "?"; next; Job_Menu([email protected][0]); close; } if ([email protected]&EAJL_2) if ([email protected]&(EAJL_UPPER|EAJL_BABY) || roclass([email protected]|EAJL_UPPER) == -1) { mes "No more jobs are available."; close; } if (([email protected]&EAJ_BASEMASK) == EAJ_NOVICE) { if (JobLevel < .JobReq[0]) mes "A job level of " + .JobReq[0] + " is required to change into the 1st Class."; else if (Class == Job_Novice_High && .LastJob && lastJob) { mes "Switch classes now?"; next; Job_Menu(roclass((eaclass(lastJob)&EAJ_BASEMASK)|EAJL_UPPER)); } else { switch(Class) { case Job_Novice: Job_Menu( Job_Swordman, Job_Mage, Job_Archer, Job_Acolyte, Job_Merchant, Job_Thief, Job_SuperNovice, Job_Taekwon, Job_Gunslinger, Job_Ninja, Job_Baby ); break; case Job_Novice_High: Job_Menu( Job_Swordman_High, Job_Mage_High, Job_Archer_High, Job_Acolyte_High, Job_Merchant_High, Job_Thief_High ); break; case Job_Baby: Job_Menu( Job_Baby_Swordman, Job_Baby_Mage, Job_Baby_Archer, Job_Baby_Acolyte, Job_Baby_Merchant, Job_Baby_Thief, Job_Super_Baby ); break; default: mes "An error has occurred."; break; } } close; } if (roclass([email protected]|EAJL_2_1) == -1 || roclass([email protected]|EAJL_2_2) == -1) mes "No more jobs are available."; else if (!([email protected]&EAJL_2) && JobLevel < .JobReq[1]) mes "A job level of " + .JobReq[1] + " is required to change into the 2nd Class."; else if (.LastJob && lastJob && ([email protected]&EAJL_UPPER)) { mes "Switch classes now?"; next; Job_Menu(lastJob + Job_Novice_High); } else Job_Menu([email protected], [email protected]); close; function Job_Menu { while(1) { if (getargcount() > 1) { mes "Select a job."; [email protected]$ = ""; for ([email protected] = 0; [email protected] < getargcount(); [email protected]++) [email protected]$ = [email protected]$ + " ~ " + jobname(getarg([email protected])) + ":"; [email protected]$ = [email protected]$+" ~ ^777777Cancel^000000"; next; [email protected] = getarg(select([email protected]$) - 1, 0); if ([email protected]) close; if (([email protected] == Job_SuperNovice || [email protected] == Job_Super_Baby) && BaseLevel < .SNovice) { mes "[Job Master]"; mes "A base level of " + .SNovice + " is required to turn into a " + jobname([email protected]) + "."; close; } mes "[Job Master]"; mes "Are you sure?"; next; } else [email protected] = getarg(0); if (select(" ~ Change into ^0055FF" + jobname([email protected]) + "^000000 class: ~ ^777777" + ((getargcount() > 1) ? "Go back" : "Cancel") + "^000000") == 1) { mes "[Job Master]"; mes "You are now " + callfunc("F_InsertArticle", jobname([email protected])) + "!"; if ([email protected] == Job_Novice_High && .LastJob) lastJob = Class; jobchange [email protected]; if ([email protected] == Job_Novice_High) resetlvl(1); else if ([email protected] == Job_Baby) { resetstatus; resetskill; set SkillPoint,0; } specialeffect2 EF_ANGEL2; specialeffect2 EF_ELECTRIC; if (.Platinum) callsub Get_Platinum; close; } if (getargcount() == 1) return; mes "[Job Master]"; } end; } Get_Platinum: skill "NV_FIRSTAID",1,SKILL_PERM; switch (BaseClass) { case Job_Novice: if (Class != Job_SuperNovice) skill "NV_TRICKDEAD",1,SKILL_PERM; break; case Job_Swordman: skill "SM_MOVINGRECOVERY",1,SKILL_PERM; skill "SM_FATALBLOW",1,SKILL_PERM; skill "SM_AUTOBERSERK",1,SKILL_PERM; break; case Job_Mage: skill "MG_ENERGYCOAT",1,SKILL_PERM; break; case Job_Archer: skill "AC_MAKINGARROW",1,SKILL_PERM; skill "AC_CHARGEARROW",1,SKILL_PERM; break; case Job_Acolyte: skill "AL_HOLYLIGHT",1,SKILL_PERM; break; case Job_Merchant: skill "MC_CARTREVOLUTION",1,SKILL_PERM; skill "MC_CHANGECART",1,SKILL_PERM; skill "MC_LOUD",1,SKILL_PERM; break; case Job_Thief: skill "TF_SPRINKLESAND",1,SKILL_PERM; skill "TF_BACKSLIDING",1,SKILL_PERM; skill "TF_PICKSTONE",1,SKILL_PERM; skill "TF_THROWSTONE",1,SKILL_PERM; break; default: break; } switch (BaseJob) { case Job_Knight: skill "KN_CHARGEATK",1,SKILL_PERM; break; case Job_Priest: skill "PR_REDEMPTIO",1,SKILL_PERM; break; case Job_Wizard: skill "WZ_SIGHTBLASTER",1,SKILL_PERM; break; case Job_Blacksmith: skill "BS_UNFAIRLYTRICK",1,SKILL_PERM; skill "BS_GREED",1,SKILL_PERM; break; case Job_Hunter: skill "HT_PHANTASMIC",1,SKILL_PERM; break; case Job_Assassin: skill "AS_SONICACCEL",1,SKILL_PERM; skill "AS_VENOMKNIFE",1,SKILL_PERM; break; case Job_Crusader: skill "CR_SHRINK",1,SKILL_PERM; break; case Job_Monk: skill "MO_KITRANSLATION",1,SKILL_PERM; skill "MO_BALKYOUNG",1,SKILL_PERM; break; case Job_Sage: skill "SA_CREATECON",1,SKILL_PERM; skill "SA_ELEMENTWATER",1,SKILL_PERM; skill "SA_ELEMENTGROUND",1,SKILL_PERM; skill "SA_ELEMENTFIRE",1,SKILL_PERM; skill "SA_ELEMENTWIND",1,SKILL_PERM; break; case Job_Rogue: skill "RG_CLOSECONFINE",1,SKILL_PERM; break; case Job_Alchemist: skill "AM_BIOETHICS",1,SKILL_PERM; break; case Job_Bard: skill "BA_PANGVOICE",1,SKILL_PERM; break; case Job_Dancer: skill "DC_WINKCHARM",1,SKILL_PERM; break; default: break; } return; OnInit: setarray .Rebirth[0],99,50; // Minimum base level, job level to rebirth OR change to third class setarray .JobReq[0],10,40; // Minimum job level to turn into 1st class, 2nd class .ThirdClass = 1; // Enable third classes? (1: yes / 0: no) .SecondExpanded = 1; // Enable new expanded second classes: Ex. Super Novice, Kagerou/Oboro, Rebellion? (1: yes / 0: no) .SNovice = 45; // Minimum base level to turn into Super Novice .LastJob = 1; // Enforce linear class changes? (1: yes / 0: no) .SkillPointCheck = 1; // Force player to use up all skill points? (1: yes / 0: no) .Platinum = 1; // Get platinum skills automatically? (1: yes / 0: no) end; } I guess my jobmaster script is the general one. As provided in github. Huhu