gefg_treas.txt 4.7 KB

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