root/npc/events/nguild/nguild_flags.txt @ 1

Revision 1, 7.2 kB (checked in by jinshiro, 17 years ago)
RevLine 
[1]1//===== eAthena Script =======================================
2//= War of Emperium N Guild Flags
3//===== By: ==================================================
4//= kobra_k88
5//===== Current Version: =====================================
6//= 1.3
7//===== Compatible With: =====================================
8//= eAthena 0.1+; RO Episode 4+
9//===== Description: =========================================
10//= WoE flag scripts.  Display guild emblems on flags.
11//===== Additional Comments: =================================
12// Based off existing guild scripts.  Do not know if it is accurate.[kobra_k88]
13// 1.1 Inner Flags don't teleport you to your HQ anymore [Lupus]
14// 1.2 updated flags to use the new arguments. [L0ne__W0lf]
15// 1.3 Guild flag function added. [L0ne_W0lf]
16//============================================================
17
18/// Flag Function
19//============================================================
20function        script  F_Flags {
21        set .@GID, GetCastleData(getarg(1),1);
22        if (getarg(5) == 0) return;
23        if (.@GID == 0) {
24                mes " [ Edict of the Divine Rune Midgard Kingdom ]";
25                mes " ";
26                mes "1. Follow the ordinance of The Divine Rune Midgard Kingdom, ";
27                mes "We declare that";
28                mes "there is no formal master of this castle.";
29                mes " ";
30                mes "2. To the one who can ";
31                mes "overcome all trials";
32                mes "and destroy the Emperium,";
33                mes "the king will endow the one with";
34                mes "ownership of this castle.";
35                return;
36        }
37        else {
38                if (getcharid(2) == .@GID && getarg(4) == 1) {
39                        mes "Brave ones...";
40                        mes "Do you wish to return to your honorable place?";
41                        next;
42                        if (select("Return to the guild castle.:Quit.") == 1) {
43                                if (getcharid(2) == GetCastleData(getarg(1),1))
44                                        warp getarg(1),getarg(2),getarg(3);
45                        }
46                        return;
47                }
48                mes "[ Edict of the Divine Rune Midgard Kingdom ]";
49                mes " ";
50                mes "1. Following the ordinance of the";
51                mes "Divine Rune Midgard Kingdom,";
52                mes "we approve that this place is in";
53                mes "the private possession of ^ff0000" + GetGuildName(.@GID) + "^000000 Guild.";
54                mes " ";
55                mes "2. The guild Master of ^ff0000"+ GetGuildName(.@GID) + "^000000 Guild is";
56                mes "^FF0000" + GetGuildMaster(.@GID) + "^000000";
57                mes "If there is anyone who objects to this,";
58                mes " prove your strength and honor with a steel blade in your hand.";
59                return;
60        }
61}
62
63//============================================================================//
64//                      Castle 1
65//============================================================================//
66n_castle,110,96,1       script  NGuild Aldebaran#a1-1   722,{
67        callfunc "F_Flags","Al De Baran","nguild_alde",218,170,1,1;
68        close;
69
70OnRecvCastleN01:
71        FlagEmblem GetCastleData("nguild_alde",1);
72        end;
73}
74
75nguild_alde,30,248,4    script  NGuild Aldebaran#a1-6::NGuildAlde       722,{
76        callfunc "F_Flags","Al De Baran","nguild_alde",218,170,0,1;
77        close;
78
79OnRecvCastleN01:
80        FlagEmblem GetCastleData("nguild_alde",1);
81        end;
82}
83// In Castle ============================================
84nguild_alde,30,246,4    duplicate(NGuildAlde)   NGuild Aldebaran#a1-7   722
85nguild_alde,37,248,4    duplicate(NGuildAlde)   NGuild Aldebaran#a1-8   722
86nguild_alde,37,246,4    duplicate(NGuildAlde)   NGuild Aldebaran#a1-9   722
87nguild_alde,95,80,2     duplicate(NGuildAlde)   NGuild Aldebaran#a1-10  722
88nguild_alde,95,59,2     duplicate(NGuildAlde)   NGuild Aldebaran#a1-11  722
89nguild_alde,62,75,2     duplicate(NGuildAlde)   NGuild Aldebaran#a1-12  722
90nguild_alde,70,75,2     duplicate(NGuildAlde)   NGuild Aldebaran#a1-13  722
91nguild_alde,74,75,2     duplicate(NGuildAlde)   NGuild Aldebaran#a1-14  722
92nguild_alde,62,64,2     duplicate(NGuildAlde)   NGuild Aldebaran#a1-15  722
93nguild_alde,66,64,2     duplicate(NGuildAlde)   NGuild Aldebaran#a1-16  722
94nguild_alde,70,64,2     duplicate(NGuildAlde)   NGuild Aldebaran#a1-17  722
95nguild_alde,74,64,2     duplicate(NGuildAlde)   NGuild Aldebaran#a1-18  722
96nguild_alde,203,150,4   duplicate(NGuildAlde)   NGuild Aldebaran#a1-19  722
97nguild_alde,210,150,4   duplicate(NGuildAlde)   NGuild Aldebaran#a1-20  722
98
99
100
101
102//============================================================================//
103//                      Castle 2
104//============================================================================//
105n_castle,110,109,3      script  NGuild Geffen#g1-1      722,{
106        callfunc "F_Flags","Geffen","nguild_gef",83,47,1,1;
107        close;
108
109OnRecvCastleN02:
110        FlagEmblem GetCastleData("nguild_gef",1);
111        end;
112}
113
114nguild_gef,28,157,4     script  NGuild Geffen#g1-6::NGuildGef   722,{
115        callfunc "F_Flags","Geffen","nguild_gef",83,47,0,1;
116        close;
117
118OnRecvCastleN02:
119        FlagEmblem GetCastleData("nguild_gef",1);
120        end;
121}
122// In Castle =============================================
123nguild_gef,32,157,4     duplicate(NGuildGef)    NGuild Geffen#g1-7      722
124nguild_gef,22,156,5     duplicate(NGuildGef)    NGuild Geffen#g1-8      722
125nguild_gef,68,185,3     duplicate(NGuildGef)    NGuild Geffen#g1-9      722
126nguild_gef,17,171,5     duplicate(NGuildGef)    NGuild Geffen#g1-10     722
127nguild_gef,59,16,4      duplicate(NGuildGef)    NGuild Geffen#g1-11     722
128nguild_gef,64,16,4      duplicate(NGuildGef)    NGuild Geffen#g1-12     722
129
130
131
132//============================================================================//
133//                      Castle 3
134//============================================================================//
135n_castle,94,109,5       script  NGuild Payon#f1-1       722,{
136        callfunc "F_Flags","Payon","nguild_pay",87,29,1,1;
137        close;
138
139OnRecvCastleN03:
140        FlagEmblem GetCastleData("nguild_pay",1);
141        end;
142}
143
144nguild_pay,238,67,4     script  NGuild Payon#f1-6::NGuildPay    722,{
145        callfunc "F_Flags","Payon","nguild_pay",87,29,0,1;
146        close;
147
148OnRecvCastleN03:
149        FlagEmblem GetCastleData("nguild_pay",1);
150        end;
151}
152// In Castle ===============================================
153nguild_pay,238,67,4     duplicate(NGuildPay)    NGuild Payon#f1-6       722
154nguild_pay,233,67,4     duplicate(NGuildPay)    NGuild Payon#f1-7       722
155nguild_pay,221,123,4    duplicate(NGuildPay)    NGuild Payon#f1-8       722
156nguild_pay,221,116,4    duplicate(NGuildPay)    NGuild Payon#f1-9       722
157nguild_pay,206,108,4    duplicate(NGuildPay)    NGuild Payon#f1-10      722
158nguild_pay,212,108,4    duplicate(NGuildPay)    NGuild Payon#f1-11      722
159
160
161
162
163//=============================================================================//
164//                      Castle 4
165//=============================================================================//
166n_castle,94,96,7        script  NGuild Prontera#p1-1    722,{
167        callfunc "F_Flags","Prontera","nguild_prt",97,174,1,1;
168        close;
169
170OnRecvCastleN04:
171        FlagEmblem GetCastleData("nguild_prt",1);
172        end;
173}
174
175nguild_prt,58,56,4      script  NGuild Prontera#p1-7::NGuildPrt 722,{
176        callfunc "F_Flags","Prontera","nguild_prt",97,174,0,1;
177        close;
178
179OnRecvCastleN04:
180        FlagEmblem GetCastleData("nguild_prt",1);
181        end;
182}
183// In Castle =============================================
184nguild_prt,64,56,4      duplicate(NGuildPrt)    NGuild Prontera#p1-8    722
185nguild_prt,76,32,4      duplicate(NGuildPrt)    NGuild Prontera#p1-9    722
186nguild_prt,84,32,4      duplicate(NGuildPrt)    NGuild Prontera#p1-10   722
187nguild_prt,94,39,4      duplicate(NGuildPrt)    NGuild Prontera#p1-11   722
188nguild_prt,94,24,4      duplicate(NGuildPrt)    NGuild Prontera#p1-12   722
189nguild_prt,73,14,4      duplicate(NGuildPrt)    NGuild Prontera#p1-13   722
190nguild_prt,73,6,4       duplicate(NGuildPrt)    NGuild Prontera#p1-14   722
191nguild_prt,55,46,4      duplicate(NGuildPrt)    NGuild Prontera#p1-15   722
192nguild_prt,45,46,4      duplicate(NGuildPrt)    NGuild Prontera#p1-16   722
Note: See TracBrowser for help on using the browser.