//===== eAthena Script ======================================= //= War of Emperium - payg_cas03 Treasure Room Script //===== By: ================================================== //= holyAngelX (1.0) //===== Current Version: ===================================== //= 1.1 //===== Compatible With: ===================================== //= eAthena 0.1+; RO Episode 4+ //===== Description: ========================================= //= Treasure Room Script in payg_cas03 //===== Additional Comments: ================================= //= 1.1 by Akaru and ho|yAnge|X //============================================================ //================================================ // Exit Treasure Room Switch //================================================ payg_cas03.gat,163,167,0 script Switch 111,{ mes " "; mes "There is little switch over here"; mes "Would you like to pull the switch down?"; next; menu "Yes",L1,"No",L2; L1: warp "payg_cas03.gat",50,261; L2: close; } //================================================ // Treasure Spawning Script //================================================ payg_cas03.gat,158,168,0 script Treasure_C03 -1,{ OnClock1200: SetCastleData "payg_cas03.gat",4,0; SetCastleData "payg_cas03.gat",5,0; KillMonster "payg_cas03.gat","Treasure_C03::TreasureDied"; set $Economy12,GetCastleData("payg_cas03.gat",2); if ($Economy12 > 100) break; if (GetCastleData("payg_cas03.gat",1) == 0) break; set $boxnum12,GetCastleData("payg_cas03.gat",2)/5+4; goto TreasureCheck; TreasureCheck: if ($boxnum12 <= 0) break; set $boxid12,rand(4); goto TreasureSpawn; TreasureSpawn: if ($boxid12 > 2) goto TreasureSpawn2; areamonster "payg_cas03.gat",154,164,162,173,"Treasure Chest",1348,1,"Treasure_C03::TreasureDied"; set $boxnum12,$boxnum12-1; if ($boxnum12 <= 0) break; goto TreasureCheck; TreasureSpawn2: areamonster "payg_cas03.gat",154,164,162,173,"Treasure Chest",1349,1,"Treasure_C03::TreasureDied"; set $boxnum12,$boxnum12-1; if ($boxnum12 <= 0) break; goto TreasureCheck; TreasureDied: MapAnnounce "payg_cas03.gat","Treasure Chest Broken Open",17; break; }