nguild_treas.txt 4.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117
  1. //===== eAthena Script =======================================
  2. //= War of Emperium Treasure Rooms for Al De Baran 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. nguild_alde.gat,1,1,1 script Treasure_N01 -1,{
  18. OnRecvCastleN01:
  19. if($boxNumN01 == 0) end;
  20. set $@bxN01, $boxNumN01;
  21. callfunc "F_GldTreas","nguild_alde","N01",$boxNumN01,$@bxN01,$@boxIdN01,1324,114,218,123,227,1;
  22. end;
  23. OnClock1200:
  24. callfunc "F_GldTreas","nguild_alde","N01",$boxNumN01,$@bxN01,$@boxIdN01,1324,114,218,123,227,0;
  25. end;
  26. OnDied:
  27. mapannounce "nguild_alde.gat","Treasure Chest Broken Open",17;
  28. set $boxNumN01, $boxNumN01 -1;
  29. if($boxNumN01 == 0) mapannounce "nguild_alde.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
  30. end;
  31. }
  32. // Treasure Room Switch --------------------
  33. nguild_alde.gat,123,223,0 script Switch#TresN01 111,{
  34. callfunc "F_GldTreasSw", "nguild_alde",218,176;
  35. end;
  36. }
  37. //<================================ Castle 2 ================================>\\
  38. // Treasure Spawn ----------------------------
  39. nguild_gef.gat,1,1,1 script Treasure_N02 -1,{
  40. OnRecvCastleN02:
  41. if($boxNumN02 == 0) end;
  42. set $@bxN02, $boxNumN02;
  43. callfunc "F_GldTreas","nguild_gef","N02",$boxNumN02,$@bxN02,$@boxIdN02,1334,150,108,158,114,1;
  44. end;
  45. OnClock1200:
  46. callfunc "F_GldTreas","nguild_gef","N02",$boxNumN02,$@bxN02,$@boxIdN02,1334,150,108,158,114,0;
  47. end;
  48. OnDied:
  49. mapannounce "nguild_gef.gat","Treasure Chest Broken Open",17;
  50. set $boxNumN02, $boxNumN02 -1;
  51. if($boxNumN02 == 0) mapannounce "nguild_gef.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
  52. end;
  53. }
  54. // Room Switch ---------------------------------------------------------
  55. nguild_gef.gat,152,117,0 script Switch#TresN02 111,{
  56. callfunc "F_GldTreasSw","nguild_gef",40,49;
  57. end;
  58. }
  59. //<================================ Castle 3 ================================>\\
  60. // Treasure Spawn ---------------------------
  61. nguild_pay.gat,1,1,0 script Treasure_N03 -1,{
  62. OnRecvCastleN03:
  63. if($boxNumN03 == 0) end;
  64. set $@bxN03, $boxNumN03;
  65. callfunc "F_GldTreas","nguild_pay","N03",$boxNumN03,$@bxN03,$@boxIdN03,1344,286,4,295,13,1;
  66. end;
  67. OnClock1200:
  68. callfunc "F_GldTreas","nguild_pay","N03",$boxNumN03,$@bxN03,$@boxIdN03,1344,286,4,295,13,0;
  69. end;
  70. OnDied:
  71. mapannounce "nguild_pay.gat","Treasure Chest Broken Open",17;
  72. set $boxNumN03, $boxNumN03 -1;
  73. if($boxNumN03 == 0) mapannounce "nguild_pay.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
  74. end;
  75. }
  76. // Treasure Room Switch ---------------------------------------------------
  77. nguild_pay.gat,295,8,0 script Switch#TresN03 111,{
  78. callfunc "F_GldTreasSw", "nguild_pay",120,59;
  79. end;
  80. }
  81. //<================================ Castle 4 ================================>\\
  82. // Treasure Spawn -------------------------------
  83. nguild_prt.gat,1,1,0 script Treasure_N04 -1,{
  84. OnRecvCastleN04:
  85. if($boxNumN04 == 0) end;
  86. set $@bxN04, $boxNumN04;
  87. callfunc "F_GldTreas","nguild_prt","N04",$boxNumN04,$@bxN04,$@boxIdN04,1354,6,204,15,213,1;
  88. end;
  89. OnClock1200:
  90. callfunc "F_GldTreas","nguild_prt","N04",$boxNumN04,$@bxN04,$@boxIdN04,1354,6,204,15,213,0;
  91. end;
  92. OnDied:
  93. mapannounce "nguild_prt.gat","Treasure Chest Broken Open",17;
  94. set $boxNumN04, $boxNumN04 -1;
  95. if($boxNumN04 == 0) mapannounce "nguild_prt.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
  96. end;
  97. }
  98. // Treasure Room Switch ----------------------------------------------------
  99. nguild_prt.gat,15,209,0 script Switch#TresN04 111,{
  100. callfunc "F_GldTreasSw", "nguild_prt",109,179;
  101. end;
  102. }