//===== eAthena Script ======================================= //= War of Emperium - payg_cas05 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_cas05 //===== Additional Comments: ================================= //= 1.1 by Akaru and ho|yAnge|X //============================================================ //================================================ // Exit Treasure Room Switch //================================================ payg_cas05.gat,161,136,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_cas05.gat",277,250; L2: close; } //================================================ // Treasure Spawning Script //================================================ payg_cas05.gat,156,131,0 script Treasure_C05 -1,{ OnClock1200: SetCastleData "payg_cas05.gat",4,0; SetCastleData "payg_cas05.gat",5,0; KillMonster "payg_cas05.gat","Treasure_C05::TreasureDied"; set $Economy14,GetCastleData("payg_cas05.gat",2); if ($Economy14 > 100) break; if (GetCastleData("payg_cas05.gat",1) == 0) break; set $boxnum14,GetCastleData("payg_cas05.gat",2)/5+4; goto TreasureCheck; TreasureCheck: if ($boxnum14 <= 0) break; set $boxid14,rand(4); goto TreasureSpawn; TreasureSpawn: if ($boxid14 > 2) goto TreasureSpawn2; areamonster "payg_cas05.gat",152,128,160,135,"Treasure Chest",1352,1,"Treasure_C05::TreasureDied"; set $boxnum14,$boxnum14-1; if ($boxnum14 <= 0) break; goto TreasureCheck; TreasureSpawn2: areamonster "payg_cas05.gat",152,128,160,135,"Treasure Chest",1353,1,"Treasure_C05::TreasureDied"; set $boxnum14,$boxnum14-1; if ($boxnum14 <= 0) break; goto TreasureCheck; TreasureDied: MapAnnounce "payg_cas05.gat","Treasure Chest Broken Open",17; break; }