summaryrefslogtreecommitdiff
path: root/npc/events/nguild
diff options
context:
space:
mode:
authorshennetsind <shennetsind@54d463be-8e91-2dee-dedb-b68131a5f0ec>2012-07-08 19:30:07 +0000
committershennetsind <shennetsind@54d463be-8e91-2dee-dedb-b68131a5f0ec>2012-07-08 19:30:07 +0000
commit31825ccc2dde034a218d9ad466dd721c40b5651d (patch)
tree961b976e45988f7f7158d33b3f11a18688f34b1f /npc/events/nguild
parent22c75b070526de8b103032f5bf13504af81e0095 (diff)
downloadhercules-31825ccc2dde034a218d9ad466dd721c40b5651d.tar.gz
hercules-31825ccc2dde034a218d9ad466dd721c40b5651d.tar.bz2
hercules-31825ccc2dde034a218d9ad466dd721c40b5651d.tar.xz
hercules-31825ccc2dde034a218d9ad466dd721c40b5651d.zip
Okie ladies and gentleman if this commit breaks anything it's jman's and maki's fault, yes, blame them.
Fixing pre-re / re npc support, moving /config/ folder to src root so other servers may also make use of the #define renewal dir and other stuff. git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@16382 54d463be-8e91-2dee-dedb-b68131a5f0ec
Diffstat (limited to 'npc/events/nguild')
-rw-r--r--npc/events/nguild/nguild_dunsw.txt67
-rw-r--r--npc/events/nguild/nguild_ev_agit.txt216
-rw-r--r--npc/events/nguild/nguild_flags.txt192
-rw-r--r--npc/events/nguild/nguild_guardians.txt89
-rw-r--r--npc/events/nguild/nguild_kafras.txt71
-rw-r--r--npc/events/nguild/nguild_managers.txt174
-rw-r--r--npc/events/nguild/nguild_treas.txt167
-rw-r--r--npc/events/nguild/nguild_warper.txt111
8 files changed, 0 insertions, 1087 deletions
diff --git a/npc/events/nguild/nguild_dunsw.txt b/npc/events/nguild/nguild_dunsw.txt
deleted file mode 100644
index 8a34362f3..000000000
--- a/npc/events/nguild/nguild_dunsw.txt
+++ /dev/null
@@ -1,67 +0,0 @@
-//===== rAthena Script =======================================
-//= War of Emperium Dungeon Switch for NGuild Castles
-//===== By: ==================================================
-//= kobra_k88
-//===== Current Version: =====================================
-//= 1.1
-//===== Compatible With: =====================================
-//= rAthena 0.1+; RO Episode 4+
-//===== Description: =========================================
-//= Switch that warps guild members to the guild dungeon
-//===== Additional Comments: =================================
-//= Based off existing guild scripts. Do not know if it is accurate.[kobra_k88]
-//= 1.1 Guild Dungeon Switch Fucntion added. [L0ne_W0lf]
-//============================================================
-
-
-//==================================================
-function script F_GldDunSw {
- set .@GID, GetCastleData(getarg(0),1);
- if (.@GID == 0) {
- mes "[ Echoing Voice ]";
- mes " ' The one who can overcome an ordeal and show true bravery... will find the way... ' ";
- close;
- }
- else {
- mes "[ Echoing Voice ]";
- mes " ' Only the one who can show true bravery can take this test. '";
- next;
- mes " ";
- mes "There's a small lever. Will you pull it?";
- next;
-
- if (select("Pull.:Do not.") == 1) {
- if (getcharid(2) == .@GID) {
- warp "gld_dun"+getarg(1),getarg(2),getarg(3);
- end;
- }
- mes " ";
- mes " Nothing happened.";
- }
- return;
- }
-}
-
-// Castle 1 ===============================================
-nguild_alde,212,181,0 script Switch#DunN01 111,{
- callfunc "F_GldDunSw","nguild_alde","02",32,122;
- close;
-}
-
-// Castle 2 ===============================================
-nguild_gef,78,84,0 script Switch#DunN02 111,{
- callfunc "F_GldDunSw","nguild_gef","04",39,258;
- close;
-}
-
-// Castle 3 ===============================================
-nguild_pay,101,25,0 script Switch#DunN03 111,{
- callfunc "F_GldDunSw","nguild_pay","01",186,165;
- close;
-}
-
-// Castle 4 ===============================================
-nguild_prt,94,200,0 script Switch#DunN04 111,{
- callfunc "F_GldDunSw","nguild_prt","03",28,251;
- close;
-}
diff --git a/npc/events/nguild/nguild_ev_agit.txt b/npc/events/nguild/nguild_ev_agit.txt
deleted file mode 100644
index 1dad83b83..000000000
--- a/npc/events/nguild/nguild_ev_agit.txt
+++ /dev/null
@@ -1,216 +0,0 @@
-//===== rAthena Script =======================================
-//= War of Emperium - NGuild Wars Events
-//===== By: ==================================================
-//= kobra_k88
-//===== Current Version: =====================================
-//= 1.5
-//===== Compatible With: =====================================
-//= rAthena 0.1+; RO Episode 4+
-//===== Description: =========================================
-//= Event Triggers for NGuild Wars
-//===== Additional Comments: =================================
-// Based off existing guild scripts. Do not know if it is accurate.[kobra_k88]
-//= 1.3 Added code for abandoning captured castles on /breakguild [Lupus]
-//= 1.4 AGIT Functions added, treasure spawning added. [L0ne_W0lf]
-//= 1.5 Emperium should now properly respawn. [L0ne_W0lf]
-//============================================================
-
-
-// Function for OnAgitStart =========================================
-function script F_AgitStart {
- set .@map$, getarg(0);
- set .@castle$, getarg(1);
- set .@empx, getarg(2);
- set .@empy, getarg(3);
-
- MapRespawnGuildID .@map$,GetCastleData(.@map$,1),2;
- monster .@map$,.@empx,.@empy,"Emperium",1288,1,"Agit_"+.@castle$+"::OnAgitBreak";
- GvgOn .@map$;
- if (GetCastleData(.@map$,1) != 0) return;
- end;
-}
-
-// Function for OnGuildBreak ======================================
-function script F_GuildBreak {
- set .@map$, getarg(0);
- set .@castle$, getarg(1);
-
- killmonsterall .@map$;
-
- Announce "Guild Base [" + GetCastleName(.@map$) + "] has been abandoned.",0;
- disablenpc "Kafra Staff#"+.@castle$;
-
- SetCastleData .@map$,0,0;
- return;
-}
-
-// Function for OnAgitBreak ======================================
-function script F_AgitBreak {
- set .@map$, getarg(0);
- set .@castle$, getarg(1);
-
- set .@GID,getcharid(2);
- if (.@GID <= 0) return;
-
- set .@Economy,GetCastleData(.@map$,2) - 5;
- if (.@Economy < 0) set .@Economy, 0;
- SetCastleData .@map$, 2, .@Economy;
-
- set .@Defence,GetCastleData(.@map$,3) - 5;
- if (.@Defence < 0) set .@Defence, 0;
- SetCastleData .@map$, 3, .@Defence;
-
- SetCastleData .@map$,1, .@GID;
- MapAnnounce .@map$,"The emperium has been destroyed.",bc_map,0x00CCFF;
- Announce "The [" + GetCastleName(.@map$) + "] castle has been conquered by the [" + GetGuildName(.@GID) + "] guild.",bc_all;
- donpcevent "::OnRecvCastle"+.@castle$;
-
- disablenpc "Kafra Staff#"+.@castle$;
-
- // remove investment data and kafra
- for( set .@i, 4; .@i <= 9; set .@i, .@i+1 )
- SetCastleData .@map$, .@i, 0;
-
- // if the new guild doesn't have Guardian Research, erase guardians
- if( getgdskilllv(.@GID,10002) == 0 )
- for( set .@i, 10; .@i <= 17; set .@i, .@i+1 )
- SetCastleData .@map$, .@i, 0;
-
- return;
-}
-
-
-// Function for OnAgitEnd ======================================
-function script F_AgitEnd {
- set .@map$, getarg(0);
- set .@castle$, getarg(1);
-
- GvgOff .@map$;
- // Disable the following if statment to keep empty
- // castles from being aquired after after WoE ends.
- if (GetCastleData(.@map$,1) == 0) return;
- MapRespawnGuildID .@map$,GetCastleData(.@map$,1),4;
- KillMonster .@map$,"Agit_"+.@castle$+"::OnAgitBreak";
- end;
-}
-
-// Castle 1 ================================================================
-nguild_alde,0,0,0 script Agit_N01 -1,{
-OnInterIfInitOnce:
- donpcevent "::OnRecvCastleN01";
- end;
-OnRecvCastleN01:
- RequestGuildInfo GetCastleData("nguild_alde",1);
- end;
-OnAgitStart:
- callfunc "F_AgitStart","nguild_alde","N01",216,24;
- end;
-OnAgitBreak:
- callfunc "F_AgitBreak","nguild_alde","N01";
- goto OnAgitEliminate;
- end;
-OnGuildBreak:
- callfunc "F_GuildBreak","nguild_alde","N01";
- end;
-OnAgitEliminate:
- MapRespawnGuildID "nguild_alde",GetCastleData("nguild_alde",1),6;
- Monster "nguild_alde",216,24,"EMPERIUM",1288,1,"Agit_N01::OnAgitBreak";
- end;
-OnAgitEnd:
- callfunc "F_AgitEnd","nguild_alde","N01";
- end;
-}
-
-// Castle 2 ================================================================
-nguild_gef,0,0,0 script Agit_N02 -1,{
-OnInterIfInitOnce:
- donpcevent "::OnRecvCastleN02";
- end;
-OnRecvCastleN02:
- RequestGuildInfo GetCastleData("nguild_gef",1);
- end;
-OnAgitStart:
- callfunc "F_AgitStart","nguild_gef","N02",198,182;
- end;
-OnAgitBreak:
- callfunc "F_AgitBreak","nguild_gef","N02";
- goto OnAgitEliminate;
- end;
-OnGuildBreak:
- callfunc "F_GuildBreak","nguild_gef","N02";
- end;
-OnAgitEliminate:
- MapRespawnGuildID "nguild_gef",GetCastleData("nguild_gef",1),6;
- Monster "nguild_gef",198,182,"EMPERIUM",1288,1,"Agit_N02::OnAgitBreak";
- end;
-OnAgitEnd:
- callfunc "F_AgitEnd","nguild_gef","N02";
- end;
-}
-
-// Castle 3 ================================================================
-nguild_pay,0,0,0 script Agit_N03 -1,{
-OnInterIfInitOnce:
- donpcevent "::OnRecvCastleN03";
- end;
-OnRecvCastleN03:
- RequestGuildInfo GetCastleData("nguild_pay",1);
- end;
-OnAgitStart:
- callfunc "F_AgitStart","nguild_pay","N03",139,139;
- end;
-OnAgitBreak:
- callfunc "F_AgitBreak","nguild_pay","N03";
- goto OnAgitEliminate;
- end;
-OnGuildBreak:
- callfunc "F_GuildBreak","nguild_pay","N03";
- end;
-OnAgitEliminate:
- MapRespawnGuildID "nguild_pay",GetCastleData("nguild_pay",1),6;
- Monster "nguild_pay",139,139,"EMPERIUM",1288,1,"Agit_N03::OnAgitBreak";
- end;
-OnAgitEnd:
- callfunc "F_AgitEnd","nguild_pay","N03";
- end;
-}
-
-// Castle 4 ================================================================
-nguild_prt,0,0,0 script Agit_N04 -1,{
-OnInterIfInitOnce:
- donpcevent "::OnRecvCastleN04";
- end;
-OnRecvCastleN04:
- RequestGuildInfo GetCastleData("nguild_prt",1);
- end;
-OnAgitStart:
- callfunc "F_AgitStart","nguild_prt","N04",197,197;
- end;
-OnAgitBreak:
- callfunc "F_AgitBreak","nguild_prt","N04";
- goto OnAgitEliminate;
- end;
-OnGuildBreak:
- callfunc "F_GuildBreak","nguild_prt","N04";
- end;
-OnAgitEliminate:
- MapRespawnGuildID "nguild_prt",GetCastleData("nguild_prt",1),6;
- Monster "nguild_prt",197,197,"EMPERIUM",1288,1,"Agit_N04::OnAgitBreak";
- end;
-OnAgitEnd:
- callfunc "F_AgitEnd","nguild_prt","N04";
- end;
-}
-
-// Treasure Spawn Time
-//========================================
-- script TreasSpawn -1,{
- end;
-
-OnClock0005:
- callfunc "F_GldTreas","nguild_alde","N01",$boxNumN01,$@bxN01,$@boxIdN01,1324,114,218,123,227,0;
- callfunc "F_GldTreas","nguild_gef","N02",$boxNumN02,$@bxN02,$@boxIdN02,1334,150,108,158,114,0;
- callfunc "F_GldTreas","nguild_pay","N03",$boxNumN03,$@bxN03,$@boxIdN03,1344,286,4,295,13,0;
- callfunc "F_GldTreas","nguild_prt","N04",$boxNumN04,$@bxN04,$@boxIdN04,1354,6,204,15,213,0;
- end;
-}
diff --git a/npc/events/nguild/nguild_flags.txt b/npc/events/nguild/nguild_flags.txt
deleted file mode 100644
index 1642c4419..000000000
--- a/npc/events/nguild/nguild_flags.txt
+++ /dev/null
@@ -1,192 +0,0 @@
-//===== rAthena Script =======================================
-//= War of Emperium N Guild Flags
-//===== By: ==================================================
-//= kobra_k88
-//===== Current Version: =====================================
-//= 1.3
-//===== Compatible With: =====================================
-//= rAthena 0.1+; RO Episode 4+
-//===== Description: =========================================
-//= WoE flag scripts. Display guild emblems on flags.
-//===== Additional Comments: =================================
-// Based off existing guild scripts. Do not know if it is accurate.[kobra_k88]
-// 1.1 Inner Flags don't teleport you to your HQ anymore [Lupus]
-// 1.2 updated flags to use the new arguments. [L0ne__W0lf]
-// 1.3 Guild flag function added. [L0ne_W0lf]
-//============================================================
-
-/// Flag Function
-//============================================================
-function script F_Flags {
- set .@GID, GetCastleData(getarg(1),1);
- if (getarg(5) == 0) return;
- if (.@GID == 0) {
- mes " [ Edict of the Divine Rune Midgard Kingdom ]";
- mes " ";
- mes "1. Follow the ordinance of The Divine Rune Midgard Kingdom, ";
- mes "We declare that";
- mes "there is no formal master of this castle.";
- mes " ";
- mes "2. To the one who can ";
- mes "overcome all trials";
- mes "and destroy the Emperium,";
- mes "the king will endow the one with";
- mes "ownership of this castle.";
- return;
- }
- else {
- if (getcharid(2) == .@GID && getarg(4) == 1) {
- mes "Brave ones...";
- mes "Do you wish to return to your honorable place?";
- next;
- if (select("Return to the guild castle.:Quit.") == 1) {
- if (getcharid(2) == GetCastleData(getarg(1),1))
- warp getarg(1),getarg(2),getarg(3);
- }
- return;
- }
- mes "[ Edict of the Divine Rune Midgard Kingdom ]";
- mes " ";
- mes "1. Following the ordinance of the";
- mes "Divine Rune Midgard Kingdom,";
- mes "we approve that this place is in";
- mes "the private possession of ^ff0000" + GetGuildName(.@GID) + "^000000 Guild.";
- mes " ";
- mes "2. The guild Master of ^ff0000"+ GetGuildName(.@GID) + "^000000 Guild is";
- mes "^FF0000" + GetGuildMaster(.@GID) + "^000000";
- mes "If there is anyone who objects to this,";
- mes " prove your strength and honor with a steel blade in your hand.";
- return;
- }
-}
-
-//============================================================================//
-// Castle 1
-//============================================================================//
-n_castle,110,96,1 script NGuild Aldebaran#a1-1 722,{
- callfunc "F_Flags","Al De Baran","nguild_alde",218,170,1,1;
- close;
-
-OnRecvCastleN01:
- FlagEmblem GetCastleData("nguild_alde",1);
- end;
-}
-
-nguild_alde,30,248,4 script NGuild Aldebaran#a1-6::NGuildAlde 722,{
- callfunc "F_Flags","Al De Baran","nguild_alde",218,170,0,1;
- close;
-
-OnRecvCastleN01:
- FlagEmblem GetCastleData("nguild_alde",1);
- end;
-}
-// In Castle ============================================
-nguild_alde,30,246,4 duplicate(NGuildAlde) NGuild Aldebaran#a1-7 722
-nguild_alde,37,248,4 duplicate(NGuildAlde) NGuild Aldebaran#a1-8 722
-nguild_alde,37,246,4 duplicate(NGuildAlde) NGuild Aldebaran#a1-9 722
-nguild_alde,95,80,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-10 722
-nguild_alde,95,59,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-11 722
-nguild_alde,62,75,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-12 722
-nguild_alde,70,75,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-13 722
-nguild_alde,74,75,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-14 722
-nguild_alde,62,64,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-15 722
-nguild_alde,66,64,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-16 722
-nguild_alde,70,64,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-17 722
-nguild_alde,74,64,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-18 722
-nguild_alde,203,150,4 duplicate(NGuildAlde) NGuild Aldebaran#a1-19 722
-nguild_alde,210,150,4 duplicate(NGuildAlde) NGuild Aldebaran#a1-20 722
-
-
-
-
-//============================================================================//
-// Castle 2
-//============================================================================//
-n_castle,110,109,3 script NGuild Geffen#g1-1 722,{
- callfunc "F_Flags","Geffen","nguild_gef",83,47,1,1;
- close;
-
-OnRecvCastleN02:
- FlagEmblem GetCastleData("nguild_gef",1);
- end;
-}
-
-nguild_gef,28,157,4 script NGuild Geffen#g1-6::NGuildGef 722,{
- callfunc "F_Flags","Geffen","nguild_gef",83,47,0,1;
- close;
-
-OnRecvCastleN02:
- FlagEmblem GetCastleData("nguild_gef",1);
- end;
-}
-// In Castle =============================================
-nguild_gef,32,157,4 duplicate(NGuildGef) NGuild Geffen#g1-7 722
-nguild_gef,22,156,5 duplicate(NGuildGef) NGuild Geffen#g1-8 722
-nguild_gef,68,185,3 duplicate(NGuildGef) NGuild Geffen#g1-9 722
-nguild_gef,17,171,5 duplicate(NGuildGef) NGuild Geffen#g1-10 722
-nguild_gef,59,16,4 duplicate(NGuildGef) NGuild Geffen#g1-11 722
-nguild_gef,64,16,4 duplicate(NGuildGef) NGuild Geffen#g1-12 722
-
-
-
-//============================================================================//
-// Castle 3
-//============================================================================//
-n_castle,94,109,5 script NGuild Payon#f1-1 722,{
- callfunc "F_Flags","Payon","nguild_pay",87,29,1,1;
- close;
-
-OnRecvCastleN03:
- FlagEmblem GetCastleData("nguild_pay",1);
- end;
-}
-
-nguild_pay,238,67,4 script NGuild Payon#f1-6::NGuildPay 722,{
- callfunc "F_Flags","Payon","nguild_pay",87,29,0,1;
- close;
-
-OnRecvCastleN03:
- FlagEmblem GetCastleData("nguild_pay",1);
- end;
-}
-// In Castle ===============================================
-nguild_pay,238,67,4 duplicate(NGuildPay) NGuild Payon#f1-6 722
-nguild_pay,233,67,4 duplicate(NGuildPay) NGuild Payon#f1-7 722
-nguild_pay,221,123,4 duplicate(NGuildPay) NGuild Payon#f1-8 722
-nguild_pay,221,116,4 duplicate(NGuildPay) NGuild Payon#f1-9 722
-nguild_pay,206,108,4 duplicate(NGuildPay) NGuild Payon#f1-10 722
-nguild_pay,212,108,4 duplicate(NGuildPay) NGuild Payon#f1-11 722
-
-
-
-
-//=============================================================================//
-// Castle 4
-//=============================================================================//
-n_castle,94,96,7 script NGuild Prontera#p1-1 722,{
- callfunc "F_Flags","Prontera","nguild_prt",97,174,1,1;
- close;
-
-OnRecvCastleN04:
- FlagEmblem GetCastleData("nguild_prt",1);
- end;
-}
-
-nguild_prt,58,56,4 script NGuild Prontera#p1-7::NGuildPrt 722,{
- callfunc "F_Flags","Prontera","nguild_prt",97,174,0,1;
- close;
-
-OnRecvCastleN04:
- FlagEmblem GetCastleData("nguild_prt",1);
- end;
-}
-// In Castle =============================================
-nguild_prt,64,56,4 duplicate(NGuildPrt) NGuild Prontera#p1-8 722
-nguild_prt,76,32,4 duplicate(NGuildPrt) NGuild Prontera#p1-9 722
-nguild_prt,84,32,4 duplicate(NGuildPrt) NGuild Prontera#p1-10 722
-nguild_prt,94,39,4 duplicate(NGuildPrt) NGuild Prontera#p1-11 722
-nguild_prt,94,24,4 duplicate(NGuildPrt) NGuild Prontera#p1-12 722
-nguild_prt,73,14,4 duplicate(NGuildPrt) NGuild Prontera#p1-13 722
-nguild_prt,73,6,4 duplicate(NGuildPrt) NGuild Prontera#p1-14 722
-nguild_prt,55,46,4 duplicate(NGuildPrt) NGuild Prontera#p1-15 722
-nguild_prt,45,46,4 duplicate(NGuildPrt) NGuild Prontera#p1-16 722
diff --git a/npc/events/nguild/nguild_guardians.txt b/npc/events/nguild/nguild_guardians.txt
deleted file mode 100644
index 299c3a380..000000000
--- a/npc/events/nguild/nguild_guardians.txt
+++ /dev/null
@@ -1,89 +0,0 @@
-//===== rAthena Script =======================================
-//= War of Emperium - nguild guardians script
-//===== By: ==================================================
-//= kobra_k88
-//===== Current Version: =====================================
-//= 1.0
-//===== Compatible With: =====================================
-//= rAthena 0.1+; RO Episode 4+
-//===== Description: =========================================
-//= Re-spawns guardians on server start if they have been
-//= purchased. Also announces when a guardian dies.
-//===== Additional Comments: =================================
-//= Based off existing guild scripts. Do not know if it is accurate.[kobra_k88]
-//============================================================
-
-
-//------------------------------------------------------------------------------
-nguild_alde,216,24,0 script Guardian_N01 -1,{
-OnAgitInit:
- if (GetCastleData("nguild_alde",10) == 1) guardian "nguild_alde",18,219,"Soldier Guardian",1287,"Guardian_N01::OnGuardianDied",0;
- if (GetCastleData("nguild_alde",11) == 1) guardian "nguild_alde",117,42,"Soldier Guardian",1287,"Guardian_N01::OnGuardianDied",1;
- if (GetCastleData("nguild_alde",12) == 1) guardian "nguild_alde",207,153,"Soldier Guardian",1287,"Guardian_N01::OnGuardianDied",2;
- if (GetCastleData("nguild_alde",13) == 1) guardian "nguild_alde",68,70,"Archer Guardian",1285,"Guardian_N01::OnGuardianDied",3;
- if (GetCastleData("nguild_alde",14) == 1) guardian "nguild_alde",187,140,"Archer Guardian",1285,"Guardian_N01::OnGuardianDied",4;
- if (GetCastleData("nguild_alde",15) == 1) guardian "nguild_alde",62,204,"Knight Guardian",1286,"Guardian_N01::OnGuardianDied",5;
- if (GetCastleData("nguild_alde",16) == 1) guardian "nguild_alde",113,100,"Knight Guardian",1286,"Guardian_N01::OnGuardianDied",6;
- if (GetCastleData("nguild_alde",17) == 1) guardian "nguild_alde",211,174,"Knight Guardian",1286,"Guardian_N01::OnGuardianDied",7;
- end;
-
-OnGuardianDied:
- // Event when Guardian dies
- MapAnnounce "nguild_alde","A Guardian Has Fallen",17;
- end;
-}
-
-//------------------------------------------------------------------------------
-nguild_gef,198,182,0 script Guardian_N02 -1,{
-OnAgitInit:
- if (GetCastleData("nguild_gef",10) == 1) guardian "nguild_gef",30,178,"Soldier Guardian",1287,"Guardian_N02::OnGuardianDied",0;
- if (GetCastleData("nguild_gef",11) == 1) guardian "nguild_gef",64,180,"Soldier Guardian",1287,"Guardian_N02::OnGuardianDied",1;
- if (GetCastleData("nguild_gef",12) == 1) guardian "nguild_gef",61,25,"Soldier Guardian",1287,"Guardian_N02::OnGuardianDied",2;
- if (GetCastleData("nguild_gef",13) == 1) guardian "nguild_gef",61,44,"Archer Guardian",1285,"Guardian_N02::OnGuardianDied",3;
- if (GetCastleData("nguild_gef",14) == 1) guardian "nguild_gef",189,43,"Archer Guardian",1285,"Guardian_N02::OnGuardianDied",4;
- if (GetCastleData("nguild_gef",15) == 1) guardian "nguild_gef",51,192,"Knight Guardian",1286,"Guardian_N02::OnGuardianDied",5;
- if (GetCastleData("nguild_gef",16) == 1) guardian "nguild_gef",49,67,"Knight Guardian",1286,"Guardian_N02::OnGuardianDied",6;
- if (GetCastleData("nguild_gef",17) == 1) guardian "nguild_gef",181,14,"Knight Guardian",1286,"Guardian_N02::OnGuardianDied",7;
- end;
-
-OnGuardianDied:
- // Event when Guardian dies
- MapAnnounce "nguild_gef","A Guardian Has Fallen",17;
- end;
-}
-//------------------------------------------------------------------------------
-nguild_pay,139,139,0 script Guardian_N03 -1,{
-OnAgitInit:
- if (GetCastleData("nguild_pay",10) == 1) guardian "nguild_pay",210,120,"Soldier Guardian",1287,"Guardian_N03::OnGuardianDied",0;
- if (GetCastleData("nguild_pay",11) == 1) guardian "nguild_pay",69,26,"Soldier Guardian",1287,"Guardian_N03::OnGuardianDied",1;
- if (GetCastleData("nguild_pay",12) == 1) guardian "nguild_pay",23,141,"Soldier Guardian",1287,"Guardian_N03::OnGuardianDied",2;
- if (GetCastleData("nguild_pay",13) == 1) guardian "nguild_pay",224,87,"Archer Guardian",1285,"Guardian_N03::OnGuardianDied",3;
- if (GetCastleData("nguild_pay",14) == 1) guardian "nguild_pay",81,45,"Archer Guardian",1285,"Guardian_N03::OnGuardianDied",4;
- if (GetCastleData("nguild_pay",15) == 1) guardian "nguild_pay",214,53,"Knight Guardian",1286,"Guardian_N03::OnGuardianDied",5;
- if (GetCastleData("nguild_pay",16) == 1) guardian "nguild_pay",69,26,"Knight Guardian",1286,"Guardian_N03::OnGuardianDied",6;
- if (GetCastleData("nguild_pay",17) == 1) guardian "nguild_pay",23,141,"Knight Guardian",1286,"Guardian_N03::OnGuardianDied",7;
- end;
-
-OnGuardianDied:
- // Event when Guardian dies
- MapAnnounce "nguild_pay","A Guardian Has Fallen",17;
- end;
-}
-//------------------------------------------------------------------------------
-nguild_prt,197,197,0 script Guardian_N04 -1,{
-OnAgitInit:
- if (GetCastleData("nguild_prt",10) == 1) guardian "nguild_prt",196,92,"Soldier Guardian",1287,"Guardian_N04::OnGuardianDied",0;
- if (GetCastleData("nguild_prt",11) == 1) guardian "nguild_prt",113,200,"Soldier Guardian",1287,"Guardian_N04::OnGuardianDied",1;
- if (GetCastleData("nguild_prt",12) == 1) guardian "nguild_prt",111,186,"Soldier Guardian",1287,"Guardian_N04::OnGuardianDied",2;
- if (GetCastleData("nguild_prt",13) == 1) guardian "nguild_prt",76,202,"Archer Guardian",1285,"Guardian_N04::OnGuardianDied",3;
- if (GetCastleData("nguild_prt",14) == 1) guardian "nguild_prt",90,26,"Archer Guardian",1285,"Guardian_N04::OnGuardianDied",4;
- if (GetCastleData("nguild_prt",15) == 1) guardian "nguild_prt",58,59,"Knight Guardian",1286,"Guardian_N04::OnGuardianDied",5;
- if (GetCastleData("nguild_prt",16) == 1) guardian "nguild_prt",112,200,"Knight Guardian",1286,"Guardian_N04::OnGuardianDied",6;
- if (GetCastleData("nguild_prt",17) == 1) guardian "nguild_prt",101,194,"Knight Guardian",1286,"Guardian_N04::OnGuardianDied",7;
- end;
-
-OnGuardianDied:
- // Event when Guardian dies
- MapAnnounce "nguild_prt","A Guardian Has Fallen",17;
- end;
-}
diff --git a/npc/events/nguild/nguild_kafras.txt b/npc/events/nguild/nguild_kafras.txt
deleted file mode 100644
index a4bd7ff01..000000000
--- a/npc/events/nguild/nguild_kafras.txt
+++ /dev/null
@@ -1,71 +0,0 @@
-//===== rAthena Script =======================================
-//= War of Emperium Kafras for N Guild Castles
-//===== By: ==================================================
-//= kobra_k88
-//===== Current Version: =====================================
-//= 1.2
-//===== Compatible With: =====================================
-//= rAthena 0.1+; RO Episode 5+
-//===== Description: =========================================
-//= Provides Kafra services for guild members of NGuild Castles.
-//= Used in conjuction with function F_Kafra.
-//===== Additional Comments: =================================
-//= Based off existing guild scripts. Do not know if it is accurate.[kobra_k88]
-//= 1.1 All N Guild Kafras teleport to Prontera only! [Lupus]
-//= 1.2 Added Kafra function. [L0ne_W0lf]
-//============================================================
-
-
-function script F_GKafra {
- cutin "kafra_01",2;
- set @GID, GetCastleData(getarg(0),1);
- if (getcharid(2) == @GID && getgdskilllv(@GID,10001)) goto L_StartG;
-
- mes "[Kafra Service]";
- mes "I am contracted to provide service only for the ^ff0000" + GetGuildName(@GID) + "^000000 Guild. Please use another Kafra Corporation staff member around here. I am Sorry for your inconvenience.";
- cutin "",255;
- close;
-L_StartG:
- set @wrpP[0], 200;
- set @wrpD$[0], getarg(1);
- setarray @wrpC$[0], @wrpD$[0]+" ^880000"+@wrpP[0]+"^000000 z", "Cancel", "", "", "","";
- callfunc "F_Kafra",2,0,0,0,800;
- end;
-}
-
-// Castle 1 ===============================================
-nguild_alde,218,170,0 script Kafra Service#N01 117,{
- callfunc "F_GKafra", "nguild_alde", "Prontera";
- end;
-OnRecvCastleN01:
- if (GetCastleData("nguild_alde",9) < 1) disablenpc "Kafra Service#N01";
- end;
-}
-
-// Castle 2 ===============================================
-//nguild_gef,96,173,0 script Kafra Service#N02 117,{
-nguild_gef,35,37,0 script Kafra Service#N02 117,{
- callfunc "F_GKafra", "nguild_gef", "Prontera";
- end;
-OnRecvCastleN02:
- if (GetCastleData("nguild_gef",9) < 1) disablenpc "Kafra Service#N02";
- end;
-}
-
-// Castle 3 ===============================================
-nguild_pay,128,58,3 script Kafra Service#N03 117,{
- callfunc "F_GKafra", "nguild_pay", "Prontera";
- end;
-OnRecvCastleN03:
- if (GetCastleData("nguild_pay",9) < 1) disablenpc "Kafra Service#N03";
- end;
-}
-
-// Castle 4 ===============================================
-nguild_prt,96,173,0 script Kafra Service#N04 117,{
- callfunc "F_GKafra", "nguild_prt", "Prontera";
- end;
-OnRecvCastleN04:
- if (GetCastleData("nguild_prt",9) < 1) disablenpc "Kafra Service#N04";
- end;
-}
diff --git a/npc/events/nguild/nguild_managers.txt b/npc/events/nguild/nguild_managers.txt
deleted file mode 100644
index 7d5bf52ff..000000000
--- a/npc/events/nguild/nguild_managers.txt
+++ /dev/null
@@ -1,174 +0,0 @@
-//===== rAthena Script =======================================
-//= War of Emperium Managers for N Guild Castles
-//===== By: ==================================================
-//= kobra_k88
-//===== Current Version: =====================================
-//= 1.2
-//===== Compatible With: =====================================
-//= rAthena 0.1+; RO Episode 4+
-//===== Description: =========================================
-//=
-//==============================================
-//= Break down of arguments used in the function:
-//= arg(0): name of Castle Manager
-//= arg(1): name of guild castle.
-//= arg(2): x1 coordinate for warp to treasure room
-//= arg(3): y1 coordinate for warp to treasure room
-//= arg(4): guild script suffix for kafra, etc.
-//===== Additional Comments: =================================
-//= 1.0 Based off existing guild scripts. Do not know if it is accurate.[kobra_k88]
-//= 1.1 Added modified guild manager function. [L0ne_W0lf]
-//= Removed guardian summoning.
-//= 1.2 Corrected function name. (bugreport:1728) [L0ne_W0lf]
-//============================================================
-
-//==============================================
-function script F_GldManager {
-
- set @GID, GetCastleData(getarg(1),1);
- mes "[ "+getarg(0)+" ]";
- if (@GID == 0){
- mes "I am waiting for my master. Brave adventurer, follow your destiny!";
- return;
- }
- if (getcharid(2) != @GID){
- mes "I am here to follow ^5533FF" + getguildmaster(@GID) + "^000000's command! Hey! Your not even a part of the guild!!";
- mes "Where are the guardians? Destroy these intruders!";
- return;
- }
- if (strcharinfo(0) != getguildmaster(@GID)){
- mes "You're not ^5533FF" + getguildmaster(@GID) + "^000000! I am here to follow ^5533FF" + getguildmaster(@GID) + "^000000's command only";
- return 0;
- }
-
- mes "Welcome Master ^5533FF" + getguildmaster(@GID) + "^000000 ! I will assist you in any way I can!";
- next;
-
- menu "Kafra Staff Employment / Dismissal",M_Kaf, "Enter Treasure Room",M_Treas, "Cancel",M_End;
-
- //===========================
- M_Kaf:
- //======
- mes "[ "+getarg(0)+" ]";
- if (GetCastleData(getarg(1),9) == 1) goto L_Dismiss;
- if (getgdskilllv(@GID,10001) == 0){
- mes "Master, you don't have a contract with the Kafra Staff Company.";
- mes "In order to hire a Kafra, you must first learn the Guild skill ^5533FFContract With Kafra^000000.";
- return;
- }
-
- L_Hire:
- mes "Would you like to employ the services of a Kafra? You will need ^5533FF10,000 Zeny^000000 to do so... ";
- next;
- menu "Employ Kafra.",-,"Cancel",sM_KafEnd;
-
- mes "[ "+getarg(0)+" ]";
- if (Zeny < 10000){
- mes "Master, you do not have enough money to employ a Kafra. Employment has been cancelled.";
- return;
- }
- set Zeny,Zeny-10000;
- enablenpc "Kafra Staff#"+getarg(4);
- SetCastleData getarg(1),9,1;
- mes "You have created a contract with the Kafra Staff Company.";
- next;
- cutin "kafra_01",2;
- mes "[ Kafra Staff ]";
- mes "How do you do? I'm here to provide you with helpful service! I'll do the best I can to serve you.";
- next;
- cutin "kafra_01",255;
- mes "[ "+getarg(0)+" ]";
- //mes "Your employment contract lasts ^5533FF1 month^000000. After this term is over you will have to create a new contract.";
- mes "I think the Kafra Staff will benefit our guild members.";
- return;
-
- sM_KafEnd:
- mes "[ "+getarg(0)+" ]";
- mes "As you wish Master. But I suggest we get a Kafra as soon as possible!";
- return;
-
- L_Dismiss:
- mes "Would you like to dismiss the current Kafra?";
- next;
- menu "Dismissal",-,"Cancel",sM_KafEnd2;
-
- cutin "kafra_01",2;
- mes "[ Kafra Staff ]";
- mes "Have I done anything wrong? If I did, will you please forgive me?";
- next;
- menu "Dismiss",-,"Cancel",ssM_KafEnd2;
-
- mes "[ Kafra Staff ]";
- mes "It's unfortunate that I won't be able to serve your guild anymore....";
- next;
- disablenpc "Kafra Staff#"+getarg(4);
- SetCastleData getarg(1),9,0;
- cutin "kafra_01",255;
- mes "[ "+getarg(0)+" ]";
- mes "The Kafra has been dismissed. But... we should really get a Kafra as soon as possible!";
- return;
- ssM_KafEnd2:
- mes "[ Kafra Staff ]";
- mes "Thank you master, I'll do my best! ^^.";
- cutin "kafra_01",255;
- return;
- sM_KafEnd2:
- mes "[ "+getarg(0)+" ]";
- mes "Master, I think you should keep the current Kafra Staff because she is already trying her best to serve us";
- return;
-
- //=========================
- M_Treas:
- //========
- mes "[ "+getarg(0)+" ]";
- mes "Would you to go to our Treasure Room? Only you, the Guild Master, are allowed to enter this room.";
- next;
- menu "Enter Treasure room.",-,"Cancel",sM_TresEnd;
-
- mes "[ "+getarg(0)+" ]";
- mes "Please follow me through the secret passage way.";
- mes "You must pull down on the secret switch in order to get out.";
- next;
- warp getarg(1),getarg(2),getarg(3);
- return;
- sM_TresEnd:
- mes "[ "+getarg(0)+" ]";
- mes "The goods are produced everyday.";
- mes "You should get them whenever you can because they might dissapear if you take them at the wrong time.";
- return;
-
-
- //==========================
- M_End:
- //=======
- mes "[ "+getarg(0)+" ]";
- mes "As you wish, master.";
- return;
-}
-
-// Castle 1 ==================================================================================
-nguild_alde,218,175,0 script Frolo 55,{
- callfunc "F_GldManager","Frolo","nguild_alde",119,223,"N01";
- close;
-}
-
-
-// Castle 2 ==================================================================================
-nguild_gef,40,48,5 script Leiber 55,{
- callfunc "F_GldManager","Leiber","nguild_gef",155,112,"N02";
- close;
-}
-
-
-// Castle 3 ==================================================================================
-nguild_pay,120,58,4 script Dundar 55,{
- callfunc "F_GldManager","Dundar","nguild_pay",290,7,"N03";
- close;
-}
-
-
-// Castle 4 ==================================================================================
-nguild_prt,112,181,0 script Thefton 55,{
- callfunc "F_GldManager","Thefton","nguild_prt",15,209,"N04";
- close;
-}
diff --git a/npc/events/nguild/nguild_treas.txt b/npc/events/nguild/nguild_treas.txt
deleted file mode 100644
index 1fc8cbaf9..000000000
--- a/npc/events/nguild/nguild_treas.txt
+++ /dev/null
@@ -1,167 +0,0 @@
-//===== rAthena Script =======================================
-//= War of Emperium Treasure Rooms for NGuild Guild Castles
-//===== By: ==================================================
-//= kobra_k88
-//===== Current Version: =====================================
-//= 1.3b
-//===== Compatible With: =====================================
-//= rAthena 0.1+; RO Episode 4+
-//===== Description: =========================================
-//=
-//===== Additional Comments: =================================
-//= Based off existing guild scripts. Do not know if it is accurate.[kobra_k88]
-//= 1.2 Official treasure spawn [Lupus]
-//= 1.3 Added F_GldTreas function. (bugreport:1788) [L0ne_W0lf]
-//= 1.3b Added F_GldTreasSw function. (bugreport:3292) [brianluau]
-//============================================================
-
-
-//================================================
-// Treasure Spawning Function
-//================================================
-function script F_GldTreas {
- if(getarg(10) != 1) {
- setcastledata getarg(0),4,0;
- setcastledata getarg(0),5,0;
-
- // Why on earth are we killing old treasure chest spawns?
- //killmonster getarg(0),"Treasure_"+getarg(1)+"::OnDied";
-
- // Don't spawn treasures if Castle is empty, or Eco is greater than 100
- if(GetCastleData(getarg(0),2) > 100 || GetCastleData(getarg(0),1) == 0) return;
-
- // Only spawn one treasure chest for novice castles.
- if (compare(getarg(0),"nguild"))
- set getarg(2),1;
- else
- set getarg(2),GetCastleData(getarg(0),2)/5+4;
-
- if (getarg(2) <= 0) return;
-
- //sets the counter variable = to the box number amount
- set getarg(3), getarg(2);
- }
- for (set .@i,1; .@i <= getarg(3) ; set .@i,.@i+1) {
- // set treasure box ID
- set getarg(4), getarg(5) + (.@i+1) % 2;
- areamonster getarg(0),getarg(6),getarg(7),getarg(8),getarg(9),"Treasure Chest",getarg(4),1,"Treasure_"+getarg(1)+"::OnDied";
- }
- return;
-}
-
-//==============================================================
-// Treasure Room Switch
-//===============================================================
-function script F_GldTreasSw {
- mes " ";
- mes "There's a small lever. Will you pull it?";
- next;
-
- if (select("Pull.:Do not.") == 1) {
- warp getarg(0),getarg(1),getarg(2);
- return;
- }
- close;
-}
-
-//<=============================== Castle 1 =================================>\\
-
-// Treasure Spawn -----------------------
-nguild_alde,1,1,1 script Treasure_N01 -1,{
-
-OnRecvCastleN01:
- end;
-OnInit:
- if($boxNumN01 == 0) end;
- set $@bxN01, $boxNumN01;
- callfunc "F_GldTreas","nguild_alde","N01",$boxNumN01,$@bxN01,$@boxIdN01,1324+rand(10),114,218,123,227,1;
- end;
-
-OnDied:
- mapannounce "nguild_alde","Treasure Chest Broken Open",17;
- set $boxNumN01, $boxNumN01 -1;
- if($boxNumN01 == 0) mapannounce "nguild_alde", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
- end;
-}
-
-// Treasure Room Switch --------------------
-nguild_alde,123,223,0 script Switch#TresN01 111,{
- callfunc "F_GldTreasSw", "nguild_alde",218,176;
- end;
-}
-
-//<================================ Castle 2 ================================>\\
-
-// Treasure Spawn ----------------------------
-nguild_gef,1,1,1 script Treasure_N02 -1,{
-
-OnRecvCastleN02:
- end;
-OnInit:
- if($boxNumN02 == 0) end;
- set $@bxN02, $boxNumN02;
- callfunc "F_GldTreas","nguild_gef","N02",$boxNumN02,$@bxN02,$@boxIdN02,1334+rand(10),150,108,158,114,1;
- end;
-
-OnDied:
- mapannounce "nguild_gef","Treasure Chest Broken Open",17;
- set $boxNumN02, $boxNumN02 -1;
- if($boxNumN02 == 0) mapannounce "nguild_gef", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
- end;
-}
-
-// Room Switch ---------------------------------------------------------
-nguild_gef,152,117,0 script Switch#TresN02 111,{
- callfunc "F_GldTreasSw","nguild_gef",40,49;
- end;
-}
-
-//<================================ Castle 3 ================================>\\
-
-// Treasure Spawn ---------------------------
-nguild_pay,1,1,0 script Treasure_N03 -1,{
-OnRecvCastleN03:
- end;
-OnInit:
- if($boxNumN03 == 0) end;
- set $@bxN03, $boxNumN03;
- callfunc "F_GldTreas","nguild_pay","N03",$boxNumN03,$@bxN03,$@boxIdN03,1344+rand(10),286,4,295,13,1;
- end;
-
-OnDied:
- mapannounce "nguild_pay","Treasure Chest Broken Open",17;
- set $boxNumN03, $boxNumN03 -1;
- if($boxNumN03 == 0) mapannounce "nguild_pay", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
- end;
-}
-
-// Treasure Room Switch ---------------------------------------------------
-nguild_pay,295,8,0 script Switch#TresN03 111,{
- callfunc "F_GldTreasSw", "nguild_pay",120,59;
- end;
-}
-
-//<================================ Castle 4 ================================>\\
-
-// Treasure Spawn -------------------------------
-nguild_prt,1,1,0 script Treasure_N04 -1,{
-OnRecvCastleN04:
- end;
-OnInit:
- if($boxNumN04 == 0) end;
- set $@bxN04, $boxNumN04;
- callfunc "F_GldTreas","nguild_prt","N04",$boxNumN04,$@bxN04,$@boxIdN04,1354+rand(10),6,204,15,213,1;
- end;
-
-OnDied:
- mapannounce "nguild_prt","Treasure Chest Broken Open",17;
- set $boxNumN04, $boxNumN04 -1;
- if($boxNumN04 == 0) mapannounce "nguild_prt", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
- end;
-}
-
-// Treasure Room Switch ----------------------------------------------------
-nguild_prt,15,209,0 script Switch#TresN04 111,{
- callfunc "F_GldTreasSw", "nguild_prt",109,179;
- end;
-}
diff --git a/npc/events/nguild/nguild_warper.txt b/npc/events/nguild/nguild_warper.txt
deleted file mode 100644
index 41d51ca59..000000000
--- a/npc/events/nguild/nguild_warper.txt
+++ /dev/null
@@ -1,111 +0,0 @@
-//===== rAthena Script =======================================
-//= Novice's Guild Castles War of Emperium Usher NPC
-//===== By: ==================================================
-//= Lupus
-//===== Current Version: =====================================
-//= 1.7
-//===== Compatible With: =====================================
-//= rAthena 1+ with eaclass(); RO Episode 4+
-//===== Description: =========================================
-//=
-//===== Additional Comments: =================================
-//= Now you have access to 4 N Guild castles. They don't have
-//= dungeons. And 2nd Classes can't seize these Castles.
-//= These new castles need a new strategy. It would bring some
-//= fun and live to your game.
-//= NOTE: If your Guild Master is 2nd class, then he could
-//= rule the Castles and gather Treasure Boxes after WoE
-//= 1.1 Now 2nd classes can't enter NC place at all
-//= 1.2 Restricted access of SG/SL. On warp clear some
-//= unallowed buffs [Lupus]
-//= 1.3 Restricted TK,High classes >=90 BaseLevel,
-//= updated list of unallowed buffs [Lupus]
-//= 1.4 Restricted it to 80 Base Level [Lupus]
-//= 1.5 According to official info: 1 Treasure Chest per Castle
-//= 1.6 Only 1st Class < 60 BaseLevel Players can participate
-//= 1.7 Guilds with Emergency Call or with 9+ skill points
-//= can't take part in NWoE. [Lupus]
-//= TODO: The official entrance is in Izlude.
-//============================================================
-
-
-prontera,146,163,6 script Novice Castles 729,{
- mes "[Cita]";
- if(getcharid(2)!=0){
- if(getgdskilllv(getcharid(2),10013)){
- mes "I see... your guild has Emergency Call mastered.";
- mes "You cannot enter the Novice Castle area.";
- emotion e_hmm;
- emotion e_wah,1;
- close;
- }
- if(
- getgdskilllv(getcharid(2),10000) +
- getgdskilllv(getcharid(2),10001) +
- getgdskilllv(getcharid(2),10002) +
- getgdskilllv(getcharid(2),10003) +
- getgdskilllv(getcharid(2),10004) +
- getgdskilllv(getcharid(2),10005) +
- getgdskilllv(getcharid(2),10006) +
- getgdskilllv(getcharid(2),10007) +
- getgdskilllv(getcharid(2),10008) +
- getgdskilllv(getcharid(2),10009) +
- getgdskilllv(getcharid(2),10010) +
- getgdskilllv(getcharid(2),10011) +
- getgdskilllv(getcharid(2),10012) +
- getgdskilllv(getcharid(2),10013) +
- getgdskilllv(getcharid(2),10014) > 9
- ){
- mes "I see... your guild has Emergency Call mastered.";
- mes "You cannot enter the Novice Castle area.";
- emotion e_hmm;
- emotion e_wah,1;
- close;
- }
- } else {
- mes "^FF0000You have to enter a guild to be able to hit Emperium!^000000";
- }
- mes "I'm a new usher of Novice Castles.";
- next;
- if( !(eaclass()&(EAJL_2|EAJL_UPPER)) && BaseLevel<60 )
- menu "Warp me to Novice Castles",M_WARP,"Cancel",-;
-
- mes "[Cita]";
- mes "I'm sorry, you can't enter the sacred Novice Castles place.";
- emotion e_sry;
- close;
-
-M_WARP:
- //remove several unallowed buffs
- sc_end SC_ASSUMPTIO;
- sc_end SC_IMPOSITIO;
- sc_end SC_SUFFRAGIUM;
- sc_end SC_MAGNIFICAT;
- sc_end SC_WEAPONPERFECTION;
- sc_end SC_GOSPEL;
- sc_end SC_BASILICA;
- sc_end SC_MAGICPOWER;
- sc_end SC_MARIONETTE;
- sc_end SC_MARIONETTE2;
- sc_end SC_DEVOTION;
- sc_end SC_SACRIFICE;
- sc_end SC_MAXOVERTHRUST;
- sc_end SC_SPIRIT;
- warp "n_castle",102,93+rand(14);
- close;
-}
-
-
-n_castle,102,107,5 script Cita 729,{
- mes "[Cita]";
- mes "Hello, "+ strcharinfo(0) +". Can I help you?";
- next;
- menu "Warp me to Prontera!",-,"Cancel",LEnd;
-
- warp "prontera",155,177+rand(5);
- close;
- LEnd:
- mes "[Cita]";
- mes "Ok.";
- close;
-}