summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorL0ne_W0lf <L0ne_W0lf@54d463be-8e91-2dee-dedb-b68131a5f0ec>2009-03-03 06:01:21 +0000
committerL0ne_W0lf <L0ne_W0lf@54d463be-8e91-2dee-dedb-b68131a5f0ec>2009-03-03 06:01:21 +0000
commit9606310c0fd523f9de934760efb913ac66d4153f (patch)
tree509c1c2ceeba081f7e9392c87cb4bc27dae53234
parentdcb944663cfdf8dc428ca864887c7b0b76cc3e9e (diff)
downloadhercules-9606310c0fd523f9de934760efb913ac66d4153f.tar.gz
hercules-9606310c0fd523f9de934760efb913ac66d4153f.tar.bz2
hercules-9606310c0fd523f9de934760efb913ac66d4153f.tar.xz
hercules-9606310c0fd523f9de934760efb913ac66d4153f.zip
* Applied the updated eco/def investment system to Juno WoESE castles.
git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@13561 54d463be-8e91-2dee-dedb-b68131a5f0ec
-rw-r--r--npc/Changelog.txt1
-rw-r--r--npc/guild2/schg_cas01.txt86
-rw-r--r--npc/guild2/schg_cas02.txt83
-rw-r--r--npc/guild2/schg_cas03.txt86
-rw-r--r--npc/guild2/schg_cas04.txt86
-rw-r--r--npc/guild2/schg_cas05.txt86
6 files changed, 301 insertions, 127 deletions
diff --git a/npc/Changelog.txt b/npc/Changelog.txt
index 981be65bc..fa78ff49a 100644
--- a/npc/Changelog.txt
+++ b/npc/Changelog.txt
@@ -1,6 +1,7 @@
Date Added
======
2009/03/03
+ * Rev. 13561 Applied the updated eco/def investment system to Juno WoESE castles. [L0ne_W0lf]
* Rev. 13560 Applied the updated eco/def investment system to Rachel WoESE castles, Juno's next. [L0ne_W0lf]
* Corrected the conditions in the if block that I goofed up, in agit_template.
2009/03/02
diff --git a/npc/guild2/schg_cas01.txt b/npc/guild2/schg_cas01.txt
index 2e51999cc..0b1f18b86 100644
--- a/npc/guild2/schg_cas01.txt
+++ b/npc/guild2/schg_cas01.txt
@@ -3,7 +3,7 @@
//===== By: ==================================================
//= L0ne_W0lf
//===== Current Version: =====================================
-//= 1.8
+//= 1.9
//===== Compatible With: =====================================
//= eAthena SVN
//===== Description: =========================================
@@ -21,6 +21,7 @@
//= 1.6 Corrected a typo with treasure spawning. [L0ne_W0lf]
//= 1.7 Replaced effect numerics with constants. [L0ne_W0lf]
//= 1.8 Corrected wrong treasure spawn position. [zapbomb]
+//= 1.9 Applied updated eco/def systems. [L0ne_W0lf]
//============================================================
schg_cas01,1,1,0 script Manager#sch01_02 111,{
@@ -109,9 +110,6 @@ OnClock0001:
if (!GetCastleData("schg_cas01",1)) end;
killmonster "schg_cas01","Manager#sch01_02::OnTreasureDied";
- setcastledata "schg_cas01",4,0;
- setcastledata "schg_cas01",5,0;
-
set .@Treasure,GetCastleData("schg_cas01",2)/5+4;
if (.@Treasure) {
monster "schg_cas01",388,388,"Treasure Chest",1938,1,"Manager#sch01_02::OnTreasureDied";
@@ -159,6 +157,16 @@ OnClock0001:
if (.@Treasure < 24) end;
monster "schg_cas01",386,386,"Treasure Chest",1324,1,"Manager#sch01_02::OnTreasureDied";
}
+ if (GetCastleData("schg_cas01",4)) {
+ set .@Economy,GetCastleData("schg_cas01",2);
+ SetCastleData "schg_cas01",2,.@Economy + GetCastleData("schg_cas01",4) + (.@Economy<99 && rand(2) && getgdskilllv(.@GID,10014));
+ setcastledata "schg_cas01",4,0;
+ }
+ if (GetCastleData("schg_cas01",5)) {
+ set .@Defence,GetCastleData("schg_cas01",3);
+ SetCastleData "schg_cas01",3,.@Defence + GetCastleData("schg_cas01",5);
+ setcastledata "schg_cas01",5,0;
+ }
end;
OnTreasureDied:
@@ -2309,16 +2317,30 @@ schg_cas01,247,305,3 script Steward#sch01 55,{
close;
case 2:
set .@Economy,GetCastleData("schg_cas01",2);
- if(.@Economy < 8) set .@eco_invest,10000;
- if(.@Economy >= 8) set .@eco_invest,20000;
- if(.@Economy >= 16) set .@eco_invest,40000;
- if(.@Economy >= 25) set .@eco_invest,80000;
- if(.@Economy >= 34) set .@eco_invest,160000;
- if(.@Economy >= 44) set .@eco_invest,320000;
- if(.@Economy >= 54) set .@eco_invest,640000;
- if(.@Economy >= 65) set .@eco_invest,1280000;
- if(.@Economy >= 76) set .@eco_invest,2560000;
- if(.@Economy >= 88) set .@eco_invest,5120000;
+ if (.@Economy < 6) { set .@eco_invest,5000; }
+ else if ((.@Economy >= 6) && (.@Economy <= 10)) { set .@eco_invest,10000; }
+ else if ((.@Economy >= 11) && (.@Economy <= 15)) { set .@eco_invest,20000; }
+ else if ((.@Economy >= 16) && (.@Economy <= 20)) { set .@eco_invest,35000; }
+ else if ((.@Economy >= 21) && (.@Economy <= 25)) { set .@eco_invest,55000; }
+ else if ((.@Economy >= 26) && (.@Economy <= 30)) { set .@eco_invest,80000; }
+ else if ((.@Economy >= 31) && (.@Economy <= 35)) { set .@eco_invest,110000; }
+ else if ((.@Economy >= 36) && (.@Economy <= 40)) { set .@eco_invest,145000; }
+ else if ((.@Economy >= 41) && (.@Economy <= 45)) { set .@eco_invest,185000; }
+ else if ((.@Economy >= 46) && (.@Economy <= 50)) { set .@eco_invest,230000; }
+ else if ((.@Economy >= 51) && (.@Economy <= 55)) { set .@eco_invest,280000; }
+ else if ((.@Economy >= 56) && (.@Economy <= 60)) { set .@eco_invest,335000; }
+ else if ((.@Economy >= 61) && (.@Economy <= 65)) { set .@eco_invest,395000; }
+ else if ((.@Economy >= 66) && (.@Economy <= 70)) { set .@eco_invest,460000; }
+ else if ((.@Economy >= 71) && (.@Economy <= 75)) { set .@eco_invest,530000; }
+ else if ((.@Economy >= 76) && (.@Economy <= 80)) { set .@eco_invest,605000; }
+ else if ((.@Economy >= 81) && (.@Economy <= 85)) { set .@eco_invest,685000; }
+ else if ((.@Economy >= 86) && (.@Economy <= 90)) { set .@eco_invest,770000; }
+ else if ((.@Economy >= 91) && (.@Economy <= 95)) { set .@eco_invest,860000; }
+ else if ((.@Economy >= 96) && (.@Economy <= 100)) { set .@eco_invest,955000; }
+ //Quadruple the cost of investing if you've already invested once.
+ if (GetCastleData("schg_cas01",4)) {
+ set .@eco_invest,.@eco_invest*4;
+ }
mes "[ Steward ]";
mes "Raising the stronghold's";
mes "commercial growth will";
@@ -2380,7 +2402,6 @@ schg_cas01,247,305,3 script Steward#sch01 55,{
}
set zeny,zeny-.@eco_invest;
SetCastleData "schg_cas01",4,GetCastleData("schg_cas01",4)+1;
- SetCastleData "schg_cas01",2,.@Economy + 1 + (.@Economy<99 && rand(2) && getgdskilllv(.@GID,10014));
mes "[ Steward ]";
mes "A wise use of the guild's";
mes "funds, Master. We can expect";
@@ -2394,16 +2415,30 @@ schg_cas01,247,305,3 script Steward#sch01 55,{
}
case 3:
set .@Defence,GetCastleData("schg_cas01",3);
- if(.@Defence < 8) set .@def_invest,20000;
- if(.@Defence >= 8) set .@def_invest,40000;
- if(.@Defence >= 16) set .@def_invest,80000;
- if(.@Defence >= 25) set .@def_invest,160000;
- if(.@Defence >= 34) set .@def_invest,320000;
- if(.@Defence >= 44) set .@def_invest,640000;
- if(.@Defence >= 54) set .@def_invest,1280000;
- if(.@Defence >= 65) set .@def_invest,2560000;
- if(.@Defence >= 76) set .@def_invest,5120000;
- if(.@Defence >= 88) set .@def_invest,10240000;
+ if (.@Defence < 6) { set .@def_invest,10000; }
+ else if ((.@Defence >= 6) && (.@Defence <= 10)) { set .@def_invest,20000; }
+ else if ((.@Defence >= 11) && (.@Defence <= 15)) { set .@def_invest,40000; }
+ else if ((.@Defence >= 16) && (.@Defence <= 20)) { set .@def_invest,70000; }
+ else if ((.@Defence >= 21) && (.@Defence <= 25)) { set .@def_invest,110000; }
+ else if ((.@Defence >= 26) && (.@Defence <= 30)) { set .@def_invest,160000; }
+ else if ((.@Defence >= 31) && (.@Defence <= 35)) { set .@def_invest,220000; }
+ else if ((.@Defence >= 36) && (.@Defence <= 40)) { set .@def_invest,290000; }
+ else if ((.@Defence >= 41) && (.@Defence <= 45)) { set .@def_invest,370000; }
+ else if ((.@Defence >= 46) && (.@Defence <= 50)) { set .@def_invest,460000; }
+ else if ((.@Defence >= 51) && (.@Defence <= 55)) { set .@def_invest,560000; }
+ else if ((.@Defence >= 56) && (.@Defence <= 60)) { set .@def_invest,670000; }
+ else if ((.@Defence >= 61) && (.@Defence <= 65)) { set .@def_invest,790000; }
+ else if ((.@Defence >= 66) && (.@Defence <= 70)) { set .@def_invest,920000; }
+ else if ((.@Defence >= 71) && (.@Defence <= 75)) { set .@def_invest,1060000; }
+ else if ((.@Defence >= 76) && (.@Defence <= 80)) { set .@def_invest,1210000; }
+ else if ((.@Defence >= 81) && (.@Defence <= 85)) { set .@def_invest,1370000; }
+ else if ((.@Defence >= 86) && (.@Defence <= 90)) { set .@def_invest,1540000; }
+ else if ((.@Defence >= 91) && (.@Defence <= 95)) { set .@def_invest,1720000; }
+ else if ((.@Defence >= 96) && (.@Defence <= 100)) { set .@def_invest,1910000; }
+ //Quadruple the cost of investing if you've already invested once.
+ if (GetCastleData("schg_cas01",5)) {
+ set .@def_invest,.@def_invest*4;
+ }
mes "[ Steward ]";
mes "Investing in our stronghold's";
mes "defense will enhance the";
@@ -2459,7 +2494,6 @@ schg_cas01,247,305,3 script Steward#sch01 55,{
}
set zeny,zeny-.@def_invest;
SetCastleData "schg_cas01",5,GetCastleData("schg_cas01",5)+1;
- SetCastleData "schg_cas01",3,.@Defence+1;
mes "[ Steward ]";
mes "A wise use of the guild's";
mes "funds, Master. Increasing";
diff --git a/npc/guild2/schg_cas02.txt b/npc/guild2/schg_cas02.txt
index 6c1bff09e..979e78414 100644
--- a/npc/guild2/schg_cas02.txt
+++ b/npc/guild2/schg_cas02.txt
@@ -3,7 +3,7 @@
//===== By: ==================================================
//= L0ne_W0lf
//===== Current Version: =====================================
-//= 1.9
+//= 2.0
//===== Compatible With: =====================================
//= eAthena SVN
//===== Description: =========================================
@@ -22,6 +22,7 @@
//= Treasure will now be killed before spawning.
//= 1.8 Fixed error with control devices. [L0ne_W0lf]
//= 1.9 Replaced effect numerics with constants. [L0ne_W0lf]
+//= 2.0 Applied updated eco/def systems. [L0ne_W0lf]
//============================================================
schg_cas02,1,1,0 script Manager#sch02_02 111,{
@@ -160,6 +161,16 @@ OnClock0001:
if (.@Treasure < 24) end;
monster "schg_cas02",253,370,"Treasure Chest",1324,1,"Manager#sch02_02::OnTreasureDied";
}
+ if (GetCastleData("schg_cas02",4)) {
+ set .@Economy,GetCastleData("schg_cas02",2);
+ SetCastleData "schg_cas02",2,.@Economy + GetCastleData("schg_cas02",4) + (.@Economy<99 && rand(2) && getgdskilllv(.@GID,10014));
+ setcastledata "schg_cas02",4,0;
+ }
+ if (GetCastleData("schg_cas02",5)) {
+ set .@Defence,GetCastleData("schg_cas02",3);
+ SetCastleData "schg_cas02",3,.@Defence + GetCastleData("schg_cas02",5);
+ setcastledata "schg_cas02",5,0;
+ }
end;
OnTreasureDied:
@@ -2242,16 +2253,30 @@ schg_cas02,105,378,3 script Steward#sch02 55,{
close;
case 2:
set .@Economy,GetCastleData("schg_cas02",2);
- if(.@Economy < 8) set .@eco_invest,10000;
- if(.@Economy >= 8) set .@eco_invest,20000;
- if(.@Economy >= 16) set .@eco_invest,40000;
- if(.@Economy >= 25) set .@eco_invest,80000;
- if(.@Economy >= 34) set .@eco_invest,160000;
- if(.@Economy >= 44) set .@eco_invest,320000;
- if(.@Economy >= 54) set .@eco_invest,640000;
- if(.@Economy >= 65) set .@eco_invest,1280000;
- if(.@Economy >= 76) set .@eco_invest,2560000;
- if(.@Economy >= 88) set .@eco_invest,5120000;
+ if (.@Economy < 6) { set .@eco_invest,5000; }
+ else if ((.@Economy >= 6) && (.@Economy <= 10)) { set .@eco_invest,10000; }
+ else if ((.@Economy >= 11) && (.@Economy <= 15)) { set .@eco_invest,20000; }
+ else if ((.@Economy >= 16) && (.@Economy <= 20)) { set .@eco_invest,35000; }
+ else if ((.@Economy >= 21) && (.@Economy <= 25)) { set .@eco_invest,55000; }
+ else if ((.@Economy >= 26) && (.@Economy <= 30)) { set .@eco_invest,80000; }
+ else if ((.@Economy >= 31) && (.@Economy <= 35)) { set .@eco_invest,110000; }
+ else if ((.@Economy >= 36) && (.@Economy <= 40)) { set .@eco_invest,145000; }
+ else if ((.@Economy >= 41) && (.@Economy <= 45)) { set .@eco_invest,185000; }
+ else if ((.@Economy >= 46) && (.@Economy <= 50)) { set .@eco_invest,230000; }
+ else if ((.@Economy >= 51) && (.@Economy <= 55)) { set .@eco_invest,280000; }
+ else if ((.@Economy >= 56) && (.@Economy <= 60)) { set .@eco_invest,335000; }
+ else if ((.@Economy >= 61) && (.@Economy <= 65)) { set .@eco_invest,395000; }
+ else if ((.@Economy >= 66) && (.@Economy <= 70)) { set .@eco_invest,460000; }
+ else if ((.@Economy >= 71) && (.@Economy <= 75)) { set .@eco_invest,530000; }
+ else if ((.@Economy >= 76) && (.@Economy <= 80)) { set .@eco_invest,605000; }
+ else if ((.@Economy >= 81) && (.@Economy <= 85)) { set .@eco_invest,685000; }
+ else if ((.@Economy >= 86) && (.@Economy <= 90)) { set .@eco_invest,770000; }
+ else if ((.@Economy >= 91) && (.@Economy <= 95)) { set .@eco_invest,860000; }
+ else if ((.@Economy >= 96) && (.@Economy <= 100)) { set .@eco_invest,955000; }
+ //Quadruple the cost of investing if you've already invested once.
+ if (GetCastleData("schg_cas02",4)) {
+ set .@eco_invest,.@eco_invest*4;
+ }
mes "[ Steward ]";
mes "Raising the stronghold's";
mes "commercial growth will";
@@ -2313,7 +2338,6 @@ schg_cas02,105,378,3 script Steward#sch02 55,{
}
set zeny,zeny-.@eco_invest;
SetCastleData "schg_cas02",4,GetCastleData("schg_cas02",4)+1;
- SetCastleData "schg_cas02",2,.@Economy + 1 + (.@Economy<99 && rand(2) && getgdskilllv(.@GID,10014));
mes "[ Steward ]";
mes "A wise use of the guild's";
mes "funds, Master. We can expect";
@@ -2327,16 +2351,30 @@ schg_cas02,105,378,3 script Steward#sch02 55,{
}
case 3:
set .@Defence,GetCastleData("schg_cas02",3);
- if(.@Defence < 8) set .@def_invest,20000;
- if(.@Defence >= 8) set .@def_invest,40000;
- if(.@Defence >= 16) set .@def_invest,80000;
- if(.@Defence >= 25) set .@def_invest,160000;
- if(.@Defence >= 34) set .@def_invest,320000;
- if(.@Defence >= 44) set .@def_invest,640000;
- if(.@Defence >= 54) set .@def_invest,1280000;
- if(.@Defence >= 65) set .@def_invest,2560000;
- if(.@Defence >= 76) set .@def_invest,5120000;
- if(.@Defence >= 88) set .@def_invest,10240000;
+ if (.@Defence < 6) { set .@def_invest,10000; }
+ else if ((.@Defence >= 6) && (.@Defence <= 10)) { set .@def_invest,20000; }
+ else if ((.@Defence >= 11) && (.@Defence <= 15)) { set .@def_invest,40000; }
+ else if ((.@Defence >= 16) && (.@Defence <= 20)) { set .@def_invest,70000; }
+ else if ((.@Defence >= 21) && (.@Defence <= 25)) { set .@def_invest,110000; }
+ else if ((.@Defence >= 26) && (.@Defence <= 30)) { set .@def_invest,160000; }
+ else if ((.@Defence >= 31) && (.@Defence <= 35)) { set .@def_invest,220000; }
+ else if ((.@Defence >= 36) && (.@Defence <= 40)) { set .@def_invest,290000; }
+ else if ((.@Defence >= 41) && (.@Defence <= 45)) { set .@def_invest,370000; }
+ else if ((.@Defence >= 46) && (.@Defence <= 50)) { set .@def_invest,460000; }
+ else if ((.@Defence >= 51) && (.@Defence <= 55)) { set .@def_invest,560000; }
+ else if ((.@Defence >= 56) && (.@Defence <= 60)) { set .@def_invest,670000; }
+ else if ((.@Defence >= 61) && (.@Defence <= 65)) { set .@def_invest,790000; }
+ else if ((.@Defence >= 66) && (.@Defence <= 70)) { set .@def_invest,920000; }
+ else if ((.@Defence >= 71) && (.@Defence <= 75)) { set .@def_invest,1060000; }
+ else if ((.@Defence >= 76) && (.@Defence <= 80)) { set .@def_invest,1210000; }
+ else if ((.@Defence >= 81) && (.@Defence <= 85)) { set .@def_invest,1370000; }
+ else if ((.@Defence >= 86) && (.@Defence <= 90)) { set .@def_invest,1540000; }
+ else if ((.@Defence >= 91) && (.@Defence <= 95)) { set .@def_invest,1720000; }
+ else if ((.@Defence >= 96) && (.@Defence <= 100)) { set .@def_invest,1910000; }
+ //Quadruple the cost of investing if you've already invested once.
+ if (GetCastleData("schg_cas02",5)) {
+ set .@def_invest,.@def_invest*4;
+ }
mes "[ Steward ]";
mes "Investing in our stronghold's";
mes "defense will enhance the";
@@ -2392,7 +2430,6 @@ schg_cas02,105,378,3 script Steward#sch02 55,{
}
set zeny,zeny-.@def_invest;
SetCastleData "schg_cas02",5,GetCastleData("schg_cas02",5)+1;
- SetCastleData "schg_cas02",3,.@Defence+1;
mes "[ Steward ]";
mes "A wise use of the guild's";
mes "funds, Master. Increasing";
diff --git a/npc/guild2/schg_cas03.txt b/npc/guild2/schg_cas03.txt
index ad7e4c824..ef7a30c92 100644
--- a/npc/guild2/schg_cas03.txt
+++ b/npc/guild2/schg_cas03.txt
@@ -3,7 +3,7 @@
//===== By: ==================================================
//= L0ne_W0lf
//===== Current Version: =====================================
-//= 2.0
+//= 2.1
//===== Compatible With: =====================================
//= eAthena SVN
//===== Description: =========================================
@@ -25,6 +25,7 @@
//= 1.8 Changed the treasure box spawn from 1939 to 1940. [L0ne_W0lf]
//= 1.9 Replaced effect numerics with constants. [L0ne_W0lf]
//= 2.0 Fixed setcell coords for the first barricade. [L0ne_W0lf]
+//= 2.1 Applied updated eco/def systems. [L0ne_W0lf]
//============================================================
schg_cas03,1,1,0 script Manager#sch03_02 111,{
@@ -113,9 +114,6 @@ OnClock0001:
if (!GetCastleData("schg_cas03",1)) end;
killmonster "schg_cas03","Manager#sch03_02::OnTreasureDied";
- setcastledata "schg_cas03",4,0;
- setcastledata "schg_cas03",5,0;
-
set .@Treasure,GetCastleData("schg_cas03",2)/5+4;
if (.@Treasure) {
monster "schg_cas03",189,21,"Treasure Chest",1940,1,"Manager#sch03_02::OnTreasureDied";
@@ -163,6 +161,16 @@ OnClock0001:
if (.@Treasure < 24) end;
monster "schg_cas03",194,15,"Treasure Chest",1324,1,"Manager#sch03_02::OnTreasureDied";
}
+ if (GetCastleData("schg_cas03",4)) {
+ set .@Economy,GetCastleData("schg_cas03",2);
+ SetCastleData "schg_cas03",2,.@Economy + GetCastleData("schg_cas03",4) + (.@Economy<99 && rand(2) && getgdskilllv(.@GID,10014));
+ setcastledata "schg_cas03",4,0;
+ }
+ if (GetCastleData("schg_cas03",5)) {
+ set .@Defence,GetCastleData("schg_cas03",3);
+ SetCastleData "schg_cas03",3,.@Defence + GetCastleData("schg_cas03",5);
+ setcastledata "schg_cas03",5,0;
+ }
end;
OnTreasureDied:
@@ -2301,16 +2309,30 @@ schg_cas03,88,90,3 script Steward#sch03 55,{
close;
case 2:
set .@Economy,GetCastleData("schg_cas03",2);
- if(.@Economy < 8) set .@eco_invest,10000;
- if(.@Economy >= 8) set .@eco_invest,20000;
- if(.@Economy >= 16) set .@eco_invest,40000;
- if(.@Economy >= 25) set .@eco_invest,80000;
- if(.@Economy >= 34) set .@eco_invest,160000;
- if(.@Economy >= 44) set .@eco_invest,320000;
- if(.@Economy >= 54) set .@eco_invest,640000;
- if(.@Economy >= 65) set .@eco_invest,1280000;
- if(.@Economy >= 76) set .@eco_invest,2560000;
- if(.@Economy >= 88) set .@eco_invest,5120000;
+ if (.@Economy < 6) { set .@eco_invest,5000; }
+ else if ((.@Economy >= 6) && (.@Economy <= 10)) { set .@eco_invest,10000; }
+ else if ((.@Economy >= 11) && (.@Economy <= 15)) { set .@eco_invest,20000; }
+ else if ((.@Economy >= 16) && (.@Economy <= 20)) { set .@eco_invest,35000; }
+ else if ((.@Economy >= 21) && (.@Economy <= 25)) { set .@eco_invest,55000; }
+ else if ((.@Economy >= 26) && (.@Economy <= 30)) { set .@eco_invest,80000; }
+ else if ((.@Economy >= 31) && (.@Economy <= 35)) { set .@eco_invest,110000; }
+ else if ((.@Economy >= 36) && (.@Economy <= 40)) { set .@eco_invest,145000; }
+ else if ((.@Economy >= 41) && (.@Economy <= 45)) { set .@eco_invest,185000; }
+ else if ((.@Economy >= 46) && (.@Economy <= 50)) { set .@eco_invest,230000; }
+ else if ((.@Economy >= 51) && (.@Economy <= 55)) { set .@eco_invest,280000; }
+ else if ((.@Economy >= 56) && (.@Economy <= 60)) { set .@eco_invest,335000; }
+ else if ((.@Economy >= 61) && (.@Economy <= 65)) { set .@eco_invest,395000; }
+ else if ((.@Economy >= 66) && (.@Economy <= 70)) { set .@eco_invest,460000; }
+ else if ((.@Economy >= 71) && (.@Economy <= 75)) { set .@eco_invest,530000; }
+ else if ((.@Economy >= 76) && (.@Economy <= 80)) { set .@eco_invest,605000; }
+ else if ((.@Economy >= 81) && (.@Economy <= 85)) { set .@eco_invest,685000; }
+ else if ((.@Economy >= 86) && (.@Economy <= 90)) { set .@eco_invest,770000; }
+ else if ((.@Economy >= 91) && (.@Economy <= 95)) { set .@eco_invest,860000; }
+ else if ((.@Economy >= 96) && (.@Economy <= 100)) { set .@eco_invest,955000; }
+ //Quadruple the cost of investing if you've already invested once.
+ if (GetCastleData("schg_cas03",4)) {
+ set .@eco_invest,.@eco_invest*4;
+ }
mes "[ Steward ]";
mes "Raising the stronghold's";
mes "commercial growth will";
@@ -2372,7 +2394,6 @@ schg_cas03,88,90,3 script Steward#sch03 55,{
}
set zeny,zeny-.@eco_invest;
SetCastleData "schg_cas03",4,GetCastleData("schg_cas03",4)+1;
- SetCastleData "schg_cas03",2,.@Economy + 1 + (.@Economy<99 && rand(2) && getgdskilllv(.@GID,10014));
mes "[ Steward ]";
mes "A wise use of the guild's";
mes "funds, Master. We can expect";
@@ -2386,16 +2407,30 @@ schg_cas03,88,90,3 script Steward#sch03 55,{
}
case 3:
set .@Defence,GetCastleData("schg_cas03",3);
- if(.@Defence < 8) set .@def_invest,20000;
- if(.@Defence >= 8) set .@def_invest,40000;
- if(.@Defence >= 16) set .@def_invest,80000;
- if(.@Defence >= 25) set .@def_invest,160000;
- if(.@Defence >= 34) set .@def_invest,320000;
- if(.@Defence >= 44) set .@def_invest,640000;
- if(.@Defence >= 54) set .@def_invest,1280000;
- if(.@Defence >= 65) set .@def_invest,2560000;
- if(.@Defence >= 76) set .@def_invest,5120000;
- if(.@Defence >= 88) set .@def_invest,10240000;
+ if (.@Defence < 6) { set .@def_invest,10000; }
+ else if ((.@Defence >= 6) && (.@Defence <= 10)) { set .@def_invest,20000; }
+ else if ((.@Defence >= 11) && (.@Defence <= 15)) { set .@def_invest,40000; }
+ else if ((.@Defence >= 16) && (.@Defence <= 20)) { set .@def_invest,70000; }
+ else if ((.@Defence >= 21) && (.@Defence <= 25)) { set .@def_invest,110000; }
+ else if ((.@Defence >= 26) && (.@Defence <= 30)) { set .@def_invest,160000; }
+ else if ((.@Defence >= 31) && (.@Defence <= 35)) { set .@def_invest,220000; }
+ else if ((.@Defence >= 36) && (.@Defence <= 40)) { set .@def_invest,290000; }
+ else if ((.@Defence >= 41) && (.@Defence <= 45)) { set .@def_invest,370000; }
+ else if ((.@Defence >= 46) && (.@Defence <= 50)) { set .@def_invest,460000; }
+ else if ((.@Defence >= 51) && (.@Defence <= 55)) { set .@def_invest,560000; }
+ else if ((.@Defence >= 56) && (.@Defence <= 60)) { set .@def_invest,670000; }
+ else if ((.@Defence >= 61) && (.@Defence <= 65)) { set .@def_invest,790000; }
+ else if ((.@Defence >= 66) && (.@Defence <= 70)) { set .@def_invest,920000; }
+ else if ((.@Defence >= 71) && (.@Defence <= 75)) { set .@def_invest,1060000; }
+ else if ((.@Defence >= 76) && (.@Defence <= 80)) { set .@def_invest,1210000; }
+ else if ((.@Defence >= 81) && (.@Defence <= 85)) { set .@def_invest,1370000; }
+ else if ((.@Defence >= 86) && (.@Defence <= 90)) { set .@def_invest,1540000; }
+ else if ((.@Defence >= 91) && (.@Defence <= 95)) { set .@def_invest,1720000; }
+ else if ((.@Defence >= 96) && (.@Defence <= 100)) { set .@def_invest,1910000; }
+ //Quadruple the cost of investing if you've already invested once.
+ if (GetCastleData("schg_cas03",5)) {
+ set .@def_invest,.@def_invest*4;
+ }
mes "[ Steward ]";
mes "Investing in our stronghold's";
mes "defense will enhance the";
@@ -2451,7 +2486,6 @@ schg_cas03,88,90,3 script Steward#sch03 55,{
}
set zeny,zeny-.@def_invest;
SetCastleData "schg_cas03",5,GetCastleData("schg_cas03",5)+1;
- SetCastleData "schg_cas03",3,.@Defence+1;
mes "[ Steward ]";
mes "A wise use of the guild's";
mes "funds, Master. Increasing";
diff --git a/npc/guild2/schg_cas04.txt b/npc/guild2/schg_cas04.txt
index 93dae163b..d3e6661da 100644
--- a/npc/guild2/schg_cas04.txt
+++ b/npc/guild2/schg_cas04.txt
@@ -3,7 +3,7 @@
//===== By: ==================================================
//= L0ne_W0lf
//===== Current Version: =====================================
-//= 1.5
+//= 1.6
//===== Compatible With: =====================================
//= eAthena SVN
//===== Description: =========================================
@@ -18,6 +18,7 @@
//= Made it so treasure won't spawn if castle is empty.
//= Treasure will now be killed before spawning.
//= 1.5 Replaced effect numerics with constants. [L0ne_W0lf]
+//= 1.6 Applied updated eco/def systems. [L0ne_W0lf]
//============================================================
schg_cas04,1,1,0 script Manager#sch04_02 111,{
@@ -106,9 +107,6 @@ OnClock0001:
if (!GetCastleData("schg_cas04",1)) end;
killmonster "schg_cas04","Manager#sch04_02::OnTreasureDied";
- setcastledata "schg_cas04",4,0;
- setcastledata "schg_cas04",5,0;
-
set .@Treasure,GetCastleData("schg_cas04",2)/5+4;
if (.@Treasure) {
monster "schg_cas04",388,388,"Treasure Chest",1941,1,"Manager#sch04_02::OnTreasureDied";
@@ -156,6 +154,16 @@ OnClock0001:
if (.@Treasure < 24) end;
monster "schg_cas04",386,386,"Treasure Chest",1324,1,"Manager#sch04_02::OnTreasureDied";
}
+ if (GetCastleData("schg_cas04",4)) {
+ set .@Economy,GetCastleData("schg_cas04",2);
+ SetCastleData "schg_cas04",2,.@Economy + GetCastleData("schg_cas04",4) + (.@Economy<99 && rand(2) && getgdskilllv(.@GID,10014));
+ setcastledata "schg_cas04",4,0;
+ }
+ if (GetCastleData("schg_cas04",5)) {
+ set .@Defence,GetCastleData("schg_cas04",3);
+ SetCastleData "schg_cas04",3,.@Defence + GetCastleData("schg_cas04",5);
+ setcastledata "schg_cas04",5,0;
+ }
end;
OnTreasureDied:
@@ -2304,16 +2312,30 @@ schg_cas04,247,305,3 script Steward#sch04 55,{
close;
case 2:
set .@Economy,GetCastleData("schg_cas04",2);
- if(.@Economy < 8) set .@eco_invest,10000;
- if(.@Economy >= 8) set .@eco_invest,20000;
- if(.@Economy >= 16) set .@eco_invest,40000;
- if(.@Economy >= 25) set .@eco_invest,80000;
- if(.@Economy >= 34) set .@eco_invest,160000;
- if(.@Economy >= 44) set .@eco_invest,320000;
- if(.@Economy >= 54) set .@eco_invest,640000;
- if(.@Economy >= 65) set .@eco_invest,1280000;
- if(.@Economy >= 76) set .@eco_invest,2560000;
- if(.@Economy >= 88) set .@eco_invest,5120000;
+ if (.@Economy < 6) { set .@eco_invest,5000; }
+ else if ((.@Economy >= 6) && (.@Economy <= 10)) { set .@eco_invest,10000; }
+ else if ((.@Economy >= 11) && (.@Economy <= 15)) { set .@eco_invest,20000; }
+ else if ((.@Economy >= 16) && (.@Economy <= 20)) { set .@eco_invest,35000; }
+ else if ((.@Economy >= 21) && (.@Economy <= 25)) { set .@eco_invest,55000; }
+ else if ((.@Economy >= 26) && (.@Economy <= 30)) { set .@eco_invest,80000; }
+ else if ((.@Economy >= 31) && (.@Economy <= 35)) { set .@eco_invest,110000; }
+ else if ((.@Economy >= 36) && (.@Economy <= 40)) { set .@eco_invest,145000; }
+ else if ((.@Economy >= 41) && (.@Economy <= 45)) { set .@eco_invest,185000; }
+ else if ((.@Economy >= 46) && (.@Economy <= 50)) { set .@eco_invest,230000; }
+ else if ((.@Economy >= 51) && (.@Economy <= 55)) { set .@eco_invest,280000; }
+ else if ((.@Economy >= 56) && (.@Economy <= 60)) { set .@eco_invest,335000; }
+ else if ((.@Economy >= 61) && (.@Economy <= 65)) { set .@eco_invest,395000; }
+ else if ((.@Economy >= 66) && (.@Economy <= 70)) { set .@eco_invest,460000; }
+ else if ((.@Economy >= 71) && (.@Economy <= 75)) { set .@eco_invest,530000; }
+ else if ((.@Economy >= 76) && (.@Economy <= 80)) { set .@eco_invest,605000; }
+ else if ((.@Economy >= 81) && (.@Economy <= 85)) { set .@eco_invest,685000; }
+ else if ((.@Economy >= 86) && (.@Economy <= 90)) { set .@eco_invest,770000; }
+ else if ((.@Economy >= 91) && (.@Economy <= 95)) { set .@eco_invest,860000; }
+ else if ((.@Economy >= 96) && (.@Economy <= 100)) { set .@eco_invest,955000; }
+ //Quadruple the cost of investing if you've already invested once.
+ if (GetCastleData("schg_cas04",4)) {
+ set .@eco_invest,.@eco_invest*4;
+ }
mes "[ Steward ]";
mes "Raising the stronghold's";
mes "commercial growth will";
@@ -2375,7 +2397,6 @@ schg_cas04,247,305,3 script Steward#sch04 55,{
}
set zeny,zeny-.@eco_invest;
SetCastleData "schg_cas04",4,GetCastleData("schg_cas04",4)+1;
- SetCastleData "schg_cas04",2,.@Economy + 1 + (.@Economy<99 && rand(2) && getgdskilllv(.@GID,10014));
mes "[ Steward ]";
mes "A wise use of the guild's";
mes "funds, Master. We can expect";
@@ -2389,16 +2410,30 @@ schg_cas04,247,305,3 script Steward#sch04 55,{
}
case 3:
set .@Defence,GetCastleData("schg_cas04",3);
- if(.@Defence < 8) set .@def_invest,20000;
- if(.@Defence >= 8) set .@def_invest,40000;
- if(.@Defence >= 16) set .@def_invest,80000;
- if(.@Defence >= 25) set .@def_invest,160000;
- if(.@Defence >= 34) set .@def_invest,320000;
- if(.@Defence >= 44) set .@def_invest,640000;
- if(.@Defence >= 54) set .@def_invest,1280000;
- if(.@Defence >= 65) set .@def_invest,2560000;
- if(.@Defence >= 76) set .@def_invest,5120000;
- if(.@Defence >= 88) set .@def_invest,10240000;
+ if (.@Defence < 6) { set .@def_invest,10000; }
+ else if ((.@Defence >= 6) && (.@Defence <= 10)) { set .@def_invest,20000; }
+ else if ((.@Defence >= 11) && (.@Defence <= 15)) { set .@def_invest,40000; }
+ else if ((.@Defence >= 16) && (.@Defence <= 20)) { set .@def_invest,70000; }
+ else if ((.@Defence >= 21) && (.@Defence <= 25)) { set .@def_invest,110000; }
+ else if ((.@Defence >= 26) && (.@Defence <= 30)) { set .@def_invest,160000; }
+ else if ((.@Defence >= 31) && (.@Defence <= 35)) { set .@def_invest,220000; }
+ else if ((.@Defence >= 36) && (.@Defence <= 40)) { set .@def_invest,290000; }
+ else if ((.@Defence >= 41) && (.@Defence <= 45)) { set .@def_invest,370000; }
+ else if ((.@Defence >= 46) && (.@Defence <= 50)) { set .@def_invest,460000; }
+ else if ((.@Defence >= 51) && (.@Defence <= 55)) { set .@def_invest,560000; }
+ else if ((.@Defence >= 56) && (.@Defence <= 60)) { set .@def_invest,670000; }
+ else if ((.@Defence >= 61) && (.@Defence <= 65)) { set .@def_invest,790000; }
+ else if ((.@Defence >= 66) && (.@Defence <= 70)) { set .@def_invest,920000; }
+ else if ((.@Defence >= 71) && (.@Defence <= 75)) { set .@def_invest,1060000; }
+ else if ((.@Defence >= 76) && (.@Defence <= 80)) { set .@def_invest,1210000; }
+ else if ((.@Defence >= 81) && (.@Defence <= 85)) { set .@def_invest,1370000; }
+ else if ((.@Defence >= 86) && (.@Defence <= 90)) { set .@def_invest,1540000; }
+ else if ((.@Defence >= 91) && (.@Defence <= 95)) { set .@def_invest,1720000; }
+ else if ((.@Defence >= 96) && (.@Defence <= 100)) { set .@def_invest,1910000; }
+ //Quadruple the cost of investing if you've already invested once.
+ if (GetCastleData("schg_cas04",5)) {
+ set .@def_invest,.@def_invest*4;
+ }
mes "[ Steward ]";
mes "Investing in our stronghold's";
mes "defense will enhance the";
@@ -2454,7 +2489,6 @@ schg_cas04,247,305,3 script Steward#sch04 55,{
}
set zeny,zeny-.@def_invest;
SetCastleData "schg_cas04",5,GetCastleData("schg_cas04",5)+1;
- SetCastleData "schg_cas04",3,.@Defence+1;
mes "[ Steward ]";
mes "A wise use of the guild's";
mes "funds, Master. Increasing";
diff --git a/npc/guild2/schg_cas05.txt b/npc/guild2/schg_cas05.txt
index 12e03517e..6aa646f8b 100644
--- a/npc/guild2/schg_cas05.txt
+++ b/npc/guild2/schg_cas05.txt
@@ -3,7 +3,7 @@
//===== By: ==================================================
//= L0ne_W0lf
//===== Current Version: =====================================
-//= 1.5
+//= 1.6
//===== Compatible With: =====================================
//= eAthena SVN
//===== Description: =========================================
@@ -18,6 +18,7 @@
//= Made it so treasure won't spawn if castle is empty.
//= Treasure will now be killed before spawning.
//= 1.5 Replaced effect numerics with constants. [L0ne_W0lf]
+//= 1.6 Applied updated eco/def systems. [L0ne_W0lf]
//============================================================
schg_cas05,1,1,0 script Manager#sch05_02 111,{
@@ -106,9 +107,6 @@ OnClock0001:
if (!GetCastleData("schg_cas05",1)) end;
killmonster "schg_cas05","Manager#sch05_02::OnTreasureDied";
- setcastledata "schg_cas05",4,0;
- setcastledata "schg_cas05",5,0;
-
set .@Treasure,GetCastleData("schg_cas05",2)/5+4;
if (.@Treasure) {
monster "schg_cas05",388,388,"Treasure Chest",1942,1,"Manager#sch05_02::OnTreasureDied";
@@ -156,6 +154,16 @@ OnClock0001:
if (.@Treasure < 24) end;
monster "schg_cas05",386,386,"Treasure Chest",1324,1,"Manager#sch05_02::OnTreasureDied";
}
+ if (GetCastleData("schg_cas05",4)) {
+ set .@Economy,GetCastleData("schg_cas05",2);
+ SetCastleData "schg_cas05",2,.@Economy + GetCastleData("schg_cas05",4) + (.@Economy<99 && rand(2) && getgdskilllv(.@GID,10014));
+ setcastledata "schg_cas05",4,0;
+ }
+ if (GetCastleData("schg_cas05",5)) {
+ set .@Defence,GetCastleData("schg_cas05",3);
+ SetCastleData "schg_cas05",3,.@Defence + GetCastleData("schg_cas05",5);
+ setcastledata "schg_cas05",5,0;
+ }
end;
OnTreasureDied:
@@ -2304,16 +2312,30 @@ schg_cas05,247,305,3 script Steward#sch05 55,{
close;
case 2:
set .@Economy,GetCastleData("schg_cas05",2);
- if(.@Economy < 8) set .@eco_invest,10000;
- if(.@Economy >= 8) set .@eco_invest,20000;
- if(.@Economy >= 16) set .@eco_invest,40000;
- if(.@Economy >= 25) set .@eco_invest,80000;
- if(.@Economy >= 34) set .@eco_invest,160000;
- if(.@Economy >= 44) set .@eco_invest,320000;
- if(.@Economy >= 54) set .@eco_invest,640000;
- if(.@Economy >= 65) set .@eco_invest,1280000;
- if(.@Economy >= 76) set .@eco_invest,2560000;
- if(.@Economy >= 88) set .@eco_invest,5120000;
+ if (.@Economy < 6) { set .@eco_invest,5000; }
+ else if ((.@Economy >= 6) && (.@Economy <= 10)) { set .@eco_invest,10000; }
+ else if ((.@Economy >= 11) && (.@Economy <= 15)) { set .@eco_invest,20000; }
+ else if ((.@Economy >= 16) && (.@Economy <= 20)) { set .@eco_invest,35000; }
+ else if ((.@Economy >= 21) && (.@Economy <= 25)) { set .@eco_invest,55000; }
+ else if ((.@Economy >= 26) && (.@Economy <= 30)) { set .@eco_invest,80000; }
+ else if ((.@Economy >= 31) && (.@Economy <= 35)) { set .@eco_invest,110000; }
+ else if ((.@Economy >= 36) && (.@Economy <= 40)) { set .@eco_invest,145000; }
+ else if ((.@Economy >= 41) && (.@Economy <= 45)) { set .@eco_invest,185000; }
+ else if ((.@Economy >= 46) && (.@Economy <= 50)) { set .@eco_invest,230000; }
+ else if ((.@Economy >= 51) && (.@Economy <= 55)) { set .@eco_invest,280000; }
+ else if ((.@Economy >= 56) && (.@Economy <= 60)) { set .@eco_invest,335000; }
+ else if ((.@Economy >= 61) && (.@Economy <= 65)) { set .@eco_invest,395000; }
+ else if ((.@Economy >= 66) && (.@Economy <= 70)) { set .@eco_invest,460000; }
+ else if ((.@Economy >= 71) && (.@Economy <= 75)) { set .@eco_invest,530000; }
+ else if ((.@Economy >= 76) && (.@Economy <= 80)) { set .@eco_invest,605000; }
+ else if ((.@Economy >= 81) && (.@Economy <= 85)) { set .@eco_invest,685000; }
+ else if ((.@Economy >= 86) && (.@Economy <= 90)) { set .@eco_invest,770000; }
+ else if ((.@Economy >= 91) && (.@Economy <= 95)) { set .@eco_invest,860000; }
+ else if ((.@Economy >= 96) && (.@Economy <= 100)) { set .@eco_invest,955000; }
+ //Quadruple the cost of investing if you've already invested once.
+ if (GetCastleData("schg_cas05",4)) {
+ set .@eco_invest,.@eco_invest*4;
+ }
mes "[ Steward ]";
mes "Raising the stronghold's";
mes "commercial growth will";
@@ -2375,7 +2397,6 @@ schg_cas05,247,305,3 script Steward#sch05 55,{
}
set zeny,zeny-.@eco_invest;
SetCastleData "schg_cas05",4,GetCastleData("schg_cas05",4)+1;
- SetCastleData "schg_cas05",2,.@Economy + 1 + (.@Economy<99 && rand(2) && getgdskilllv(.@GID,10014));
mes "[ Steward ]";
mes "A wise use of the guild's";
mes "funds, Master. We can expect";
@@ -2389,16 +2410,30 @@ schg_cas05,247,305,3 script Steward#sch05 55,{
}
case 3:
set .@Defence,GetCastleData("schg_cas05",3);
- if(.@Defence < 8) set .@def_invest,20000;
- if(.@Defence >= 8) set .@def_invest,40000;
- if(.@Defence >= 16) set .@def_invest,80000;
- if(.@Defence >= 25) set .@def_invest,160000;
- if(.@Defence >= 34) set .@def_invest,320000;
- if(.@Defence >= 44) set .@def_invest,640000;
- if(.@Defence >= 54) set .@def_invest,1280000;
- if(.@Defence >= 65) set .@def_invest,2560000;
- if(.@Defence >= 76) set .@def_invest,5120000;
- if(.@Defence >= 88) set .@def_invest,10240000;
+ if (.@Defence < 6) { set .@def_invest,10000; }
+ else if ((.@Defence >= 6) && (.@Defence <= 10)) { set .@def_invest,20000; }
+ else if ((.@Defence >= 11) && (.@Defence <= 15)) { set .@def_invest,40000; }
+ else if ((.@Defence >= 16) && (.@Defence <= 20)) { set .@def_invest,70000; }
+ else if ((.@Defence >= 21) && (.@Defence <= 25)) { set .@def_invest,110000; }
+ else if ((.@Defence >= 26) && (.@Defence <= 30)) { set .@def_invest,160000; }
+ else if ((.@Defence >= 31) && (.@Defence <= 35)) { set .@def_invest,220000; }
+ else if ((.@Defence >= 36) && (.@Defence <= 40)) { set .@def_invest,290000; }
+ else if ((.@Defence >= 41) && (.@Defence <= 45)) { set .@def_invest,370000; }
+ else if ((.@Defence >= 46) && (.@Defence <= 50)) { set .@def_invest,460000; }
+ else if ((.@Defence >= 51) && (.@Defence <= 55)) { set .@def_invest,560000; }
+ else if ((.@Defence >= 56) && (.@Defence <= 60)) { set .@def_invest,670000; }
+ else if ((.@Defence >= 61) && (.@Defence <= 65)) { set .@def_invest,790000; }
+ else if ((.@Defence >= 66) && (.@Defence <= 70)) { set .@def_invest,920000; }
+ else if ((.@Defence >= 71) && (.@Defence <= 75)) { set .@def_invest,1060000; }
+ else if ((.@Defence >= 76) && (.@Defence <= 80)) { set .@def_invest,1210000; }
+ else if ((.@Defence >= 81) && (.@Defence <= 85)) { set .@def_invest,1370000; }
+ else if ((.@Defence >= 86) && (.@Defence <= 90)) { set .@def_invest,1540000; }
+ else if ((.@Defence >= 91) && (.@Defence <= 95)) { set .@def_invest,1720000; }
+ else if ((.@Defence >= 96) && (.@Defence <= 100)) { set .@def_invest,1910000; }
+ //Quadruple the cost of investing if you've already invested once.
+ if (GetCastleData("schg_cas05",5)) {
+ set .@def_invest,.@def_invest*4;
+ }
mes "[ Steward ]";
mes "Investing in our stronghold's";
mes "defense will enhance the";
@@ -2454,7 +2489,6 @@ schg_cas05,247,305,3 script Steward#sch05 55,{
}
set zeny,zeny-.@def_invest;
SetCastleData "schg_cas05",5,GetCastleData("schg_cas05",5)+1;
- SetCastleData "schg_cas05",3,.@Defence+1;
mes "[ Steward ]";
mes "A wise use of the guild's";
mes "funds, Master. Increasing";