//===== eAthena Script ======================================= //= War of Emperium Treasure Rooms for Payon Guild Castles //===== By: ================================================== //= jAthena - kalen (1.0) //= 1.1 by Akaru, ho|yAnge|X, and Valaris //===== Current Version: ===================================== //= 1.2 //===== Compatible With: ===================================== //= eAthena 0.1+; RO Episode 4+ //===== Description: ========================================= //= //===== Additional Comments: ================================= //= v1.2 Optimized with functions.[kobra_k88] //============================================================ //<================================ Castle 1 ================================>\\ // Treasure Spawn ---------------------------------------------------------- payg_cas01.gat,1,1,0 script Treasure_Py01 -1,{ OnRecvCastlePy01: if($boxNumPy01 == 0) end; set $@bxPy01, $boxNumPy01; callfunc "F_GldTreas","payg_cas01","Py01",$boxNumPy01,$@bxPy01,$@boxIdPy01,1344,286,4,295,13,1; end; OnClock1200: callfunc "F_GldTreas","payg_cas01","Py01",$boxNumPy01,$@bxPy01,$@boxIdPy01,1344,286,4,295,13,0; end; OnDied: mapannounce "payg_cas01.gat","Treasure Chest Broken Open",17; set $boxNumPy01, $boxNumPy01 -1; if($boxNumPy01 == 0) mapannounce "payg_cas01.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; end; } // Treasure Room Switch --------------------------------------------------- payg_cas01.gat,295,8,0 script Switch#TresPy01 111,{ callfunc "F_GldTreasSw", "payg_cas01",120,59; end; } //<================================ Castle 2 ================================>\\ // Treasure Spawn ---------------------------------------------------------- payg_cas02.gat,1,1,0 script Treasure_Py02 -1,{ OnRecvCastlePy02: if($boxNumPy02 == 0) end; set $@bxPy02, $boxNumPy02; callfunc "F_GldTreas","payg_cas02","Py02",$boxNumPy02,$@bxPy02,$@boxIdPy02,1346,140,140,148,149,1; end; OnClock1200: callfunc "F_GldTreas","payg_cas02","Py02",$boxNumPy02,$@bxPy02,$@boxIdPy02,1346,140,140,148,149,0; end; OnDied: mapannounce "payg_cas02.gat","Treasure Chest Broken Open",17; set $boxNumPy02, $boxNumPy02 -1; if($boxNumPy02 == 0) mapannounce "payg_cas02.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; end; } // Treasure Room Switch ---------------------------------------------------- payg_cas02.gat,149,148,0 script Switch#TresPy02 111,{ callfunc "F_GldTreasSw", "payg_cas02",22,261; end; } //<================================ Castle 3 ================================>\\ // Treasure Spawn ---------------------------------------------------------- payg_cas03.gat,158,168,0 script Treasure_Py03 -1,{ OnRecvCastlePy03: if($boxNumPy03 == 0) end; set $@bxPy03, $boxNumPy03; callfunc "F_GldTreas","payg_cas03","Py03",$boxNumPy03,$@bxPy03,$@boxIdPy03,1348,154,164,162,173,1; end; OnClock1200: callfunc "F_GldTreas","payg_cas03","Py03",$boxNumPy03,$@bxPy03,$@boxIdPy03,1348,154,164,162,173,0; end; OnDied: mapannounce "payg_cas03.gat","Treasure Chest Broken Open",17; set $boxNumPy03, $boxNumPy03 -1; if($boxNumPy03 == 0) mapannounce "payg_cas03.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; end; } // Treasure Room Switch ---------------------------------------------------- payg_cas03.gat,163,167,0 script Switch#TresPy03 111,{ callfunc "F_GldTreasSw", "payg_cas03",11,278; end; } //<================================ Castle 4 ================================>\\ // Treasure Spawn ---------------------------------------------------------- payg_cas04.gat,146,48,0 script Treasure_Py04 -1,{ OnRecvCastlePy04: if($boxNumPy04 == 0) end; set $@bxPy04, $boxNumPy04; callfunc "F_GldTreas","payg_cas04","Py04",$boxNumPy04,$@bxPy04,$@boxIdPy04,1350,142,44,151,51,1; end; OnClock1200: callfunc "F_GldTreas","payg_cas04","Py04",$boxNumPy04,$@bxPy04,$@boxIdPy04,1350,142,44,151,51,0; end; OnDied: mapannounce "payg_cas04.gat","Treasure Chest Broken Open",17; set $boxNumPy04, $boxNumPy04 -1; if($boxNumPy04 == 0) mapannounce "payg_cas04.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; end; } // Treasure Room Switch ---------------------------------------------------- payg_cas04.gat,151,47,0 script Switch#TresPy04 111,{ callfunc "F_GldTreasSw", "payg_cas04",38,285; end; } //<================================ Castle 5 ================================>\\ // Treasure Spawn ---------------------------------------------------------- payg_cas05.gat,156,131,0 script Treasure_Py05 -1,{ OnRecvCastlePy05: if($boxNumPy05 == 0) end; set $@bxPy05, $boxNumPy05; callfunc "F_GldTreas","payg_cas05","Py05",$boxNumPy05,$@bxPy05,$@boxIdPy05,1352,152,128,160,135,1; end; OnClock1200: callfunc "F_GldTreas","payg_cas05","Py05",$boxNumPy05,$@bxPy05,$@boxIdPy05,1352,152,128,160,135,0; end; OnDied: mapannounce "payg_cas05.gat","Treasure Chest Broken Open",17; set $boxNumPy05, $boxNumPy05 -1; if($boxNumPy05 == 0) mapannounce "payg_cas05.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; end; } // Treasure Room Switch ---------------------------------------------------- payg_cas05.gat,161,136,0 script Switch#TresPy05 111,{ callfunc "F_GldTreasSw", "payg_cas05",277,250; end; }