123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360 |
- //===== 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
|