d479e29aee
git-svn-id: https://svn.code.sf.net/p/rathena/svn/athena@172 54d463be-8e91-2dee-dedb-b68131a5f0ec
73 lines
2.2 KiB
Plaintext
73 lines
2.2 KiB
Plaintext
//===== eAthena Script =======================================
|
|
//= War of Emperium - prtg_cas01 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_cas01
|
|
//===== Additional Comments: =================================
|
|
//= 1.1 by Akaru and ho|yAnge|X
|
|
//============================================================
|
|
|
|
//================================================
|
|
// Exit Treasure Room Switch
|
|
//================================================
|
|
prtg_cas01.gat,15,209,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_cas01.gat",112,183;
|
|
|
|
L2:
|
|
close;
|
|
}
|
|
|
|
//================================================
|
|
// Treasure Spawning Script
|
|
//================================================
|
|
prtg_cas01.gat,11,208,0 script Treasure_D01 -1,{
|
|
OnClock1200:
|
|
SetCastleData "prtg_cas01.gat",4,0;
|
|
SetCastleData "prtg_cas01.gat",5,0;
|
|
KillMonster "prtg_cas01.gat","Treasure_D01::TreasureDied";
|
|
set $Economy15,GetCastleData("prtg_cas01.gat",2);
|
|
if ($Economy15 > 100) break;
|
|
if (GetCastleData("prtg_cas01.gat",1) == 0) break;
|
|
set $boxnum15,GetCastleData("prtg_cas01.gat",2)/5+4;
|
|
goto TreasureCheck;
|
|
|
|
TreasureCheck:
|
|
if ($boxnum15 <= 0) break;
|
|
set $boxid15,rand(4);
|
|
goto TreasureSpawn;
|
|
|
|
TreasureSpawn:
|
|
if ($boxid15 > 2) goto TreasureSpawn2;
|
|
areamonster "prtg_cas01.gat",6,204,15,213,"Treasure Chest",1354,1,"Treasure_D01::TreasureDied";
|
|
set $boxnum15,$boxnum15-1;
|
|
if ($boxnum15 <= 0) break;
|
|
goto TreasureCheck;
|
|
|
|
TreasureSpawn2:
|
|
areamonster "prtg_cas01.gat",6,204,15,213,"Treasure Chest",1355,1,"Treasure_D01::TreasureDied";
|
|
set $boxnum15,$boxnum15-1;
|
|
if ($boxnum15 <= 0) break;
|
|
goto TreasureCheck;
|
|
|
|
TreasureDied:
|
|
MapAnnounce "prtg_cas01.gat","Treasure Chest Broken Open",17;
|
|
break;
|
|
|
|
Rehash:
|
|
set $boxid15,1324;
|
|
areamonster "prtg_cas01.gat",6,204,15,213,"Treasure Chest",$boxid15,$boxnum15,"Treasure_D01::TreasureDied";
|
|
break;
|
|
}
|