diff options
Diffstat (limited to 'npc/guild/old/payg_flag.txt')
| -rw-r--r-- | npc/guild/old/payg_flag.txt | 360 |
1 files changed, 360 insertions, 0 deletions
diff --git a/npc/guild/old/payg_flag.txt b/npc/guild/old/payg_flag.txt new file mode 100644 index 000000000..e00a87c08 --- /dev/null +++ b/npc/guild/old/payg_flag.txt @@ -0,0 +1,360 @@ +//===== eAthena Script =======================================
+//= War of Emperium - Payon Guild Flags
+//===== By: ==================================================
+//= jAthena (1.0)
+//===== Current Version: =====================================
+//= 1.4
+//===== Compatible With: =====================================
+//= eAthena 0.1+; RO Episode 4+
+//===== Description: =========================================
+//= Castle Guild Flags in Payon and pay_gld
+//===== Additional Comments: =================================
+//= 1.1 by Akaru and ho|yAnge|
+//= 1.2 Darkchild/MissActek Flags moved to a better spot till we know exact
+//= 1.3 To exact spot
+//= 1.4 Better spots
+//============================================================
+
+//Payon Castle 01 - Mingting
+payon.gat,165,177,3 script Mingting#f1-1 722,{
+ set @GIDf1,GetCastleData("payg_cas01.gat",1);
+ if (@GIDf1 != 0) goto LStartg;
+ mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]";
+ mes " ";
+ mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,";
+ mes " this guild base has not been taken by any guild yet";
+ mes " ";
+ mes "2. In order to take this guild base, you must defeat all the guardians";
+ mes " that are protecting the guild base and eliminate the Emperium";
+ close;
+LStartg:
+ mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]";
+ mes " ";
+ mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,";
+ mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDf1) + "^000000 guild";
+ mes " ";
+ mes "2. The guild master of ^ff0000" + GetGuildName(@GIDf1) + "^000000 is";
+ mes " ^ff0000" + GetGuildMaster(@GIDf1) + "^000000. If anyone who objects to that,";
+ mes " raise your sword to honor yourself.";
+ close;
+OnRecvCastleF01:
+ FlagEmblem GetCastleData("payg_cas01.gat",1);
+ break;
+}
+
+pay_gld.gat,125,236,4 script Mingting#f1-2::MingtingW 722,{
+ set @GIDf1,GetCastleData("payg_cas01.gat",1);
+ if (@GIDf1 != 0) goto LStartg;
+ mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]";
+ mes " ";
+ mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,";
+ mes " this guild base has not been taken by any guild yet";
+ mes " ";
+ mes "2. In order to take this guild base, you must defeat all the guardians";
+ mes " that are protecting the guild base and eliminate the Emperium";
+ close;
+LStartg:
+ if (getcharid(2) == @GIDf1) goto LStartg2;
+ mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]";
+ mes " ";
+ mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,";
+ mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDf1) + "^000000 guild";
+ mes " ";
+ mes "2. The guild master of ^ff0000" + GetGuildName(@GIDf1) + "^000000 is";
+ mes " ^ff0000" + GetGuildMaster(@GIDf1) + "^000000. If anyone who objects to that,";
+ mes " raise your sword to honor yourself.";
+ close;
+LStartg2:
+ mes "[ Ringing Voice ]";
+ mes "Brave man...";
+ mes "Would you return to your honorable be?";
+ next;
+ menu "Go back to your agitating point",Lenter,"Cancel",-;
+ close;
+Lenter:
+ warp "payg_cas01.gat",87,29;
+ break;
+OnRecvCastleF01:
+ FlagEmblem GetCastleData("payg_cas01.gat",1);
+ break;
+}
+
+pay_gld.gat,110,233,4 duplicate(MingtingW) Mingting#f1-3 722
+pay_gld.gat,116,233,4 duplicate(MingtingW) Mingting#f1-4 722
+pay_gld.gat,91,239,2 duplicate(MingtingW) Mingting#f1-5 722
+
+//Payon Castle 02 - Tiantan
+
+payon.gat,165,173,3 script Tiantan#f2-1 722,{
+ set @GIDf2,GetCastleData("payg_cas02.gat",1);
+ if (@GIDf2 != 0) goto LStartg;
+ mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]";
+ mes " ";
+ mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,";
+ mes " this guild base has not been taken by any guild yet";
+ mes " ";
+ mes "2. In order to take this guild base, you must defeat all the guardians";
+ mes " that are protecting the guild base and eliminate the Emperium";
+ close;
+LStartg:
+ mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]";
+ mes " ";
+ mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,";
+ mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDf2) + "^000000 guild";
+ mes " ";
+ mes "2. The guild master of ^ff0000" + GetGuildName(@GIDf2) + "^000000 is";
+ mes " ^ff0000" + GetGuildMaster(@GIDf2) + "^000000. If anyone who objects to that,";
+ mes " raise your sword to honor yourself.";
+ close;
+OnRecvCastleF02:
+ FlagEmblem GetCastleData("payg_cas02.gat",1);
+ break;
+}
+
+pay_gld.gat,292,112,6 script Tiantan#f2-2::TiantanW 722,{
+ set @GIDf2,GetCastleData("payg_cas02.gat",1);
+ if (@GIDf2 != 0) goto LStartg;
+ mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]";
+ mes " ";
+ mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,";
+ mes " this guild base has not been taken by any guild yet";
+ mes " ";
+ mes "2. In order to take this guild base, you must defeat all the guardians";
+ mes " that are protecting the guild base and eliminate the Emperium";
+ close;
+LStartg:
+ if (getcharid(2) == @GIDf2) goto LStartg2;
+ mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]";
+ mes " ";
+ mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,";
+ mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDf2) + "^000000 guild";
+ mes " ";
+ mes "2. The guild master of ^ff0000" + GetGuildName(@GIDf2) + "^000000 is";
+ mes " ^ff0000" + GetGuildMaster(@GIDf2) + "^000000. If anyone who objects to that,";
+ mes " raise your sword to honor yourself.";
+ close;
+LStartg2:
+ mes "[ Ringing Voice ]";
+ mes "Brave man...";
+ mes "Would you return to your honorable be?";
+ next;
+ menu "Go back to your agitating point",Lenter,"Cancel",-;
+ close;
+Lenter:
+ warp "payg_cas02.gat",22,275;
+ break;
+OnRecvCastleF02:
+ FlagEmblem GetCastleData("payg_cas02.gat",1);
+ break;
+}
+
+pay_gld.gat,292,120,6 duplicate(TiantanW) Tiantan#f2-3 722
+pay_gld.gat,291,135,6 duplicate(TiantanW) Tiantan#f2-4 722
+pay_gld.gat,271,163,0 duplicate(TiantanW) Tiantan#f2-5 722
+
+//Payon Castle 03 - Fuying
+
+payon.gat,165,169,3 script Fuying#f3-1 722,{
+ set @GIDf3,GetCastleData("payg_cas03.gat",1);
+ if (@GIDf3 != 0) goto LStartg;
+ mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]";
+ mes " ";
+ mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,";
+ mes " this guild base has not been taken by any guild yet";
+ mes " ";
+ mes "2. In order to take this guild base, you must defeat all the guardians";
+ mes " that are protecting the guild base and eliminate the Emperium";
+ close;
+LStartg:
+ mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]";
+ mes " ";
+ mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,";
+ mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDf3) + "^000000 guild";
+ mes " ";
+ mes "2. The guild master of ^ff0000" + GetGuildName(@GIDf3) + "^000000 is";
+ mes " ^ff0000" + GetGuildMaster(@GIDf3) + "^000000. If anyone who objects to that,";
+ mes " raise your sword to honor yourself.";
+ close;
+OnRecvCastleF03:
+ FlagEmblem GetCastleData("payg_cas03.gat",1);
+ break;
+}
+
+pay_gld.gat,321,298,2 script Fuying#f3-2::FuyingW 722,{
+ set @GIDf3,GetCastleData("payg_cas03.gat",1);
+ if (@GIDf3 != 0) goto LStartg;
+ mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]";
+ mes " ";
+ mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,";
+ mes " this guild base has not been taken by any guild yet";
+ mes " ";
+ mes "2. In order to take this guild base, you must defeat all the guardians";
+ mes " that are protecting the guild base and eliminate the Emperium";
+ close;
+LStartg:
+ if (getcharid(2) == @GIDf3) goto LStartg2;
+ mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]";
+ mes " ";
+ mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,";
+ mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDf3) + "^000000 guild";
+ mes " ";
+ mes "2. The guild master of ^ff0000" + GetGuildName(@GIDf3) + "^000000 is";
+ mes " ^ff0000" + GetGuildMaster(@GIDf3) + "^000000. If anyone who objects to that,";
+ mes " raise your sword to honor yourself.";
+ close;
+LStartg2:
+ mes "[ Ringing Voice ]";
+ mes "Brave man...";
+ mes "Would you return to your honorable be?";
+ next;
+ menu "Go back to your agitating point",Lenter,"Cancel",-;
+ close;
+Lenter:
+ warp "payg_cas03.gat",9,263;
+ break;
+OnRecvCastleF03:
+ FlagEmblem GetCastleData("payg_cas03.gat",1);
+ break;
+}
+
+pay_gld.gat,321,289,2 duplicate(FuyingW) Fuying#f3-3 722
+pay_gld.gat,327,304,1 duplicate(FuyingW) Fuying#f3-4 722
+pay_gld.gat,333,254,4 duplicate(FuyingW) Fuying#f3-5 722
+
+//Payon Castle 04 - Honglou
+
+payon.gat,165,165,3 script Honglou#f4-1 722,{
+ set @GIDf4,GetCastleData("payg_cas04.gat",1);
+ if (@GIDf4 != 0) goto LStartg;
+ mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]";
+ mes " ";
+ mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,";
+ mes " this guild base has not been taken by any guild yet";
+ mes " ";
+ mes "2. In order to take this guild base, you must defeat all the guardians";
+ mes " that are protecting the guild base and eliminate the Emperium";
+ close;
+LStartg:
+ mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]";
+ mes " ";
+ mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,";
+ mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDf4) + "^000000 guild";
+ mes " ";
+ mes "2. The guild master of ^ff0000" + GetGuildName(@GIDf4) + "^000000 is";
+ mes " ^ff0000" + GetGuildMaster(@GIDf4) + "^000000. If anyone who objects to that,";
+ mes " raise your sword to honor yourself.";
+ close;
+OnRecvCastleF04:
+ FlagEmblem GetCastleData("payg_cas04.gat",1);
+ break;
+}
+
+pay_gld.gat,143,160,0 script Honglou#f4-2::HonglouW 722,{
+ set @GIDf4,GetCastleData("payg_cas04.gat",1);
+ if (@GIDf4 != 0) goto LStartg;
+ mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]";
+ mes " ";
+ mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,";
+ mes " this guild base has not been taken by any guild yet";
+ mes " ";
+ mes "2. In order to take this guild base, you must defeat all the guardians";
+ mes " that are protecting the guild base and eliminate the Emperium";
+ close;
+LStartg:
+ if (getcharid(2) == @GIDf4) goto LStartg2;
+ mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]";
+ mes " ";
+ mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,";
+ mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDf4) + "^000000 guild";
+ mes " ";
+ mes "2. The guild master of ^ff0000" + GetGuildName(@GIDf4) + "^000000 is";
+ mes " ^ff0000" + GetGuildMaster(@GIDf4) + "^000000. If anyone who objects to that,";
+ mes " raise your sword to honor yourself.";
+ close;
+LStartg2:
+ mes "[ Ringing Voice ]";
+ mes "Brave man...";
+ mes "Would you return to your honorable be?";
+ next;
+ menu "Go back to your agitating point",Lenter,"Cancel",-;
+ close;
+Lenter:
+ warp "payg_cas04.gat",40,235;
+ break;
+OnRecvCastleF04:
+ FlagEmblem GetCastleData("payg_cas04.gat",1);
+ break;
+}
+
+pay_gld.gat,143,160,0 duplicate(HonglouW) Honglou#f4-3 722
+pay_gld.gat,133,151,2 duplicate(HonglouW) Honglou#f4-4 722
+pay_gld.gat,153,166,1 duplicate(HonglouW) Honglou#f4-5 722
+
+//Payon Castle 05 - Zhulinxian
+
+payon.gat,165,161,3 script Zhulinxian#f5-1 722,{
+ set @GIDf5,GetCastleData("payg_cas05.gat",1);
+ if (@GIDf5 != 0) goto LStartg;
+ mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]";
+ mes " ";
+ mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,";
+ mes " this guild base has not been taken by any guild yet";
+ mes " ";
+ mes "2. In order to take this guild base, you must defeat all the guardians";
+ mes " that are protecting the guild base and eliminate the Emperium";
+ close;
+LStartg:
+ mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]";
+ mes " ";
+ mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,";
+ mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDf5) + "^000000 guild";
+ mes " ";
+ mes "2. The guild master of ^ff0000" + GetGuildName(@GIDf5) + "^000000 is";
+ mes " ^ff0000" + GetGuildMaster(@GIDf5) + "^000000. If anyone who objects to that,";
+ mes " raise your sword to honor yourself.";
+ close;
+OnRecvCastleF05:
+ FlagEmblem GetCastleData("payg_cas05.gat",1);
+ break;
+}
+
+pay_gld.gat,208,268,4 script Zhulinxian#f5-2::ZhulinxianW 722,{
+ set @GIDf5,GetCastleData("payg_cas05.gat",1);
+ if (@GIDf5 != 0) goto LStartg;
+ mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]";
+ mes " ";
+ mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,";
+ mes " this guild base has not been taken by any guild yet";
+ mes " ";
+ mes "2. In order to take this guild base, you must defeat all the guardians";
+ mes " that are protecting the guild base and eliminate the Emperium";
+ close;
+LStartg:
+ if (getcharid(2) == @GIDf5) goto LStartg2;
+ mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]";
+ mes " ";
+ mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,";
+ mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDf5) + "^000000 guild";
+ mes " ";
+ mes "2. The guild master of ^ff0000" + GetGuildName(@GIDf5) + "^000000 is";
+ mes " ^ff0000" + GetGuildMaster(@GIDf5) + "^000000. If anyone who objects to that,";
+ mes " raise your sword to honor yourself.";
+ close;
+LStartg2:
+ mes "[ Ringing Voice ]";
+ mes "Brave man...";
+ mes "Would you return to your honorable be?";
+ next;
+ menu "Go back to your agitating point",Lenter,"Cancel",-;
+ close;
+Lenter:
+ warp "payg_cas05.gat",276,227;
+ break;
+OnRecvCastleF05:
+ FlagEmblem GetCastleData("payg_cas05.gat",1);
+ break;
+}
+
+pay_gld.gat,199,268,4 duplicate(ZhulinxianW) Zhulinxian#f5-3 722
+pay_gld.gat,190,277,3 duplicate(ZhulinxianW) Zhulinxian#f5-4 722
+pay_gld.gat,187,294,2 duplicate(ZhulinxianW) Zhulinxian#f5-5 722
\ No newline at end of file |