diff options
Diffstat (limited to 'npc/events/nguild')
| -rw-r--r-- | npc/events/nguild/nguild_dunsw.txt | 65 | ||||
| -rw-r--r-- | npc/events/nguild/nguild_ev_agit.txt | 214 | ||||
| -rw-r--r-- | npc/events/nguild/nguild_flags.txt | 190 | ||||
| -rw-r--r-- | npc/events/nguild/nguild_guardians.txt | 87 | ||||
| -rw-r--r-- | npc/events/nguild/nguild_kafras.txt | 69 | ||||
| -rw-r--r-- | npc/events/nguild/nguild_managers.txt | 157 | ||||
| -rw-r--r-- | npc/events/nguild/nguild_treas.txt | 165 | ||||
| -rw-r--r-- | npc/events/nguild/nguild_warper.txt | 94 |
8 files changed, 0 insertions, 1041 deletions
diff --git a/npc/events/nguild/nguild_dunsw.txt b/npc/events/nguild/nguild_dunsw.txt deleted file mode 100644 index f768405d7..000000000 --- a/npc/events/nguild/nguild_dunsw.txt +++ /dev/null @@ -1,65 +0,0 @@ -//===== Hercules Script ====================================== -//= War of Emperium Dungeon Switch for NGuild Castles -//===== By: ================================================== -//= kobra_k88 -//===== Current Version: ===================================== -//= 1.1 -//===== 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 { - .@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 HIDDEN_NPC,{ - callfunc "F_GldDunSw","nguild_alde","02",32,122; - close; -} - -// Castle 2 =============================================== -nguild_gef,78,84,0 script Switch#DunN02 HIDDEN_NPC,{ - callfunc "F_GldDunSw","nguild_gef","04",39,258; - close; -} - -// Castle 3 =============================================== -nguild_pay,101,25,0 script Switch#DunN03 HIDDEN_NPC,{ - callfunc "F_GldDunSw","nguild_pay","01",186,165; - close; -} - -// Castle 4 =============================================== -nguild_prt,94,200,0 script Switch#DunN04 HIDDEN_NPC,{ - 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 5461bb975..000000000 --- a/npc/events/nguild/nguild_ev_agit.txt +++ /dev/null @@ -1,214 +0,0 @@ -//===== Hercules Script ====================================== -//= War of Emperium - NGuild Wars Events -//===== By: ================================================== -//= kobra_k88 -//===== Current Version: ===================================== -//= 1.5 -//===== 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 { - .@map$ = getarg(0); - .@castle$ = getarg(1); - .@empx = getarg(2); - .@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 { - .@map$ = getarg(0); - .@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 { - .@map$ = getarg(0); - .@castle$ = getarg(1); - - .@GID = getcharid(2); - if (.@GID <= 0) return; - - .@Economy = getcastledata(.@map$,2) - 5; - if (.@Economy < 0) .@Economy = 0; - setcastledata .@map$, 2, .@Economy; - - .@defence = getcastledata(.@map$,3) - 5; - if (.@defence < 0) .@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 (.@i = 4; .@i <= 9; ++.@i) - setcastledata .@map$, .@i, 0; - - // if the new guild doesn't have Guardian Research, erase guardians - if( getgdskilllv(.@GID,10002) == 0 ) - for (.@i = 10; .@i <= 17; ++.@i) - setcastledata .@map$, .@i, 0; - - return; -} - - -// Function for OnAgitEnd ====================================== -function script F_AgitEnd { - .@map$ = getarg(0); - .@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 dcd3dbc14..000000000 --- a/npc/events/nguild/nguild_flags.txt +++ /dev/null @@ -1,190 +0,0 @@ -//===== Hercules Script ====================================== -//= War of Emperium N Guild Flags -//===== By: ================================================== -//= kobra_k88 -//===== Current Version: ===================================== -//= 1.3 -//===== 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 { - .@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 GUILD_FLAG,{ - 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 GUILD_FLAG,{ - 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 GUILD_FLAG -nguild_alde,37,248,4 duplicate(NGuildAlde) NGuild Aldebaran#a1-8 GUILD_FLAG -nguild_alde,37,246,4 duplicate(NGuildAlde) NGuild Aldebaran#a1-9 GUILD_FLAG -nguild_alde,95,80,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-10 GUILD_FLAG -nguild_alde,95,59,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-11 GUILD_FLAG -nguild_alde,62,75,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-12 GUILD_FLAG -nguild_alde,70,75,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-13 GUILD_FLAG -nguild_alde,74,75,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-14 GUILD_FLAG -nguild_alde,62,64,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-15 GUILD_FLAG -nguild_alde,66,64,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-16 GUILD_FLAG -nguild_alde,70,64,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-17 GUILD_FLAG -nguild_alde,74,64,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-18 GUILD_FLAG -nguild_alde,203,150,4 duplicate(NGuildAlde) NGuild Aldebaran#a1-19 GUILD_FLAG -nguild_alde,210,150,4 duplicate(NGuildAlde) NGuild Aldebaran#a1-20 GUILD_FLAG - - - - -//============================================================================// -// Castle 2 -//============================================================================// -n_castle,110,109,3 script NGuild Geffen#g1-1 GUILD_FLAG,{ - 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 GUILD_FLAG,{ - 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 GUILD_FLAG -nguild_gef,22,156,5 duplicate(NGuildGef) NGuild Geffen#g1-8 GUILD_FLAG -nguild_gef,68,185,3 duplicate(NGuildGef) NGuild Geffen#g1-9 GUILD_FLAG -nguild_gef,17,171,5 duplicate(NGuildGef) NGuild Geffen#g1-10 GUILD_FLAG -nguild_gef,59,16,4 duplicate(NGuildGef) NGuild Geffen#g1-11 GUILD_FLAG -nguild_gef,64,16,4 duplicate(NGuildGef) NGuild Geffen#g1-12 GUILD_FLAG - - - -//============================================================================// -// Castle 3 -//============================================================================// -n_castle,94,109,5 script NGuild Payon#f1-1 GUILD_FLAG,{ - 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 GUILD_FLAG,{ - 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 GUILD_FLAG -nguild_pay,233,67,4 duplicate(NGuildPay) NGuild Payon#f1-7 GUILD_FLAG -nguild_pay,221,123,4 duplicate(NGuildPay) NGuild Payon#f1-8 GUILD_FLAG -nguild_pay,221,116,4 duplicate(NGuildPay) NGuild Payon#f1-9 GUILD_FLAG -nguild_pay,206,108,4 duplicate(NGuildPay) NGuild Payon#f1-10 GUILD_FLAG -nguild_pay,212,108,4 duplicate(NGuildPay) NGuild Payon#f1-11 GUILD_FLAG - - - - -//=============================================================================// -// Castle 4 -//=============================================================================// -n_castle,94,96,7 script NGuild Prontera#p1-1 GUILD_FLAG,{ - 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 GUILD_FLAG,{ - 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 GUILD_FLAG -nguild_prt,76,32,4 duplicate(NGuildPrt) NGuild Prontera#p1-9 GUILD_FLAG -nguild_prt,84,32,4 duplicate(NGuildPrt) NGuild Prontera#p1-10 GUILD_FLAG -nguild_prt,94,39,4 duplicate(NGuildPrt) NGuild Prontera#p1-11 GUILD_FLAG -nguild_prt,94,24,4 duplicate(NGuildPrt) NGuild Prontera#p1-12 GUILD_FLAG -nguild_prt,73,14,4 duplicate(NGuildPrt) NGuild Prontera#p1-13 GUILD_FLAG -nguild_prt,73,6,4 duplicate(NGuildPrt) NGuild Prontera#p1-14 GUILD_FLAG -nguild_prt,55,46,4 duplicate(NGuildPrt) NGuild Prontera#p1-15 GUILD_FLAG -nguild_prt,45,46,4 duplicate(NGuildPrt) NGuild Prontera#p1-16 GUILD_FLAG diff --git a/npc/events/nguild/nguild_guardians.txt b/npc/events/nguild/nguild_guardians.txt deleted file mode 100644 index 3b2a7088b..000000000 --- a/npc/events/nguild/nguild_guardians.txt +++ /dev/null @@ -1,87 +0,0 @@ -//===== Hercules Script ====================================== -//= War of Emperium - nguild guardians script -//===== By: ================================================== -//= kobra_k88 -//===== Current Version: ===================================== -//= 1.0 -//===== 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 89570fe6d..000000000 --- a/npc/events/nguild/nguild_kafras.txt +++ /dev/null @@ -1,69 +0,0 @@ -//===== Hercules Script ====================================== -//= War of Emperium Kafras for N Guild Castles -//===== By: ================================================== -//= kobra_k88 -//===== Current Version: ===================================== -//= 1.2 -//===== 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; - @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: - @wrpP[0] = 200; - @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 4_F_KAFRA1,{ - 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 4_F_KAFRA1,{ -nguild_gef,35,37,0 script Kafra Service#N02 4_F_KAFRA1,{ - 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 4_F_KAFRA1,{ - 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 4_F_KAFRA1,{ - 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 015ef20fd..000000000 --- a/npc/events/nguild/nguild_managers.txt +++ /dev/null @@ -1,157 +0,0 @@ -//===== Hercules Script ====================================== -//= War of Emperium Managers for N Guild Castles -//===== By: ================================================== -//= kobra_k88 -//===== Current Version: ===================================== -//= 1.2 -//===== 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 { - - @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; - - switch (select("Kafra Staff Employment / Dismissal","Enter Treasure Room","Cancel")) { - case 1: // Employment / Dismissal - 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; - if (select("Employ Kafra.","Cancel") != 1) { - mes "[ "+getarg(0)+" ]"; - mes "As you wish Master. But I suggest we get a Kafra as soon as possible!"; - return; - } - mes "[ "+getarg(0)+" ]"; - if (Zeny < 10000) { - mes "Master, you do not have enough money to employ a Kafra. Employment has been cancelled."; - return; - } - 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; - L_Dismiss: - mes "Would you like to dismiss the current Kafra?"; - next; - if (select("Dismissal","Cancel") != 1) { - 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; - } - cutin "kafra_01",2; - mes "[ Kafra Staff ]"; - mes "Have I done anything wrong? If I did, will you please forgive me?"; - next; - if (select("Dismiss","Cancel") != 1) { - mes "[ Kafra Staff ]"; - mes "Thank you master, I'll do my best! ^^."; - cutin "kafra_01",255; - return; - } - 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; - case 2: // Enter Treasure Room - mes "[ "+getarg(0)+" ]"; - mes "Would you to go to our Treasure Room? Only you, the Guild Master, are allowed to enter this room."; - next; - if (select("Enter Treasure room.","Cancel") == 1) { - 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; - } - 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; - default: // Cancel - mes "[ "+getarg(0)+" ]"; - mes "As you wish, master."; - return; - } -} - -// Castle 1 ================================================================================== -nguild_alde,218,175,0 script Frolo 1_M_JOBTESTER,{ - callfunc "F_GldManager","Frolo","nguild_alde",119,223,"N01"; - close; -} - - -// Castle 2 ================================================================================== -nguild_gef,40,48,5 script Leiber 1_M_JOBTESTER,{ - callfunc "F_GldManager","Leiber","nguild_gef",155,112,"N02"; - close; -} - - -// Castle 3 ================================================================================== -nguild_pay,120,58,4 script Dundar 1_M_JOBTESTER,{ - callfunc "F_GldManager","Dundar","nguild_pay",290,7,"N03"; - close; -} - - -// Castle 4 ================================================================================== -nguild_prt,112,181,0 script Thefton 1_M_JOBTESTER,{ - 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 7a7cd64c8..000000000 --- a/npc/events/nguild/nguild_treas.txt +++ /dev/null @@ -1,165 +0,0 @@ -//===== Hercules Script ====================================== -//= War of Emperium Treasure Rooms for NGuild Guild Castles -//===== By: ================================================== -//= kobra_k88 -//===== Current Version: ===================================== -//= 1.3b -//===== 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 (.@i = 1; .@i <= getarg(3); ++.@i) { - // 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; - $@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; - --$boxNumN01; - 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 HIDDEN_NPC,{ - 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; - $@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; - --$boxNumN02; - 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 HIDDEN_NPC,{ - 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; - $@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; - --$boxNumN03; - 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 HIDDEN_NPC,{ - 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; - $@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; - --$boxNumN04; - 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 HIDDEN_NPC,{ - 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 6ad9d02ab..000000000 --- a/npc/events/nguild/nguild_warper.txt +++ /dev/null @@ -1,94 +0,0 @@ -//===== Hercules Script ====================================== -//= Novice's Guild Castles War of Emperium Usher NPC -//===== By: ================================================== -//= Lupus -//===== Current Version: ===================================== -//= 1.7 -//===== 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 4_F_NOVICE,{ - mes "[Cita]"; - if (!getcharid(2)) { - mes "^FF0000You have to enter a guild to be able to hit Emperium!^000000"; - } else if (getgdskilllv(getcharid(2),10013) || - (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; - } else { - mes "I'm a new usher of Novice Castles."; - next; - mes "[Cita]"; - if ((eaclass()&(EAJL_2|EAJL_UPPER)) || BaseLevel>=60) { - mes "I'm sorry, you can't enter the sacred Novice Castles place."; - emotion e_sry; - } else if (select("Warp me to Novice Castles","Cancel") == 1) { - // remove several unallowed buffs - sc_end SC_ASSUMPTIO; - sc_end SC_IMPOSITIO; - sc_end SC_SUFFRAGIUM; - sc_end SC_MAGNIFICAT; - sc_end SC_WEAPONPERFECT; - 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_OVERTHRUSTMAX; - sc_end SC_SOULLINK; - warp "n_castle",102,93+rand(14); - } - } - close; -} - -n_castle,102,107,5 script Cita 4_F_NOVICE,{ - mes "[Cita]"; - mes "Hello, "+ strcharinfo(0) +". Can I help you?"; - next; - if (select("Warp me to Prontera!","Cancel") == 1) { - warp "prontera",155,177+rand(5); - } else { - mes "[Cita]"; - mes "Ok."; - } - close; -} |