d479e29aee
git-svn-id: https://svn.code.sf.net/p/rathena/svn/athena@172 54d463be-8e91-2dee-dedb-b68131a5f0ec
68 lines
2.1 KiB
Plaintext
68 lines
2.1 KiB
Plaintext
//===== eAthena Script =======================================
|
|
//= War of Emperium - payg_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 payg_cas01
|
|
//===== Additional Comments: =================================
|
|
//= 1.1 by Akaru and ho|yAnge|X
|
|
//============================================================
|
|
|
|
//================================================
|
|
// Exit Treasure Room Switch
|
|
//================================================
|
|
payg_cas01.gat,295,8,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_cas01.gat",120,59;
|
|
|
|
L2:
|
|
close;
|
|
}
|
|
|
|
//================================================
|
|
// Treasure Spawning Script
|
|
//================================================
|
|
payg_cas01.gat,290,7,0 script Treasure_C01 -1,{
|
|
OnClock1200:
|
|
SetCastleData "payg_cas01.gat",4,0;
|
|
SetCastleData "payg_cas01.gat",5,0;
|
|
KillMonster "payg_cas01.gat","Treasure_C01::TreasureDied";
|
|
set $Economy10,GetCastleData("payg_cas01.gat",2);
|
|
if ($Economy10 > 100) break;
|
|
if (GetCastleData("payg_cas01.gat",1) == 0) break;
|
|
set $boxnum10,GetCastleData("payg_cas01.gat",2)/5+4;
|
|
goto TreasureCheck;
|
|
|
|
TreasureCheck:
|
|
if ($boxnum10 <= 0) break;
|
|
set $boxid10,rand(4);
|
|
goto TreasureSpawn;
|
|
|
|
TreasureSpawn:
|
|
if ($boxid10 > 2) goto TreasureSpawn2;
|
|
areamonster "payg_cas01.gat",286,4,295,13,"Treasure Chest",1344,1,"Treasure_C01::TreasureDied";
|
|
set $boxnum10,$boxnum10-1;
|
|
if ($boxnum10 <= 0) break;
|
|
goto TreasureCheck;
|
|
|
|
TreasureSpawn2:
|
|
areamonster "payg_cas01.gat",286,4,295,13,"Treasure Chest",1345,1,"Treasure_C01::TreasureDied";
|
|
set $boxnum10,$boxnum10-1;
|
|
if ($boxnum10 <= 0) break;
|
|
goto TreasureCheck;
|
|
|
|
TreasureDied:
|
|
MapAnnounce "payg_cas01.gat","Treasure Chest Broken Open",17;
|
|
break;
|
|
}
|