gefg_treas.txt 4.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148
  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.gat,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.gat","Treasure Chest Broken Open",17;
  27. set $boxNumG01, $boxNumG01 -1;
  28. if($boxNumG01 == 0) mapannounce "gefg_cas01.gat", "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.gat,152,117,0 script Switch#TresG01 111,{
  33. callfunc "F_GldTreasSw","gefg_cas01",40,49;
  34. end;
  35. }
  36. //<================================ Castle 2 ================================>\\
  37. // Treasure Spawn ---------------------------------------------------------
  38. gefg_cas02.gat,1,1,1 script Treasure_G02 -1,{
  39. OnRecvCastleG02:
  40. end;
  41. OnInit:
  42. if($boxNumG02 == 0) end;
  43. set $@bxG02, $boxNumG02;
  44. callfunc "F_GldTreas","gefg_cas02","G02",$boxNumG02,$@bxG02,$@boxIdG02,1336,136,112,145,118,1;
  45. end;
  46. OnDied:
  47. mapannounce "gefg_cas02.gat","Treasure Chest Broken Open",17;
  48. set $boxNumG02, $boxNumG02 -1;
  49. if($boxNumG02 == 0) mapannounce "gefg_cas02.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
  50. end;
  51. }
  52. // Room Switch ---------------------------------------------------------
  53. gefg_cas02.gat,145,115,0 script Switch#TresG02 111,{
  54. callfunc "F_GldTreasSw", "gefg_cas02",12,67;
  55. }
  56. //<================================= Castle 3 ===============================>\\
  57. // Treasure Spawn ---------------------------------------------------------
  58. gefg_cas03.gat,1,1,1 script Treasure_G03 -1,{
  59. OnRecvCastleG03:
  60. end;
  61. OnInit:
  62. if($boxNumG03 == 0) end;
  63. set $@bxG03, $boxNumG03;
  64. callfunc "F_GldTreas","gefg_cas03","G03",$boxNumG03,$@bxG03,$@boxIdG03,1338,266,286,275,293,1;
  65. end;
  66. OnDied:
  67. mapannounce "gefg_cas03.gat","Treasure Chest Broken Open",17;
  68. set $boxNumG03, $boxNumG03 -1;
  69. if($boxNumG03 == 0) mapannounce "gefg_cas03.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
  70. end;
  71. }
  72. // Room Switch ---------------------------------------------------------
  73. gefg_cas03.gat,275,289,0 script Switch#TresG03 111,{
  74. callfunc "F_GldTreasSw", "gefg_cas03",106,24;
  75. end;
  76. }
  77. //<=============================== Castle 4 ================================>\\
  78. // Treasure Spawn ---------------------------------------------------------
  79. gefg_cas04.gat,1,1,1 script Treasure_G04 -1,{
  80. OnRecvCastleG04:
  81. end;
  82. OnInit:
  83. if($boxNumG04 == 0) end;
  84. set $@bxG04, $boxNumG04;
  85. callfunc "F_GldTreas","gefg_cas04","G04",$boxNumG04,$@bxG04,$@boxIdG04,1340,112,114,119,123,1;
  86. end;
  87. OnDied:
  88. mapannounce "gefg_cas04.gat","Treasure Chest Broken Open",17;
  89. set $boxNumG04, $boxNumG04 -1;
  90. if($boxNumG04 == 0) mapannounce "gefg_cas04.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
  91. end;
  92. }
  93. // Room Switch ---------------------------------------------------------
  94. gefg_cas04.gat,117,123,0 script Switch#TresG04 111,{
  95. callfunc "F_GldTreasSw", "gefg_cas04",73,47;
  96. end;
  97. }
  98. //<================================ Castle 5 ================================>\\
  99. // Treasure Spawn ---------------------------------------------------------
  100. gefg_cas05.gat,1,1,1 script Treasure_G05 -1,{
  101. OnRecvCastleG05:
  102. end;
  103. OnInit:
  104. if($boxNumG05 == 0) end;
  105. set $@bxG05, $boxNumG05;
  106. callfunc "F_GldTreas","gefg_cas05","G05",$boxNumG05,$@bxG05,$@boxIdG05,1342,140,106,147,113,1;
  107. end;
  108. OnDied:
  109. mapannounce "gefg_cas05.gat","Treasure Chest Broken Open",17;
  110. set $boxNumG05, $boxNumG05 -1;
  111. if($boxNumG05 == 0) mapannounce "gefg_cas05.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
  112. end;
  113. }
  114. // Room Switch ---------------------------------------------------------
  115. gefg_cas05.gat,149,107,0 script Switch#TresG05 111,{
  116. callfunc "F_GldTreasSw", "gefg_cas05",70,53;
  117. close;
  118. }