payg_treas.txt 4.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130
  1. //===== eAthena Script =======================================
  2. //= War of Emperium Treasure Rooms for Payon 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. payg_cas01.gat,1,1,0 script Treasure_Py01 -1,{
  18. OnRecvCastlePy01:
  19. if($boxNumPy01 == 0) end;
  20. set $@bxPy01, $boxNumPy01;
  21. callfunc "F_GldTreas","payg_cas01","Py01",$boxNumPy01,$@bxPy01,$@boxIdPy01,1344,286,4,295,13,1;
  22. end;
  23. OnDied:
  24. mapannounce "payg_cas01.gat","Treasure Chest Broken Open",17;
  25. set $boxNumPy01, $boxNumPy01 -1;
  26. if($boxNumPy01 == 0) mapannounce "payg_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. // Treasure Room Switch ---------------------------------------------------
  30. payg_cas01.gat,295,8,0 script Switch#TresPy01 111,{
  31. callfunc "F_GldTreasSw", "payg_cas01",120,59;
  32. end;
  33. }
  34. //<================================ Castle 2 ================================>\\
  35. // Treasure Spawn ----------------------------------------------------------
  36. payg_cas02.gat,1,1,0 script Treasure_Py02 -1,{
  37. OnRecvCastlePy02:
  38. if($boxNumPy02 == 0) end;
  39. set $@bxPy02, $boxNumPy02;
  40. callfunc "F_GldTreas","payg_cas02","Py02",$boxNumPy02,$@bxPy02,$@boxIdPy02,1346,140,140,148,149,1;
  41. end;
  42. OnDied:
  43. mapannounce "payg_cas02.gat","Treasure Chest Broken Open",17;
  44. set $boxNumPy02, $boxNumPy02 -1;
  45. if($boxNumPy02 == 0) mapannounce "payg_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. // Treasure Room Switch ----------------------------------------------------
  49. payg_cas02.gat,149,148,0 script Switch#TresPy02 111,{
  50. callfunc "F_GldTreasSw", "payg_cas02",22,261;
  51. end;
  52. }
  53. //<================================ Castle 3 ================================>\\
  54. // Treasure Spawn ----------------------------------------------------------
  55. payg_cas03.gat,158,168,0 script Treasure_Py03 -1,{
  56. OnRecvCastlePy03:
  57. if($boxNumPy03 == 0) end;
  58. set $@bxPy03, $boxNumPy03;
  59. callfunc "F_GldTreas","payg_cas03","Py03",$boxNumPy03,$@bxPy03,$@boxIdPy03,1348,154,164,162,173,1;
  60. end;
  61. OnDied:
  62. mapannounce "payg_cas03.gat","Treasure Chest Broken Open",17;
  63. set $boxNumPy03, $boxNumPy03 -1;
  64. if($boxNumPy03 == 0) mapannounce "payg_cas03.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
  65. end;
  66. }
  67. // Treasure Room Switch ----------------------------------------------------
  68. payg_cas03.gat,163,167,0 script Switch#TresPy03 111,{
  69. callfunc "F_GldTreasSw", "payg_cas03",11,278;
  70. end;
  71. }
  72. //<================================ Castle 4 ================================>\\
  73. // Treasure Spawn ----------------------------------------------------------
  74. payg_cas04.gat,146,48,0 script Treasure_Py04 -1,{
  75. OnRecvCastlePy04:
  76. if($boxNumPy04 == 0) end;
  77. set $@bxPy04, $boxNumPy04;
  78. callfunc "F_GldTreas","payg_cas04","Py04",$boxNumPy04,$@bxPy04,$@boxIdPy04,1350,142,44,151,51,1;
  79. end;
  80. OnDied:
  81. mapannounce "payg_cas04.gat","Treasure Chest Broken Open",17;
  82. set $boxNumPy04, $boxNumPy04 -1;
  83. if($boxNumPy04 == 0) mapannounce "payg_cas04.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
  84. end;
  85. }
  86. // Treasure Room Switch ----------------------------------------------------
  87. payg_cas04.gat,151,47,0 script Switch#TresPy04 111,{
  88. callfunc "F_GldTreasSw", "payg_cas04",38,285;
  89. end;
  90. }
  91. //<================================ Castle 5 ================================>\\
  92. // Treasure Spawn ----------------------------------------------------------
  93. payg_cas05.gat,156,131,0 script Treasure_Py05 -1,{
  94. OnRecvCastlePy05:
  95. if($boxNumPy05 == 0) end;
  96. set $@bxPy05, $boxNumPy05;
  97. callfunc "F_GldTreas","payg_cas05","Py05",$boxNumPy05,$@bxPy05,$@boxIdPy05,1352,152,128,160,135,1;
  98. end;
  99. OnDied:
  100. mapannounce "payg_cas05.gat","Treasure Chest Broken Open",17;
  101. set $boxNumPy05, $boxNumPy05 -1;
  102. if($boxNumPy05 == 0) mapannounce "payg_cas05.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
  103. end;
  104. }
  105. // Treasure Room Switch ----------------------------------------------------
  106. payg_cas05.gat,161,136,0 script Switch#TresPy05 111,{
  107. callfunc "F_GldTreasSw", "payg_cas05",277,250;
  108. end;
  109. }