
git-svn-id: https://svn.code.sf.net/p/rathena/svn/athena@172 54d463be-8e91-2dee-dedb-b68131a5f0ec
67 lines
2.1 KiB
Plaintext
67 lines
2.1 KiB
Plaintext
//===== eAthena Script =======================================
|
|
//= War of Emperium - prtg_cas04 Treasure Room Script
|
|
//===== By: ==================================================
|
|
//= holyAngelX (1.0)
|
|
//===== Current Version: =====================================
|
|
//= 1.1
|
|
//===== Compatible With: =====================================
|
|
//= eAthena 0.1+; RO Episode 4+
|
|
//===== Description: =========================================
|
|
//= Treasure Room Script in prtg_cas04
|
|
//===== Additional Comments: =================================
|
|
//= 1.1 by Akaru and ho|yAnge|X
|
|
//============================================================
|
|
|
|
//================================================
|
|
// Exit Treasure Room Switch
|
|
//================================================
|
|
prtg_cas04.gat,275,160,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 "prtg_cas04.gat",259,265;
|
|
|
|
L2:
|
|
close;
|
|
}
|
|
|
|
//================================================
|
|
// Treasure Spawning Script
|
|
//================================================
|
|
prtg_cas04.gat,271,162,0 script Treasure_D04 -1,{
|
|
OnClock1200:
|
|
SetCastleData "prtg_cas04.gat",4,0;
|
|
SetCastleData "prtg_cas04.gat",5,0;
|
|
KillMonster "prtg_cas04.gat","Treasure_D04::TreasureDied";
|
|
set $Economy18,GetCastleData("prtg_cas04.gat",2);
|
|
if ($Economy18 > 100) break;
|
|
if (GetCastleData("prtg_cas04.gat",1) == 0) break;
|
|
set $boxnum18,GetCastleData("prtg_cas04.gat",2)/5+4;
|
|
goto TreasureCheck;
|
|
|
|
TreasureCheck:
|
|
if ($boxnum18 <= 0) break;
|
|
set $boxid18,rand(4);
|
|
goto TreasureSpawn;
|
|
|
|
TreasureSpawn:
|
|
if ($boxid18 > 2) goto TreasureSpawn2;
|
|
areamonster "prtg_cas04.gat",266,158,275,167,"Treasure Chest",1360,1,"Treasure_D04::TreasureDied";
|
|
set $boxnum18,$boxnum18-1;
|
|
if ($boxnum18 <= 0) break;
|
|
goto TreasureCheck;
|
|
|
|
TreasureSpawn2:
|
|
areamonster "prtg_cas04.gat",266,158,275,167,"Treasure Chest",1361,1,"Treasure_D04::TreasureDied";
|
|
set $boxnum18,$boxnum18-1;
|
|
if ($boxnum18 <= 0) break;
|
|
goto TreasureCheck;
|
|
|
|
TreasureDied:
|
|
MapAnnounce "prtg_cas04.gat","Treasure Chest Broken Open",17;
|
|
break;
|
|
} |