1 | //===== eAthena Script ======================================= |
---|
2 | //= War of Emperium Treasure Rooms for NGuild Guild Castles |
---|
3 | //===== By: ================================================== |
---|
4 | //= kobra_k88 |
---|
5 | //===== Current Version: ===================================== |
---|
6 | //= 1.2 |
---|
7 | //===== Compatible With: ===================================== |
---|
8 | //= eAthena 0.1+; RO Episode 4+ |
---|
9 | //===== Description: ========================================= |
---|
10 | //= |
---|
11 | //===== Additional Comments: ================================= |
---|
12 | //= Based off existing guild scripts. Do not know if it is accurate.[kobra_k88] |
---|
13 | //= 1.2 Official treasure spawn [Lupus] |
---|
14 | //============================================================ |
---|
15 | |
---|
16 | |
---|
17 | //<=============================== Castle 1 =================================>\\ |
---|
18 | |
---|
19 | // Treasure Spawn ----------------------- |
---|
20 | nguild_alde,1,1,1 script Treasure_N01 -1,{ |
---|
21 | |
---|
22 | OnRecvCastleN01: |
---|
23 | end; |
---|
24 | OnInit: |
---|
25 | if($boxNumN01 == 0) end; |
---|
26 | set $@bxN01, $boxNumN01; |
---|
27 | callfunc "F_GldTreas","nguild_alde","N01",$boxNumN01,$@bxN01,$@boxIdN01,1324+rand(10),114,218,123,227,1; |
---|
28 | end; |
---|
29 | |
---|
30 | OnDied: |
---|
31 | mapannounce "nguild_alde","Treasure Chest Broken Open",17; |
---|
32 | set $boxNumN01, $boxNumN01 -1; |
---|
33 | 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; |
---|
34 | end; |
---|
35 | } |
---|
36 | |
---|
37 | // Treasure Room Switch -------------------- |
---|
38 | nguild_alde,123,223,0 script Switch#TresN01 111,{ |
---|
39 | callfunc "F_GldTreasSw", "nguild_alde",218,176; |
---|
40 | end; |
---|
41 | } |
---|
42 | |
---|
43 | //<================================ Castle 2 ================================>\\ |
---|
44 | |
---|
45 | // Treasure Spawn ---------------------------- |
---|
46 | nguild_gef,1,1,1 script Treasure_N02 -1,{ |
---|
47 | |
---|
48 | OnRecvCastleN02: |
---|
49 | end; |
---|
50 | OnInit: |
---|
51 | if($boxNumN02 == 0) end; |
---|
52 | set $@bxN02, $boxNumN02; |
---|
53 | callfunc "F_GldTreas","nguild_gef","N02",$boxNumN02,$@bxN02,$@boxIdN02,1334+rand(10),150,108,158,114,1; |
---|
54 | end; |
---|
55 | |
---|
56 | OnDied: |
---|
57 | mapannounce "nguild_gef","Treasure Chest Broken Open",17; |
---|
58 | set $boxNumN02, $boxNumN02 -1; |
---|
59 | 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; |
---|
60 | end; |
---|
61 | } |
---|
62 | |
---|
63 | // Room Switch --------------------------------------------------------- |
---|
64 | nguild_gef,152,117,0 script Switch#TresN02 111,{ |
---|
65 | callfunc "F_GldTreasSw","nguild_gef",40,49; |
---|
66 | end; |
---|
67 | } |
---|
68 | |
---|
69 | //<================================ Castle 3 ================================>\\ |
---|
70 | |
---|
71 | // Treasure Spawn --------------------------- |
---|
72 | nguild_pay,1,1,0 script Treasure_N03 -1,{ |
---|
73 | OnRecvCastleN03: |
---|
74 | end; |
---|
75 | OnInit: |
---|
76 | if($boxNumN03 == 0) end; |
---|
77 | set $@bxN03, $boxNumN03; |
---|
78 | callfunc "F_GldTreas","nguild_pay","N03",$boxNumN03,$@bxN03,$@boxIdN03,1344+rand(10),286,4,295,13,1; |
---|
79 | end; |
---|
80 | |
---|
81 | OnDied: |
---|
82 | mapannounce "nguild_pay","Treasure Chest Broken Open",17; |
---|
83 | set $boxNumN03, $boxNumN03 -1; |
---|
84 | 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; |
---|
85 | end; |
---|
86 | } |
---|
87 | |
---|
88 | // Treasure Room Switch --------------------------------------------------- |
---|
89 | nguild_pay,295,8,0 script Switch#TresN03 111,{ |
---|
90 | callfunc "F_GldTreasSw", "nguild_pay",120,59; |
---|
91 | end; |
---|
92 | } |
---|
93 | |
---|
94 | //<================================ Castle 4 ================================>\\ |
---|
95 | |
---|
96 | // Treasure Spawn ------------------------------- |
---|
97 | nguild_prt,1,1,0 script Treasure_N04 -1,{ |
---|
98 | OnRecvCastleN04: |
---|
99 | end; |
---|
100 | OnInit: |
---|
101 | if($boxNumN04 == 0) end; |
---|
102 | set $@bxN04, $boxNumN04; |
---|
103 | callfunc "F_GldTreas","nguild_prt","N04",$boxNumN04,$@bxN04,$@boxIdN04,1354+rand(10),6,204,15,213,1; |
---|
104 | end; |
---|
105 | |
---|
106 | OnDied: |
---|
107 | mapannounce "nguild_prt","Treasure Chest Broken Open",17; |
---|
108 | set $boxNumN04, $boxNumN04 -1; |
---|
109 | 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; |
---|
110 | end; |
---|
111 | } |
---|
112 | |
---|
113 | // Treasure Room Switch ---------------------------------------------------- |
---|
114 | nguild_prt,15,209,0 script Switch#TresN04 111,{ |
---|
115 | callfunc "F_GldTreasSw", "nguild_prt",109,179; |
---|
116 | end; |
---|
117 | } |
---|