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 - aldeg_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 aldeg_cas04
|
|
//===== Additional Comments: =================================
|
|
//= 1.1 by Akaru and ho|yAnge|X
|
|
//============================================================
|
|
|
|
//================================================
|
|
// Exit Treasure Room Switch
|
|
//================================================
|
|
aldeg_cas04.gat,83,17,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 "aldeg_cas04.gat",67,117;
|
|
|
|
L2:
|
|
close;
|
|
}
|
|
|
|
//================================================
|
|
// Treasure Spawning Script
|
|
//================================================
|
|
aldeg_cas04.gat,85,12,0 script Treasure_A04 -1,{
|
|
OnClock1200:
|
|
SetCastleData "aldeg_cas04.gat",4,0;
|
|
SetCastleData "aldeg_cas04.gat",5,0;
|
|
KillMonster "aldeg_cas04.gat","Treasure_A04::TreasureDied";
|
|
set $Economy3,GetCastleData("aldeg_cas04.gat",2);
|
|
if ($Economy3 > 100) break;
|
|
if (GetCastleData("aldeg_cas04.gat",1) == 0) break;
|
|
set $boxnum3,GetCastleData("aldeg_cas04.gat",2)/5+4;
|
|
goto TreasureCheck;
|
|
|
|
TreasureCheck:
|
|
if ($boxnum3 <= 0) break;
|
|
set $boxid3,rand(4);
|
|
goto TreasureSpawn;
|
|
|
|
TreasureSpawn:
|
|
if ($boxid3 > 2) goto TreasureSpawn2;
|
|
areamonster "aldeg_cas04.gat",80,8,89,17,"Treasure Chest",1330,1,"Treasure_A04::TreasureDied";
|
|
set $boxnum3,$boxnum3-1;
|
|
if ($boxnum3 <= 0) break;
|
|
goto TreasureCheck;
|
|
|
|
TreasureSpawn2:
|
|
areamonster "aldeg_cas04.gat",80,8,89,17,"Treasure Chest",1331,1,"Treasure_A04::TreasureDied";
|
|
set $boxnum3,$boxnum3-1;
|
|
if ($boxnum3 <= 0) break;
|
|
goto TreasureCheck;
|
|
|
|
TreasureDied:
|
|
MapAnnounce "aldeg_cas04.gat","Treasure Chest Broken Open",17;
|
|
break;
|
|
}
|