OSDN Git Service

First version
[st-ro/stro.git] / npc / guild / payg_cas01.txt
1 //===== rAthena Script =======================================
2 //= War of Emperium (Payon) - Bright Arbor
3 //===== By: ==================================================
4 //= L0ne_W0lf
5 //===== Current Version: =====================================
6 //= 1.3
7 //===== Compatible With: =====================================
8 //= rAthena Project
9 //===== Description: =========================================
10 //= NPCs that relate to Payon Guild Castle 1
11 //===== Additional Comments: =================================
12 //= 1.0 First Version. No longer uses functions. [L0ne_W0lf]
13 //= 1.1 Corrected flag-in spawn point. [L0ne_W0lf]
14 //= 1.2 Removed dialog from interior flags. [L0ne_W0lf]
15 //=     Fixed position of Guild dungeon switch.
16 //= 1.3 Partially rewrote Script. [Masao]
17 //============================================================
18
19 // Guild Flags (Outside Castle)
20 //============================================================
21 -       script  Bright Arbor#1::OutsideFlagsPA1 722,{
22
23         set .@GID, GetCastleData("payg_cas01",1);
24
25         if (.@GID == 0) {
26                 mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
27                 mes " ";
28                 mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
29                 mes "We declare that";
30                 mes "there is no formal master of this castle.";
31                 mes " ";
32                 mes "2. To the one who can ";
33                 mes "overcome all trials";
34                 mes "and destroy the Emperium,";
35                 mes "the king will endow the one with";
36                 mes "ownership of this castle.";
37                 close;
38         }
39         if (getcharid(2) == .@GID) {
40                 mes "[ Echoing Voice ]";
41                 mes "Brave ones...";
42                 mes "Do you wish to return to your honorable place?";
43                 next;
44                 if(select("Return to the guild castle.:Quit.") == 1) {
45                         close2;
46                         if (getcharid(2) == GetCastleData("payg_cas01",1)) {
47                                         warp "payg_cas01",54,144;
48                                 end;
49                         }
50                         end;
51                 }
52                 close;
53         }
54         mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
55         mes " ";
56         mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
57         mes "we approve that this place is in";
58         mes "the private prossession of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild.";
59         mes " ";
60         mes "2. The guild Master of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild is";
61         mes "^ff0000"+GetGuildMaster(.@GID)+"^000000";
62         mes "If there is anyone who objects to this,";
63         mes "prove your strength and honor with a steel blade in your hand.";
64         close;
65
66 OnRecvCastlePy01:
67         FlagEmblem GetCastleData("payg_cas01",1);
68         end;
69 }
70
71 pay_gld,125,236,4       duplicate(OutsideFlagsPA1)      Bright Arbor#1-2        722
72 pay_gld,110,233,4       duplicate(OutsideFlagsPA1)      Bright Arbor#2  722
73 pay_gld,116,233,4       duplicate(OutsideFlagsPA1)      Bright Arbor#3  722
74 pay_gld,91,239,2        duplicate(OutsideFlagsPA1)      Bright Arbor#4  722
75
76 // Guild Flags (Inside Castle)
77 //============================================================
78 -       script  Bright Arbor#5::InsideFlagsPA1  722,{
79         end;
80
81 OnRecvCastlePy01:
82         FlagEmblem GetCastleData("payg_cas01",1);
83         end;
84 }
85
86 payg_cas01,238,67,4     duplicate(InsideFlagsPA1)       Bright Arbor#5-2        722
87 payg_cas01,233,67,4     duplicate(InsideFlagsPA1)       Bright Arbor#6  722
88 payg_cas01,221,123,4    duplicate(InsideFlagsPA1)       Bright Arbor#7  722
89 payg_cas01,221,116,4    duplicate(InsideFlagsPA1)       Bright Arbor#8  722
90 payg_cas01,206,108,4    duplicate(InsideFlagsPA1)       Bright Arbor#9  722
91 payg_cas01,212,108,4    duplicate(InsideFlagsPA1)       Bright Arbor#10 722
92
93 // Guild Flag (Town)
94 //============================================================
95 payon,90,322,4  duplicate(InsideFlagsPA1)       Bright Arbor#11 722
96 payon,166,177,3 duplicate(InsideFlagsPA1)       Bright Arbor#12 722
97
98 // Kafra Employee
99 //============================================================
100 payg_cas01,128,58,3     duplicate(guildkafra)   Kafra Staff#payg_cas01  117
101
102 // Steward
103 //============================================================
104 payg_cas01,120,58,4     duplicate(cm)   Kurunnadi#payg_cas01    55
105
106 // Treasure Room Exit
107 //============================================================
108 payg_cas01,295,8,0      script  #lever_PA01     111,{
109         mes " ";
110         mes "There's a small lever. Will you pull it?";
111         next;
112         if(select("Pull.:Do not.") == 1) {
113                 close2;
114                 warp "payg_cas01",120,59;
115                 end;
116         }
117         close;
118 }
119
120 // Guild Dungeon Switch
121 //============================================================
122 payg_cas01,101,25,0     duplicate(gdlever)      #payg_cas01     111
123
124 // Guild Treasure Spawns
125 //============================================================
126 payg_cas01,291,8,0      duplicate(Gld_Trea_Spawn)       Treasure#payg_cas01     -1
127
128 // AGIT Manager
129 //============================================================
130 payg_cas01,139,139,0    duplicate(Gld_Agit_Manager)     Agit#payg_cas01 -1
131
132 // Guardians
133 //============================================================
134 payg_cas01,120,58,4     duplicate(Gld_Guard_Template)   Guardian#payg_cas01     -1