Advertisement
Guest User

Untitled

a guest
Jul 3rd, 2012
66
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 8.41 KB | None | 0 0
  1. prontera,155,190,6 script WoE Reward 1288,{
  2. mes "^000088[Emperium]^000000";
  3. mes "Greetings, adventurer..";
  4. mes "Do you want to redeem your guild reward for last session War of Emperium?";
  5. next;
  6. mes "^000088[Emperium]^000000";
  7. mes "Please select your castle.";
  8. next;
  9. if ( agitcheck() ) goto L_woeon;
  10. menu
  11. // "Neuschwanstein",L_aldeg_cas01,
  12. // "Hohenschwangau",L_aldeg_cas02,
  13. // "Nuenberg",L_aldeg_cas03,
  14. // "Wuerzburg",L_aldeg_cas04,
  15. // "Rothenburg",L_aldeg_cas05,
  16. "Repherion",L_gefg_cas01,
  17. // "Eeyolbriggar",L_gefg_cas02,
  18. // "Yesnelph",L_gefg_cas03,
  19. // "Bergel",L_gefg_cas04,
  20. // "Mersetzdeitz",L_gefg_cas05,
  21. // "Bright Arbor",L_payg_cas01,
  22. // "Scarlet Palace",L_payg_cas02,
  23. // "Holy Shadow",L_payg_cas03,
  24. "Sacred Altar",L_payg_cas04,
  25. // "Bamboo Grove Hill",L_payg_cas05,
  26. // "Kriemhild",L_prtg_cas01,
  27. // "Swanhild",L_prtg_cas02,
  28. // "Fadhgridh",L_prtg_cas03;
  29. // "Skoegul",L_prtg_cas04;
  30. // "Gondul",L_prtg_cas05;
  31.  
  32. L_aldeg_cas01:
  33. if ( getcastledata( "aldeg_cas01", 1) != getcharid(2) ) goto L_not_owner;
  34. if ( $castle_claimed[1] ) goto L_claimed;
  35. if ( getguildmasterid( getcharid(2) ) != getcharid(0) ) goto L_not_gm;
  36. mes "receiving the reward for this castle";
  37. getitem 7539, 300;
  38. set $castle_claimed[1], 1;
  39. close;
  40. L_aldeg_cas02:
  41. if ( getcastledata( "aldeg_cas02", 1) != getcharid(2) ) goto L_not_owner;
  42. if ( $castle_claimed[2] ) goto L_claimed;
  43. if ( getguildmasterid( getcharid(2) ) != getcharid(0) ) goto L_not_gm;
  44. mes "receiving the reward for this castle";
  45. getitem 7539, 300;
  46. set $castle_claimed[2], 1;
  47. close;
  48. L_aldeg_cas03:
  49. if ( getcastledata( "aldeg_cas03", 1) != getcharid(2) ) goto L_not_owner;
  50. if ( $castle_claimed[3] ) goto L_claimed;
  51. if ( getguildmasterid( getcharid(2) ) != getcharid(0) ) goto L_not_gm;
  52. mes "receiving the reward for this castle";
  53. getitem 7539, 300;
  54. set $castle_claimed[3], 1;
  55. close;
  56. L_aldeg_cas04:
  57. if ( getcastledata( "aldeg_cas04", 1) != getcharid(2) ) goto L_not_owner;
  58. if ( $castle_claimed[4] ) goto L_claimed;
  59. if ( getguildmasterid( getcharid(2) ) != getcharid(0) ) goto L_not_gm;
  60. mes "receiving the reward for this castle";
  61. getitem 7539, 300;
  62. set $castle_claimed[4], 1;
  63. close;
  64. L_aldeg_cas05:
  65. if ( getcastledata( "aldeg_cas05", 1) != getcharid(2) ) goto L_not_owner;
  66. if ( $castle_claimed[5] ) goto L_claimed;
  67. if ( getguildmasterid( getcharid(2) ) != getcharid(0) ) goto L_not_gm;
  68. mes "receiving the reward for this castle";
  69. getitem 7539, 300;
  70. set $castle_claimed[5], 1;
  71. close;
  72.  
  73. L_gefg_cas01:
  74. if ( getcastledata( "gefg_cas01", 1) != getcharid(2) ) goto L_not_owner;
  75. if ( $castle_claimed[6] ) goto L_claimed;
  76. if ( getguildmasterid( getcharid(2) ) != getcharid(0) ) goto L_not_gm;
  77. mes "receiving the reward for this castle";
  78. getitem 7539, 300;
  79. set $castle_claimed[6], 1;
  80. close;
  81. L_gefg_cas02:
  82. if ( getcastledata( "gefg_cas02", 1) != getcharid(2) ) goto L_not_owner;
  83. if ( $castle_claimed[7] ) goto L_claimed;
  84. if ( getguildmasterid( getcharid(2) ) != getcharid(0) ) goto L_not_gm;
  85. mes "receiving the reward for this castle";
  86. getitem 7539, 300;
  87. set $castle_claimed[7], 1;
  88. close;
  89. L_gefg_cas03:
  90. if ( getcastledata( "gefg_cas03", 1) != getcharid(2) ) goto L_not_owner;
  91. if ( $castle_claimed[8] ) goto L_claimed;
  92. if ( getguildmasterid( getcharid(2) ) != getcharid(0) ) goto L_not_gm;
  93. mes "receiving the reward for this castle";
  94. getitem 7539, 300;
  95. set $castle_claimed[8], 1;
  96. close;
  97. L_gefg_cas04:
  98. if ( getcastledata( "gefg_cas04", 1) != getcharid(2) ) goto L_not_owner;
  99. if ( $castle_claimed[9] ) goto L_claimed;
  100. if ( getguildmasterid( getcharid(2) ) != getcharid(0) ) goto L_not_gm;
  101. mes "receiving the reward for this castle";
  102. getitem 7539, 300;
  103. set $castle_claimed[9], 1;
  104. close;
  105. L_gefg_cas05:
  106. if ( getcastledata( "gefg_cas05", 1) != getcharid(2) ) goto L_not_owner;
  107. if ( $castle_claimed[10] ) goto L_claimed;
  108. if ( getguildmasterid( getcharid(2) ) != getcharid(0) ) goto L_not_gm;
  109. mes "receiving the reward for this castle";
  110. getitem 7539, 300;
  111. set $castle_claimed[10], 1;
  112. close;
  113.  
  114. L_payg_cas01:
  115. if ( getcastledata( "payg_cas01", 1) != getcharid(2) ) goto L_not_owner;
  116. if ( $castle_claimed[11] ) goto L_claimed;
  117. if ( getguildmasterid( getcharid(2) ) != getcharid(0) ) goto L_not_gm;
  118. mes "receiving the reward for this castle";
  119. getitem 7539, 300;
  120. set $castle_claimed[11], 1;
  121. close;
  122. L_payg_cas02:
  123. if ( getcastledata( "payg_cas02", 1) != getcharid(2) ) goto L_not_owner;
  124. if ( $castle_claimed[12] ) goto L_claimed;
  125. if ( getguildmasterid( getcharid(2) ) != getcharid(0) ) goto L_not_gm;
  126. mes "receiving the reward for this castle";
  127. getitem 7539, 300;
  128. set $castle_claimed[12], 1;
  129. close;
  130. L_payg_cas03:
  131. if ( getcastledata( "payg_cas03", 1) != getcharid(2) ) goto L_not_owner;
  132. if ( $castle_claimed[13] ) goto L_claimed;
  133. if ( getguildmasterid( getcharid(2) ) != getcharid(0) ) goto L_not_gm;
  134. mes "receiving the reward for this castle";
  135. getitem 7539, 300;
  136. set $castle_claimed[13], 1;
  137. close;
  138. L_payg_cas04:
  139. if ( getcastledata( "payg_cas04", 1) != getcharid(2) ) goto L_not_owner;
  140. if ( $castle_claimed[14] ) goto L_claimed;
  141. if ( getguildmasterid( getcharid(2) ) != getcharid(0) ) goto L_not_gm;
  142. mes "receiving the reward for this castle";
  143. getitem 7539, 300;
  144. set $castle_claimed[14], 1;
  145. close;
  146. L_payg_cas05:
  147. if ( getcastledata( "payg_cas05", 1) != getcharid(2) ) goto L_not_owner;
  148. if ( $castle_claimed[15] ) goto L_claimed;
  149. if ( getguildmasterid( getcharid(2) ) != getcharid(0) ) goto L_not_gm;
  150. mes "receiving the reward for this castle";
  151. getitem 7539, 300;
  152. set $castle_claimed[15], 1;
  153. close;
  154.  
  155. L_prtg_cas01:
  156. if ( getcastledata( "prtg_cas01", 1) != getcharid(2) ) goto L_not_owner;
  157. if ( $castle_claimed[16] ) goto L_claimed;
  158. if ( getguildmasterid( getcharid(2) ) != getcharid(0) ) goto L_not_gm;
  159. mes "[Emperium]";
  160. mes "receiving the reward for this castle";
  161. set zeny, zeny + 100000;
  162. getitem 674,2;
  163. set $castle_claimed[16], 1;
  164. close;
  165. L_prtg_cas02:
  166. if ( getcastledata( "prtg_cas02", 1) != getcharid(2) ) goto L_not_owner;
  167. if ( $castle_claimed[17] ) goto L_claimed;
  168. if ( getguildmasterid( getcharid(2) ) != getcharid(0) ) goto L_not_gm;
  169. mes "receiving the reward for this castle";
  170. set zeny, zeny + 100000;
  171. getitem 674, 2;
  172. set $castle_claimed[17], 1;
  173. close;
  174. L_prtg_cas03:
  175. if ( getcastledata( "prtg_cas03", 1) != getcharid(2) ) goto L_not_owner;
  176. if ( $castle_claimed[18] ) goto L_claimed;
  177. if ( getguildmasterid( getcharid(2) ) != getcharid(0) ) goto L_not_gm;
  178. mes "[Emperium]";
  179. mes "receiving the reward for this castle";
  180. set zeny, zeny + 100000;
  181. getitem 674,2;
  182. set $castle_claimed[18], 1;
  183. close;
  184. L_prtg_cas04:
  185. if ( getcastledata( "prtg_cas04", 1) != getcharid(2) ) goto L_not_owner;
  186. if ( $castle_claimed[19] ) goto L_claimed;
  187. if ( getguildmasterid( getcharid(2) ) != getcharid(0) ) goto L_not_gm;
  188. mes "receiving the reward for this castle";
  189. getitem 7539, 300;
  190. set $castle_claimed[19], 1;
  191. close;
  192. L_prtg_cas05:
  193. if ( getcastledata( "prtg_cas05", 1) != getcharid(2) ) goto L_not_owner;
  194. if ( $castle_claimed[20] ) goto L_claimed;
  195. if ( getguildmasterid( getcharid(2) ) != getcharid(0) ) goto L_not_gm;
  196. mes "receiving the reward for this castle";
  197. getitem 7539, 300;
  198. set $castle_claimed[20], 1;
  199. close;
  200.  
  201. L_woeon:
  202. mes "^000088[Emperium]^000000";
  203. mes "A war is currently in progress.";
  204. mes "If your guild owned a castle ask your guild master to see me to claim the reward.";
  205. close;
  206. L_not_owner:
  207. mes "^000088[Emperium]^000000";
  208. mes "Your guild failed to take this castle.";
  209. mes "If your guild owned a castle ask your guild master to claim reward from me.";
  210. close;
  211. L_claimed:
  212. mes "^000088[Emperium]^000000";
  213. mes "Your guild already received the reward for this castle.";
  214. close;
  215. L_not_gm:
  216. mes "^000088[Emperium]^000000";
  217. mes "Ask your guild master to see me.";
  218. close;
  219. OnAgitEnd:
  220. set $castle_claimed[1], 0; // everytime woe ends the variable resets
  221. set $castle_claimed[2], 0;
  222. set $castle_claimed[3], 0;
  223. set $castle_claimed[4], 0;
  224. set $castle_claimed[5], 0;
  225. set $castle_claimed[6], 0;
  226. set $castle_claimed[7], 0;
  227. set $castle_claimed[8], 0;
  228. set $castle_claimed[9], 0;
  229. set $castle_claimed[10], 0;
  230. set $castle_claimed[11], 0;
  231. set $castle_claimed[12], 0;
  232. set $castle_claimed[13], 0;
  233. set $castle_claimed[14], 0;
  234. set $castle_claimed[15], 0;
  235. set $castle_claimed[16], 0;
  236. set $castle_claimed[17], 0;
  237. set $castle_claimed[18], 0;
  238. set $castle_claimed[19], 0;
  239. set $castle_claimed[20], 0;
  240. end;
  241. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement