gefg_treas.txt 5.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179
  1. //===== eAthena Script =======================================
  2. //= War of Emperium Treasure Rooms for Geffen Guild Castles
  3. //===== By: ==================================================
  4. //= jAthena - kalen (1.0)
  5. //= 1.1 by Akaru, ho|yAnge|X, and Valaris
  6. //===== Current Version: =====================================
  7. //= 1.3
  8. //===== Compatible With: =====================================
  9. //= eAthena 0.1+; RO Episode 4+
  10. //===== Description: =========================================
  11. //=
  12. //===== Additional Comments: =================================
  13. //= v1.2 Optimized with functions.[kobra_k88]
  14. //============================================================
  15. //<============================ Castle 1 ==================================>\\
  16. // Treasure Spawn ---------------------------------------------------------
  17. gefg_cas01,1,1,1 script Treasure_G01 -1,{
  18. OnRecvCastleG01:
  19. end;
  20. OnInit:
  21. if($boxNumG01 == 0) end;
  22. set $@bxG01, $boxNumG01;
  23. callfunc "F_GldTreas","gefg_cas01","G01",$boxNumG01,$@bxG01,$@boxIdG01,1334,150,108,158,114,1;
  24. end;
  25. OnDied:
  26. mapannounce "gefg_cas01","Treasure Chest Broken Open",17;
  27. set $boxNumG01, $boxNumG01 -1;
  28. if($boxNumG01 == 0) mapannounce "gefg_cas01", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
  29. end;
  30. }
  31. // Room Switch ---------------------------------------------------------
  32. gefg_cas01,152,117,0 script Switch#TresG01 111,{
  33. callfunc "F_GldTreasSw","gefg_cas01",40,49;
  34. end;
  35. }
  36. // Treasure Room Protection ------------------------------------------------
  37. gefg_cas01,154,112,0 script ban_warp#16 -1,6,6,{
  38. OnTouch:
  39. callfunc "F_TreasProtect", "gefg_cas01", "geffen",120,38;
  40. end;
  41. }
  42. //<================================ Castle 2 ================================>\\
  43. // Treasure Spawn ---------------------------------------------------------
  44. gefg_cas02,1,1,1 script Treasure_G02 -1,{
  45. OnRecvCastleG02:
  46. end;
  47. OnInit:
  48. if($boxNumG02 == 0) end;
  49. set $@bxG02, $boxNumG02;
  50. callfunc "F_GldTreas","gefg_cas02","G02",$boxNumG02,$@bxG02,$@boxIdG02,1336,136,112,145,118,1;
  51. end;
  52. OnDied:
  53. mapannounce "gefg_cas02","Treasure Chest Broken Open",17;
  54. set $boxNumG02, $boxNumG02 -1;
  55. if($boxNumG02 == 0) mapannounce "gefg_cas02", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
  56. end;
  57. }
  58. // Room Switch ---------------------------------------------------------
  59. gefg_cas02,145,115,0 script Switch#TresG02 111,{
  60. callfunc "F_GldTreasSw", "gefg_cas02",12,67;
  61. }
  62. // Treasure Room Protection ------------------------------------------------
  63. gefg_cas02,140,116,0 script ban_warp#17 -1,6,6,{
  64. OnTouch:
  65. callfunc "F_TreasProtect", "gefg_cas02", "geffen",120,38;
  66. end;
  67. }
  68. //<================================= Castle 3 ===============================>\\
  69. // Treasure Spawn ---------------------------------------------------------
  70. gefg_cas03,1,1,1 script Treasure_G03 -1,{
  71. OnRecvCastleG03:
  72. end;
  73. OnInit:
  74. if($boxNumG03 == 0) end;
  75. set $@bxG03, $boxNumG03;
  76. callfunc "F_GldTreas","gefg_cas03","G03",$boxNumG03,$@bxG03,$@boxIdG03,1338,266,286,275,293,1;
  77. end;
  78. OnDied:
  79. mapannounce "gefg_cas03","Treasure Chest Broken Open",17;
  80. set $boxNumG03, $boxNumG03 -1;
  81. if($boxNumG03 == 0) mapannounce "gefg_cas03", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
  82. end;
  83. }
  84. // Room Switch ---------------------------------------------------------
  85. gefg_cas03,275,289,0 script Switch#TresG03 111,{
  86. callfunc "F_GldTreasSw", "gefg_cas03",106,24;
  87. end;
  88. }
  89. // Treasure Room Protection ------------------------------------------------
  90. gefg_cas03,271,290,0 script ban_warp#18 -1,6,6,{
  91. OnTouch:
  92. callfunc "F_TreasProtect", "gefg_cas03", "geffen",120,38;
  93. end;
  94. }
  95. //<=============================== Castle 4 ================================>\\
  96. // Treasure Spawn ---------------------------------------------------------
  97. gefg_cas04,1,1,1 script Treasure_G04 -1,{
  98. OnRecvCastleG04:
  99. end;
  100. OnInit:
  101. if($boxNumG04 == 0) end;
  102. set $@bxG04, $boxNumG04;
  103. callfunc "F_GldTreas","gefg_cas04","G04",$boxNumG04,$@bxG04,$@boxIdG04,1340,112,114,119,123,1;
  104. end;
  105. OnDied:
  106. mapannounce "gefg_cas04","Treasure Chest Broken Open",17;
  107. set $boxNumG04, $boxNumG04 -1;
  108. if($boxNumG04 == 0) mapannounce "gefg_cas04", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
  109. end;
  110. }
  111. // Room Switch ---------------------------------------------------------
  112. gefg_cas04,117,123,0 script Switch#TresG04 111,{
  113. callfunc "F_GldTreasSw", "gefg_cas04",73,47;
  114. end;
  115. }
  116. // Treasure Room Protection ------------------------------------------------
  117. gefg_cas04,116,119,0 script ban_warp#19 -1,6,6,{
  118. OnTouch:
  119. callfunc "F_TreasProtect", "gefg_cas04", "geffen",120,38;
  120. end;
  121. }
  122. //<================================ Castle 5 ================================>\\
  123. // Treasure Spawn ---------------------------------------------------------
  124. gefg_cas05,1,1,1 script Treasure_G05 -1,{
  125. OnRecvCastleG05:
  126. end;
  127. OnInit:
  128. if($boxNumG05 == 0) end;
  129. set $@bxG05, $boxNumG05;
  130. callfunc "F_GldTreas","gefg_cas05","G05",$boxNumG05,$@bxG05,$@boxIdG05,1342,140,106,147,113,1;
  131. end;
  132. OnDied:
  133. mapannounce "gefg_cas05","Treasure Chest Broken Open",17;
  134. set $boxNumG05, $boxNumG05 -1;
  135. if($boxNumG05 == 0) mapannounce "gefg_cas05", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
  136. end;
  137. }
  138. // Room Switch ---------------------------------------------------------
  139. gefg_cas05,149,107,0 script Switch#TresG05 111,{
  140. callfunc "F_GldTreasSw", "gefg_cas05",70,53;
  141. close;
  142. }
  143. // Treasure Room Protection ------------------------------------------------
  144. gefg_cas05,144,110,0 script ban_warp#20 -1,6,6,{
  145. OnTouch:
  146. callfunc "F_TreasProtect", "gefg_cas05", "geffen",120,38;
  147. end;
  148. }