diff options
author | euphyy <euphyy@54d463be-8e91-2dee-dedb-b68131a5f0ec> | 2012-07-11 15:02:20 +0000 |
---|---|---|
committer | euphyy <euphyy@54d463be-8e91-2dee-dedb-b68131a5f0ec> | 2012-07-11 15:02:20 +0000 |
commit | a673d5b975c6e2fa3fc2984dcaa833b17e0e0dfe (patch) | |
tree | 4162cea6d7f5ab244017fd986223e47287e2bdc2 | |
parent | 5c8c70df6834c8c37e206514ab640150d22d4d68 (diff) | |
download | hercules-a673d5b975c6e2fa3fc2984dcaa833b17e0e0dfe.tar.gz hercules-a673d5b975c6e2fa3fc2984dcaa833b17e0e0dfe.tar.bz2 hercules-a673d5b975c6e2fa3fc2984dcaa833b17e0e0dfe.tar.xz hercules-a673d5b975c6e2fa3fc2984dcaa833b17e0e0dfe.zip |
* Optimized 13.2 quests, enjoy another 120kb of free space :P (npc/quests/quests_13_2.txt)
git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@16398 54d463be-8e91-2dee-dedb-b68131a5f0ec
-rw-r--r-- | npc/pre-re/quests/quests_13_1.txt | 2 | ||||
-rw-r--r-- | npc/pre-re/quests/quests_13_2.txt | 7399 | ||||
-rw-r--r-- | npc/re/quests/quests_13_1.txt | 2 | ||||
-rw-r--r-- | npc/re/quests/quests_13_2.txt | 7399 |
4 files changed, 1216 insertions, 13586 deletions
diff --git a/npc/pre-re/quests/quests_13_1.txt b/npc/pre-re/quests/quests_13_1.txt index 73f5aa8ce..511fe7aca 100644 --- a/npc/pre-re/quests/quests_13_1.txt +++ b/npc/pre-re/quests/quests_13_1.txt @@ -9055,7 +9055,7 @@ function Catwarp; next; if ((ep13_yong1 > 99) && (ep13_yong1 < 200)) { switch(select("Alberta -> 4590z:Prontera -> 4590z:Izlude -> 4590z:Geffen -> 4590z:Payon -> 4590z:Morroc -> 4590z:Al De Baran -> 4590z:Cancel")) { - case 1: Catwarp(4590,1); + case 1: Catwarp(4590,1); case 2: Catwarp(4590,2); case 3: Catwarp(4590,3); case 4: Catwarp(4590,4); diff --git a/npc/pre-re/quests/quests_13_2.txt b/npc/pre-re/quests/quests_13_2.txt index 45333374b..7e6fe10f4 100644 --- a/npc/pre-re/quests/quests_13_2.txt +++ b/npc/pre-re/quests/quests_13_2.txt @@ -3,7 +3,7 @@ //===== By: ================================================== //= L0ne_W0lf //===== Current Version: ===================================== -//= 2.2 +//= 2.4 //===== Compatible With: ===================================== //= rAthena SVN //===== Description: ========================================= @@ -41,11 +41,13 @@ //= 2.1 Fixed Myterious Rock 31, and Cart Hand Agents. //= 2.2 Added a missing close. (bugreport:4520) [L0ne_W0lf] //= 2.3 Fixed EF_Wind not showing. (bugreport:5149) [Masao] +//= 2.4 Optimized (6000+ lines reduced!). [Euphy] //============================================================ // Cat Hand Addition. //============================================================ spl_fild02,25,211,4 script Cat Hand Agent#spl 421,{ +function Catwarp; if (ep13_yong1 < 3) { mes "[Cat Hand Agent]"; mes "Welcome to Cat Trading."; @@ -62,7 +64,8 @@ spl_fild02,25,211,4 script Cat Hand Agent#spl 421,{ next; switch(select("Save your location:Cancel")) { case 1: - savepoint "spl_fild02",32,225; + if (strnpcinfo(2) == "spl") savepoint "spl_fild02",32,225; + else savepoint "man_fild02",129,61; mes "[Cat Hand Agent]"; mes "Thank you."; mes "Your location has been saved."; @@ -81,7 +84,8 @@ spl_fild02,25,211,4 script Cat Hand Agent#spl 421,{ next; switch(select("Save your location:Use Storage:Cancel")) { case 1: - savepoint "spl_fild02",32,225; + if (strnpcinfo(2) == "spl") savepoint "spl_fild02",32,225; + else savepoint "man_fild02",129,61; mes "[Cat Hand Agent]"; mes "Thank you."; mes "Your location has been saved."; @@ -127,7 +131,8 @@ spl_fild02,25,211,4 script Cat Hand Agent#spl 421,{ next; switch(select("Save your location:Use Storage:Use Cat Warp (Midgard):Cancel")) { case 1: - savepoint "spl_fild02",32,225; + if (strnpcinfo(2) == "spl") savepoint "spl_fild02",32,225; + else savepoint "man_fild02",129,61; mes "[Cat Hand Agent]"; mes "Thank you."; mes "Your location has been saved."; @@ -167,352 +172,65 @@ spl_fild02,25,211,4 script Cat Hand Agent#spl 421,{ next; if ((ep13_yong1 > 39) && (ep13_yong1 < 50)) { switch(select("Prontera -> 5500z:Cancel")) { - case 1: - if (Zeny >= 5500) { - set zeny,zeny-5500; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - close; + case 1: Catwarp(5500,2); + case 2: close; } } else if ((ep13_yong1 > 49) && (ep13_yong1 < 60)) { switch(select("Alberta -> 5500z:Prontera -> 5500z:Cancel")) { - case 1: - if (Zeny >= 5500) { - set zeny,zeny-5500; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 5500) { - set zeny,zeny-5500; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - close; + case 1: Catwarp(5500,1); + case 2: Catwarp(5500,2); + case 3: close; } } else if ((ep13_yong1 > 59) && (ep13_yong1 < 70)) { switch(select("Alberta -> 5025z:Prontera -> 5025z:Izlude -> 5025z:Cancel")) { - case 1: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - close; + case 1: Catwarp(5025,1); + case 2: Catwarp(5025,2); + case 3: Catwarp(5025,3); + case 4: close; } } else if ((ep13_yong1 > 69) && (ep13_yong1 < 80)) { switch(select("Alberta -> 5025z:Prontera -> 5025z:Izlude -> 5025z:Geffen -> 5025z:Cancel")) { - case 1: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - close; + case 1: Catwarp(5025,1); + case 2: Catwarp(5025,2); + case 3: Catwarp(5025,3); + case 4: Catwarp(5025,4); + case 5: close; } } else if ((ep13_yong1 > 79) && (ep13_yong1 < 90)) { switch(select("Alberta -> 4765z:Prontera -> 4765z:Izlude -> 4765z:Geffen -> 4765z:Payon -> 4765z:Cancel")) { - case 1: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - close; + case 1: Catwarp(4765,1); + case 2: Catwarp(4765,2); + case 3: Catwarp(4765,3); + case 4: Catwarp(4765,4); + case 5: Catwarp(4765,5); + case 6: close; } } else if ((ep13_yong1 > 89) && (ep13_yong1 < 100)) { switch(select("Alberta -> 4765z:Prontera -> 4765z:Izlude -> 4765z:Geffen -> 4765z:Payon -> 4765z:Morroc -> 4765z:Cancel")) { - case 1: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "morocc",156,46; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 7: - close; + case 1: Catwarp(4765,1); + case 2: Catwarp(4765,2); + case 3: Catwarp(4765,3); + case 4: Catwarp(4765,4); + case 5: Catwarp(4765,5); + case 6: Catwarp(4765,6); + case 7: close; } } else if (ep13_yong1 > 99) { switch(select("Alberta -> 4590z:Prontera -> 4590z:Izlude -> 4590z:Geffen -> 4590z:Payon -> 4590z:Morroc -> 4590z:Al De Baran -> 4590z:Cancel")) { - case 1: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "morocc",156,46; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 7: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "aldebaran",168,112; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 8: - close; + case 1: Catwarp(4590,1); + case 2: Catwarp(4590,2); + case 3: Catwarp(4590,3); + case 4: Catwarp(4590,4); + case 5: Catwarp(4590,5); + case 6: Catwarp(4590,6); + case 7: Catwarp(4590,7); + case 8: close; } } else { @@ -534,7 +252,8 @@ spl_fild02,25,211,4 script Cat Hand Agent#spl 421,{ next; switch(select("Save your location:Use Storage:Use Cat Warp (Midgard):Use Cat Warp (Jottunheim):Cancel")) { case 1: - savepoint "spl_fild02",32,225; + if (strnpcinfo(2) == "spl") savepoint "spl_fild02",32,225; + else savepoint "man_fild02",129,61; mes "[Cat Hand Agent]"; mes "Thank you."; mes "Your location has been saved."; @@ -574,402 +293,58 @@ spl_fild02,25,211,4 script Cat Hand Agent#spl 421,{ next; if ((ep13_yong1 > 99) && (ep13_yong1 < 200)) { switch(select("Alberta -> 4590z:Prontera -> 4590z:Izlude -> 4590z:Geffen -> 4590z:Payon -> 4590z:Morroc -> 4590z:Al De Baran -> 4590z:Cancel")) { - case 1: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "morocc",156,46; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 7: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "aldebaran",168,112; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 8: - close; + case 1: Catwarp(4590,1); + case 2: Catwarp(4590,2); + case 3: Catwarp(4590,3); + case 4: Catwarp(4590,4); + case 5: Catwarp(4590,5); + case 6: Catwarp(4590,6); + case 7: Catwarp(4590,7); + case 8: close; } } else if ((ep13_yong1 > 199) && (ep13_yong1 < 250)) { switch(select("Alberta -> 4170z:Prontera -> 4170z:Izlude -> 4170z:Geffen -> 4170z:Payon -> 4170z:Morroc -> 4170z:Al De Baran -> 4170z:Juno -> 4170z:Cancel")) { - case 1: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "morocc",156,46; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 7: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "aldebaran",168,112; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 8: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "yuno",158,125; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 9: - close; + case 1: Catwarp(4170,1); + case 2: Catwarp(4170,2); + case 3: Catwarp(4170,3); + case 4: Catwarp(4170,4); + case 5: Catwarp(4170,5); + case 6: Catwarp(4170,6); + case 7: Catwarp(4170,7); + case 8: Catwarp(4170,8); + case 9: close; } close; } else if ((ep13_yong1 > 249) && (ep13_yong1 < 300)) { switch(select("Alberta -> 4025z:Prontera -> 4025z:Izlude -> 4025z:Geffen -> 4025z:Payon -> 4025z:Morroc -> 4025z:Al De Baran -> 4025z:Juno -> 4025z:Einbroch -> 4025z:Cancel")) { - case 1: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "morocc",156,46; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 7: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "aldebaran",168,112; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 8: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "yuno",158,125; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 9: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "einbroch",158,301; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 10: - close; + case 1: Catwarp(4025,1); + case 2: Catwarp(4025,2); + case 3: Catwarp(4025,3); + case 4: Catwarp(4025,4); + case 5: Catwarp(4025,5); + case 6: Catwarp(4025,6); + case 7: Catwarp(4025,7); + case 8: Catwarp(4025,8); + case 9: Catwarp(4025,9); + case 10: close; } close; } else if (ep13_yong1 > 299) { switch(select("Alberta -> 3970z:Prontera -> 3970z:Izlude -> 3970z:Geffen -> 3970z:Payon -> 3970z:Morroc -> 3970z:Al De Baran -> 3970z:Juno -> 3970z:Einbroch -> 3970z:Lighthalzen -> 3970z:Cancel")) { - case 1: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "morocc",156,46; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 7: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "aldebaran",168,112; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 8: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "yuno",158,125; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 9: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "einbroch",158,301; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 10: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "lighthalzen",163,64; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 11: - close; + case 1: Catwarp(3970,1); + case 2: Catwarp(3970,2); + case 3: Catwarp(3970,3); + case 4: Catwarp(3970,4); + case 5: Catwarp(3970,5); + case 6: Catwarp(3970,6); + case 7: Catwarp(3970,7); + case 8: Catwarp(3970,8); + case 9: Catwarp(3970,9); + case 10: Catwarp(3970,10); + case 11: close; } close; } @@ -980,1011 +355,22 @@ spl_fild02,25,211,4 script Cat Hand Agent#spl 421,{ close; } case 4: - switch(select("Alliance Forces Post -> 5500z:Manuk Camp -> 7500z:Cancel")) { - case 1: - if (Zeny >= 5500) { - set zeny,zeny-5500; - warp "mid_camp",62,127; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 7500) { - set zeny,zeny-7500; - warp "man_fild02",129,61; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - mes "[Cat Hand Agent]"; - mes "Thank you for using our service."; - close; - } - case 5: - mes "[Cat Hand Agent]"; - mes "Thank you for using our service."; - close; - } - } - else { - mes "[Cat Hand Agent]"; - mes "... ... ... ..."; - mes "Please give me some Piece of Fish."; - close; - } -} - -man_fild02,132,47,4 script Cat Hand Agent#man 421,{ - if (ep13_yong1 < 3) { - mes "[Cat Hand Agent]"; - mes "Welcome to Cat Trading."; - mes "I guess you're a first-time customer, huh?"; - next; - mes "[Cat Hand Agent]"; - mes "For more details about our contract, you need to talk to our staff first."; - close; - } - else if ((ep13_yong1 > 2) && (ep13_yong1 < 20)) { - mes "[Cat Hand Agent]"; - mes "Cat Trading's available services are as followed."; - mes "For additional services, please consult Agent Gyaruk."; - next; - switch(select("Save your location:Cancel")) { - case 1: - savepoint "man_fild02",129,61; - mes "[Cat Hand Agent]"; - mes "Thank you."; - mes "Your location has been saved."; - mes "You can now directly return to this camp."; - close; - case 2: - mes "[Cat Hand Agent]"; - mes "Thank you for using our service."; - close; - } - } - else if ((ep13_yong1 > 19) && (ep13_yong1 < 40)) { - mes "[Cat Hand Agent]"; - mes "Cat Trading's available services are as followed."; - mes "For additional services, please consult Agent Gyaruk."; - next; - switch(select("Save your location:Use Storage:Cancel")) { - case 1: - savepoint "man_fild02",129,61; - mes "[Cat Hand Agent]"; - mes "Thank you."; - mes "Your location has been saved."; - mes "You can now directly return to this camp."; - close; - case 2: - if(basicskillcheck() && getskilllv("NV_BASIC") < 6){ - mes "[Cat Hand Agent]"; - mes "I'm sorry, but you"; - mes "need the Novice's"; - mes "Basic Skill Level 6 to"; - mes "use the Storage Service."; - close; - } - else if (Zeny >= 60) { - set zeny,zeny-60; - mes "[Cat Hand Agent]"; - mes "Thank you."; - mes "Your storage will be opened shortly."; - close2; - openstorage; - end; - } - else { - mes "[Cat Hand Agent]"; - mes "I'm sorry, but you don't"; - mes "have enough money?"; - mes "Cat Trading's storage"; - mes "service is 60 zeny."; - mes "It's cheap, isn't it?"; - close; - } - case 3: - mes "[Cat Hand Agent]"; - mes "Thank you for using our service."; - close; - } - } - else if ((ep13_yong1 > 39) && (ep13_yong1 < 100)) { - mes "[Cat Hand Agent]"; - mes "Cat Trading's available services are as followed."; - mes "For additional services, please consult Agent Gyaruk."; - next; - switch(select("Save your location:Use Storage:Use Cat Warp (Midgard):Cancel")) { - case 1: - savepoint "man_fild02",129,61; - mes "[Cat Hand Agent]"; - mes "Thank you."; - mes "Your location has been saved."; - mes "You can now directly return to this camp."; - close; - case 2: - if(basicskillcheck() && getskilllv("NV_BASIC") < 6){ - mes "[Cat Hand Agent]"; - mes "I'm sorry, but you"; - mes "need the Novice's"; - mes "Basic Skill Level 6 to"; - mes "use the Storage Service."; - close; - } - else if (Zeny >= 60) { - set zeny,zeny-60; - mes "[Cat Hand Agent]"; - mes "Thank you."; - mes "Your storage will be opened shortly."; - close2; - openstorage; - end; - } - else { - mes "[Cat Hand Agent]"; - mes "I'm sorry, but you don't"; - mes "have enough money?"; - mes "Cat Trading's storage"; - mes "service is 60 zeny."; - mes "It's cheap, isn't it?"; - close; - } - case 3: - // Custom Translation. - mes "[Cat Hand Agent]"; - mes "With " + ep13_yong1 + " credit points, we offer the following warp services. Please remember, you can't come back easily once you move to Midgard."; - next; - if ((ep13_yong1 > 39) && (ep13_yong1 < 50)) { - switch(select("Prontera -> 5500z:Cancel")) { - case 1: - if (Zeny >= 5500) { - set zeny,zeny-5500; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - close; - } - } - else if ((ep13_yong1 > 49) && (ep13_yong1 < 60)) { - switch(select("Alberta -> 5500z:Prontera -> 5500z:Cancel")) { - case 1: - if (Zeny >= 5500) { - set zeny,zeny-5500; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 5500) { - set zeny,zeny-5500; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - close; - } - } - else if ((ep13_yong1 > 59) && (ep13_yong1 < 70)) { - switch(select("Alberta -> 5025z:Prontera -> 5025z:Izlude -> 5025z:Cancel")) { - case 1: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } + if (strnpcinfo(2) == "spl") switch(select("Alliance Forces Post -> 5500z:Manuk Camp -> 7500z:Cancel")) { + case 1: Catwarp(5500,13); + case 2: Catwarp(5500,12); case 3: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - close; - } - } - else if ((ep13_yong1 > 69) && (ep13_yong1 < 80)) { - switch(select("Alberta -> 5025z:Prontera -> 5025z:Izlude -> 5025z:Geffen -> 5025z:Cancel")) { - case 1: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - close; - } - } - else if ((ep13_yong1 > 79) && (ep13_yong1 < 90)) { - switch(select("Alberta -> 4765z:Prontera -> 4765z:Izlude -> 4765z:Geffen -> 4765z:Payon -> 4765z:Cancel")) { - case 1: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - close; - } - } - else if ((ep13_yong1 > 89) && (ep13_yong1 < 100)) { - switch(select("Alberta -> 4765z:Prontera -> 4765z:Izlude -> 4765z:Geffen -> 4765z:Payon -> 4765z:Morroc -> 4765z:Cancel")) { - case 1: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "morocc",156,46; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 7: - close; - } - } - else if (ep13_yong1 > 99) { - switch(select("Alberta -> 4590z:Prontera -> 4590z:Izlude -> 4590z:Geffen -> 4590z:Payon -> 4590z:Morroc -> 4590z:Al De Baran -> 4590z:Cancel")) { - case 1: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "morocc",156,46; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 7: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "aldebaran",168,112; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 8: - close; - } - } - else { - // Custom Translation. - mes "[Cat Hand Agent]"; - mes "I am sorry, but you don't have enough credit points to use the warp service. Please come back when you have more points."; - close; - } - case 4: - mes "[Cat Hand Agent]"; - mes "Thank you for using our service."; - close; - } - } - else if (ep13_yong1 > 99) { - mes "[Cat Hand Agent]"; - mes "Cat Trading's available services are as followed."; - mes "For additional services, please consult Agent Gyaruk."; - next; - switch(select("Save your location:Use Storage:Use Cat Warp (Midgard):Use Cat Warp (Jottunheim):Cancel")) { - case 1: - savepoint "man_fild02",129,61; - mes "[Cat Hand Agent]"; - mes "Thank you."; - mes "Your location has been saved."; - mes "You can now directly return to this camp."; - close; - case 2: - if(basicskillcheck() && getskilllv("NV_BASIC") < 6){ - mes "[Cat Hand Agent]"; - mes "I'm sorry, but you"; - mes "need the Novice's"; - mes "Basic Skill Level 6 to"; - mes "use the Storage Service."; - close; - } - else if (Zeny >= 60) { - set zeny,zeny-60; - mes "[Cat Hand Agent]"; - mes "Thank you."; - mes "Your storage will be opened shortly."; - close2; - openstorage; - end; - } - else { - mes "[Cat Hand Agent]"; - mes "I'm sorry, but you don't"; - mes "have enough money?"; - mes "Cat Trading's storage"; - mes "service is 60 zeny."; - mes "It's cheap, isn't it?"; - close; - } - case 3: - // Custom Translation. - mes "[Cat Hand Agent]"; - mes "With " + ep13_yong1 + " credit points, we offer the following warp services. Please remember, you can't come back easily once you move to Midgard."; - next; - if ((ep13_yong1 > 99) && (ep13_yong1 < 200)) { - switch(select("Alberta -> 4590z:Prontera -> 4590z:Izlude -> 4590z:Geffen -> 4590z:Payon -> 4590z:Morroc -> 4590z:Al De Baran -> 4590z:Cancel")) { - case 1: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "morocc",156,46; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 7: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "aldebaran",168,112; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 8: - close; - } - } - else if ((ep13_yong1 > 199) && (ep13_yong1 < 250)) { - switch(select("Alberta -> 4170z:Prontera -> 4170z:Izlude -> 4170z:Geffen -> 4170z:Payon -> 4170z:Morroc -> 4170z:Al De Baran -> 4170z:Juno -> 4170z:Cancel")) { - case 1: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "morocc",156,46; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 7: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "aldebaran",168,112; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 8: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "yuno",158,125; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 9: - close; - } - close; - } - else if ((ep13_yong1 > 249) && (ep13_yong1 < 300)) { - switch(select("Alberta -> 4025z:Prontera -> 4025z:Izlude -> 4025z:Geffen -> 4025z:Payon -> 4025z:Morroc -> 4025z:Al De Baran -> 4025z:Juno -> 4025z:Einbroch -> 4025z:Cancel")) { - case 1: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "morocc",156,46; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 7: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "aldebaran",168,112; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 8: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "yuno",158,125; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 9: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "einbroch",158,301; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 10: - close; - } - close; - } - else if (ep13_yong1 > 299) { - switch(select("Alberta -> 3970z:Prontera -> 3970z:Izlude -> 3970z:Geffen -> 3970z:Payon -> 3970z:Morroc -> 3970z:Al De Baran -> 3970z:Juno -> 3970z:Einbroch -> 3970z:Lighthalzen -> 3970z:Cancel")) { - case 1: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "morocc",156,46; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 7: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "aldebaran",168,112; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 8: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "yuno",158,125; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 9: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "einbroch",158,301; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 10: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "lighthalzen",163,64; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 11: - close; - } - close; - } - else { - // Custom Translation - mes "[Cat Hand Agent]"; - mes "I am sorry, but you don't have enough credit points to use the warp service. Please come back when you have more points."; - close; - } - case 4: - switch(select("Alliance Forces Post -> 5500z:Splendide Camp -> 7500z:Cancel")) { - case 1: - if (Zeny >= 5500) { - set zeny,zeny-5500; - warp "mid_camp",62,127; - close; - } - else { mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 7500) { - set zeny,zeny-7500; - warp "spl_fild02",32,225; + mes "Thank you for using our service."; close; } - else { + else switch(select("Alliance Forces Post -> 5500z:Splendide Camp -> 7500z:Cancel")) { + case 1: Catwarp(5500,13); + case 2: Catwarp(5500,11); + case 3: mes "[Cat Hand Agent]"; - mes "Don't play with money."; + mes "Thank you for using our service."; close; } - case 3: - mes "[Cat Hand Agent]"; - mes "Thank you for using our service."; - close; - } case 5: mes "[Cat Hand Agent]"; mes "Thank you for using our service."; @@ -1997,504 +383,108 @@ man_fild02,132,47,4 script Cat Hand Agent#man 421,{ mes "Please give me some Piece of Fish."; close; } -} - -man_fild02,146,81,0 script Mysterious Rock#31 844,{ - if ((countitem(6048) < 3) && (checkquest(12062,PLAYTIME) == -1)) { - specialeffect2 EF_REPAIRWEAPON; - progressbar "ffff00",10; - set .@rhea_ran,rand(1,20); - if (.@rhea_ran < 13) { - getitem 7049,1; //Stone - } - else if (.@rhea_ran == 13) { - getitem 990,1; //Boody_Red - } - else if (.@rhea_ran == 14) { - getitem 991,1; //Crystal_Blue - } - else if (.@rhea_ran == 15) { - getitem 992,1; //Wind_Of_Verdure - } - else if (.@rhea_ran == 16) { - getitem 993,1; //Yellow_Live - } - else if (.@rhea_ran == 17) { - getitem 6080,1; //Manuk_Coin - } - else if (.@rhea_ran > 18) { - getitem 6048,1; //Unidentified_Mineral - } - initnpctimer; - disablenpc "Mysterious Rock#31"; - end; - } - else { - mes "This rock contains unidentified minerals."; - mes "It's not possible to mine more than the limit."; - close; - } - end; - -OnTimer120000: - enablenpc "Mysterious Rock#31"; - stopnpctimer; - end; -} - -man_fild02,140,148,0 script Mysterious Rock#32 844,{ - if ((countitem(6048) < 3) && (checkquest(12062,PLAYTIME) == -1)) { - specialeffect2 EF_REPAIRWEAPON; - progressbar "ffff00",10; - set .@rhea_ran,rand(1,20); - if (.@rhea_ran < 13) { - getitem 7049,1; //Stone - } - else if (.@rhea_ran == 13) { - getitem 990,1; //Boody_Red - } - else if (.@rhea_ran == 14) { - getitem 991,1; //Crystal_Blue - } - else if (.@rhea_ran == 15) { - getitem 992,1; //Wind_Of_Verdure - } - else if (.@rhea_ran == 16) { - getitem 993,1; //Yellow_Live - } - else if (.@rhea_ran == 17) { - getitem 6080,1; //Manuk_Coin - } - else if (.@rhea_ran > 18) { - getitem 6048,1; //Unidentified_Mineral - } - initnpctimer; - disablenpc "Mysterious Rock#32"; - end; - } - else { - mes "This rock contains unidentified minerals."; - mes "It's not possible to mine more than the limit."; - close; - } - end; - -OnTimer120000: - enablenpc "Mysterious Rock#32"; - stopnpctimer; - end; -} - -man_fild02,88,263,0 script Mysterious Rock#33 844,{ - if ((countitem(6048) < 3) && (checkquest(12062,PLAYTIME) == -1)) { - specialeffect2 EF_REPAIRWEAPON; - progressbar "ffff00",10; - set .@rhea_ran,rand(1,20); - if (.@rhea_ran < 13) { - getitem 7049,1; //Stone - } - else if (.@rhea_ran == 13) { - getitem 990,1; //Boody_Red - } - else if (.@rhea_ran == 14) { - getitem 991,1; //Crystal_Blue - } - else if (.@rhea_ran == 15) { - getitem 992,1; //Wind_Of_Verdure - } - else if (.@rhea_ran == 16) { - getitem 993,1; //Yellow_Live - } - else if (.@rhea_ran == 17) { - getitem 6080,1; //Manuk_Coin - } - else if (.@rhea_ran > 18) { - getitem 6048,1; //Unidentified_Mineral - } - initnpctimer; - disablenpc "Mysterious Rock#33"; - end; - } - else { - mes "This rock contains unidentified minerals."; - mes "It's not possible to mine more than the limit."; - close; - } - end; - -OnTimer120000: - enablenpc "Mysterious Rock#33"; - stopnpctimer; - end; -} - -man_fild02,146,365,0 script Mysterious Rock#34 844,{ - if ((countitem(6048) < 3) && (checkquest(12062,PLAYTIME) == -1)) { - specialeffect2 EF_REPAIRWEAPON; - progressbar "ffff00",10; - set .@rhea_ran,rand(1,20); - if (.@rhea_ran < 13) { - getitem 7049,1; //Stone - } - else if (.@rhea_ran == 13) { - getitem 990,1; //Boody_Red - } - else if (.@rhea_ran == 14) { - getitem 991,1; //Crystal_Blue - } - else if (.@rhea_ran == 15) { - getitem 992,1; //Wind_Of_Verdure - } - else if (.@rhea_ran == 16) { - getitem 993,1; //Yellow_Live - } - else if (.@rhea_ran == 17) { - getitem 6080,1; //Manuk_Coin - } - else if (.@rhea_ran > 18) { - getitem 6048,1; //Unidentified_Mineral - } - initnpctimer; - disablenpc "Mysterious Rock#34"; - end; - } - else { - mes "This rock contains unidentified minerals."; - mes "It's not possible to mine more than the limit."; - close; - } - end; - -OnTimer120000: - enablenpc "Mysterious Rock#34"; - stopnpctimer; - end; -} - -man_fild02,336,305,0 script Mysterious Rock#35 844,{ - if ((countitem(6048) < 3) && (checkquest(12062,PLAYTIME) == -1)) { - specialeffect2 EF_REPAIRWEAPON; - progressbar "ffff00",10; - set .@rhea_ran,rand(1,20); - if (.@rhea_ran < 13) { - getitem 7049,1; //Stone - } - else if (.@rhea_ran == 13) { - getitem 990,1; //Boody_Red - } - else if (.@rhea_ran == 14) { - getitem 991,1; //Crystal_Blue - } - else if (.@rhea_ran == 15) { - getitem 992,1; //Wind_Of_Verdure - } - else if (.@rhea_ran == 16) { - getitem 993,1; //Yellow_Live - } - else if (.@rhea_ran == 17) { - getitem 6080,1; //Manuk_Coin - } - else if (.@rhea_ran > 18) { - getitem 6048,1; //Unidentified_Mineral - } - initnpctimer; - disablenpc "Mysterious Rock#35"; - end; - } - else { - mes "This rock contains unidentified minerals."; - mes "It's not possible to mine more than the limit."; - close; - } - end; - -OnTimer120000: - enablenpc "Mysterious Rock#35"; - stopnpctimer; - end; -} - -man_fild02,248,124,0 script Mysterious Rock#36 844,{ - if ((countitem(6048) < 3) && (checkquest(12062,PLAYTIME) == -1)) { - specialeffect2 EF_REPAIRWEAPON; - progressbar "ffff00",10; - set .@rhea_ran,rand(1,20); - if (.@rhea_ran < 13) { - getitem 7049,1; //Stone - } - else if (.@rhea_ran == 13) { - getitem 990,1; //Boody_Red - } - else if (.@rhea_ran == 14) { - getitem 991,1; //Crystal_Blue - } - else if (.@rhea_ran == 15) { - getitem 992,1; //Wind_Of_Verdure - } - else if (.@rhea_ran == 16) { - getitem 993,1; //Yellow_Live - } - else if (.@rhea_ran == 17) { - getitem 6080,1; //Manuk_Coin - } - else if (.@rhea_ran > 18) { - getitem 6048,1; //Unidentified_Mineral - } - initnpctimer; - disablenpc "Mysterious Rock#36"; - end; - } - else { - mes "This rock contains unidentified minerals."; - mes "It's not possible to mine more than the limit."; - close; - } - end; - -OnTimer120000: - enablenpc "Mysterious Rock#36"; - stopnpctimer; - end; -} - -man_fild02,285,115,0 script Mysterious Rock#37 844,{ - if ((countitem(6048) < 3) && (checkquest(12062,PLAYTIME) == -1)) { - specialeffect2 EF_REPAIRWEAPON; - progressbar "ffff00",10; - set .@rhea_ran,rand(1,20); - if (.@rhea_ran < 13) { - getitem 7049,1; //Stone - } - else if (.@rhea_ran == 13) { - getitem 990,1; //Boody_Red - } - else if (.@rhea_ran == 14) { - getitem 991,1; //Crystal_Blue - } - else if (.@rhea_ran == 15) { - getitem 992,1; //Wind_Of_Verdure - } - else if (.@rhea_ran == 16) { - getitem 993,1; //Yellow_Live - } - else if (.@rhea_ran == 17) { - getitem 6080,1; //Manuk_Coin - } - else if (.@rhea_ran > 18) { - getitem 6048,1; //Unidentified_Mineral - } - initnpctimer; - disablenpc "Mysterious Rock#37"; - end; - } - else { - mes "This rock contains unidentified minerals."; - mes "It's not possible to mine more than the limit."; - close; - } - end; - -OnTimer120000: - enablenpc "Mysterious Rock#37"; - stopnpctimer; - end; -} - -man_fild02,346,116,0 script Mysterious Rock#38 844,{ - if ((countitem(6048) < 3) && (checkquest(12062,PLAYTIME) == -1)) { - specialeffect2 EF_REPAIRWEAPON; - progressbar "ffff00",10; - set .@rhea_ran,rand(1,20); - if (.@rhea_ran < 13) { - getitem 7049,1; //Stone - } - else if (.@rhea_ran == 13) { - getitem 990,1; //Boody_Red - } - else if (.@rhea_ran == 14) { - getitem 991,1; //Crystal_Blue - } - else if (.@rhea_ran == 15) { - getitem 992,1; //Wind_Of_Verdure - } - else if (.@rhea_ran == 16) { - getitem 993,1; //Yellow_Live - } - else if (.@rhea_ran == 17) { - getitem 6080,1; //Manuk_Coin - } - else if (.@rhea_ran > 18) { - getitem 6048,1; //Unidentified_Mineral - } - initnpctimer; - disablenpc "Mysterious Rock#38"; - end; - } - else { - mes "This rock contains unidentified minerals."; - mes "It's not possible to mine more than the limit."; - close; - } - end; - -OnTimer120000: - enablenpc "Mysterious Rock#38"; - stopnpctimer; - end; -} - -man_fild02,358,174,0 script Mysterious Rock#39 844,{ +function Catwarp { + if (Zeny < getarg(0)) { + mes "[Cat Hand Agent]"; + mes "Don't play with money."; + close; } + set Zeny, Zeny-getarg(0); + switch(getarg(1)) { + case 1: warp "alberta",117,56; close; + case 2: warp "prontera",116,72; close; + case 3: warp "izlude",91,105; close; + case 4: warp "geffen",120,39; close; + case 5: warp "payon",161,58; close; + case 6: warp "morocc",156,46; close; + case 7: warp "aldebaran",168,112; close; + case 8: warp "yuno",158,125; close; + case 9: warp "einbroch",158,301; close; + case 10: warp "lighthalzen",163,64; close; + case 11: warp "spl_fild02",32,225; close; + case 12: warp "man_fild02",129,61; close; + case 13: warp "mid_camp",62,127; close; + } +} +} + +man_fild02,132,47,4 duplicate(Cat Hand Agent#spl) Cat Hand Agent#man 421 + +- script Mysterious Rock#30::manukrock2 -1,{ if ((countitem(6048) < 3) && (checkquest(12062,PLAYTIME) == -1)) { specialeffect2 EF_REPAIRWEAPON; progressbar "ffff00",10; set .@rhea_ran,rand(1,20); - if (.@rhea_ran < 13) { - getitem 7049,1; //Stone - } - else if (.@rhea_ran == 13) { - getitem 990,1; //Boody_Red - } - else if (.@rhea_ran == 14) { - getitem 991,1; //Crystal_Blue - } - else if (.@rhea_ran == 15) { - getitem 992,1; //Wind_Of_Verdure - } - else if (.@rhea_ran == 16) { - getitem 993,1; //Yellow_Live - } - else if (.@rhea_ran == 17) { - getitem 6080,1; //Manuk_Coin - } - else if (.@rhea_ran > 18) { - getitem 6048,1; //Unidentified_Mineral - } + if (.@rhea_ran < 13) getitem 7049,1; //Stone + else if (.@rhea_ran == 13) getitem 990,1; //Boody_Red + else if (.@rhea_ran == 14) getitem 991,1; //Crystal_Blue + else if (.@rhea_ran == 15) getitem 992,1; //Wind_Of_Verdure + else if (.@rhea_ran == 16) getitem 993,1; //Yellow_Live + else if (.@rhea_ran == 17) getitem 6080,1; //Manuk_Coin + else getitem 6048,1; //Unidentified_Mineral initnpctimer; - disablenpc "Mysterious Rock#39"; - end; - } + disablenpc strnpcinfo(0); + end; } else { mes "This rock contains unidentified minerals."; mes "It's not possible to mine more than the limit."; - close; - } + close; } end; OnTimer120000: - enablenpc "Mysterious Rock#39"; + enablenpc strnpcinfo(0); stopnpctimer; end; } -man_fild02,241,227,0 script Mysterious Rock#40 844,{ - if ((countitem(6048) < 3) && (checkquest(12062,PLAYTIME) == -1)) { - specialeffect2 EF_REPAIRWEAPON; - progressbar "ffff00",10; - set .@rhea_ran,rand(1,20); - if (.@rhea_ran < 13) { - getitem 7049,1; //Stone - } - else if (.@rhea_ran == 13) { - getitem 990,1; //Boody_Red - } - else if (.@rhea_ran == 14) { - getitem 991,1; //Crystal_Blue - } - else if (.@rhea_ran == 15) { - getitem 992,1; //Wind_Of_Verdure - } - else if (.@rhea_ran == 16) { - getitem 993,1; //Yellow_Live - } - else if (.@rhea_ran == 17) { - getitem 6080,1; //Manuk_Coin - } - else if (.@rhea_ran > 18) { - getitem 6048,1; //Unidentified_Mineral - } - initnpctimer; - disablenpc "Mysterious Rock#40"; - end; - } - else { - mes "This rock contains unidentified minerals."; - mes "It's not possible to mine more than the limit."; - close; - } - end; - -OnTimer120000: - enablenpc "Mysterious Rock#40"; - stopnpctimer; - end; -} +man_fild02,146,81,0 duplicate(manukrock2) Mysterious Rock#31 844 +man_fild02,140,148,0 duplicate(manukrock2) Mysterious Rock#32 844 +man_fild02,88,263,0 duplicate(manukrock2) Mysterious Rock#33 844 +man_fild02,146,365,0 duplicate(manukrock2) Mysterious Rock#34 844 +man_fild02,336,305,0 duplicate(manukrock2) Mysterious Rock#35 844 +man_fild02,248,124,0 duplicate(manukrock2) Mysterious Rock#36 844 +man_fild02,285,115,0 duplicate(manukrock2) Mysterious Rock#37 844 +man_fild02,346,116,0 duplicate(manukrock2) Mysterious Rock#38 844 +man_fild02,358,174,0 duplicate(manukrock2) Mysterious Rock#39 844 +man_fild02,241,227,0 duplicate(manukrock2) Mysterious Rock#40 844 spl_fild03,226,151,0 script School of Fish#5::FishingHole_spl3 844,{ if ((checkquest(12060,PLAYTIME) == -1) && (countitem(6039) < 20)) { specialeffect2 EF_BUBBLE; specialeffect2 EF_INVENOM; set .@fcast,15; - if (isequipped(2550)) { //Fisher's_Muffler + if (isequipped(2550)) //Fisher's_Muffler set .@fcast,.@fcast - 2; - } - if (isequipped(2443)) { //Fish_Shoes + if (isequipped(2443)) //Fish_Shoes set .@fcast,.@fcast - 2; - } - if (isequipped(2764)) { //Small_Fishing_Rod + if (isequipped(2764)) //Small_Fishing_Rod set .@fcast,.@fcast - 3; - } - if (isequipped(2775)) { //Lure + if (isequipped(2775)) //Lure set .@fcast,.@fcast - 1; - } - if (isequipped(1599)) { //Ahura_Mazda + if (isequipped(1599)) //Ahura_Mazda set .@fcast,.@fcast - 3; - } - if (isequipped(2199)) { //Angra_Manyu + if (isequipped(2199)) //Angra_Manyu set .@fcast,.@fcast - 4; - } progressbar "ffff00",.@fcast; if (ep13_1_rhea == 13) { if (rand(1,20) == 2) { getitem 6037,1; //Rough_File set ep13_1_rhea,14; specialeffect2 EF_BUBBLE; - mapannounce "spl_fild03","" + strcharinfo(0) + " has caught a Loose File.",bc_map,"0xff77ff"; + mapannounce strcharinfo(3),strcharinfo(0) + " has caught a Loose File.",bc_map,"0xff77ff"; } } set .@rhea_ran,rand(1,70); - if (.@rhea_ran < 20) { - getitem 6039,1; //Piece_Of_Fish - } - else if (.@rhea_ran == 20) { - getitem 908,1; //Spawn - } - else if (.@rhea_ran == 21) { - getitem 909,1; //Jellopy - } - else if (.@rhea_ran == 22) { - getitem 963,1; //Sharp_Scale - } - else if (.@rhea_ran == 23) { - getitem 956,1; //Gill - } - else if (.@rhea_ran == 24) { - getitem 6049,1; //Marlin - } - else if (.@rhea_ran == 25) { - getitem 918,1; //Sticky_Webfoot - } - else if (.@rhea_ran == 26) { - getitem 960,1; //Nipper - } - else if (.@rhea_ran == 27) { - getitem 910,1; //Garlet - } - else if (.@rhea_ran == 28) { - getitem 6081,1; //Splendide_Coin - } - else if ((.@rhea_ran > 28) && (.@rhea_ran < 40)) { - getitem 7049,1; //Stone - } + if (.@rhea_ran < 20) getitem 6039,1; //Piece_Of_Fish + else if (.@rhea_ran == 20) getitem 908,1; //Spawn + else if (.@rhea_ran == 21) getitem 909,1; //Jellopy + else if (.@rhea_ran == 22) getitem 963,1; //Sharp_Scale + else if (.@rhea_ran == 23) getitem 956,1; //Gill + else if (.@rhea_ran == 24) getitem 6049,1; //Marlin + else if (.@rhea_ran == 25) getitem 918,1; //Sticky_Webfoot + else if (.@rhea_ran == 26) getitem 960,1; //Nipper + else if (.@rhea_ran == 27) getitem 910,1; //Garlet + else if (.@rhea_ran == 28) getitem 6081,1; //Splendide_Coin + else if ((.@rhea_ran > 28) && (.@rhea_ran < 40)) getitem 7049,1; //Stone else { mes "Nothing was caught."; close; @@ -2502,17 +492,17 @@ spl_fild03,226,151,0 script School of Fish#5::FishingHole_spl3 844,{ set .@rhea_ran5,rand(1,200); if (.@rhea_ran5 == 3) { getitem 644,1; //Gift_Box - mapannounce "spl_fild03","" + strcharinfo(0) + " has caught a Gift Box.",bc_map,"0x00ffff"; + mapannounce strcharinfo(3),strcharinfo(0) + " has caught a Gift Box.",bc_map,"0x00ffff"; } set .@rhea_ran3,rand(1,500); if (.@rhea_ran3 == 3) { getitem 603,1; //Old_Blue_Box - mapannounce "spl_fild03","" + strcharinfo(0) + " has caught an Old Blue Box.",bc_map,"0x00ffff"; + mapannounce strcharinfo(3),strcharinfo(0) + " has caught an Old Blue Box.",bc_map,"0x00ffff"; } set .@rhea_ran4,rand(1,3000); if (.@rhea_ran4 == 3) { getitem 617,1; //Old_Violet_Box - mapannounce "spl_fild03","" + strcharinfo(0) + " has caught an Old Purple Box.",bc_map,"0x44ff44"; + mapannounce strcharinfo(3),strcharinfo(0) + " has caught an Old Purple Box.",bc_map,"0x44ff44"; } } else { @@ -2521,109 +511,15 @@ spl_fild03,226,151,0 script School of Fish#5::FishingHole_spl3 844,{ } end; } - spl_fild03,268,230,0 duplicate(FishingHole_spl3) School of Fish#6 844 spl_fild03,293,253,0 duplicate(FishingHole_spl3) School of Fish#7 844 spl_fild03,165,100,0 duplicate(FishingHole_spl3) School of Fish#8 844 spl_fild03,317,190,0 duplicate(FishingHole_spl3) School of Fish#9 844 - -spl_fild01,41,118,0 script School of Fish#10::FishingHole_spl1 844,{ - if ((checkquest(12060,PLAYTIME) == -1) && (countitem(6039) < 20)) { - specialeffect2 EF_BUBBLE; - specialeffect2 EF_INVENOM; - set .@fcast,15; - if (isequipped(2550)) { //Fisher's_Muffler - set .@fcast,.@fcast - 2; - } - if (isequipped(2443)) { //Fish_Shoes - set .@fcast,.@fcast - 2; - } - if (isequipped(2764)) { //Small_Fishing_Rod - set .@fcast,.@fcast - 3; - } - if (isequipped(2775)) { //Lure - set .@fcast,.@fcast - 1; - } - if (isequipped(1599)) { //Ahura_Mazda - set .@fcast,.@fcast - 3; - } - if (isequipped(2199)) { //Angra_Manyu - set .@fcast,.@fcast - 4; - } - progressbar "ffff00",.@fcast; - if (ep13_1_rhea == 13) { - if (rand(1,20) == 2) { - getitem 6037,1; //Rough_File - set ep13_1_rhea,14; - specialeffect2 EF_BUBBLE; - mapannounce "spl_fild01","" + strcharinfo(0) + " has caught a Loose File.",bc_map,"0xff77ff"; - } - } - set .@rhea_ran,rand(1,70); - if (.@rhea_ran < 20) { - getitem 6039,1; //Piece_Of_Fish - } - else if (.@rhea_ran == 20) { - getitem 908,1; //Spawn - } - else if (.@rhea_ran == 21) { - getitem 909,1; //Jellopy - } - else if (.@rhea_ran == 22) { - getitem 963,1; //Sharp_Scale - } - else if (.@rhea_ran == 23) { - getitem 956,1; //Gill - } - else if (.@rhea_ran == 24) { - getitem 6049,1; //Marlin - } - else if (.@rhea_ran == 25) { - getitem 918,1; //Sticky_Webfoot - } - else if (.@rhea_ran == 26) { - getitem 960,1; //Nipper - } - else if (.@rhea_ran == 27) { - getitem 910,1; //Garlet - } - else if (.@rhea_ran == 28) { - getitem 6081,1; //Splendide_Coin - } - else if ((.@rhea_ran > 28) && (.@rhea_ran < 40)) { - getitem 7049,1; //Stone - } - else { - mes "Nothing was caught."; - close; - } - set .@rhea_ran5,rand(1,200); - if (.@rhea_ran5 == 3) { - getitem 644,1; //Gift_Box - mapannounce "spl_fild01","" + strcharinfo(0) + " has caught a Gift Box.",bc_map,"0x00ffff"; - } - set .@rhea_ran3,rand(1,500); - if (.@rhea_ran3 == 3) { - getitem 603,1; //Old_Blue_Box - mapannounce "spl_fild01","" + strcharinfo(0) + " has caught a Old Blue Box.",bc_map,"0x00ffff"; - } - set .@rhea_ran4,rand(1,3000); - if (.@rhea_ran4 == 3) { - getitem 617,1; //Old_Violet_Box - mapannounce "spl_fild01","" + strcharinfo(0) + " has caught a Old Purple Box.",bc_map,"0x44ff44"; - } - } - else { - mes "Fish are swimming in the water."; - close; - } - end; -} - -spl_fild01,317,361,0 duplicate(FishingHole_spl1) School of Fish#11 844 -spl_fild01,55,269,0 duplicate(FishingHole_spl1) School of Fish#12 844 -spl_fild01,332,131,0 duplicate(FishingHole_spl1) School of Fish#13 844 -spl_fild01,170,74,0 duplicate(FishingHole_spl1) School of Fish#14 844 +spl_fild01,41,118,0 duplicate(FishingHole_spl3) School of Fish#10 844 +spl_fild01,317,361,0 duplicate(FishingHole_spl3) School of Fish#11 844 +spl_fild01,55,269,0 duplicate(FishingHole_spl3) School of Fish#12 844 +spl_fild01,332,131,0 duplicate(FishingHole_spl3) School of Fish#13 844 +spl_fild01,170,74,0 duplicate(FishingHole_spl3) School of Fish#14 844 // Two Tribes //============================================================ @@ -3418,16 +1314,13 @@ nyd_dun01,55,223,5 script Snorren#ep13md17 454,{ end; OnInit: +OnDisable: disablenpc "Snorren#ep13md17"; end; OnEnable: enablenpc "Snorren#ep13md17"; end; - -OnDisable: - disablenpc "Snorren#ep13md17"; - end; } nyd_dun01,62,233,0 script Trunk of a Tree#ep13 844,2,2,{ @@ -4462,7 +2355,7 @@ OnTouch: close; } -spl_in02,239,93,3 script Terra#ep13md_l03 441,{ +spl_in02,236,92,5 script Arc#ep13md_l02 447,{ if (checkweight(1201,2) == 0) { mes "Wait a moment!!"; mes "You have too many items."; @@ -4484,12 +2377,7 @@ spl_in02,239,93,3 script Terra#ep13md_l03 441,{ mes "[Arc]"; mes "Ah, finally. I've been speaking with Terra while we waited for you."; mes "Terra. This is who saved you..."; - if (Sex == 0) { - mes "You should thank her."; - } - else { - mes "You should thank him."; - } + mes "You should thank "+((Sex)?"him.":"her."); next; mes "[Terra]"; mes "Thank you..."; @@ -4567,185 +2455,73 @@ spl_in02,239,93,3 script Terra#ep13md_l03 441,{ close; } else if (ep13_mdrama == 27) { - mes "[Terra]"; - mes "Arc... I will get some rest..."; - mes "I'm sorry... And. You..."; + if (strnpcinfo(1) == "Arc") { + mes "[Arc]"; + mes "Terra. Get some rest..."; + mes "Rest easy..."; + mes "And..."; + } + else { + mes "[Terra]"; + mes "Arc... I will get some rest..."; + mes "I'm sorry... And. You..."; + } next; - mes "[Terra]"; - mes "Originally.. we Laphine were extremely reluctant to have others in our area..."; - mes "but you are ok..."; + mes "["+strnpcinfo(1)+"]"; + mes "Originally... we Laphine were extremely reluctant to have others in our area."; + mes strcharinfo(0) + ", you will be a special exception."; next; - mes "[Terra]"; - // custom translation - mes "You are always welcome to visit us..."; + mes "["+strnpcinfo(1)+"]"; + if (strnpcinfo(1) == "Arc") mes "That's what Terra wants too."; + mes "It might be cramped, but you are always welcome to visit us."; set ep13_mdrama,28; close; } else if (ep13_mdrama > 27) { - mes "[Terra]"; - mes "I'm sorry..."; - mes "My body is not fully recovered yet..."; + if (strnpcinfo(1) == "Arc") { + mes "[Arc]"; + mes "How are you adapting to Splendide?"; + mes "Terra's still not fully recovered yet, so keep that in mind."; + } + else { + mes "[Terra]"; + mes "I'm sorry..."; + mes "My body is not fully recovered yet..."; + } close; } else { // custom translation - mes "[Terra]"; - mes "I'm sorry... I'm so sleepy..."; - mes "...I want to sleep..."; - close; - } - } - else { - mes "[Terra]"; - mes "ModBurDana...? Mu AnduWehFus Yee OsaLoLars..."; - mes "eoFusser...."; - mes "maurNohser Ur...... ThorNuffLars So "; - close; - } -} - -spl_in02,236,92,5 script Arc#ep13md_l02 447,{ - if (checkweight(1201,2) == 0) { - mes "Wait a moment!!"; - mes "You have too many items."; - mes "You can't receive this."; - mes "Lighten your weight and"; - mes "try again."; - close; - } - if (isequipped(2782) == 1) { - if (ep13_mdrama == 26) { - mes "[Terra]"; - mes "........."; - next; - mes "[Arc]"; - mes "I see. That's what happened."; - mes "But... That Sapha...What has he become to you in that short period of time?"; - next; - select("Arc?"); - mes "[Arc]"; - mes "Ah, finally. I've been speaking with Terra while we waited for you."; - mes "Terra. This is who saved you..."; - if (Sex == 0) { - mes "You should thank her."; + if (strnpcinfo(1) == "Arc") { + mes "[Arc]"; + mes "The back of the right ... "; + mes "......"; } else { - mes "You should thank him."; + mes "[Terra]"; + mes "I'm sorry... I'm so sleepy..."; + mes "...I want to sleep..."; } - next; - mes "[Terra]"; - mes "Thank you..."; - mes "I'm sorry Arc... Sorry..."; - mes "......"; - next; - mes "[Arc]"; - mes "So, this is the story."; - mes "Terra was wandering around your Camp and found a Sapha who was also wandering around your Camp at the time."; - next; - mes "[Arc]"; - mes "They were both being cautious not to be seen by you humans but they caught sight of each other and started to fight."; - next; - mes "[Arc]"; - mes "And then they eventually fell into that hole in the swamp and ended up in that cave."; - next; - mes "[Terra]"; - mes "Yeah... We were both unconscious for some time.."; - mes "And by the time we were able to wake up and see... We were surrounded."; - next; - mes "[Terra]"; - mes "Our main concern was getting out of there..."; - mes "Even though we couldn't understand each other's language... We made a temporary truce."; - next; - mes "[Terra]"; - mes "And then....."; - mes "........."; - next; - select("So that's what happened."); - mes "[" + strcharinfo(0) + "]"; - mes "You were outnumbered and at the last moment Ogen sacrificed himself to protect you."; - next; - mes "[Terra]"; - mes "So... I wanted to help him..."; - mes "I was just trying to repay him..."; - next; - mes "[Terra]"; - mes "Was I wrong...?"; - mes "Was I thinking wrong?"; - next; - mes "[Arc]"; - mes "Repaying one's dept is a good thing."; - mes "Especially for a proud Laphine, It sure is."; - next; - mes "[Arc]"; - mes "But Terra..."; - mes "You've made two big mistakes."; - mes "First is, You went away without permission..."; - mes "And secondly..."; - next; - mes "[Arc]"; - mes "You didn't ask for help."; - mes "If something like that happened... of course I would help..."; - next; - mes "[Terra]"; - mes "I'm sorry Arc... I'm sorry..."; - mes "I won't act foolish ever again."; - next; - mes "[Arc]"; - mes "Get some rest."; - mes "I will put in a good word to the superiors..."; - mes "And " + strcharinfo(0) + "..."; - mes "Thank you."; - next; - mes "[Arc]"; - mes "Here, I will give you these to show my appreciation."; - mes "It's not much, but you will be able to buy things in Splendide with these."; - next; - mes "[Arc]"; - mes "I'm sorry this is all I can give you for now."; - set ep13_mdrama,27; - getitem 6081,25; //Splendide_Coin - getexp 120000,10000; - completequest 7071; close; } - else if (ep13_mdrama == 27) { - mes "[Arc]"; - mes "Terra. Get some rest..."; - mes "Rest easy..."; - mes "And..."; - next; - mes "[Arc]"; - mes ".Originally.. we Laphine were extremely reluctant to have others in our area."; - mes "" + strcharinfo(0) + ", you will be a special exception."; - next; - mes "[Arc]"; - mes "That's what Terra wants too."; - mes "It might be cramped, but you are always welcome to visit us."; - set ep13_mdrama,28; - close; - } - else if (ep13_mdrama > 27) { + } + else { + if (strnpcinfo(1) == "Arc") { mes "[Arc]"; - mes "How are you adapting to Splendide?"; - mes "Terra's still not fully recovered yet, so keep that in mind."; - close; + mes "HirWosWeh. Yee DiebVilFar U manTalVil."; + mes "LarsNeiser...??"; + mes "VeldTiTal Ko SharDurYur Di ?"; } else { - // custom translation - mes "[Arc]"; - mes "The back of the right ... "; - mes "......"; - close; + mes "[Terra]"; + mes "ModBurDana...? Mu AnduWehFus Yee OsaLoLars..."; + mes "eoFusser...."; + mes "maurNohser Ur...... ThorNuffLars So "; } - } - else { - mes "[Arc]"; - mes "HirWosWeh. Yee DiebVilFar U manTalVil."; - mes "LarsNeiser...??"; - mes "VeldTiTal Ko SharDurYur Di ?"; close; } } +spl_in02,239,93,3 duplicate(Arc#ep13md_l02) Terra#ep13md_l03 441 splendide,287,140,0 script terrashome_in 45,1,1,{ OnTouch: @@ -5531,35 +3307,7 @@ mid_camp,192,239,4 script Wanted Sign#ep13_2ect01 857,{ } } -nyd_dun01,258,134,0 script Dragon Egg#ep13_degg01 463,{ - if (checkweight(1201,2) == 0) { - mes "- You're carrying too many items. -"; - close; - } - if ((ep13_2_dayegg == 1) && (countitem(6093) < 10)) { - mes "We just got fresh eggs from the dragon nest."; - getitem 6093,1; //Egg_Of_Draco - disablenpc "Dragon Egg#ep13_degg01"; - initnpctimer; - close; - } - end; - -OnTimer420000: - enablenpc "Dragon Egg#ep13_degg01"; - stopnpctimer; - end; - -OnEnable: - enablenpc "Dragon Egg#ep13_degg01"; - end; - -OnDisable: - disablenpc "Dragon Egg#ep13_degg01"; - end; -} - -nyd_dun01,100,210,0 script Dragon Egg#ep13_degg02 463,{ +- script Dragon Egg#ep13_degg_0 -1,{ if (checkweight(1201,2) == 0) { mes "- You're carrying too many items. -"; close; @@ -5567,55 +3315,34 @@ nyd_dun01,100,210,0 script Dragon Egg#ep13_degg02 463,{ if ((ep13_2_dayegg == 1) && (countitem(6093) < 10)) { mes "We just got fresh eggs from the dragon nest."; getitem 6093,1; //Egg_Of_Draco - disablenpc "Dragon Egg#ep13_degg02"; + disablenpc strnpcinfo(1); initnpctimer; close; } end; OnTimer420000: - enablenpc "Dragon Egg#ep13_degg02"; + enablenpc strnpcinfo(1); stopnpctimer; end; OnEnable: - enablenpc "Dragon Egg#ep13_degg02"; + enablenpc strnpcinfo(1); end; OnDisable: - disablenpc "Dragon Egg#ep13_degg02"; + disablenpc strnpcinfo(1); end; } -nyd_dun01,74,68,0 script Dragon Egg#ep13_degg03 463,{ - if (checkweight(1201,2) == 0) { - mes "- You're carrying too many items. -"; - close; - } - if ((ep13_2_dayegg == 1) && (countitem(6093) < 10)) { - mes "We just got fresh eggs from the dragon nest."; - getitem 6093,1; //Egg_Of_Draco - disablenpc "Dragon Egg#ep13_degg03"; - initnpctimer; - close; - } - end; +nyd_dun01,258,134,0 duplicate(Dragon Egg#ep13_degg_0) Dragon Egg#ep13_degg01 463 +nyd_dun01,100,210,0 duplicate(Dragon Egg#ep13_degg_0) Dragon Egg#ep13_degg02 463 +nyd_dun01,74,68,0 duplicate(Dragon Egg#ep13_degg_0) Dragon Egg#ep13_degg03 463 +nyd_dun01,98,142,0 duplicate(Dragon Egg#ep13_degg_0) Dragon Egg#ep13_degg04 463 +nyd_dun01,244,157,0 duplicate(Dragon Egg#ep13_degg_0) Dragon Egg#ep13_degg05 463 +nyd_dun01,59,185,0 duplicate(Dragon Egg#ep13_degg_0) Dragon Egg#ep13_degg06 463 -OnTimer420000: - enablenpc "Dragon Egg#ep13_degg03"; - stopnpctimer; - end; - -OnEnable: - enablenpc "Dragon Egg#ep13_degg03"; - end; - -OnDisable: - disablenpc "Dragon Egg#ep13_degg03"; - end; -} - -nyd_dun01,98,142,0 script Dragon Egg#ep13_degg04 463,{ +nyd_dun02,68,256,0 script Dragon Egg#ep13_degg_1 463,{ if (checkweight(1201,2) == 0) { mes "- You're carrying too many items. -"; close; @@ -5623,251 +3350,61 @@ nyd_dun01,98,142,0 script Dragon Egg#ep13_degg04 463,{ if ((ep13_2_dayegg == 1) && (countitem(6093) < 10)) { mes "We just got fresh eggs from the dragon nest."; getitem 6093,1; //Egg_Of_Draco - disablenpc "Dragon Egg#ep13_degg04"; - initnpctimer; - close; - } - end; - -OnTimer420000: - enablenpc "Dragon Egg#ep13_degg04"; - stopnpctimer; - end; - -OnEnable: - enablenpc "Dragon Egg#ep13_degg04"; - end; - -OnDisable: - disablenpc "Dragon Egg#ep13_degg04"; - end; -} - -nyd_dun01,244,157,0 script Dragon Egg#ep13_degg05 463,{ - if (checkweight(1201,2) == 0) { - mes "- You're carrying too many items. -"; - close; - } - if ((ep13_2_dayegg == 1) && (countitem(6093) < 10)) { - mes "We just got fresh eggs from the dragon nest."; - getitem 6093,1; //Egg_Of_Draco - disablenpc "Dragon Egg#ep13_degg05"; - initnpctimer; - close; - } - end; - -OnTimer420000: - enablenpc "Dragon Egg#ep13_degg05"; - stopnpctimer; - end; - -OnEnable: - enablenpc "Dragon Egg#ep13_degg05"; - end; - -OnDisable: - disablenpc "Dragon Egg#ep13_degg05"; - end; -} - -nyd_dun01,59,185,0 script Dragon Egg#ep13_degg06 463,{ - if (checkweight(1201,2) == 0) { - mes "- You're carrying too many items. -"; - close; - } - if ((ep13_2_dayegg == 1) && (countitem(6093) < 10)) { - mes "We just got fresh eggs from the dragon nest."; - getitem 6093,1; //Egg_Of_Draco - disablenpc "Dragon Egg#ep13_degg06"; - initnpctimer; - close; - } - end; - -OnTimer420000: - enablenpc "Dragon Egg#ep13_degg06"; - stopnpctimer; - end; - -OnEnable: - enablenpc "Dragon Egg#ep13_degg06"; - end; - -OnDisable: - disablenpc "Dragon Egg#ep13_degg06"; - end; -} - -nyd_dun02,68,256,0 script Dragon Egg#ep13_degg11 463,{ - if (checkweight(1201,2) == 0) { - mes "- You're carrying too many items. -"; - close; - } - if ((ep13_2_dayegg == 1) && (countitem(6093) < 10)) { - mes "We just got fresh eggs from the dragon nest."; - getitem 6093,1; //Egg_Of_Draco - disablenpc "Dragon Egg#ep13_degg11"; + disablenpc strnpcinfo(1); initnpctimer; close; } end; OnTimer240000: - enablenpc "Dragon Egg#ep13_degg11"; + enablenpc strnpcinfo(1); stopnpctimer; end; OnEnable: - enablenpc "Dragon Egg#ep13_degg11"; + enablenpc strnpcinfo(1); end; OnDisable: - disablenpc "Dragon Egg#ep13_degg11"; + disablenpc strnpcinfo(1); end; } -nyd_dun02,202,166,0 script Dragon Egg#ep13_degg12 463,{ - if (checkweight(1201,2) == 0) { - mes "- You're carrying too many items. -"; - close; - } - if ((ep13_2_dayegg == 1) && (countitem(6093) < 10)) { - mes "We just got fresh eggs from the dragon nest."; - getitem 6093,1; //Egg_Of_Draco - disablenpc "Dragon Egg#ep13_degg12"; - initnpctimer; - close; - } - end; - -OnTimer240000: - enablenpc "Dragon Egg#ep13_degg12"; - stopnpctimer; - end; - -OnEnable: - enablenpc "Dragon Egg#ep13_degg12"; - end; - -OnDisable: - disablenpc "Dragon Egg#ep13_degg12"; - end; -} - -nyd_dun02,200,165,0 script Dragon Egg#ep13_degg13 463,{ - if (checkweight(1201,2) == 0) { - mes "- You're carrying too many items. -"; - close; - } - if ((ep13_2_dayegg == 1) && (countitem(6093) < 10)) { - mes "We just got fresh eggs from the dragon nest."; - getitem 6093,1; //Egg_Of_Draco - disablenpc "Dragon Egg#ep13_degg13"; - initnpctimer; - close; - } - end; - -OnTimer240000: - enablenpc "Dragon Egg#ep13_degg13"; - stopnpctimer; - end; - -OnEnable: - enablenpc "Dragon Egg#ep13_degg13"; - end; - -OnDisable: - disablenpc "Dragon Egg#ep13_degg13"; - end; -} - -nyd_dun02,201,166,0 script Dragon Egg#ep13_degg16 463,{ - if (checkweight(1201,2) == 0) { - mes "- You're carrying too many items. -"; - close; - } - if ((ep13_2_dayegg == 1) && (countitem(6093) < 10)) { - mes "We just got fresh eggs from the dragon nest."; - getitem 6093,1; //Egg_Of_Draco - disablenpc "Dragon Egg#ep13_degg16"; - initnpctimer; - close; - } - end; - -OnTimer120000: - enablenpc "Dragon Egg#ep13_degg16"; - stopnpctimer; - end; - -OnEnable: - enablenpc "Dragon Egg#ep13_degg16"; - end; - -OnDisable: - disablenpc "Dragon Egg#ep13_degg16"; - end; -} +nyd_dun02,68,256,0 duplicate(Dragon Egg#ep13_degg_1) Dragon Egg#ep13_degg11 463 +nyd_dun02,202,166,0 duplicate(Dragon Egg#ep13_degg_1) Dragon Egg#ep13_degg12 463 +nyd_dun02,200,165,0 duplicate(Dragon Egg#ep13_degg_1) Dragon Egg#ep13_degg13 463 -nyd_dun02,203,167,0 script Dragon Egg#ep13_degg17 463,{ +nyd_dun02,201,166,0 script Dragon Egg#ep13_degg_2 463,{ if (checkweight(1201,2) == 0) { mes "- You're carrying too many items. -"; close; } - else { - } if ((ep13_2_dayegg == 1) && (countitem(6093) < 10)) { mes "We just got fresh eggs from the dragon nest."; getitem 6093,1; //Egg_Of_Draco - disablenpc "Dragon Egg#ep13_degg17"; + disablenpc strnpcinfo(1); initnpctimer; close; } end; OnTimer120000: - enablenpc "Dragon Egg#ep13_degg17"; + enablenpc strnpcinfo(1); stopnpctimer; end; OnEnable: - enablenpc "Dragon Egg#ep13_degg17"; + enablenpc strnpcinfo(1); end; OnDisable: - disablenpc "Dragon Egg#ep13_degg17"; + disablenpc strnpcinfo(1); end; } -nyd_dun02,201,164,0 script Dragon Egg#ep13_degg18 463,{ - if (checkweight(1201,2) == 0) { - mes "- You're carrying too many items. -"; - close; - } - if ((ep13_2_dayegg == 1) && (countitem(6093) < 10)) { - mes "We just got fresh eggs from the dragon nest."; - getitem 6093,1; //Egg_Of_Draco - disablenpc "Dragon Egg#ep13_degg18"; - initnpctimer; - close; - } - end; - -OnTimer120000: - enablenpc "Dragon Egg#ep13_degg18"; - stopnpctimer; - end; - -OnEnable: - enablenpc "Dragon Egg#ep13_degg18"; - end; - -OnDisable: - disablenpc "Dragon Egg#ep13_degg18"; - end; -} +nyd_dun02,201,166,0 duplicate(Dragon Egg#ep13_degg_2) Dragon Egg#ep13_degg16 463 +nyd_dun02,203,167,0 duplicate(Dragon Egg#ep13_degg_2) Dragon Egg#ep13_degg17 463 +nyd_dun02,201,164,0 duplicate(Dragon Egg#ep13_degg_2) Dragon Egg#ep13_degg18 463 nyd_dun02,201,157,5 script Egg Keeper Draco#13_1 2013,3,3,{ @@ -5959,6 +3496,7 @@ nyd_dun02,206,114,5 script Stranger#ep13_2_dan02 456,3,3,{ end; OnInit: +OnDisable: disablenpc "Stranger#ep13_2_dan02"; end; @@ -5966,10 +3504,6 @@ OnEnable: enablenpc "Stranger#ep13_2_dan02"; end; -OnDisable: - disablenpc "Stranger#ep13_2_dan02"; - end; - Oncall: monster "nyd_dun02",206,114,"Runway Dandelion",2026,1,"Stranger#ep13_2_dan04::OnMyMobDead"; end; @@ -5994,13 +3528,8 @@ OnMyMobDead: end; OnTimer300000: - set .@temp_call,rand(1,2); - if (.@temp_call == 1) { - enablenpc "Stranger#ep13_2_dan01"; - } - else { - donpcevent "Stranger#ep13_2_dan02::OnEnable"; - } + if (rand(2)) enablenpc "Stranger#ep13_2_dan01"; + else donpcevent "Stranger#ep13_2_dan02::OnEnable"; stopnpctimer; end; } @@ -6013,13 +3542,8 @@ OnMyMobDead: end; OnTimer300000: - set .@temp_call,rand(1,2); - if (.@temp_call == 1) { - enablenpc "Stranger#ep13_2_dan02"; - } - else { - donpcevent "Stranger#ep13_2_dan01::OnEnable"; - } + if (rand(2)) enablenpc "Stranger#ep13_2_dan02"; + else donpcevent "Stranger#ep13_2_dan01::OnEnable"; stopnpctimer; end; } @@ -6974,24 +4498,20 @@ mid_camp,147,256,3 script Rune Midgarts Magician#1 735,{ } } -spl_fild02,27,218,0 script Half-buried Gem#1 844,{ +function script jewel_13_2 { if (ep13_2_rhea < 5) { mes "- Under a round pile of earth, -"; - mes "- there's a Red Gem -"; + mes "- there's a "+getarg(0)+" Gem -"; mes "- half-buried. -"; close; } else if (ep13_2_rhea == 5) { - set .@check_spljew00,checkquest(8241); - if (.@check_spljew00 == -1) { + if (checkquest(8240+getarg(1)) == -1) { mes "- Under a round pile of earth, -"; - mes "- there's a Red Gem -"; + mes "- there's a "+getarg(0)+" Gem -"; mes "- half-buried. -"; next; - switch(select("Dig out the Gem:Leave it alone")) { - case 1: - break; - case 2: + if(select("Dig out the Gem:Leave it alone")==2) { mes "- You overspread some earth over the Gem -"; mes "- and left the Gem as it was. -"; next; @@ -7001,15 +4521,15 @@ spl_fild02,27,218,0 script Half-buried Gem#1 844,{ } if (rand(1,4) == 2) { mes "- You dug up a pile of earth -"; - mes "- and pulled out the Red Gem -"; - setquest 8241; - getitem 7575,1; //Red_Jewel_ + mes "- and pulled out the "+getarg(0)+" Gem -"; + setquest 8240+getarg(1); + getitem 7574+getarg(1),1; close; } else { mes "- As you dug up a pile of earth, -"; mes "- a Thief Bug attacks you! -"; - donpcevent "Half-buried Gem#1::OnDisable"; + donpcevent "Half-buried Gem#"+getarg(1)+"::OnDisable"; next; mes "["+ strcharinfo(0) +"]"; mes "What the heck is this?!?!?!"; @@ -7018,17 +4538,20 @@ spl_fild02,27,218,0 script Half-buried Gem#1 844,{ } else { mes "- Small pile of earth -"; - mes "- which you dug up the Red Gem -"; + mes "- which you dug up the "+getarg(0)+" Gem -"; close; } } else { mes "- Small pile of earth -"; - mes "- which you dug up the Red Gem -"; + mes "- which you dug up the "+getarg(0)+" Gem -"; close; } end; +} +spl_fild02,27,218,0 script Half-buried Gem#1 844,{ + callfunc "jewel_13_2","Red",1; OnInit: hideoffnpc "Half-buried Gem#1"; @@ -7060,59 +4583,7 @@ OnTimer300000: } man_fild03,227,109,0 script Half-buried Gem#2 844,{ - if (ep13_2_rhea < 5) { - mes "- Under a round pile of earth, -"; - mes "- there's a Blue Gem -"; - mes "- half-buried. -"; - close; - } - else if (ep13_2_rhea == 5) { - set .@check_manjew00,checkquest(8242); - if (.@check_manjew00 == -1) { - mes "- Under a round pile of earth, -"; - mes "- there's a Red Gem -"; - mes "- half-buried. -"; - next; - switch(select("Dig out the Gem:Leave it alone")) { - case 1: - break; - case 2: - mes "- You overspread some earth over the Gem -"; - mes "- and left the Gem as it was. -"; - next; - mes "["+ strcharinfo(0) +"]"; - mes "...What the heck am I doing now..."; - close; - } - if (rand(1,4) == 2) { - mes "- You dug up a pile of earth -"; - mes "- and pulled out the Blue Gem -"; - setquest 8242; - getitem 7576,1; //Blue_Jewel_ - close; - } - else { - mes "- As you dug up a pile of earth, -"; - mes "- a Thief Bug attacks you! -"; - donpcevent "Half-buried Gem#2::OnDisable"; - next; - mes "["+ strcharinfo(0) +"]"; - mes "What the heck is this?!?!?!"; - close; - } - } - else { - mes "- Small pile of earth -"; - mes "- which you dug up the Blue Gem -"; - close; - } - } - else { - mes "- Small pile of earth -"; - mes "- which you dug up the Blue Gem -"; - close; - } - end; + callfunc "jewel_13_2","Blue",2; OnInit: hideoffnpc "Half-buried Gem#2"; @@ -7217,8 +4688,8 @@ mid_camp,7,3,0 script Translator Preparation#1 708,{ //============================================================ man_in01,372,221,5 script Scientist#lifeguard 449,{ if ((isequipped(2782) == 1) && (ep13_2_rhea == 100)) { + mes "[Dr. Lifeguard]"; if (ep13_2_tre == 0) { - mes "[Dr. Lifeguard]"; mes "Recently, it seems like my skin is becoming really dry."; next; mes "[Dr. Lifeguard]"; @@ -7281,225 +4752,67 @@ man_in01,372,221,5 script Scientist#lifeguard 449,{ } else if ((ep13_2_tre == 1) || (ep13_2_tre == 100)) { if (checkweight(1201,1) == 0) { - mes "[Dr. Lifeguard]"; mes "It looks like you're carrying too many things."; mes "Why not put some of your items in storage and come back?"; close; } - set .@dayq_chk,checkquest(2182,PLAYTIME); if ((.@dayq_chk == 0) || (.@dayq_chk == 1)) { - mes "[Dr. Lifeguard]"; mes "The future of the Sapha is up to you."; mes "I do not have any need of your help right now."; close; } else { erasequest 2182; - set .@rand_dayq,rand(1,3); - if (.@rand_dayq == 1) { - mes "[Dr. Lifeguard]"; - mes "Recently, someone who came from Schwaltzvalt gave me a small mineral as a gift from his home town when he saw our study of Bradium."; - next; - mes "[Dr. Lifeguard]"; - mes "I can't say for sure until now,"; - mes "but this mineral seems to have"; - mes "many interesting features."; - next; - mes "[Dr. Lifeguard]"; - mes "As I examine this mineral"; - mes "more and more, it's really"; - mes "different from the one in Jotunheim."; - mes "This mineral must be helpful"; - mes "to make a new vaccine!"; - next; - mes "[Dr. Lifeguard]"; - mes "But the amount of the mineral"; - mes "is too little to make a"; - mes "preparation for the"; - mes "examination."; - next; - mes "[Dr. Lifeguard]"; - mes "You said you're from Rune Midgard, right? Do you think you can bring me a little bit more of that mineral.."; - next; - mes "[Dr. Lifeguard]"; - mes "He said it's from"; - mes "^FF0000Mt. Mjolnir^000000."; - mes "I think ^FF000010^000000 would be enough."; - next; - mes "[Dr. Lifeguard]"; - mes "I'll give you this portable toolbox."; - mes "Things like a detector and a little hammer for mining minerals are included in this toolbox."; - next; - mes "[Dr. Lifeguard]"; - mes "Take it, it shold be"; - mes "helpful in collecting"; - mes "the minerals I need."; - set ep13_2_tre,2; - setquest 2179; - getitem 6076,1; //Portable_Toolbox - close; + switch(rand(1,3)) { + case 1: setarray .@rand_dayq$[0],"Mt. Mjolnir","10","2"; break; + case 2: setarray .@rand_dayq$[0],"Abyss Lake","5","3"; break; + case 3: setarray .@rand_dayq$[0],"Thor Volcano","5","4"; break; } - else if (.@rand_dayq == 2) { - mes "[Dr. Lifeguard]"; - mes "Recently, someone who came from Schwaltzvalt gave me a small mineral as a gift from his home town when he saw our study of Bradium."; - next; - mes "[Dr. Lifeguard]"; - mes "I can't say for sure until now,"; - mes "but this mineral seems to have"; - mes "many interesting features."; - next; - mes "[Dr. Lifeguard]"; - mes "As I examine this mineral"; - mes "more and more, it's really"; - mes "different from the one in Jotunheim."; - mes "This mineral must be helpful"; - mes "to make a new vaccine!"; - next; - mes "[Dr. Lifeguard]"; - mes "But the amount of the mineral"; - mes "is too little to make a"; - mes "preparation for the"; - mes "examination."; - next; - mes "[Dr. Lifeguard]"; - mes "You said you're from Rune Midgard, right? Do you think you can bring me a little bit more of that mineral.."; - next; - mes "[Dr. Lifeguard]"; - mes "He said it's from"; - mes "^FF0000Abyss Lake^000000."; - mes "I think ^FF00005^000000 would be enough."; - next; - mes "[Dr. Lifeguard]"; - mes "I'll give you this portable toolbox."; - mes "Things like a detector and a little hammer for mining minerals are included in this toolbox."; - next; - mes "[Dr. Lifeguard]"; - mes "Take it, it shold be"; - mes "helpful in collecting"; - mes "the minerals I need."; - set ep13_2_tre,3; - setquest 2180; - getitem 6076,1; //Portable_Toolbox - close; - } - else { - mes "[Dr. Lifeguard]"; - mes "Recently, someone who came from Schwaltzvalt gave me a small mineral as a gift from his home town when he saw our study of Bradium."; - next; - mes "[Dr. Lifeguard]"; - mes "I can't say for sure until now,"; - mes "but this mineral seems to have"; - mes "many interesting features."; - next; - mes "[Dr. Lifeguard]"; - mes "As I examine this mineral"; - mes "more and more, it's really"; - mes "different from the one in Jotunheim."; - mes "This mineral must be helpful"; - mes "to make a new vaccine!"; - next; - mes "[Dr. Lifeguard]"; - mes "But the amount of the mineral"; - mes "is too little to make a"; - mes "preparation for the"; - mes "examination."; - next; - mes "[Dr. Lifeguard]"; - mes "You said you're from Rune Midgard, right? Do you think you can bring me a little bit more of that mineral.."; - next; - mes "[Dr. Lifeguard]"; - mes "He said it's from"; - mes "^FF0000Thor Volcano^000000."; - mes "I think ^FF00005^000000 would be enough."; - next; - mes "[Dr. Lifeguard]"; - mes "I'll give you this portable toolbox."; - mes "Things like a detector and a little hammer for mining minerals are included in this toolbox."; - next; - mes "[Dr. Lifeguard]"; - mes "Take it, it shold be"; - mes "helpful in collecting"; - mes "the minerals I need."; - set ep13_2_tre,4; - setquest 2181; - getitem 6076,1; //Portable_Toolbox - close; - } - } - - } - else if (ep13_2_tre == 2) { - if (countitem(6077) > 9) { - mes "[Dr. Lifeguard]"; - mes "Oh! Yes, that's it!"; - mes "This much will be enough!"; + mes "Recently, someone who came from Schwaltzvalt gave me a small mineral as a gift from his home town when he saw our study of Bradium."; next; mes "[Dr. Lifeguard]"; - mes "I really appreciate your help."; + mes "I can't say for sure until now,"; + mes "but this mineral seems to have"; + mes "many interesting features."; next; mes "[Dr. Lifeguard]"; - mes "These are coins of the Manuk."; - mes "This may not be much, but if you collect more, they can be used to buy some items from our merchants."; + mes "As I examine this mineral"; + mes "more and more, it's really"; + mes "different from the one in Jotunheim."; + mes "This mineral must be helpful"; + mes "to make a new vaccine!"; next; mes "[Dr. Lifeguard]"; - mes "If you want to help my study for the sake of the Sapha, come to me at any time."; - mes "I will be very happy for any help you can give."; - set .@stone_chk,countitem(6077); - set .@stoneelse_chk,countitem(6078); - delitem 6077,.@stone_chk; //Rough_Mineral - delitem 6078,.@stoneelse_chk; //Stone_Fragments - delitem 6076,1; //Portable_Toolbox - set ep13_2_tre,100; - getitem 6080,2; //Manuk_Coin - getexp 0,70000; - changequest 2179,2182; - close; - } - else { - mes "[Dr. Lifeguard]"; - mes "The future of the Sapha is up to you."; - mes "I wish you good luck."; - close; - } - } - else if (ep13_2_tre == 3) { - if (countitem(6077) > 4) { - mes "[Dr. Lifeguard]"; - mes "Oh! Yes, that's it!"; - mes "This much will be enough!"; + mes "But the amount of the mineral"; + mes "is too little to make a"; + mes "preparation for the"; + mes "examination."; next; mes "[Dr. Lifeguard]"; - mes "I really appreciate your help."; + mes "You said you're from Rune Midgard, right? Do you think you can bring me a little bit more of that mineral.."; next; mes "[Dr. Lifeguard]"; - mes "These are coins of the Manuk."; - mes "This may not be much, but if you collect more, they can be used to buy some items from our merchants."; + mes "He said it's from"; + mes "^FF0000"+.@rand_dayq$[0]+"^000000."; + mes "I think ^FF0000"+.@rand_dayq$[1]+"^000000 would be enough."; next; mes "[Dr. Lifeguard]"; - mes "If you want to help my study for the sake of the Sapha, come to me at any time."; - mes "I will be very happy for any help you can give."; - set .@stone_chk,countitem(6077); - set .@stoneelse_chk,countitem(6078); - delitem 6077,.@stone_chk; //Rough_Mineral - delitem 6078,.@stoneelse_chk; //Stone_Fragments - delitem 6076,1; //Portable_Toolbox - set ep13_2_tre,100; - getitem 6080,2; //Manuk_Coin - getexp 0,70000; - changequest 2180,2182; - close; - } - else { + mes "I'll give you this portable toolbox."; + mes "Things like a detector and a little hammer for mining minerals are included in this toolbox."; + next; mes "[Dr. Lifeguard]"; - mes "The future of the Sapha is up to you."; - mes "I wish you good luck."; + mes "Take it, it shold be"; + mes "helpful in collecting"; + mes "the minerals I need."; + set ep13_2_tre,atoi(.@rand_dayq$[2]); + setquest 2179+(atoi(.@rand_dayq$[2])-2); + getitem 6076,1; //Portable_Toolbox close; } } - else if (ep13_2_tre == 4) { - if (countitem(6077) > 4) { - mes "[Dr. Lifeguard]"; + else if (ep13_2_tre == 2 || ep13_2_tre == 3 || ep13_2_tre == 4) { + if ((ep13_2_tre == 2 && countitem(6077) > 9) || (ep13_2_tre != 2 && countitem(6077) > 4)) { mes "Oh! Yes, that's it!"; mes "This much will be enough!"; next; @@ -7521,18 +4834,16 @@ man_in01,372,221,5 script Scientist#lifeguard 449,{ set ep13_2_tre,100; getitem 6080,2; //Manuk_Coin getexp 0,70000; - changequest 2181,2182; + changequest 2179+(ep13_2_tre-2),2182; close; } else { - mes "[Dr. Lifeguard]"; mes "The future of the Sapha is up to you."; mes "I wish you good luck."; close; } } else { - mes "[Dr. Lifeguard]"; mes "Hmm..."; close; } @@ -7548,33 +4859,64 @@ man_in01,372,221,5 script Scientist#lifeguard 449,{ } } -mjolnir_01,364,256,0 script #mj01_find -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; +function script find_13_2 { + switch (getarg(0)) { + case 0: setarray .@Check[0],2,10; set .@str$,"Mt. Mjolnir"; break; + case 1: setarray .@Check[0],3,5; set .@str$,"Abyss Lake"; break; + case 2: setarray .@Check[0],4,5; set .@str$,"Thor Volcano"; break; + } + if (ep13_2_tre != .@Check[0] || countitem(6076) != 1 || countitem(6077) >= .@Check[1]) end; + mes "- Just arrived at "+.@str$+". I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; + next; + switch(select("Check current location.:Do nothing.")) { + case 1: + mes "- You pressed the button of the detector. -"; next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,32,309,1,0x00FF00; - viewpoint 1,217,34,2,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } + mes "[Mineral Detector]"; + mes "Bee beep -"; + if (getarg(1)) return; + next; + mes "- Nothing's found. -"; + close; + case 2: + mes "- You decide to do nothing. -"; + close; } - end; } -mjolnir_01,32,309,3 script #mj01_01 111,7,7,{ +- script mjo_no_find -1,{ + end; + +OnTouch: + callfunc "find_13_2",0,0; + end; +} + +mjolnir_03,76,258,0 duplicate(mjo_no_find) #mj03_find_1 -1,5,5 +mjolnir_03,227,204,0 duplicate(mjo_no_find) #mj03_find_2 -1,5,5 +mjolnir_05,82,171,0 duplicate(mjo_no_find) #mj05_find_1 -1,5,5 +mjolnir_05,219,375,0 duplicate(mjo_no_find) #mj05_find_2 -1,5,5 +mjolnir_06,28,332,0 duplicate(mjo_no_find) #mj06_find_1 -1,5,5 +mjolnir_06,275,50,0 duplicate(mjo_no_find) #mj06_find_2 -1,5,5 +mjolnir_06,371,78,0 duplicate(mjo_no_find) #mj06_find_3 -1,5,5 +mjolnir_07,26,373,0 duplicate(mjo_no_find) #mj07_find_1 -1,5,5 +mjolnir_07,214,373,0 duplicate(mjo_no_find) #mj07_find_2 -1,5,5 +mjolnir_07,372,355,0 duplicate(mjo_no_find) #mj07_find_3 -1,5,5 +mjolnir_07,375,233,0 duplicate(mjo_no_find) #mj07_find_4 -1,5,5 +mjolnir_07,26,78,0 duplicate(mjo_no_find) #mj07_find_5 -1,5,5 +mjolnir_07,157,25,0 duplicate(mjo_no_find) #mj07_find_6 -1,5,5 +mjolnir_08,39,239,0 duplicate(mjo_no_find) #mj08_find_1 -1,5,5 +mjolnir_08,36,344,0 duplicate(mjo_no_find) #mj08_find_2 -1,5,5 +mjolnir_08,160,349,0 duplicate(mjo_no_find) #mj08_find_3 -1,5,5 +mjolnir_08,359,258,0 duplicate(mjo_no_find) #mj08_find_4 -1,5,5 +mjolnir_08,193,62,0 duplicate(mjo_no_find) #mj08_find_5 -1,5,5 +mjolnir_11,29,220,0 duplicate(mjo_no_find) #mj11_find_1 -1,5,5 +mjolnir_11,175,29,0 duplicate(mjo_no_find) #mj11_find_2 -1,5,5 +mjolnir_12,199,370,0 duplicate(mjo_no_find) #mj12_find_1 -1,5,5 +mjolnir_12,44,25,0 duplicate(mjo_no_find) #mj12_find_2 -1,5,5 +mjolnir_12,220,37,0 duplicate(mjo_no_find) #mj12_find_3 -1,5,5 + +- script mjo_find -1,{ if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { if (countitem(6077) < 10) { mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; @@ -7584,8 +4926,7 @@ mjolnir_01,32,309,3 script #mj01_01 111,7,7,{ mes "Clang! Clang! Clang! Clang!"; close2; progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { + if (rand(1,6) < 4) { mes "- You failed to mine minerals. -"; getitem 6078,1; //Stone_Fragments close; @@ -7594,18 +4935,12 @@ mjolnir_01,32,309,3 script #mj01_01 111,7,7,{ mes "- You succeeded to mine minerals. -"; emotion e_ic,1; set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,1; //Rough_Mineral - } - else { - getitem 6077,2; //Rough_Mineral - } + if (.@stst == 5) getitem 6077,5; //Rough_Mineral + else if (.@stst == 1) getitem 6077,1; //Rough_Mineral + else getitem 6077,2; //Rough_Mineral close2; - donpcevent "#mj01_01_t::OnEnable"; - disablenpc "#mj01_01"; + donpcevent strnpcinfo(0)+"_t::OnEnable"; + disablenpc strnpcinfo(0); end; } case 2: @@ -7621,18 +4956,34 @@ mjolnir_01,32,309,3 script #mj01_01 111,7,7,{ end; OnInit: - enablenpc "#mj01_01"; + enablenpc strnpcinfo(0); end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - specialeffect EF_COUPLECASTING; - } - } + if (ep13_2_tre == 2 && countitem(6076) == 1 && countitem(6077) < 10) + specialeffect EF_COUPLECASTING; end; } +mjolnir_01,32,309,3 duplicate(mjo_find) #mj01_01 111,7,7 +mjolnir_01,217,34,3 duplicate(mjo_find) #mj01_02 111,7,7 +mjolnir_02,90,195,3 duplicate(mjo_find) #mj02_01 111,5,10 +mjolnir_02,206,187,3 duplicate(mjo_find) #mj02_02 111,7,7 +mjolnir_04,125,380,3 duplicate(mjo_find) #mj04_01 111,7,7 +mjolnir_04,220,130,3 duplicate(mjo_find) #mj04_02 111,7,7 +mjolnir_09,229,214,3 duplicate(mjo_find) #mj09_01 111,10,10 +mjolnir_10,188,260,3 duplicate(mjo_find) #mj10_01 111,10,10 + +mjolnir_01,364,256,0 script #mj01_find -1,5,5,{ + end; + +OnTouch: + callfunc "find_13_2",0,1; + viewpoint 1,32,309,1,0x00FF00; + viewpoint 1,217,34,2,0x00FF00; + close; +} + mjolnir_01,1,1,3 script #mj01_01_t 111,{ end; @@ -7646,65 +4997,6 @@ OnTimer60000: end; } -mjolnir_01,217,34,3 script #mj01_02 111,7,7,{ - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - close; - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,1; //Rough_Mineral - } - else { - getitem 6077,2; //Rough_Mineral - } - close2; - donpcevent "#mj01_02_t::OnEnable"; - disablenpc "#mj01_02"; - end; - } - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#mj01_02"; - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - specialeffect EF_COUPLECASTING; - } - } - end; -} - mjolnir_01,1,1,3 script #mj01_02_t 111,{ OnEnable: initnpctimer; @@ -7720,112 +5012,22 @@ mjolnir_02,313,289,0 script #mj02_find_1 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,90,195,1,0x00FF00; - viewpoint 1,206,187,2,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,90,195,1,0x00FF00; + viewpoint 1,206,187,2,0x00FF00; + close; } mjolnir_02,78,258,0 script #mj02_find_2 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,90,195,1,0x00FF00; - viewpoint 1,206,187,2,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,90,195,1,0x00FF00; + viewpoint 1,206,187,2,0x00FF00; + close; } -mjolnir_02,90,195,3 script #mj02_01 111,5,10,{ - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - close; - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,1; //Rough_Mineral - } - else { - getitem 6077,2; //Rough_Mineral - } - close2; - donpcevent "#mj02_01_t::OnEnable"; - disablenpc "#mj02_01"; - end; - } - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#mj02_01"; - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - specialeffect EF_COUPLECASTING; - } - } - end; -} mjolnir_02,1,1,3 script #mj02_01_t 111,{ OnEnable: @@ -7838,65 +5040,6 @@ OnTimer60000: end; } -mjolnir_02,206,187,3 script #mj02_02 111,7,7,{ - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - close; - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,1; //Rough_Mineral - } - else { - getitem 6077,2; //Rough_Mineral - } - close2; - donpcevent "#mj02_02_t::OnEnable"; - disablenpc "#mj02_02"; - end; - } - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#mj02_02"; - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - specialeffect EF_COUPLECASTING; - } - } - end; -} - mjolnir_02,1,1,3 script #mj02_02_t 111,{ OnEnable: initnpctimer; @@ -7908,193 +5051,34 @@ OnTimer60000: end; } -mjolnir_03,76,258,0 script #mj03_find_1 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_03,227,204,0 script #mj03_find_2 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - mjolnir_04,147,208,0 script #mj04_find_1 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,125,380,1,0x00FF00; - viewpoint 1,220,130,2,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,125,380,1,0x00FF00; + viewpoint 1,220,130,2,0x00FF00; + close; } mjolnir_04,160,77,0 script #mj04_find_2 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,125,380,1,0x00FF00; - viewpoint 1,220,130,2,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,125,380,1,0x00FF00; + viewpoint 1,220,130,2,0x00FF00; + close; } mjolnir_04,361,174,0 script #mj04_find_3 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,125,380,1,0x00FF00; - viewpoint 1,220,130,2,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_04,125,380,3 script #mj04_01 111,7,7,{ - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - close; - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,1; //Rough_Mineral - } - else { - getitem 6077,2; //Rough_Mineral - } - close2; - donpcevent "#mj04_01_t::OnEnable"; - disablenpc "#mj04_01"; - end; - } - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#mj04_01"; - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - specialeffect EF_COUPLECASTING; - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,125,380,1,0x00FF00; + viewpoint 1,220,130,2,0x00FF00; + close; } mjolnir_04,1,1,3 script #mj04_01_t 111,{ @@ -8108,66 +5092,6 @@ OnTimer60000: end; } -mjolnir_04,220,130,3 script #mj04_02 111,7,7,{ - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - close; - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,1; //Rough_Mineral - } - else { - getitem 6077,2; //Rough_Mineral - } - close2; - donpcevent "#mj04_02_t::OnEnable"; - disablenpc "#mj04_02"; - end; - } - break; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#mj04_02"; - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - specialeffect EF_COUPLECASTING; - } - } - end; -} - mjolnir_04,1,1,3 script #mj04_02_t 111,{ OnEnable: initnpctimer; @@ -8179,604 +5103,49 @@ OnTimer60000: end; } -mjolnir_05,82,171,0 script #mj05_find_1 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_05,219,375,0 script #mj05_find_2 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_06,28,332,0 script #mj06_find_1 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_06,275,50,0 script #mj06_find_2 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_06,371,78,0 script #mj06_find_3 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_07,26,373,0 script #mj07_find_1 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_07,214,373,0 script #mj07_find_2 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_07,372,355,0 script #mj07_find_3 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_07,375,233,0 script #mj07_find_4 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_07,26,78,0 script #mj07_find_5 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_07,157,25,0 script #mj07_find_6 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_08,39,239,0 script #mj08_find_1 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_08,36,344,0 script #mj08_find_2 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_08,160,349,0 script #mj08_find_3 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_08,359,258,0 script #mj08_find_4 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_08,193,62,0 script #mj08_find_5 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - mjolnir_09,201,355,0 script #mj09_find_1 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,229,214,1,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,229,214,1,0x00FF00; + close; } mjolnir_09,38,243,0 script #mj09_find_2 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,229,214,1,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,229,214,1,0x00FF00; + close; } mjolnir_09,106,36,0 script #mj09_find_3 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,229,214,1,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,229,214,1,0x00FF00; + close; } mjolnir_09,306,36,0 script #mj09_find_4 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,229,214,1,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,229,214,1,0x00FF00; + close; } mjolnir_09,369,279,0 script #mj09_find_5 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,229,214,1,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_09,229,214,3 script #mj09_01 111,10,10,{ - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - close; - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,1; //Rough_Mineral - } - else { - getitem 6077,2; //Rough_Mineral - } - close2; - donpcevent "#mj09_01_t::OnEnable"; - disablenpc "#mj09_01"; - end; - } - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#mj09_01"; - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - specialeffect EF_COUPLECASTING; - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,229,214,1,0x00FF00; + close; } mjolnir_09,1,1,3 script #mj09_01_t 111,{ @@ -8794,184 +5163,45 @@ mjolnir_10,201,355,0 script #mj10_find_1 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,188,260,1,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,188,260,1,0x00FF00; + close; } mjolnir_10,374,215,0 script #mj10_find_2 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,188,260,1,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,188,260,1,0x00FF00; + close; } mjolnir_10,272,20,0 script #mj10_find_3 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,188,260,1,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,188,260,1,0x00FF00; + close; } mjolnir_10,75,22,0 script #mj10_find_4 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,188,260,1,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,188,260,1,0x00FF00; + close; } mjolnir_10,27,258,0 script #mj10_find_5 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,229,214,1,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_10,188,260,3 script #mj10_01 111,10,10,{ - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,1; //Rough_Mineral - } - else { - getitem 6077,2; //Rough_Mineral - } - - close2; - donpcevent "#mj10_01_t::OnEnable"; - disablenpc "#mj10_01"; - end; - } - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#mj10_01"; - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - specialeffect EF_COUPLECASTING; - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,229,214,1,0x00FF00; + close; } mjolnir_10,1,1,3 script #mj10_01_t 111,{ @@ -8985,251 +5215,59 @@ OnTimer60000: end; } -mjolnir_11,29,220,0 script #mj11_find_1 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_11,175,29,0 script #mj11_find_2 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_12,199,370,0 script #mj12_find_1 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_12,44,25,0 script #mj12_find_2 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_12,220,37,0 script #mj12_find_3 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - hu_fild05,335,152,0 script #hu_find_1 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - mes "- Just arrived at Abyss Lake. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,251,345,1,0x00FF00; - viewpoint 1,134,322,2,0x00FF00; - viewpoint 1,72,104,3,0x00FF00; - viewpoint 1,65,99,4,0x00FF00; - viewpoint 1,323,84,5,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",1,1; + viewpoint 1,251,345,1,0x00FF00; + viewpoint 1,134,322,2,0x00FF00; + viewpoint 1,72,104,3,0x00FF00; + viewpoint 1,65,99,4,0x00FF00; + viewpoint 1,323,84,5,0x00FF00; + close; } hu_fild05,89,52,0 script #hu_find_2 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - mes "- Just arrived at Abyss Lake. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,251,345,1,0x00FF00; - viewpoint 1,134,322,2,0x00FF00; - viewpoint 1,72,104,3,0x00FF00; - viewpoint 1,65,99,4,0x00FF00; - viewpoint 1,323,84,5,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",1,1; + viewpoint 1,251,345,1,0x00FF00; + viewpoint 1,134,322,2,0x00FF00; + viewpoint 1,72,104,3,0x00FF00; + viewpoint 1,65,99,4,0x00FF00; + viewpoint 1,323,84,5,0x00FF00; + close; } hu_fild05,42,205,0 script #hu_find_3 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - mes "- Just arrived at Abyss Lake. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,251,345,1,0x00FF00; - viewpoint 1,134,322,2,0x00FF00; - viewpoint 1,72,104,3,0x00FF00; - viewpoint 1,65,99,4,0x00FF00; - viewpoint 1,323,84,5,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",1,1; + viewpoint 1,251,345,1,0x00FF00; + viewpoint 1,134,322,2,0x00FF00; + viewpoint 1,72,104,3,0x00FF00; + viewpoint 1,65,99,4,0x00FF00; + viewpoint 1,323,84,5,0x00FF00; + close; } hu_fild05,276,349,0 script #hu_find_4 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - mes "- Just arrived at Abyss Lake. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,251,345,1,0x00FF00; - viewpoint 1,134,322,2,0x00FF00; - viewpoint 1,72,104,3,0x00FF00; - viewpoint 1,65,99,4,0x00FF00; - viewpoint 1,323,84,5,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",1,1; + viewpoint 1,251,345,1,0x00FF00; + viewpoint 1,134,322,2,0x00FF00; + viewpoint 1,72,104,3,0x00FF00; + viewpoint 1,65,99,4,0x00FF00; + viewpoint 1,323,84,5,0x00FF00; + close; } -hu_fild05,251,345,3 script #hu_01 111,10,10,{ +- script hu_find -1,{ if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { if (countitem(6077) < 5) { mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; @@ -9239,8 +5277,7 @@ hu_fild05,251,345,3 script #hu_01 111,10,10,{ mes "Clang! Clang! Clang! Clang!"; close2; progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { + if (rand(1,6) < 4) { mes "- You failed to mine minerals. -"; getitem 6078,1; //Stone_Fragments close; @@ -9249,17 +5286,11 @@ hu_fild05,251,345,3 script #hu_01 111,10,10,{ mes "- You succeeded to mine minerals. -"; emotion e_ic,1; set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,2; //Rough_Mineral - } - else { - getitem 6077,1; //Rough_Mineral - } - donpcevent "#hu_01_t::OnEnable"; - disablenpc "#hu_01"; + if (.@stst == 5) getitem 6077,5; //Rough_Mineral + else if (.@stst == 1) getitem 6077,2; //Rough_Mineral + else getitem 6077,1; //Rough_Mineral + donpcevent strnpcinfo(0)+"_t::OnEnable"; + disablenpc strnpcinfo(0); close; } case 2: @@ -9275,18 +5306,21 @@ hu_fild05,251,345,3 script #hu_01 111,10,10,{ end; OnInit: - enablenpc "#hu_01"; + enablenpc strnpcinfo(0); end; OnTouch: - if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - specialeffect EF_COUPLECASTING; - } - } + if (ep13_2_tre == 3 && countitem(6076) == 1 && countitem(6077) < 5) + specialeffect EF_COUPLECASTING; end; } +hu_fild05,251,345,3 duplicate(hu_find) #hu_01 111,10,10 +hu_fild05,134,322,3 duplicate(hu_find) #hu_02 111,10,10 +hu_fild05,72,104,3 duplicate(hu_find) #hu_03 111,10,10 +hu_fild05,65,99,3 duplicate(hu_find) #hu_04 111,10,10 +hu_fild05,323,84,3 duplicate(hu_find) #hu_05 111,10,10 + hu_fild05,1,1,3 script #hu_01_t 111,{ OnEnable: initnpctimer; @@ -9297,64 +5331,6 @@ OnTimer60000: stopnpctimer; end; } -hu_fild05,134,322,3 script #hu_02 111,10,10,{ - if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - close; - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,2; //Rough_Mineral - } - else { - getitem 6077,1; //Rough_Mineral - } - donpcevent "#hu_02_t::OnEnable"; - disablenpc "#hu_02"; - close; - } - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#hu_02"; - end; - -OnTouch: - if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - specialeffect EF_COUPLECASTING; - } - } - end; - -} hu_fild05,1,1,3 script #hu_02_t 111,{ OnEnable: @@ -9367,64 +5343,6 @@ OnTimer60000: end; } -hu_fild05,72,104,3 script #hu_03 111,10,10,{ - if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - close; - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,2; //Rough_Mineral - } - else { - getitem 6077,1; //Rough_Mineral - } - donpcevent "#hu_03_t::OnEnable"; - disablenpc "#hu_03"; - close; - } - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#hu_03"; - end; - -OnTouch: - if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - specialeffect EF_COUPLECASTING; - } - } - end; -} - hu_fild05,1,1,3 script #hu_03_t 111,{ OnEnable: initnpctimer; @@ -9436,63 +5354,6 @@ OnTimer60000: end; } -hu_fild05,65,99,3 script #hu_04 111,10,10,{ - if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - close; - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,2; //Rough_Mineral - } - else { - getitem 6077,1; //Rough_Mineral - } - donpcevent "#hu_04_t::OnEnable"; - disablenpc "#hu_04"; - } - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#hu_04"; - end; - -OnTouch: - if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - specialeffect EF_COUPLECASTING; - } - } - end; -} - hu_fild05,1,1,3 script #hu_04_t 111,{ OnEnable: initnpctimer; @@ -9503,63 +5364,6 @@ OnTimer60000: stopnpctimer; end; } -hu_fild05,323,84,3 script #hu_05 111,10,10,{ - if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - close; - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,2 ; //Rough_Mineral - } - else { - getitem 6077,1; //Rough_Mineral - } - donpcevent "#hu_05_t::OnEnable"; - disablenpc "#hu_05"; - close; - } - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#hu_05"; - end; - -OnTouch: - if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - specialeffect EF_COUPLECASTING; - } - } - end; -} hu_fild05,1,1,3 script #hu_05_t 111,{ OnEnable: @@ -9576,59 +5380,27 @@ ve_fild03,351,219,0 script #ve_find_1 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 4) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - mes "- Just arrived at Thor Volcano. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,152,134,1,0x00FF00; - viewpoint 1,256,228,2,0x00FF00; - viewpoint 1,85,189,3,0x00FF00; - viewpoint 1,282,268,4,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",2,1; + viewpoint 1,152,134,1,0x00FF00; + viewpoint 1,256,228,2,0x00FF00; + viewpoint 1,85,189,3,0x00FF00; + viewpoint 1,282,268,4,0x00FF00; + close; } ve_fild03,223,51,0 script #ve_find_2 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 4) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - mes "- Just arrived at Thor Volcano. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,152,134,1,0x00FF00; - viewpoint 1,256,228,2,0x00FF00; - viewpoint 1,85,189,3,0x00FF00; - viewpoint 1,282,268,4,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",2,1; + viewpoint 1,152,134,1,0x00FF00; + viewpoint 1,256,228,2,0x00FF00; + viewpoint 1,85,189,3,0x00FF00; + viewpoint 1,282,268,4,0x00FF00; + close; } -ve_fild03,152,134,3 script #ve_01 111,10,10,{ +- script ve_find -1,{ if ((ep13_2_tre == 4) && (countitem(6076) == 1)) { if (countitem(6077) < 5) { mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; @@ -9638,8 +5410,7 @@ ve_fild03,152,134,3 script #ve_01 111,10,10,{ mes "Clang! Clang! Clang! Clang!"; close2; progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { + if (rand(1,6) < 4) { mes "- You failed to mine minerals. -"; getitem 6078,1; //Stone_Fragments close; @@ -9648,17 +5419,11 @@ ve_fild03,152,134,3 script #ve_01 111,10,10,{ mes "- You succeeded to mine minerals. -"; emotion e_ic,1; set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,2; //Rough_Mineral - } - else { - getitem 6077,1; //Rough_Mineral - } - donpcevent "#ve_01_t::OnEnable"; - disablenpc "#ve_01"; + if (.@stst == 5) getitem 6077,5; //Rough_Mineral + else if (.@stst == 1) getitem 6077,2; //Rough_Mineral + else getitem 6077,1; //Rough_Mineral + donpcevent strnpcinfo(0)+"_t::OnEnable"; + disablenpc strnpcinfo(0); close; } case 2: @@ -9674,18 +5439,20 @@ ve_fild03,152,134,3 script #ve_01 111,10,10,{ end; OnInit: - enablenpc "#ve_01"; + enablenpc strnpcinfo(0); end; OnTouch: - if ((ep13_2_tre == 4) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - specialeffect EF_COUPLECASTING; - } - } + if (ep13_2_tre == 4 && countitem(6076) == 1 && countitem(6077) < 5) + specialeffect EF_COUPLECASTING; end; } +ve_fild03,152,134,3 duplicate(ve_find) #ve_01 111,10,10 +ve_fild03,256,228,3 duplicate(ve_find) #ve_02 111,10,10 +ve_fild03,85,189,3 duplicate(ve_find) #ve_03 111,10,10 +ve_fild03,282,268,3 duplicate(ve_find) #ve_04 111,10,10 + ve_fild03,1,1,3 script #ve_01_t 111,{ OnEnable: initnpctimer; @@ -9697,64 +5464,6 @@ OnTimer40000: end; } -ve_fild03,256,228,3 script #ve_02 111,10,10,{ - if ((ep13_2_tre == 4) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - close; - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,2; //Rough_Mineral - } - else { - getitem 6077,1; //Rough_Mineral - } - donpcevent "#ve_02_t::OnEnable"; - disablenpc "#ve_02"; - close; - } - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#ve_02"; - end; - -OnTouch: - if ((ep13_2_tre == 4) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - specialeffect EF_COUPLECASTING; - } - } - end; -} - ve_fild03,1,1,3 script #ve_02_t 111,{ OnEnable: initnpctimer; @@ -9766,64 +5475,6 @@ OnTimer40000: end; } -ve_fild03,85,189,3 script #ve_03 111,10,10,{ - if ((ep13_2_tre == 4) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - close; - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,2; //Rough_Mineral - } - else { - getitem 6077,1; //Rough_Mineral - } - donpcevent "#ve_03_t::OnEnable"; - disablenpc "#ve_03"; - close; - } - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#hu_03"; - end; - -OnTouch: - if ((ep13_2_tre == 4) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - specialeffect EF_COUPLECASTING; - } - } - end; -} - ve_fild03,1,1,3 script #ve_03_t 111,{ OnEnable: initnpctimer; @@ -9835,64 +5486,6 @@ OnTimer40000: end; } -ve_fild03,282,268,3 script #ve_04 111,10,10,{ - if ((ep13_2_tre == 4) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - close; - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,2; //Rough_Mineral - } - else { - getitem 6077,1; //Rough_Mineral - } - donpcevent "#ve_04_t::OnEnable"; - disablenpc "#ve_04"; - close; - } - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#ve_04"; - end; - -OnTouch: - if ((ep13_2_tre == 4) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - specialeffect EF_COUPLECASTING; - } - } - end; -} - ve_fild03,1,1,3 script #ve_04_t 111,{ OnEnable: initnpctimer; @@ -10215,115 +5808,7 @@ spl_in02,139,65,3 script Middle-Ranked Laphine#la 438,{ } } -splendide,160,265,3 script Purifier#1 844,{ - if (ep13_2_tre1 == 2) { - if (countitem(7193) > 0) { - mes "- You put the seed in the"; - mes "device and watched it"; - mes "as Grenouille told you. -"; - next; - mes "- Booowoong -"; - specialeffect2 EF_HEALSP; - next; - mes "- When the lights gone,"; - mes "a big flower of Alfheim was lied"; - mes "in your hand, instead of the seed. -"; - delitem 7193,1; //Germinating_Sprout - set ep13_2_tre1,3; - getitem 6079,1; //Flower_Of_Alfheim - close; - } - else { - mes "["+ strcharinfo(0) +"]"; - mes "Where are the seeds?"; - close; - } - } - end; -} - -splendide,262,262,3 script Purifier#2 844,{ - if (ep13_2_tre1 == 2) { - if (countitem(7193) > 0) { - mes "- You put the seed in the"; - mes "device and watched it"; - mes "as Grenouille told you. -"; - next; - mes "- Booowoong -"; - specialeffect2 EF_HEALSP; - next; - mes "- When the lights gone,"; - mes "a big flower of Alfheim was lied"; - mes "in your hand, instead of the seed. -"; - delitem 7193,1; //Germinating_Sprout - set ep13_2_tre1,3; - getitem 6079,1; //Flower_Of_Alfheim - close; - } - else { - mes "["+ strcharinfo(0) +"]"; - mes "Where are the seeds?"; - close; - } - } - end; -} - -splendide,262,187,3 script Purifier#3 844,{ - if (ep13_2_tre1 == 2) { - if (countitem(7193) > 0) { - mes "- You put the seed in the"; - mes "device and watched it"; - mes "as Grenouille told you. -"; - next; - mes "- Booowoong -"; - specialeffect2 EF_HEALSP; - next; - mes "- When the lights gone,"; - mes "a big flower of Alfheim was lied"; - mes "in your hand, instead of the seed. -"; - delitem 7193,1; //Germinating_Sprout - set ep13_2_tre1,3; - getitem 6079,1; //Flower_Of_Alfheim - close; - } - else { - mes "["+ strcharinfo(0) +"]"; - mes "Where are the seeds?"; - close; - } - } - end; -} - -splendide,164,82,3 script Purifier#4 844,{ - if (ep13_2_tre1 == 2) { - if (countitem(7193) > 0) { - mes "- You put the seed in the"; - mes "device and watched it"; - mes "as Grenouille told you. -"; - next; - mes "- Booowoong -"; - specialeffect2 EF_HEALSP; - next; - mes "- When the lights gone,"; - mes "a big flower of Alfheim was lied"; - mes "in your hand, instead of the seed. -"; - delitem 7193,1; //Germinating_Sprout - set ep13_2_tre1,3; - getitem 6079,1; //Flower_Of_Alfheim - close; - } - else { - mes "["+ strcharinfo(0) +"]"; - mes "Where are the seeds?"; - close; - } - } - end; -} - -splendide,171,116,3 script Purifier#5 844,{ +- script Purifier -1,{ if (ep13_2_tre1 == 2) { if (countitem(7193) > 0) { mes "- You put the seed in the"; @@ -10350,32 +5835,12 @@ splendide,171,116,3 script Purifier#5 844,{ end; } -splendide,134,280,3 script Purifier#6 844,{ - if (ep13_2_tre1 == 2) { - if (countitem(7193) > 0) { - mes "- You put the seed in the"; - mes "device and watched it"; - mes "as Grenouille told you. -"; - next; - mes "- Booowoong -"; - specialeffect2 EF_HEALSP; - next; - mes "- When the lights gone,"; - mes "a big flower of Alfheim was lied"; - mes "in your hand, instead of the seed. -"; - delitem 7193,1; //Germinating_Sprout - set ep13_2_tre1,3; - getitem 6079,1; //Flower_Of_Alfheim - close; - } - else { - mes "["+ strcharinfo(0) +"]"; - mes "Where are the seeds?"; - close; - } - } - end; -} +splendide,160,265,3 duplicate(Purifier) Purifier#1 844 +splendide,262,262,3 duplicate(Purifier) Purifier#2 844 +splendide,262,187,3 duplicate(Purifier) Purifier#3 844 +splendide,164,82,3 duplicate(Purifier) Purifier#4 844 +splendide,171,116,3 duplicate(Purifier) Purifier#5 844 +splendide,134,280,3 duplicate(Purifier) Purifier#6 844 splendide,205,139,5 script Exhausted Soldier#1 447,{ if ((isequipped(2782) == 1) && (ep13_2_rhea == 100)) { @@ -10813,14 +6278,14 @@ mid_camp,283,198,5 script Bazett Teablack#ep13bs 883,{ emotion e_ic,"Bazett Teablack#ep13bs"; next; mes "[Industrious Man]"; - mes "write..write..."; - mes "crunch..crunch..."; + mes "write...write..."; + mes "crunch...crunch..."; next; mes " - He doesn't seem to recognize that I am standing next to him as he continues writing something. -"; next; mes "[Industrious Man]"; - mes "write..write..."; - mes "crunch..crunch..."; + mes "write...write..."; + mes "crunch...crunch..."; mes "...."; close; } @@ -10833,8 +6298,8 @@ mid_camp,283,198,5 script Bazett Teablack#ep13bs 883,{ emotion e_ic,"Bazett Teablack#ep13bs"; next; mes "[Industrious Man]"; - mes "write..write..."; - mes "crunch..crunch..."; + mes "write...write..."; + mes "crunch...crunch..."; next; mes " - He doesn't seem to recognize that I am standing next to him as he continues writing something. -"; next; @@ -11539,27 +7004,12 @@ OnTouch: end; } -nyd_dun02,143,272,0 script ep13_warp_s1 139,{ - +- script ep13_warp_s_0 -1,{ OnEnable: - enablenpc "ep13_warp_s1"; - specialeffect EF_WIND; + enablenpc strnpcinfo(1); initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_s1"; - end; - OnTimer2000: - specialeffect EF_WIND; - end; - OnTimer4000: - specialeffect EF_WIND; - end; - OnTimer6000: specialeffect EF_WIND; end; @@ -11570,262 +7020,139 @@ OnTimer8000: OnTimer10000: specialeffect EF_STEAL; - disablenpc "ep13_warp_s1"; - end; -} - -nyd_dun02,143,269,0 script ep13_warp_s2 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - -nyd_dun02,143,266,0 script ep13_warp_s3 139,{ - -OnEnable: - enablenpc "ep13_warp_s3"; - specialeffect EF_WIND; - initnpctimer; + disablenpc strnpcinfo(1); end; OnDisable: specialeffect EF_WIND; - disablenpc "ep13_warp_s3"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_s3"; + disablenpc strnpcinfo(1); end; } -nyd_dun02,143,263,0 script ep13_warp_s4 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - -nyd_dun02,146,272,0 script ep13_warp_11 139,{ - +- script ep13_warp_s_1 -1,{ OnEnable: - enablenpc "ep13_warp_11"; - specialeffect EF_WIND; + enablenpc strnpcinfo(1); initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_11"; - end; - OnTimer2000: - specialeffect EF_WIND; - end; - OnTimer4000: - specialeffect EF_WIND; - end; - OnTimer6000: specialeffect EF_WIND; end; OnTimer8000: - specialeffect EF_STEAL; - end; - OnTimer10000: specialeffect EF_STEAL; - disablenpc "ep13_warp_11"; end; -} -nyd_dun02,146,269,0 script ep13_warp_12 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - -nyd_dun02,146,266,0 script ep13_warp_13 139,{ - -OnEnable: - enablenpc "ep13_warp_13"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_13"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: +OnTimer12000: specialeffect EF_STEAL; - disablenpc "ep13_warp_13"; - end; -} - -nyd_dun02,146,263,0 script ep13_warp_14 139,{ - -OnEnable: - enablenpc "ep13_warp_14"; - specialeffect EF_WIND; - initnpctimer; + disablenpc strnpcinfo(1); end; OnDisable: specialeffect EF_WIND; - disablenpc "ep13_warp_14"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_14"; + disablenpc strnpcinfo(1); end; } -nyd_dun02,146,260,0 script ep13_warp_15 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - -nyd_dun02,149,272,0 script ep13_warp_21 139,{ - +- script ep13_warp_s_2 -1,{ OnEnable: - enablenpc "ep13_warp_21"; - specialeffect EF_WIND; + enablenpc strnpcinfo(1); initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_21"; - end; - OnTimer2000: - specialeffect EF_WIND; - end; - OnTimer4000: - specialeffect EF_WIND; - end; - OnTimer6000: - specialeffect EF_WIND; - end; - OnTimer8000: - specialeffect EF_STEAL; + specialeffect EF_WIND; end; OnTimer10000: - specialeffect EF_STEAL; - end; - OnTimer12000: specialeffect EF_STEAL; - disablenpc "ep13_warp_21"; end; -} -nyd_dun02,149,269,0 script ep13_warp_22 139,{ - -OnEnable: - enablenpc "ep13_warp_22"; - specialeffect EF_WIND; - initnpctimer; +OnTimer15000: + specialeffect EF_STEAL; + disablenpc strnpcinfo(1); end; OnDisable: specialeffect EF_WIND; - disablenpc "ep13_warp_22"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_WIND; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; + disablenpc strnpcinfo(1); end; +} -OnTimer15000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_22"; +- script ep13_warp_w_0 -1,{ +OnTouch: + warp "nyd_dun01",214,68; end; } +nyd_dun02,143,272,0 duplicate(ep13_warp_s_0) ep13_warp_s1 139 +nyd_dun02,143,266,0 duplicate(ep13_warp_s_0) ep13_warp_s3 139 +nyd_dun02,146,272,0 duplicate(ep13_warp_s_0) ep13_warp_11 139 +nyd_dun02,146,266,0 duplicate(ep13_warp_s_0) ep13_warp_13 139 +nyd_dun02,149,260,0 duplicate(ep13_warp_s_0) ep13_warp_25 139 +nyd_dun02,149,257,0 duplicate(ep13_warp_s_0) ep13_warp_26 139 +nyd_dun02,152,270,0 duplicate(ep13_warp_s_0) ep13_warp_31 139 +nyd_dun02,152,264,0 duplicate(ep13_warp_s_0) ep13_warp_33 139 +nyd_dun02,155,269,0 duplicate(ep13_warp_s_0) ep13_warp_41 139 +nyd_dun02,155,254,0 duplicate(ep13_warp_s_0) ep13_warp_46 139 +nyd_dun02,158,263,0 duplicate(ep13_warp_s_0) ep13_warp_52 139 +nyd_dun02,158,254,0 duplicate(ep13_warp_s_0) ep13_warp_55 139 +nyd_dun02,161,261,0 duplicate(ep13_warp_s_0) ep13_warp_62 139 +nyd_dun02,161,255,0 duplicate(ep13_warp_s_0) ep13_warp_64 139 +nyd_dun02,161,249,0 duplicate(ep13_warp_s_0) ep13_warp_66 139 +nyd_dun02,164,261,0 duplicate(ep13_warp_s_0) ep13_warp_71 139 +nyd_dun02,164,255,0 duplicate(ep13_warp_s_0) ep13_warp_73 139 +nyd_dun02,164,249,0 duplicate(ep13_warp_s_0) ep13_warp_75 139 +nyd_dun02,167,249,0 duplicate(ep13_warp_s_0) ep13_warp_84 139 +nyd_dun02,170,257,0 duplicate(ep13_warp_s_0) ep13_warp_91 139 +nyd_dun02,170,254,0 duplicate(ep13_warp_s_0) ep13_warp_92 139 +nyd_dun02,170,248,0 duplicate(ep13_warp_s_0) ep13_warp_94 139 +nyd_dun02,170,245,0 duplicate(ep13_warp_s_0) ep13_warp_95 139 + +nyd_dun02,146,263,0 duplicate(ep13_warp_s_1) ep13_warp_14 139 +nyd_dun02,149,272,0 duplicate(ep13_warp_s_1) ep13_warp_21 139 +nyd_dun02,152,258,0 duplicate(ep13_warp_s_1) ep13_warp_35 139 +nyd_dun02,155,266,0 duplicate(ep13_warp_s_1) ep13_warp_42 139 +nyd_dun02,158,251,0 duplicate(ep13_warp_s_1) ep13_warp_56 139 +nyd_dun02,164,258,0 duplicate(ep13_warp_s_1) ep13_warp_72 139 +nyd_dun02,164,246,0 duplicate(ep13_warp_s_1) ep13_warp_76 139 +nyd_dun02,167,255,0 duplicate(ep13_warp_s_1) ep13_warp_82 139 +nyd_dun02,170,251,0 duplicate(ep13_warp_s_1) ep13_warp_93 139 + +nyd_dun02,149,269,0 duplicate(ep13_warp_s_2) ep13_warp_22 139 +nyd_dun02,149,263,0 duplicate(ep13_warp_s_2) ep13_warp_24 139 +nyd_dun02,155,263,0 duplicate(ep13_warp_s_2) ep13_warp_43 139 +nyd_dun02,155,257,0 duplicate(ep13_warp_s_2) ep13_warp_45 139 +nyd_dun02,161,264,0 duplicate(ep13_warp_s_2) ep13_warp_61 139 +nyd_dun02,161,252,0 duplicate(ep13_warp_s_2) ep13_warp_65 139 +nyd_dun02,167,258,0 duplicate(ep13_warp_s_2) ep13_warp_81 139 +nyd_dun02,167,252,0 duplicate(ep13_warp_s_2) ep13_warp_83 139 +nyd_dun02,167,246,0 duplicate(ep13_warp_s_2) ep13_warp_85 139 +nyd_dun02,173,251,0 duplicate(ep13_warp_s_2) ep13_warp_e1 139 +nyd_dun02,173,248,0 duplicate(ep13_warp_s_2) ep13_warp_e2 139 +nyd_dun02,173,245,0 duplicate(ep13_warp_s_2) ep13_warp_e3 139 + +nyd_dun02,143,269,0 duplicate(ep13_warp_w_0) ep13_warp_s2 139,1,1 +nyd_dun02,143,263,0 duplicate(ep13_warp_w_0) ep13_warp_s4 139,1,1 +nyd_dun02,146,269,0 duplicate(ep13_warp_w_0) ep13_warp_12 139,1,1 +nyd_dun02,146,260,0 duplicate(ep13_warp_w_0) ep13_warp_15 139,1,1 +nyd_dun02,149,266,0 duplicate(ep13_warp_w_0) ep13_warp_23 139,1,1 +nyd_dun02,152,267,0 duplicate(ep13_warp_w_0) ep13_warp_32 139,1,1 +nyd_dun02,152,261,0 duplicate(ep13_warp_w_0) ep13_warp_34 139,1,1 +nyd_dun02,155,260,0 duplicate(ep13_warp_w_0) ep13_warp_44 139,1,1 +nyd_dun02,158,266,0 duplicate(ep13_warp_w_0) ep13_warp_51 139,1,1 +nyd_dun02,158,260,0 duplicate(ep13_warp_w_0) ep13_warp_53 139,1,1 +nyd_dun02,158,257,0 duplicate(ep13_warp_w_0) ep13_warp_54 139,1,1 +nyd_dun02,161,258,0 duplicate(ep13_warp_w_0) ep13_warp_63 139,1,1 +nyd_dun02,164,252,0 duplicate(ep13_warp_w_0) ep13_warp_74 139,1,1 +nyd_dun02,173,242,0 duplicate(ep13_warp_w_0) ep13_warp_e4 139,1,1 + nyd_dun02,149,269,0 script ep13_warp_22_2 139,1,1,{ OnInit: +OnDisable: disablenpc "ep13_warp_22_2"; end; @@ -11833,10 +7160,6 @@ OnEnable: enablenpc "ep13_warp_22_2"; end; -OnDisable: - disablenpc "ep13_warp_22_2"; - end; - OnTouch: donpcevent "ep13_warp_31::OnEnable"; donpcevent "ep13_warp_41::OnEnable"; @@ -11847,72 +7170,13 @@ OnTouch: end; } -nyd_dun02,149,266,0 script ep13_warp_23 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - -nyd_dun02,149,263,0 script ep13_warp_24 139,{ - -OnEnable: - enablenpc "ep13_warp_24"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_24"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_WIND; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - end; - -OnTimer15000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_24"; - end; -} - nyd_dun02,149,263,0 script ep13_warp_24_2 139,1,1,{ - -OnInit: - disablenpc "ep13_warp_24_2"; - end; - OnEnable: enablenpc "ep13_warp_24_2"; end; -OnDisable: - disablenpc "ep13_warp_24_2"; - end; - OnTouch: - set .@way_loot,rand(1,2); - if (.@way_loot == 1) { + if (rand(2)) { donpcevent "ep13_warp_33::OnEnable"; donpcevent "ep13_warp_43::OnEnable"; donpcevent "ep13_warp_43_2::OnEnable"; @@ -11924,321 +7188,15 @@ OnTouch: donpcevent "ep13_warp_45::OnEnable"; donpcevent "ep13_warp_45_2::OnEnable"; } - disablenpc "ep13_warp_24_2"; - end; -} - -nyd_dun02,149,260,0 script ep13_warp_25 139,{ - -OnEnable: - enablenpc "ep13_warp_25"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_25"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_25"; - end; -} - -nyd_dun02,149,257,0 script ep13_warp_26 139,{ - -OnEnable: - enablenpc "ep13_warp_26"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_26"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_26"; - end; -} - -nyd_dun02,152,270,0 script ep13_warp_31 139,{ - -OnEnable: - enablenpc "ep13_warp_31"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_31"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_31"; - end; -} - -nyd_dun02,152,267,0 script ep13_warp_32 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - -nyd_dun02,152,264,0 script ep13_warp_33 139,{ - -OnEnable: - enablenpc "ep13_warp_33"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_33"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_33"; - end; -} - -nyd_dun02,152,261,0 script ep13_warp_34 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - -nyd_dun02,152,258,0 script ep13_warp_35 139,{ - -OnEnable: - enablenpc "ep13_warp_35"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_35"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - enablenpc "ep13_warp_35"; - end; -} - -nyd_dun02,155,269,0 script ep13_warp_41 139,{ - -OnEnable: - enablenpc "ep13_warp_41"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_41"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_41"; - end; -} - -nyd_dun02,155,266,0 script ep13_warp_42 139,{ - -OnEnable: - enablenpc "ep13_warp_42"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_42"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_42"; - end; -} - -nyd_dun02,155,263,0 script ep13_warp_43 139,{ - -OnEnable: - enablenpc "ep13_warp_43"; - specialeffect EF_WIND; - initnpctimer; - end; - +OnInit: OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_43"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_WIND; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - end; - -OnTimer15000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_43"; + disablenpc "ep13_warp_24_2"; end; } nyd_dun02,155,263,0 script ep13_warp_43_2 139,1,1,{ - OnInit: +OnDisable: disablenpc "ep13_warp_43_2"; end; @@ -12246,10 +7204,6 @@ OnEnable: enablenpc "ep13_warp_43_2"; end; -OnDisable: - disablenpc "ep13_warp_43_2"; - end; - OnTouch: donpcevent "ep13_warp_52::OnEnable"; donpcevent "ep13_warp_61::OnEnable"; @@ -12258,58 +7212,9 @@ OnTouch: end; } -nyd_dun02,155,260,0 script ep13_warp_44 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - -nyd_dun02,155,257,0 script ep13_warp_45 139,{ - -OnEnable: - enablenpc "ep13_warp_45"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_45"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_WIND; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - end; - -OnTimer15000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_45"; - end; -} - nyd_dun02,155,257,0 script ep13_warp_45_2 139,1,1,{ - OnInit: +OnDisable: disablenpc "ep13_warp_45_2"; end; @@ -12317,10 +7222,6 @@ OnEnable: enablenpc "ep13_warp_45_2"; end; -OnDisable: - disablenpc "ep13_warp_45_2"; - end; - OnTouch: donpcevent "ep13_warp_46::OnEnable"; donpcevent "ep13_warp_55::OnEnable"; @@ -12331,214 +7232,9 @@ OnTouch: end; } -nyd_dun02,155,254,0 script ep13_warp_46 139,{ - -OnEnable: - enablenpc "ep13_warp_46"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_46"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_46"; - end; -} - -nyd_dun02,158,266,0 script ep13_warp_51 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - -nyd_dun02,158,263,0 script ep13_warp_52 139,{ - -OnEnable: - enablenpc "ep13_warp_52"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_52"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_52"; - end; -} - -nyd_dun02,158,260,0 script ep13_warp_53 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - -nyd_dun02,158,257,0 script ep13_warp_54 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - -nyd_dun02,158,254,0 script ep13_warp_55 139,{ - -OnEnable: - enablenpc "ep13_warp_55"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_55"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_55"; - end; -} - -nyd_dun02,158,251,0 script ep13_warp_56 139,{ - -OnEnable: - enablenpc "ep13_warp_56"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_56"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_56"; - end; -} - -nyd_dun02,161,264,0 script ep13_warp_61 139,{ - -OnEnable: - enablenpc "ep13_warp_61"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_61"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_WIND; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - end; - -OnTimer15000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_61"; - end; -} - nyd_dun02,161,264,0 script ep13_warp_61_2 139,1,1,{ - OnInit: +OnDisable: disablenpc "ep13_warp_61_2"; end; @@ -12546,10 +7242,6 @@ OnEnable: enablenpc "ep13_warp_61_2"; end; -OnDisable: - disablenpc "ep13_warp_61_2"; - end; - OnTouch: donpcevent "ep13_warp_62::OnEnable"; donpcevent "ep13_warp_71::OnEnable"; @@ -12560,140 +7252,13 @@ OnTouch: end; } -nyd_dun02,161,261,0 script ep13_warp_62 139,{ - -OnEnable: - enablenpc "ep13_warp_62"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_62"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_62"; - end; -} - -nyd_dun02,161,258,0 script ep13_warp_63 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - -nyd_dun02,161,255,0 script ep13_warp_64 139,{ - -OnEnable: - enablenpc "ep13_warp_64"; - initnpctimer; - specialeffect EF_WIND; - end; - -OnDisable: - disablenpc "ep13_warp_64"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_64"; - end; -} - -nyd_dun02,161,252,0 script ep13_warp_65 139,{ - -OnEnable: - enablenpc "ep13_warp_65"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_65"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_WIND; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - end; - -OnTimer15000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_65"; - end; -} - nyd_dun02,161,252,0 script ep13_warp_65_2 139,1,1,{ -OnInit: - disablenpc "ep13_warp_65_2"; - end; - OnEnable: enablenpc "ep13_warp_65_2"; end; -OnDisable: - disablenpc "ep13_warp_65_2"; - end; - OnTouch: - set way_loot,rand(1,2); - if (way_loot == 1) { + if (rand(2)) { donpcevent "ep13_warp_64::OnEnable"; donpcevent "ep13_warp_73::OnEnable"; donpcevent "ep13_warp_82::OnEnable"; @@ -12707,279 +7272,15 @@ OnTouch: donpcevent "ep13_warp_85::OnEnable"; donpcevent "ep13_warp_85_2::OnEnable"; } - disablenpc "ep13_warp_65_2"; - end; -} - -nyd_dun02,161,249,0 script ep13_warp_66 139,{ - -OnEnable: - enablenpc "ep13_warp_66"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_66"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_66"; - end; -} - -nyd_dun02,164,261,0 script ep13_warp_71 139,{ - -OnEnable: - enablenpc "ep13_warp_71"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_71"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_71"; - end; -} - -nyd_dun02,164,258,0 script ep13_warp_72 139,{ - -OnEnable: - enablenpc "ep13_warp_72"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_72"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_72"; - end; -} - -nyd_dun02,164,255,0 script ep13_warp_73 139,{ - -OnEnable: - enablenpc "ep13_warp_73"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_73"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_73"; - end; -} - -nyd_dun02,164,252,0 script ep13_warp_74 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - -nyd_dun02,164,249,0 script ep13_warp_75 139,{ - -OnEnable: - enablenpc "ep13_warp_75"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_75"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_75"; - end; -} - -nyd_dun02,164,246,0 script ep13_warp_76 139,{ - -OnEnable: - enablenpc "ep13_warp_76"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_76"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_76"; - end; -} - -nyd_dun02,167,258,0 script ep13_warp_81 139,{ - -OnEnable: - enablenpc "ep13_warp_81"; - specialeffect EF_WIND; - initnpctimer; - end; - +OnInit: OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_81"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_WIND; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - end; - -OnTimer15000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_81"; + disablenpc "ep13_warp_65_2"; end; } nyd_dun02,167,258,0 script ep13_warp_81_2 139,1,1,{ OnInit: +OnDisable: disablenpc "ep13_warp_81_2"; end; @@ -12987,10 +7288,6 @@ OnEnable: enablenpc "ep13_warp_81_2"; end; -OnDisable: - disablenpc "ep13_warp_81_2"; - end; - OnTouch: donpcevent "ep13_warp_91::OnEnable"; donpcevent "ep13_warp_92::OnEnable"; @@ -13000,91 +7297,9 @@ OnTouch: end; } -nyd_dun02,167,255,0 script ep13_warp_82 139,{ - -OnEnable: - enablenpc "ep13_warp_82"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_82"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_82"; - end; -} - -nyd_dun02,167,252,0 script ep13_warp_83 139,{ - -OnEnable: - enablenpc "ep13_warp_83"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_83"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_WIND; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - end; - -OnTimer15000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_83"; - end; -} - nyd_dun02,167,252,0 script ep13_warp_83_2 139,1,1,{ - OnInit: +OnDisable: disablenpc "ep13_warp_83_2"; end; @@ -13092,10 +7307,6 @@ OnEnable: enablenpc "ep13_warp_83_2"; end; -OnDisable: - disablenpc "ep13_warp_83_2"; - end; - OnTouch: donpcevent "ep13_warp_84::OnEnable"; donpcevent "ep13_warp_94::OnEnable"; @@ -13104,87 +7315,9 @@ OnTouch: end; } -nyd_dun02,167,249,0 script ep13_warp_84 139,{ - -OnEnable: - enablenpc "ep13_warp_84"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_84"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_84"; - end; -} - -nyd_dun02,167,246,0 script ep13_warp_85 139,{ - -OnEnable: - enablenpc "ep13_warp_85"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_85"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_WIND; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - end; - -OnTimer15000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_85"; - end; -} - nyd_dun02,167,246,0 script ep13_warp_85_2 139,1,1,{ - OnInit: +OnDisable: disablenpc "ep13_warp_85_2"; end; @@ -13192,10 +7325,6 @@ OnEnable: enablenpc "ep13_warp_85_2"; end; -OnDisable: - disablenpc "ep13_warp_85_2"; - end; - OnTouch: donpcevent "ep13_warp_95::OnEnable"; donpcevent "ep13_warp_e3::OnEnable"; @@ -13203,320 +7332,6 @@ OnTouch: end; } -nyd_dun02,170,257,0 script ep13_warp_91 139,{ - -OnEnable: - enablenpc "ep13_warp_91"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_91"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_91"; - end; -} - -nyd_dun02,170,254,0 script ep13_warp_92 139,{ - -OnEnable: - enablenpc "ep13_warp_92"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_92"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_92"; - end; -} - -nyd_dun02,170,251,0 script ep13_warp_93 139,{ - -OnEnable: - enablenpc "ep13_warp_93"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_93"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_93"; - end; -} - -nyd_dun02,170,248,0 script ep13_warp_94 139,{ - -OnEnable: - enablenpc "ep13_warp_94"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_94"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_94"; - end; -} - -nyd_dun02,170,245,0 script ep13_warp_95 139,{ - -OnEnable: - enablenpc "ep13_warp_95"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_95"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_95"; - end; -} - -nyd_dun02,173,251,0 script ep13_warp_e1 139,{ - -OnEnable: - enablenpc "ep13_warp_e1"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_e1"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_WIND; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - end; - -OnTimer15000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_e1"; - end; -} - -nyd_dun02,173,248,0 script ep13_warp_e2 139,{ - -OnEnable: - enablenpc "ep13_warp_e2"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_e2"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_WIND; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - end; - -OnTimer15000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_e2"; - end; -} - -nyd_dun02,173,245,0 script ep13_warp_e3 139,{ - -OnEnable: - enablenpc "ep13_warp_e3"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_e3"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_WIND; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - end; - -OnTimer15000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_e3"; - end; -} - -nyd_dun02,173,242,0 script ep13_warp_e4 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - nyd_dun01,255,142,0 warp nynm_dun1f_to_2f 1,1,nyd_dun02,61,265 nyd_dun02,56,264,0 warp nynm_dun2f_to_1f 1,1,nyd_dun01,249,143 diff --git a/npc/re/quests/quests_13_1.txt b/npc/re/quests/quests_13_1.txt index 73f5aa8ce..511fe7aca 100644 --- a/npc/re/quests/quests_13_1.txt +++ b/npc/re/quests/quests_13_1.txt @@ -9055,7 +9055,7 @@ function Catwarp; next; if ((ep13_yong1 > 99) && (ep13_yong1 < 200)) { switch(select("Alberta -> 4590z:Prontera -> 4590z:Izlude -> 4590z:Geffen -> 4590z:Payon -> 4590z:Morroc -> 4590z:Al De Baran -> 4590z:Cancel")) { - case 1: Catwarp(4590,1); + case 1: Catwarp(4590,1); case 2: Catwarp(4590,2); case 3: Catwarp(4590,3); case 4: Catwarp(4590,4); diff --git a/npc/re/quests/quests_13_2.txt b/npc/re/quests/quests_13_2.txt index 45333374b..7e6fe10f4 100644 --- a/npc/re/quests/quests_13_2.txt +++ b/npc/re/quests/quests_13_2.txt @@ -3,7 +3,7 @@ //===== By: ================================================== //= L0ne_W0lf //===== Current Version: ===================================== -//= 2.2 +//= 2.4 //===== Compatible With: ===================================== //= rAthena SVN //===== Description: ========================================= @@ -41,11 +41,13 @@ //= 2.1 Fixed Myterious Rock 31, and Cart Hand Agents. //= 2.2 Added a missing close. (bugreport:4520) [L0ne_W0lf] //= 2.3 Fixed EF_Wind not showing. (bugreport:5149) [Masao] +//= 2.4 Optimized (6000+ lines reduced!). [Euphy] //============================================================ // Cat Hand Addition. //============================================================ spl_fild02,25,211,4 script Cat Hand Agent#spl 421,{ +function Catwarp; if (ep13_yong1 < 3) { mes "[Cat Hand Agent]"; mes "Welcome to Cat Trading."; @@ -62,7 +64,8 @@ spl_fild02,25,211,4 script Cat Hand Agent#spl 421,{ next; switch(select("Save your location:Cancel")) { case 1: - savepoint "spl_fild02",32,225; + if (strnpcinfo(2) == "spl") savepoint "spl_fild02",32,225; + else savepoint "man_fild02",129,61; mes "[Cat Hand Agent]"; mes "Thank you."; mes "Your location has been saved."; @@ -81,7 +84,8 @@ spl_fild02,25,211,4 script Cat Hand Agent#spl 421,{ next; switch(select("Save your location:Use Storage:Cancel")) { case 1: - savepoint "spl_fild02",32,225; + if (strnpcinfo(2) == "spl") savepoint "spl_fild02",32,225; + else savepoint "man_fild02",129,61; mes "[Cat Hand Agent]"; mes "Thank you."; mes "Your location has been saved."; @@ -127,7 +131,8 @@ spl_fild02,25,211,4 script Cat Hand Agent#spl 421,{ next; switch(select("Save your location:Use Storage:Use Cat Warp (Midgard):Cancel")) { case 1: - savepoint "spl_fild02",32,225; + if (strnpcinfo(2) == "spl") savepoint "spl_fild02",32,225; + else savepoint "man_fild02",129,61; mes "[Cat Hand Agent]"; mes "Thank you."; mes "Your location has been saved."; @@ -167,352 +172,65 @@ spl_fild02,25,211,4 script Cat Hand Agent#spl 421,{ next; if ((ep13_yong1 > 39) && (ep13_yong1 < 50)) { switch(select("Prontera -> 5500z:Cancel")) { - case 1: - if (Zeny >= 5500) { - set zeny,zeny-5500; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - close; + case 1: Catwarp(5500,2); + case 2: close; } } else if ((ep13_yong1 > 49) && (ep13_yong1 < 60)) { switch(select("Alberta -> 5500z:Prontera -> 5500z:Cancel")) { - case 1: - if (Zeny >= 5500) { - set zeny,zeny-5500; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 5500) { - set zeny,zeny-5500; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - close; + case 1: Catwarp(5500,1); + case 2: Catwarp(5500,2); + case 3: close; } } else if ((ep13_yong1 > 59) && (ep13_yong1 < 70)) { switch(select("Alberta -> 5025z:Prontera -> 5025z:Izlude -> 5025z:Cancel")) { - case 1: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - close; + case 1: Catwarp(5025,1); + case 2: Catwarp(5025,2); + case 3: Catwarp(5025,3); + case 4: close; } } else if ((ep13_yong1 > 69) && (ep13_yong1 < 80)) { switch(select("Alberta -> 5025z:Prontera -> 5025z:Izlude -> 5025z:Geffen -> 5025z:Cancel")) { - case 1: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - close; + case 1: Catwarp(5025,1); + case 2: Catwarp(5025,2); + case 3: Catwarp(5025,3); + case 4: Catwarp(5025,4); + case 5: close; } } else if ((ep13_yong1 > 79) && (ep13_yong1 < 90)) { switch(select("Alberta -> 4765z:Prontera -> 4765z:Izlude -> 4765z:Geffen -> 4765z:Payon -> 4765z:Cancel")) { - case 1: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - close; + case 1: Catwarp(4765,1); + case 2: Catwarp(4765,2); + case 3: Catwarp(4765,3); + case 4: Catwarp(4765,4); + case 5: Catwarp(4765,5); + case 6: close; } } else if ((ep13_yong1 > 89) && (ep13_yong1 < 100)) { switch(select("Alberta -> 4765z:Prontera -> 4765z:Izlude -> 4765z:Geffen -> 4765z:Payon -> 4765z:Morroc -> 4765z:Cancel")) { - case 1: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "morocc",156,46; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 7: - close; + case 1: Catwarp(4765,1); + case 2: Catwarp(4765,2); + case 3: Catwarp(4765,3); + case 4: Catwarp(4765,4); + case 5: Catwarp(4765,5); + case 6: Catwarp(4765,6); + case 7: close; } } else if (ep13_yong1 > 99) { switch(select("Alberta -> 4590z:Prontera -> 4590z:Izlude -> 4590z:Geffen -> 4590z:Payon -> 4590z:Morroc -> 4590z:Al De Baran -> 4590z:Cancel")) { - case 1: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "morocc",156,46; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 7: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "aldebaran",168,112; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 8: - close; + case 1: Catwarp(4590,1); + case 2: Catwarp(4590,2); + case 3: Catwarp(4590,3); + case 4: Catwarp(4590,4); + case 5: Catwarp(4590,5); + case 6: Catwarp(4590,6); + case 7: Catwarp(4590,7); + case 8: close; } } else { @@ -534,7 +252,8 @@ spl_fild02,25,211,4 script Cat Hand Agent#spl 421,{ next; switch(select("Save your location:Use Storage:Use Cat Warp (Midgard):Use Cat Warp (Jottunheim):Cancel")) { case 1: - savepoint "spl_fild02",32,225; + if (strnpcinfo(2) == "spl") savepoint "spl_fild02",32,225; + else savepoint "man_fild02",129,61; mes "[Cat Hand Agent]"; mes "Thank you."; mes "Your location has been saved."; @@ -574,402 +293,58 @@ spl_fild02,25,211,4 script Cat Hand Agent#spl 421,{ next; if ((ep13_yong1 > 99) && (ep13_yong1 < 200)) { switch(select("Alberta -> 4590z:Prontera -> 4590z:Izlude -> 4590z:Geffen -> 4590z:Payon -> 4590z:Morroc -> 4590z:Al De Baran -> 4590z:Cancel")) { - case 1: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "morocc",156,46; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 7: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "aldebaran",168,112; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 8: - close; + case 1: Catwarp(4590,1); + case 2: Catwarp(4590,2); + case 3: Catwarp(4590,3); + case 4: Catwarp(4590,4); + case 5: Catwarp(4590,5); + case 6: Catwarp(4590,6); + case 7: Catwarp(4590,7); + case 8: close; } } else if ((ep13_yong1 > 199) && (ep13_yong1 < 250)) { switch(select("Alberta -> 4170z:Prontera -> 4170z:Izlude -> 4170z:Geffen -> 4170z:Payon -> 4170z:Morroc -> 4170z:Al De Baran -> 4170z:Juno -> 4170z:Cancel")) { - case 1: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "morocc",156,46; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 7: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "aldebaran",168,112; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 8: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "yuno",158,125; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 9: - close; + case 1: Catwarp(4170,1); + case 2: Catwarp(4170,2); + case 3: Catwarp(4170,3); + case 4: Catwarp(4170,4); + case 5: Catwarp(4170,5); + case 6: Catwarp(4170,6); + case 7: Catwarp(4170,7); + case 8: Catwarp(4170,8); + case 9: close; } close; } else if ((ep13_yong1 > 249) && (ep13_yong1 < 300)) { switch(select("Alberta -> 4025z:Prontera -> 4025z:Izlude -> 4025z:Geffen -> 4025z:Payon -> 4025z:Morroc -> 4025z:Al De Baran -> 4025z:Juno -> 4025z:Einbroch -> 4025z:Cancel")) { - case 1: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "morocc",156,46; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 7: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "aldebaran",168,112; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 8: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "yuno",158,125; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 9: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "einbroch",158,301; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 10: - close; + case 1: Catwarp(4025,1); + case 2: Catwarp(4025,2); + case 3: Catwarp(4025,3); + case 4: Catwarp(4025,4); + case 5: Catwarp(4025,5); + case 6: Catwarp(4025,6); + case 7: Catwarp(4025,7); + case 8: Catwarp(4025,8); + case 9: Catwarp(4025,9); + case 10: close; } close; } else if (ep13_yong1 > 299) { switch(select("Alberta -> 3970z:Prontera -> 3970z:Izlude -> 3970z:Geffen -> 3970z:Payon -> 3970z:Morroc -> 3970z:Al De Baran -> 3970z:Juno -> 3970z:Einbroch -> 3970z:Lighthalzen -> 3970z:Cancel")) { - case 1: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "morocc",156,46; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 7: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "aldebaran",168,112; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 8: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "yuno",158,125; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 9: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "einbroch",158,301; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 10: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "lighthalzen",163,64; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 11: - close; + case 1: Catwarp(3970,1); + case 2: Catwarp(3970,2); + case 3: Catwarp(3970,3); + case 4: Catwarp(3970,4); + case 5: Catwarp(3970,5); + case 6: Catwarp(3970,6); + case 7: Catwarp(3970,7); + case 8: Catwarp(3970,8); + case 9: Catwarp(3970,9); + case 10: Catwarp(3970,10); + case 11: close; } close; } @@ -980,1011 +355,22 @@ spl_fild02,25,211,4 script Cat Hand Agent#spl 421,{ close; } case 4: - switch(select("Alliance Forces Post -> 5500z:Manuk Camp -> 7500z:Cancel")) { - case 1: - if (Zeny >= 5500) { - set zeny,zeny-5500; - warp "mid_camp",62,127; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 7500) { - set zeny,zeny-7500; - warp "man_fild02",129,61; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - mes "[Cat Hand Agent]"; - mes "Thank you for using our service."; - close; - } - case 5: - mes "[Cat Hand Agent]"; - mes "Thank you for using our service."; - close; - } - } - else { - mes "[Cat Hand Agent]"; - mes "... ... ... ..."; - mes "Please give me some Piece of Fish."; - close; - } -} - -man_fild02,132,47,4 script Cat Hand Agent#man 421,{ - if (ep13_yong1 < 3) { - mes "[Cat Hand Agent]"; - mes "Welcome to Cat Trading."; - mes "I guess you're a first-time customer, huh?"; - next; - mes "[Cat Hand Agent]"; - mes "For more details about our contract, you need to talk to our staff first."; - close; - } - else if ((ep13_yong1 > 2) && (ep13_yong1 < 20)) { - mes "[Cat Hand Agent]"; - mes "Cat Trading's available services are as followed."; - mes "For additional services, please consult Agent Gyaruk."; - next; - switch(select("Save your location:Cancel")) { - case 1: - savepoint "man_fild02",129,61; - mes "[Cat Hand Agent]"; - mes "Thank you."; - mes "Your location has been saved."; - mes "You can now directly return to this camp."; - close; - case 2: - mes "[Cat Hand Agent]"; - mes "Thank you for using our service."; - close; - } - } - else if ((ep13_yong1 > 19) && (ep13_yong1 < 40)) { - mes "[Cat Hand Agent]"; - mes "Cat Trading's available services are as followed."; - mes "For additional services, please consult Agent Gyaruk."; - next; - switch(select("Save your location:Use Storage:Cancel")) { - case 1: - savepoint "man_fild02",129,61; - mes "[Cat Hand Agent]"; - mes "Thank you."; - mes "Your location has been saved."; - mes "You can now directly return to this camp."; - close; - case 2: - if(basicskillcheck() && getskilllv("NV_BASIC") < 6){ - mes "[Cat Hand Agent]"; - mes "I'm sorry, but you"; - mes "need the Novice's"; - mes "Basic Skill Level 6 to"; - mes "use the Storage Service."; - close; - } - else if (Zeny >= 60) { - set zeny,zeny-60; - mes "[Cat Hand Agent]"; - mes "Thank you."; - mes "Your storage will be opened shortly."; - close2; - openstorage; - end; - } - else { - mes "[Cat Hand Agent]"; - mes "I'm sorry, but you don't"; - mes "have enough money?"; - mes "Cat Trading's storage"; - mes "service is 60 zeny."; - mes "It's cheap, isn't it?"; - close; - } - case 3: - mes "[Cat Hand Agent]"; - mes "Thank you for using our service."; - close; - } - } - else if ((ep13_yong1 > 39) && (ep13_yong1 < 100)) { - mes "[Cat Hand Agent]"; - mes "Cat Trading's available services are as followed."; - mes "For additional services, please consult Agent Gyaruk."; - next; - switch(select("Save your location:Use Storage:Use Cat Warp (Midgard):Cancel")) { - case 1: - savepoint "man_fild02",129,61; - mes "[Cat Hand Agent]"; - mes "Thank you."; - mes "Your location has been saved."; - mes "You can now directly return to this camp."; - close; - case 2: - if(basicskillcheck() && getskilllv("NV_BASIC") < 6){ - mes "[Cat Hand Agent]"; - mes "I'm sorry, but you"; - mes "need the Novice's"; - mes "Basic Skill Level 6 to"; - mes "use the Storage Service."; - close; - } - else if (Zeny >= 60) { - set zeny,zeny-60; - mes "[Cat Hand Agent]"; - mes "Thank you."; - mes "Your storage will be opened shortly."; - close2; - openstorage; - end; - } - else { - mes "[Cat Hand Agent]"; - mes "I'm sorry, but you don't"; - mes "have enough money?"; - mes "Cat Trading's storage"; - mes "service is 60 zeny."; - mes "It's cheap, isn't it?"; - close; - } - case 3: - // Custom Translation. - mes "[Cat Hand Agent]"; - mes "With " + ep13_yong1 + " credit points, we offer the following warp services. Please remember, you can't come back easily once you move to Midgard."; - next; - if ((ep13_yong1 > 39) && (ep13_yong1 < 50)) { - switch(select("Prontera -> 5500z:Cancel")) { - case 1: - if (Zeny >= 5500) { - set zeny,zeny-5500; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - close; - } - } - else if ((ep13_yong1 > 49) && (ep13_yong1 < 60)) { - switch(select("Alberta -> 5500z:Prontera -> 5500z:Cancel")) { - case 1: - if (Zeny >= 5500) { - set zeny,zeny-5500; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 5500) { - set zeny,zeny-5500; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - close; - } - } - else if ((ep13_yong1 > 59) && (ep13_yong1 < 70)) { - switch(select("Alberta -> 5025z:Prontera -> 5025z:Izlude -> 5025z:Cancel")) { - case 1: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } + if (strnpcinfo(2) == "spl") switch(select("Alliance Forces Post -> 5500z:Manuk Camp -> 7500z:Cancel")) { + case 1: Catwarp(5500,13); + case 2: Catwarp(5500,12); case 3: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - close; - } - } - else if ((ep13_yong1 > 69) && (ep13_yong1 < 80)) { - switch(select("Alberta -> 5025z:Prontera -> 5025z:Izlude -> 5025z:Geffen -> 5025z:Cancel")) { - case 1: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 5025) { - set zeny,zeny-5025; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - close; - } - } - else if ((ep13_yong1 > 79) && (ep13_yong1 < 90)) { - switch(select("Alberta -> 4765z:Prontera -> 4765z:Izlude -> 4765z:Geffen -> 4765z:Payon -> 4765z:Cancel")) { - case 1: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - close; - } - } - else if ((ep13_yong1 > 89) && (ep13_yong1 < 100)) { - switch(select("Alberta -> 4765z:Prontera -> 4765z:Izlude -> 4765z:Geffen -> 4765z:Payon -> 4765z:Morroc -> 4765z:Cancel")) { - case 1: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - if (Zeny >= 4765) { - set zeny,zeny-4765; - warp "morocc",156,46; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 7: - close; - } - } - else if (ep13_yong1 > 99) { - switch(select("Alberta -> 4590z:Prontera -> 4590z:Izlude -> 4590z:Geffen -> 4590z:Payon -> 4590z:Morroc -> 4590z:Al De Baran -> 4590z:Cancel")) { - case 1: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "morocc",156,46; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 7: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "aldebaran",168,112; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 8: - close; - } - } - else { - // Custom Translation. - mes "[Cat Hand Agent]"; - mes "I am sorry, but you don't have enough credit points to use the warp service. Please come back when you have more points."; - close; - } - case 4: - mes "[Cat Hand Agent]"; - mes "Thank you for using our service."; - close; - } - } - else if (ep13_yong1 > 99) { - mes "[Cat Hand Agent]"; - mes "Cat Trading's available services are as followed."; - mes "For additional services, please consult Agent Gyaruk."; - next; - switch(select("Save your location:Use Storage:Use Cat Warp (Midgard):Use Cat Warp (Jottunheim):Cancel")) { - case 1: - savepoint "man_fild02",129,61; - mes "[Cat Hand Agent]"; - mes "Thank you."; - mes "Your location has been saved."; - mes "You can now directly return to this camp."; - close; - case 2: - if(basicskillcheck() && getskilllv("NV_BASIC") < 6){ - mes "[Cat Hand Agent]"; - mes "I'm sorry, but you"; - mes "need the Novice's"; - mes "Basic Skill Level 6 to"; - mes "use the Storage Service."; - close; - } - else if (Zeny >= 60) { - set zeny,zeny-60; - mes "[Cat Hand Agent]"; - mes "Thank you."; - mes "Your storage will be opened shortly."; - close2; - openstorage; - end; - } - else { - mes "[Cat Hand Agent]"; - mes "I'm sorry, but you don't"; - mes "have enough money?"; - mes "Cat Trading's storage"; - mes "service is 60 zeny."; - mes "It's cheap, isn't it?"; - close; - } - case 3: - // Custom Translation. - mes "[Cat Hand Agent]"; - mes "With " + ep13_yong1 + " credit points, we offer the following warp services. Please remember, you can't come back easily once you move to Midgard."; - next; - if ((ep13_yong1 > 99) && (ep13_yong1 < 200)) { - switch(select("Alberta -> 4590z:Prontera -> 4590z:Izlude -> 4590z:Geffen -> 4590z:Payon -> 4590z:Morroc -> 4590z:Al De Baran -> 4590z:Cancel")) { - case 1: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "morocc",156,46; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 7: - if (Zeny >= 4590) { - set zeny,zeny-4590; - warp "aldebaran",168,112; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 8: - close; - } - } - else if ((ep13_yong1 > 199) && (ep13_yong1 < 250)) { - switch(select("Alberta -> 4170z:Prontera -> 4170z:Izlude -> 4170z:Geffen -> 4170z:Payon -> 4170z:Morroc -> 4170z:Al De Baran -> 4170z:Juno -> 4170z:Cancel")) { - case 1: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "morocc",156,46; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 7: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "aldebaran",168,112; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 8: - if (Zeny >= 4170) { - set zeny,zeny-4170; - warp "yuno",158,125; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 9: - close; - } - close; - } - else if ((ep13_yong1 > 249) && (ep13_yong1 < 300)) { - switch(select("Alberta -> 4025z:Prontera -> 4025z:Izlude -> 4025z:Geffen -> 4025z:Payon -> 4025z:Morroc -> 4025z:Al De Baran -> 4025z:Juno -> 4025z:Einbroch -> 4025z:Cancel")) { - case 1: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "morocc",156,46; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 7: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "aldebaran",168,112; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 8: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "yuno",158,125; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 9: - if (Zeny >= 4025) { - set zeny,zeny-4025; - warp "einbroch",158,301; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 10: - close; - } - close; - } - else if (ep13_yong1 > 299) { - switch(select("Alberta -> 3970z:Prontera -> 3970z:Izlude -> 3970z:Geffen -> 3970z:Payon -> 3970z:Morroc -> 3970z:Al De Baran -> 3970z:Juno -> 3970z:Einbroch -> 3970z:Lighthalzen -> 3970z:Cancel")) { - case 1: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "alberta",117,56; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "prontera",116,72; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 3: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "izlude",91,105; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 4: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "geffen",120,39; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 5: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "payon",161,58; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 6: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "morocc",156,46; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 7: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "aldebaran",168,112; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 8: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "yuno",158,125; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 9: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "einbroch",158,301; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 10: - if (Zeny >= 3970) { - set zeny,zeny-3970; - warp "lighthalzen",163,64; - close; - } - else { - mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 11: - close; - } - close; - } - else { - // Custom Translation - mes "[Cat Hand Agent]"; - mes "I am sorry, but you don't have enough credit points to use the warp service. Please come back when you have more points."; - close; - } - case 4: - switch(select("Alliance Forces Post -> 5500z:Splendide Camp -> 7500z:Cancel")) { - case 1: - if (Zeny >= 5500) { - set zeny,zeny-5500; - warp "mid_camp",62,127; - close; - } - else { mes "[Cat Hand Agent]"; - mes "Don't play with money."; - close; - } - case 2: - if (Zeny >= 7500) { - set zeny,zeny-7500; - warp "spl_fild02",32,225; + mes "Thank you for using our service."; close; } - else { + else switch(select("Alliance Forces Post -> 5500z:Splendide Camp -> 7500z:Cancel")) { + case 1: Catwarp(5500,13); + case 2: Catwarp(5500,11); + case 3: mes "[Cat Hand Agent]"; - mes "Don't play with money."; + mes "Thank you for using our service."; close; } - case 3: - mes "[Cat Hand Agent]"; - mes "Thank you for using our service."; - close; - } case 5: mes "[Cat Hand Agent]"; mes "Thank you for using our service."; @@ -1997,504 +383,108 @@ man_fild02,132,47,4 script Cat Hand Agent#man 421,{ mes "Please give me some Piece of Fish."; close; } -} - -man_fild02,146,81,0 script Mysterious Rock#31 844,{ - if ((countitem(6048) < 3) && (checkquest(12062,PLAYTIME) == -1)) { - specialeffect2 EF_REPAIRWEAPON; - progressbar "ffff00",10; - set .@rhea_ran,rand(1,20); - if (.@rhea_ran < 13) { - getitem 7049,1; //Stone - } - else if (.@rhea_ran == 13) { - getitem 990,1; //Boody_Red - } - else if (.@rhea_ran == 14) { - getitem 991,1; //Crystal_Blue - } - else if (.@rhea_ran == 15) { - getitem 992,1; //Wind_Of_Verdure - } - else if (.@rhea_ran == 16) { - getitem 993,1; //Yellow_Live - } - else if (.@rhea_ran == 17) { - getitem 6080,1; //Manuk_Coin - } - else if (.@rhea_ran > 18) { - getitem 6048,1; //Unidentified_Mineral - } - initnpctimer; - disablenpc "Mysterious Rock#31"; - end; - } - else { - mes "This rock contains unidentified minerals."; - mes "It's not possible to mine more than the limit."; - close; - } - end; - -OnTimer120000: - enablenpc "Mysterious Rock#31"; - stopnpctimer; - end; -} - -man_fild02,140,148,0 script Mysterious Rock#32 844,{ - if ((countitem(6048) < 3) && (checkquest(12062,PLAYTIME) == -1)) { - specialeffect2 EF_REPAIRWEAPON; - progressbar "ffff00",10; - set .@rhea_ran,rand(1,20); - if (.@rhea_ran < 13) { - getitem 7049,1; //Stone - } - else if (.@rhea_ran == 13) { - getitem 990,1; //Boody_Red - } - else if (.@rhea_ran == 14) { - getitem 991,1; //Crystal_Blue - } - else if (.@rhea_ran == 15) { - getitem 992,1; //Wind_Of_Verdure - } - else if (.@rhea_ran == 16) { - getitem 993,1; //Yellow_Live - } - else if (.@rhea_ran == 17) { - getitem 6080,1; //Manuk_Coin - } - else if (.@rhea_ran > 18) { - getitem 6048,1; //Unidentified_Mineral - } - initnpctimer; - disablenpc "Mysterious Rock#32"; - end; - } - else { - mes "This rock contains unidentified minerals."; - mes "It's not possible to mine more than the limit."; - close; - } - end; - -OnTimer120000: - enablenpc "Mysterious Rock#32"; - stopnpctimer; - end; -} - -man_fild02,88,263,0 script Mysterious Rock#33 844,{ - if ((countitem(6048) < 3) && (checkquest(12062,PLAYTIME) == -1)) { - specialeffect2 EF_REPAIRWEAPON; - progressbar "ffff00",10; - set .@rhea_ran,rand(1,20); - if (.@rhea_ran < 13) { - getitem 7049,1; //Stone - } - else if (.@rhea_ran == 13) { - getitem 990,1; //Boody_Red - } - else if (.@rhea_ran == 14) { - getitem 991,1; //Crystal_Blue - } - else if (.@rhea_ran == 15) { - getitem 992,1; //Wind_Of_Verdure - } - else if (.@rhea_ran == 16) { - getitem 993,1; //Yellow_Live - } - else if (.@rhea_ran == 17) { - getitem 6080,1; //Manuk_Coin - } - else if (.@rhea_ran > 18) { - getitem 6048,1; //Unidentified_Mineral - } - initnpctimer; - disablenpc "Mysterious Rock#33"; - end; - } - else { - mes "This rock contains unidentified minerals."; - mes "It's not possible to mine more than the limit."; - close; - } - end; - -OnTimer120000: - enablenpc "Mysterious Rock#33"; - stopnpctimer; - end; -} - -man_fild02,146,365,0 script Mysterious Rock#34 844,{ - if ((countitem(6048) < 3) && (checkquest(12062,PLAYTIME) == -1)) { - specialeffect2 EF_REPAIRWEAPON; - progressbar "ffff00",10; - set .@rhea_ran,rand(1,20); - if (.@rhea_ran < 13) { - getitem 7049,1; //Stone - } - else if (.@rhea_ran == 13) { - getitem 990,1; //Boody_Red - } - else if (.@rhea_ran == 14) { - getitem 991,1; //Crystal_Blue - } - else if (.@rhea_ran == 15) { - getitem 992,1; //Wind_Of_Verdure - } - else if (.@rhea_ran == 16) { - getitem 993,1; //Yellow_Live - } - else if (.@rhea_ran == 17) { - getitem 6080,1; //Manuk_Coin - } - else if (.@rhea_ran > 18) { - getitem 6048,1; //Unidentified_Mineral - } - initnpctimer; - disablenpc "Mysterious Rock#34"; - end; - } - else { - mes "This rock contains unidentified minerals."; - mes "It's not possible to mine more than the limit."; - close; - } - end; - -OnTimer120000: - enablenpc "Mysterious Rock#34"; - stopnpctimer; - end; -} - -man_fild02,336,305,0 script Mysterious Rock#35 844,{ - if ((countitem(6048) < 3) && (checkquest(12062,PLAYTIME) == -1)) { - specialeffect2 EF_REPAIRWEAPON; - progressbar "ffff00",10; - set .@rhea_ran,rand(1,20); - if (.@rhea_ran < 13) { - getitem 7049,1; //Stone - } - else if (.@rhea_ran == 13) { - getitem 990,1; //Boody_Red - } - else if (.@rhea_ran == 14) { - getitem 991,1; //Crystal_Blue - } - else if (.@rhea_ran == 15) { - getitem 992,1; //Wind_Of_Verdure - } - else if (.@rhea_ran == 16) { - getitem 993,1; //Yellow_Live - } - else if (.@rhea_ran == 17) { - getitem 6080,1; //Manuk_Coin - } - else if (.@rhea_ran > 18) { - getitem 6048,1; //Unidentified_Mineral - } - initnpctimer; - disablenpc "Mysterious Rock#35"; - end; - } - else { - mes "This rock contains unidentified minerals."; - mes "It's not possible to mine more than the limit."; - close; - } - end; - -OnTimer120000: - enablenpc "Mysterious Rock#35"; - stopnpctimer; - end; -} - -man_fild02,248,124,0 script Mysterious Rock#36 844,{ - if ((countitem(6048) < 3) && (checkquest(12062,PLAYTIME) == -1)) { - specialeffect2 EF_REPAIRWEAPON; - progressbar "ffff00",10; - set .@rhea_ran,rand(1,20); - if (.@rhea_ran < 13) { - getitem 7049,1; //Stone - } - else if (.@rhea_ran == 13) { - getitem 990,1; //Boody_Red - } - else if (.@rhea_ran == 14) { - getitem 991,1; //Crystal_Blue - } - else if (.@rhea_ran == 15) { - getitem 992,1; //Wind_Of_Verdure - } - else if (.@rhea_ran == 16) { - getitem 993,1; //Yellow_Live - } - else if (.@rhea_ran == 17) { - getitem 6080,1; //Manuk_Coin - } - else if (.@rhea_ran > 18) { - getitem 6048,1; //Unidentified_Mineral - } - initnpctimer; - disablenpc "Mysterious Rock#36"; - end; - } - else { - mes "This rock contains unidentified minerals."; - mes "It's not possible to mine more than the limit."; - close; - } - end; - -OnTimer120000: - enablenpc "Mysterious Rock#36"; - stopnpctimer; - end; -} - -man_fild02,285,115,0 script Mysterious Rock#37 844,{ - if ((countitem(6048) < 3) && (checkquest(12062,PLAYTIME) == -1)) { - specialeffect2 EF_REPAIRWEAPON; - progressbar "ffff00",10; - set .@rhea_ran,rand(1,20); - if (.@rhea_ran < 13) { - getitem 7049,1; //Stone - } - else if (.@rhea_ran == 13) { - getitem 990,1; //Boody_Red - } - else if (.@rhea_ran == 14) { - getitem 991,1; //Crystal_Blue - } - else if (.@rhea_ran == 15) { - getitem 992,1; //Wind_Of_Verdure - } - else if (.@rhea_ran == 16) { - getitem 993,1; //Yellow_Live - } - else if (.@rhea_ran == 17) { - getitem 6080,1; //Manuk_Coin - } - else if (.@rhea_ran > 18) { - getitem 6048,1; //Unidentified_Mineral - } - initnpctimer; - disablenpc "Mysterious Rock#37"; - end; - } - else { - mes "This rock contains unidentified minerals."; - mes "It's not possible to mine more than the limit."; - close; - } - end; - -OnTimer120000: - enablenpc "Mysterious Rock#37"; - stopnpctimer; - end; -} - -man_fild02,346,116,0 script Mysterious Rock#38 844,{ - if ((countitem(6048) < 3) && (checkquest(12062,PLAYTIME) == -1)) { - specialeffect2 EF_REPAIRWEAPON; - progressbar "ffff00",10; - set .@rhea_ran,rand(1,20); - if (.@rhea_ran < 13) { - getitem 7049,1; //Stone - } - else if (.@rhea_ran == 13) { - getitem 990,1; //Boody_Red - } - else if (.@rhea_ran == 14) { - getitem 991,1; //Crystal_Blue - } - else if (.@rhea_ran == 15) { - getitem 992,1; //Wind_Of_Verdure - } - else if (.@rhea_ran == 16) { - getitem 993,1; //Yellow_Live - } - else if (.@rhea_ran == 17) { - getitem 6080,1; //Manuk_Coin - } - else if (.@rhea_ran > 18) { - getitem 6048,1; //Unidentified_Mineral - } - initnpctimer; - disablenpc "Mysterious Rock#38"; - end; - } - else { - mes "This rock contains unidentified minerals."; - mes "It's not possible to mine more than the limit."; - close; - } - end; - -OnTimer120000: - enablenpc "Mysterious Rock#38"; - stopnpctimer; - end; -} - -man_fild02,358,174,0 script Mysterious Rock#39 844,{ +function Catwarp { + if (Zeny < getarg(0)) { + mes "[Cat Hand Agent]"; + mes "Don't play with money."; + close; } + set Zeny, Zeny-getarg(0); + switch(getarg(1)) { + case 1: warp "alberta",117,56; close; + case 2: warp "prontera",116,72; close; + case 3: warp "izlude",91,105; close; + case 4: warp "geffen",120,39; close; + case 5: warp "payon",161,58; close; + case 6: warp "morocc",156,46; close; + case 7: warp "aldebaran",168,112; close; + case 8: warp "yuno",158,125; close; + case 9: warp "einbroch",158,301; close; + case 10: warp "lighthalzen",163,64; close; + case 11: warp "spl_fild02",32,225; close; + case 12: warp "man_fild02",129,61; close; + case 13: warp "mid_camp",62,127; close; + } +} +} + +man_fild02,132,47,4 duplicate(Cat Hand Agent#spl) Cat Hand Agent#man 421 + +- script Mysterious Rock#30::manukrock2 -1,{ if ((countitem(6048) < 3) && (checkquest(12062,PLAYTIME) == -1)) { specialeffect2 EF_REPAIRWEAPON; progressbar "ffff00",10; set .@rhea_ran,rand(1,20); - if (.@rhea_ran < 13) { - getitem 7049,1; //Stone - } - else if (.@rhea_ran == 13) { - getitem 990,1; //Boody_Red - } - else if (.@rhea_ran == 14) { - getitem 991,1; //Crystal_Blue - } - else if (.@rhea_ran == 15) { - getitem 992,1; //Wind_Of_Verdure - } - else if (.@rhea_ran == 16) { - getitem 993,1; //Yellow_Live - } - else if (.@rhea_ran == 17) { - getitem 6080,1; //Manuk_Coin - } - else if (.@rhea_ran > 18) { - getitem 6048,1; //Unidentified_Mineral - } + if (.@rhea_ran < 13) getitem 7049,1; //Stone + else if (.@rhea_ran == 13) getitem 990,1; //Boody_Red + else if (.@rhea_ran == 14) getitem 991,1; //Crystal_Blue + else if (.@rhea_ran == 15) getitem 992,1; //Wind_Of_Verdure + else if (.@rhea_ran == 16) getitem 993,1; //Yellow_Live + else if (.@rhea_ran == 17) getitem 6080,1; //Manuk_Coin + else getitem 6048,1; //Unidentified_Mineral initnpctimer; - disablenpc "Mysterious Rock#39"; - end; - } + disablenpc strnpcinfo(0); + end; } else { mes "This rock contains unidentified minerals."; mes "It's not possible to mine more than the limit."; - close; - } + close; } end; OnTimer120000: - enablenpc "Mysterious Rock#39"; + enablenpc strnpcinfo(0); stopnpctimer; end; } -man_fild02,241,227,0 script Mysterious Rock#40 844,{ - if ((countitem(6048) < 3) && (checkquest(12062,PLAYTIME) == -1)) { - specialeffect2 EF_REPAIRWEAPON; - progressbar "ffff00",10; - set .@rhea_ran,rand(1,20); - if (.@rhea_ran < 13) { - getitem 7049,1; //Stone - } - else if (.@rhea_ran == 13) { - getitem 990,1; //Boody_Red - } - else if (.@rhea_ran == 14) { - getitem 991,1; //Crystal_Blue - } - else if (.@rhea_ran == 15) { - getitem 992,1; //Wind_Of_Verdure - } - else if (.@rhea_ran == 16) { - getitem 993,1; //Yellow_Live - } - else if (.@rhea_ran == 17) { - getitem 6080,1; //Manuk_Coin - } - else if (.@rhea_ran > 18) { - getitem 6048,1; //Unidentified_Mineral - } - initnpctimer; - disablenpc "Mysterious Rock#40"; - end; - } - else { - mes "This rock contains unidentified minerals."; - mes "It's not possible to mine more than the limit."; - close; - } - end; - -OnTimer120000: - enablenpc "Mysterious Rock#40"; - stopnpctimer; - end; -} +man_fild02,146,81,0 duplicate(manukrock2) Mysterious Rock#31 844 +man_fild02,140,148,0 duplicate(manukrock2) Mysterious Rock#32 844 +man_fild02,88,263,0 duplicate(manukrock2) Mysterious Rock#33 844 +man_fild02,146,365,0 duplicate(manukrock2) Mysterious Rock#34 844 +man_fild02,336,305,0 duplicate(manukrock2) Mysterious Rock#35 844 +man_fild02,248,124,0 duplicate(manukrock2) Mysterious Rock#36 844 +man_fild02,285,115,0 duplicate(manukrock2) Mysterious Rock#37 844 +man_fild02,346,116,0 duplicate(manukrock2) Mysterious Rock#38 844 +man_fild02,358,174,0 duplicate(manukrock2) Mysterious Rock#39 844 +man_fild02,241,227,0 duplicate(manukrock2) Mysterious Rock#40 844 spl_fild03,226,151,0 script School of Fish#5::FishingHole_spl3 844,{ if ((checkquest(12060,PLAYTIME) == -1) && (countitem(6039) < 20)) { specialeffect2 EF_BUBBLE; specialeffect2 EF_INVENOM; set .@fcast,15; - if (isequipped(2550)) { //Fisher's_Muffler + if (isequipped(2550)) //Fisher's_Muffler set .@fcast,.@fcast - 2; - } - if (isequipped(2443)) { //Fish_Shoes + if (isequipped(2443)) //Fish_Shoes set .@fcast,.@fcast - 2; - } - if (isequipped(2764)) { //Small_Fishing_Rod + if (isequipped(2764)) //Small_Fishing_Rod set .@fcast,.@fcast - 3; - } - if (isequipped(2775)) { //Lure + if (isequipped(2775)) //Lure set .@fcast,.@fcast - 1; - } - if (isequipped(1599)) { //Ahura_Mazda + if (isequipped(1599)) //Ahura_Mazda set .@fcast,.@fcast - 3; - } - if (isequipped(2199)) { //Angra_Manyu + if (isequipped(2199)) //Angra_Manyu set .@fcast,.@fcast - 4; - } progressbar "ffff00",.@fcast; if (ep13_1_rhea == 13) { if (rand(1,20) == 2) { getitem 6037,1; //Rough_File set ep13_1_rhea,14; specialeffect2 EF_BUBBLE; - mapannounce "spl_fild03","" + strcharinfo(0) + " has caught a Loose File.",bc_map,"0xff77ff"; + mapannounce strcharinfo(3),strcharinfo(0) + " has caught a Loose File.",bc_map,"0xff77ff"; } } set .@rhea_ran,rand(1,70); - if (.@rhea_ran < 20) { - getitem 6039,1; //Piece_Of_Fish - } - else if (.@rhea_ran == 20) { - getitem 908,1; //Spawn - } - else if (.@rhea_ran == 21) { - getitem 909,1; //Jellopy - } - else if (.@rhea_ran == 22) { - getitem 963,1; //Sharp_Scale - } - else if (.@rhea_ran == 23) { - getitem 956,1; //Gill - } - else if (.@rhea_ran == 24) { - getitem 6049,1; //Marlin - } - else if (.@rhea_ran == 25) { - getitem 918,1; //Sticky_Webfoot - } - else if (.@rhea_ran == 26) { - getitem 960,1; //Nipper - } - else if (.@rhea_ran == 27) { - getitem 910,1; //Garlet - } - else if (.@rhea_ran == 28) { - getitem 6081,1; //Splendide_Coin - } - else if ((.@rhea_ran > 28) && (.@rhea_ran < 40)) { - getitem 7049,1; //Stone - } + if (.@rhea_ran < 20) getitem 6039,1; //Piece_Of_Fish + else if (.@rhea_ran == 20) getitem 908,1; //Spawn + else if (.@rhea_ran == 21) getitem 909,1; //Jellopy + else if (.@rhea_ran == 22) getitem 963,1; //Sharp_Scale + else if (.@rhea_ran == 23) getitem 956,1; //Gill + else if (.@rhea_ran == 24) getitem 6049,1; //Marlin + else if (.@rhea_ran == 25) getitem 918,1; //Sticky_Webfoot + else if (.@rhea_ran == 26) getitem 960,1; //Nipper + else if (.@rhea_ran == 27) getitem 910,1; //Garlet + else if (.@rhea_ran == 28) getitem 6081,1; //Splendide_Coin + else if ((.@rhea_ran > 28) && (.@rhea_ran < 40)) getitem 7049,1; //Stone else { mes "Nothing was caught."; close; @@ -2502,17 +492,17 @@ spl_fild03,226,151,0 script School of Fish#5::FishingHole_spl3 844,{ set .@rhea_ran5,rand(1,200); if (.@rhea_ran5 == 3) { getitem 644,1; //Gift_Box - mapannounce "spl_fild03","" + strcharinfo(0) + " has caught a Gift Box.",bc_map,"0x00ffff"; + mapannounce strcharinfo(3),strcharinfo(0) + " has caught a Gift Box.",bc_map,"0x00ffff"; } set .@rhea_ran3,rand(1,500); if (.@rhea_ran3 == 3) { getitem 603,1; //Old_Blue_Box - mapannounce "spl_fild03","" + strcharinfo(0) + " has caught an Old Blue Box.",bc_map,"0x00ffff"; + mapannounce strcharinfo(3),strcharinfo(0) + " has caught an Old Blue Box.",bc_map,"0x00ffff"; } set .@rhea_ran4,rand(1,3000); if (.@rhea_ran4 == 3) { getitem 617,1; //Old_Violet_Box - mapannounce "spl_fild03","" + strcharinfo(0) + " has caught an Old Purple Box.",bc_map,"0x44ff44"; + mapannounce strcharinfo(3),strcharinfo(0) + " has caught an Old Purple Box.",bc_map,"0x44ff44"; } } else { @@ -2521,109 +511,15 @@ spl_fild03,226,151,0 script School of Fish#5::FishingHole_spl3 844,{ } end; } - spl_fild03,268,230,0 duplicate(FishingHole_spl3) School of Fish#6 844 spl_fild03,293,253,0 duplicate(FishingHole_spl3) School of Fish#7 844 spl_fild03,165,100,0 duplicate(FishingHole_spl3) School of Fish#8 844 spl_fild03,317,190,0 duplicate(FishingHole_spl3) School of Fish#9 844 - -spl_fild01,41,118,0 script School of Fish#10::FishingHole_spl1 844,{ - if ((checkquest(12060,PLAYTIME) == -1) && (countitem(6039) < 20)) { - specialeffect2 EF_BUBBLE; - specialeffect2 EF_INVENOM; - set .@fcast,15; - if (isequipped(2550)) { //Fisher's_Muffler - set .@fcast,.@fcast - 2; - } - if (isequipped(2443)) { //Fish_Shoes - set .@fcast,.@fcast - 2; - } - if (isequipped(2764)) { //Small_Fishing_Rod - set .@fcast,.@fcast - 3; - } - if (isequipped(2775)) { //Lure - set .@fcast,.@fcast - 1; - } - if (isequipped(1599)) { //Ahura_Mazda - set .@fcast,.@fcast - 3; - } - if (isequipped(2199)) { //Angra_Manyu - set .@fcast,.@fcast - 4; - } - progressbar "ffff00",.@fcast; - if (ep13_1_rhea == 13) { - if (rand(1,20) == 2) { - getitem 6037,1; //Rough_File - set ep13_1_rhea,14; - specialeffect2 EF_BUBBLE; - mapannounce "spl_fild01","" + strcharinfo(0) + " has caught a Loose File.",bc_map,"0xff77ff"; - } - } - set .@rhea_ran,rand(1,70); - if (.@rhea_ran < 20) { - getitem 6039,1; //Piece_Of_Fish - } - else if (.@rhea_ran == 20) { - getitem 908,1; //Spawn - } - else if (.@rhea_ran == 21) { - getitem 909,1; //Jellopy - } - else if (.@rhea_ran == 22) { - getitem 963,1; //Sharp_Scale - } - else if (.@rhea_ran == 23) { - getitem 956,1; //Gill - } - else if (.@rhea_ran == 24) { - getitem 6049,1; //Marlin - } - else if (.@rhea_ran == 25) { - getitem 918,1; //Sticky_Webfoot - } - else if (.@rhea_ran == 26) { - getitem 960,1; //Nipper - } - else if (.@rhea_ran == 27) { - getitem 910,1; //Garlet - } - else if (.@rhea_ran == 28) { - getitem 6081,1; //Splendide_Coin - } - else if ((.@rhea_ran > 28) && (.@rhea_ran < 40)) { - getitem 7049,1; //Stone - } - else { - mes "Nothing was caught."; - close; - } - set .@rhea_ran5,rand(1,200); - if (.@rhea_ran5 == 3) { - getitem 644,1; //Gift_Box - mapannounce "spl_fild01","" + strcharinfo(0) + " has caught a Gift Box.",bc_map,"0x00ffff"; - } - set .@rhea_ran3,rand(1,500); - if (.@rhea_ran3 == 3) { - getitem 603,1; //Old_Blue_Box - mapannounce "spl_fild01","" + strcharinfo(0) + " has caught a Old Blue Box.",bc_map,"0x00ffff"; - } - set .@rhea_ran4,rand(1,3000); - if (.@rhea_ran4 == 3) { - getitem 617,1; //Old_Violet_Box - mapannounce "spl_fild01","" + strcharinfo(0) + " has caught a Old Purple Box.",bc_map,"0x44ff44"; - } - } - else { - mes "Fish are swimming in the water."; - close; - } - end; -} - -spl_fild01,317,361,0 duplicate(FishingHole_spl1) School of Fish#11 844 -spl_fild01,55,269,0 duplicate(FishingHole_spl1) School of Fish#12 844 -spl_fild01,332,131,0 duplicate(FishingHole_spl1) School of Fish#13 844 -spl_fild01,170,74,0 duplicate(FishingHole_spl1) School of Fish#14 844 +spl_fild01,41,118,0 duplicate(FishingHole_spl3) School of Fish#10 844 +spl_fild01,317,361,0 duplicate(FishingHole_spl3) School of Fish#11 844 +spl_fild01,55,269,0 duplicate(FishingHole_spl3) School of Fish#12 844 +spl_fild01,332,131,0 duplicate(FishingHole_spl3) School of Fish#13 844 +spl_fild01,170,74,0 duplicate(FishingHole_spl3) School of Fish#14 844 // Two Tribes //============================================================ @@ -3418,16 +1314,13 @@ nyd_dun01,55,223,5 script Snorren#ep13md17 454,{ end; OnInit: +OnDisable: disablenpc "Snorren#ep13md17"; end; OnEnable: enablenpc "Snorren#ep13md17"; end; - -OnDisable: - disablenpc "Snorren#ep13md17"; - end; } nyd_dun01,62,233,0 script Trunk of a Tree#ep13 844,2,2,{ @@ -4462,7 +2355,7 @@ OnTouch: close; } -spl_in02,239,93,3 script Terra#ep13md_l03 441,{ +spl_in02,236,92,5 script Arc#ep13md_l02 447,{ if (checkweight(1201,2) == 0) { mes "Wait a moment!!"; mes "You have too many items."; @@ -4484,12 +2377,7 @@ spl_in02,239,93,3 script Terra#ep13md_l03 441,{ mes "[Arc]"; mes "Ah, finally. I've been speaking with Terra while we waited for you."; mes "Terra. This is who saved you..."; - if (Sex == 0) { - mes "You should thank her."; - } - else { - mes "You should thank him."; - } + mes "You should thank "+((Sex)?"him.":"her."); next; mes "[Terra]"; mes "Thank you..."; @@ -4567,185 +2455,73 @@ spl_in02,239,93,3 script Terra#ep13md_l03 441,{ close; } else if (ep13_mdrama == 27) { - mes "[Terra]"; - mes "Arc... I will get some rest..."; - mes "I'm sorry... And. You..."; + if (strnpcinfo(1) == "Arc") { + mes "[Arc]"; + mes "Terra. Get some rest..."; + mes "Rest easy..."; + mes "And..."; + } + else { + mes "[Terra]"; + mes "Arc... I will get some rest..."; + mes "I'm sorry... And. You..."; + } next; - mes "[Terra]"; - mes "Originally.. we Laphine were extremely reluctant to have others in our area..."; - mes "but you are ok..."; + mes "["+strnpcinfo(1)+"]"; + mes "Originally... we Laphine were extremely reluctant to have others in our area."; + mes strcharinfo(0) + ", you will be a special exception."; next; - mes "[Terra]"; - // custom translation - mes "You are always welcome to visit us..."; + mes "["+strnpcinfo(1)+"]"; + if (strnpcinfo(1) == "Arc") mes "That's what Terra wants too."; + mes "It might be cramped, but you are always welcome to visit us."; set ep13_mdrama,28; close; } else if (ep13_mdrama > 27) { - mes "[Terra]"; - mes "I'm sorry..."; - mes "My body is not fully recovered yet..."; + if (strnpcinfo(1) == "Arc") { + mes "[Arc]"; + mes "How are you adapting to Splendide?"; + mes "Terra's still not fully recovered yet, so keep that in mind."; + } + else { + mes "[Terra]"; + mes "I'm sorry..."; + mes "My body is not fully recovered yet..."; + } close; } else { // custom translation - mes "[Terra]"; - mes "I'm sorry... I'm so sleepy..."; - mes "...I want to sleep..."; - close; - } - } - else { - mes "[Terra]"; - mes "ModBurDana...? Mu AnduWehFus Yee OsaLoLars..."; - mes "eoFusser...."; - mes "maurNohser Ur...... ThorNuffLars So "; - close; - } -} - -spl_in02,236,92,5 script Arc#ep13md_l02 447,{ - if (checkweight(1201,2) == 0) { - mes "Wait a moment!!"; - mes "You have too many items."; - mes "You can't receive this."; - mes "Lighten your weight and"; - mes "try again."; - close; - } - if (isequipped(2782) == 1) { - if (ep13_mdrama == 26) { - mes "[Terra]"; - mes "........."; - next; - mes "[Arc]"; - mes "I see. That's what happened."; - mes "But... That Sapha...What has he become to you in that short period of time?"; - next; - select("Arc?"); - mes "[Arc]"; - mes "Ah, finally. I've been speaking with Terra while we waited for you."; - mes "Terra. This is who saved you..."; - if (Sex == 0) { - mes "You should thank her."; + if (strnpcinfo(1) == "Arc") { + mes "[Arc]"; + mes "The back of the right ... "; + mes "......"; } else { - mes "You should thank him."; + mes "[Terra]"; + mes "I'm sorry... I'm so sleepy..."; + mes "...I want to sleep..."; } - next; - mes "[Terra]"; - mes "Thank you..."; - mes "I'm sorry Arc... Sorry..."; - mes "......"; - next; - mes "[Arc]"; - mes "So, this is the story."; - mes "Terra was wandering around your Camp and found a Sapha who was also wandering around your Camp at the time."; - next; - mes "[Arc]"; - mes "They were both being cautious not to be seen by you humans but they caught sight of each other and started to fight."; - next; - mes "[Arc]"; - mes "And then they eventually fell into that hole in the swamp and ended up in that cave."; - next; - mes "[Terra]"; - mes "Yeah... We were both unconscious for some time.."; - mes "And by the time we were able to wake up and see... We were surrounded."; - next; - mes "[Terra]"; - mes "Our main concern was getting out of there..."; - mes "Even though we couldn't understand each other's language... We made a temporary truce."; - next; - mes "[Terra]"; - mes "And then....."; - mes "........."; - next; - select("So that's what happened."); - mes "[" + strcharinfo(0) + "]"; - mes "You were outnumbered and at the last moment Ogen sacrificed himself to protect you."; - next; - mes "[Terra]"; - mes "So... I wanted to help him..."; - mes "I was just trying to repay him..."; - next; - mes "[Terra]"; - mes "Was I wrong...?"; - mes "Was I thinking wrong?"; - next; - mes "[Arc]"; - mes "Repaying one's dept is a good thing."; - mes "Especially for a proud Laphine, It sure is."; - next; - mes "[Arc]"; - mes "But Terra..."; - mes "You've made two big mistakes."; - mes "First is, You went away without permission..."; - mes "And secondly..."; - next; - mes "[Arc]"; - mes "You didn't ask for help."; - mes "If something like that happened... of course I would help..."; - next; - mes "[Terra]"; - mes "I'm sorry Arc... I'm sorry..."; - mes "I won't act foolish ever again."; - next; - mes "[Arc]"; - mes "Get some rest."; - mes "I will put in a good word to the superiors..."; - mes "And " + strcharinfo(0) + "..."; - mes "Thank you."; - next; - mes "[Arc]"; - mes "Here, I will give you these to show my appreciation."; - mes "It's not much, but you will be able to buy things in Splendide with these."; - next; - mes "[Arc]"; - mes "I'm sorry this is all I can give you for now."; - set ep13_mdrama,27; - getitem 6081,25; //Splendide_Coin - getexp 120000,10000; - completequest 7071; close; } - else if (ep13_mdrama == 27) { - mes "[Arc]"; - mes "Terra. Get some rest..."; - mes "Rest easy..."; - mes "And..."; - next; - mes "[Arc]"; - mes ".Originally.. we Laphine were extremely reluctant to have others in our area."; - mes "" + strcharinfo(0) + ", you will be a special exception."; - next; - mes "[Arc]"; - mes "That's what Terra wants too."; - mes "It might be cramped, but you are always welcome to visit us."; - set ep13_mdrama,28; - close; - } - else if (ep13_mdrama > 27) { + } + else { + if (strnpcinfo(1) == "Arc") { mes "[Arc]"; - mes "How are you adapting to Splendide?"; - mes "Terra's still not fully recovered yet, so keep that in mind."; - close; + mes "HirWosWeh. Yee DiebVilFar U manTalVil."; + mes "LarsNeiser...??"; + mes "VeldTiTal Ko SharDurYur Di ?"; } else { - // custom translation - mes "[Arc]"; - mes "The back of the right ... "; - mes "......"; - close; + mes "[Terra]"; + mes "ModBurDana...? Mu AnduWehFus Yee OsaLoLars..."; + mes "eoFusser...."; + mes "maurNohser Ur...... ThorNuffLars So "; } - } - else { - mes "[Arc]"; - mes "HirWosWeh. Yee DiebVilFar U manTalVil."; - mes "LarsNeiser...??"; - mes "VeldTiTal Ko SharDurYur Di ?"; close; } } +spl_in02,239,93,3 duplicate(Arc#ep13md_l02) Terra#ep13md_l03 441 splendide,287,140,0 script terrashome_in 45,1,1,{ OnTouch: @@ -5531,35 +3307,7 @@ mid_camp,192,239,4 script Wanted Sign#ep13_2ect01 857,{ } } -nyd_dun01,258,134,0 script Dragon Egg#ep13_degg01 463,{ - if (checkweight(1201,2) == 0) { - mes "- You're carrying too many items. -"; - close; - } - if ((ep13_2_dayegg == 1) && (countitem(6093) < 10)) { - mes "We just got fresh eggs from the dragon nest."; - getitem 6093,1; //Egg_Of_Draco - disablenpc "Dragon Egg#ep13_degg01"; - initnpctimer; - close; - } - end; - -OnTimer420000: - enablenpc "Dragon Egg#ep13_degg01"; - stopnpctimer; - end; - -OnEnable: - enablenpc "Dragon Egg#ep13_degg01"; - end; - -OnDisable: - disablenpc "Dragon Egg#ep13_degg01"; - end; -} - -nyd_dun01,100,210,0 script Dragon Egg#ep13_degg02 463,{ +- script Dragon Egg#ep13_degg_0 -1,{ if (checkweight(1201,2) == 0) { mes "- You're carrying too many items. -"; close; @@ -5567,55 +3315,34 @@ nyd_dun01,100,210,0 script Dragon Egg#ep13_degg02 463,{ if ((ep13_2_dayegg == 1) && (countitem(6093) < 10)) { mes "We just got fresh eggs from the dragon nest."; getitem 6093,1; //Egg_Of_Draco - disablenpc "Dragon Egg#ep13_degg02"; + disablenpc strnpcinfo(1); initnpctimer; close; } end; OnTimer420000: - enablenpc "Dragon Egg#ep13_degg02"; + enablenpc strnpcinfo(1); stopnpctimer; end; OnEnable: - enablenpc "Dragon Egg#ep13_degg02"; + enablenpc strnpcinfo(1); end; OnDisable: - disablenpc "Dragon Egg#ep13_degg02"; + disablenpc strnpcinfo(1); end; } -nyd_dun01,74,68,0 script Dragon Egg#ep13_degg03 463,{ - if (checkweight(1201,2) == 0) { - mes "- You're carrying too many items. -"; - close; - } - if ((ep13_2_dayegg == 1) && (countitem(6093) < 10)) { - mes "We just got fresh eggs from the dragon nest."; - getitem 6093,1; //Egg_Of_Draco - disablenpc "Dragon Egg#ep13_degg03"; - initnpctimer; - close; - } - end; +nyd_dun01,258,134,0 duplicate(Dragon Egg#ep13_degg_0) Dragon Egg#ep13_degg01 463 +nyd_dun01,100,210,0 duplicate(Dragon Egg#ep13_degg_0) Dragon Egg#ep13_degg02 463 +nyd_dun01,74,68,0 duplicate(Dragon Egg#ep13_degg_0) Dragon Egg#ep13_degg03 463 +nyd_dun01,98,142,0 duplicate(Dragon Egg#ep13_degg_0) Dragon Egg#ep13_degg04 463 +nyd_dun01,244,157,0 duplicate(Dragon Egg#ep13_degg_0) Dragon Egg#ep13_degg05 463 +nyd_dun01,59,185,0 duplicate(Dragon Egg#ep13_degg_0) Dragon Egg#ep13_degg06 463 -OnTimer420000: - enablenpc "Dragon Egg#ep13_degg03"; - stopnpctimer; - end; - -OnEnable: - enablenpc "Dragon Egg#ep13_degg03"; - end; - -OnDisable: - disablenpc "Dragon Egg#ep13_degg03"; - end; -} - -nyd_dun01,98,142,0 script Dragon Egg#ep13_degg04 463,{ +nyd_dun02,68,256,0 script Dragon Egg#ep13_degg_1 463,{ if (checkweight(1201,2) == 0) { mes "- You're carrying too many items. -"; close; @@ -5623,251 +3350,61 @@ nyd_dun01,98,142,0 script Dragon Egg#ep13_degg04 463,{ if ((ep13_2_dayegg == 1) && (countitem(6093) < 10)) { mes "We just got fresh eggs from the dragon nest."; getitem 6093,1; //Egg_Of_Draco - disablenpc "Dragon Egg#ep13_degg04"; - initnpctimer; - close; - } - end; - -OnTimer420000: - enablenpc "Dragon Egg#ep13_degg04"; - stopnpctimer; - end; - -OnEnable: - enablenpc "Dragon Egg#ep13_degg04"; - end; - -OnDisable: - disablenpc "Dragon Egg#ep13_degg04"; - end; -} - -nyd_dun01,244,157,0 script Dragon Egg#ep13_degg05 463,{ - if (checkweight(1201,2) == 0) { - mes "- You're carrying too many items. -"; - close; - } - if ((ep13_2_dayegg == 1) && (countitem(6093) < 10)) { - mes "We just got fresh eggs from the dragon nest."; - getitem 6093,1; //Egg_Of_Draco - disablenpc "Dragon Egg#ep13_degg05"; - initnpctimer; - close; - } - end; - -OnTimer420000: - enablenpc "Dragon Egg#ep13_degg05"; - stopnpctimer; - end; - -OnEnable: - enablenpc "Dragon Egg#ep13_degg05"; - end; - -OnDisable: - disablenpc "Dragon Egg#ep13_degg05"; - end; -} - -nyd_dun01,59,185,0 script Dragon Egg#ep13_degg06 463,{ - if (checkweight(1201,2) == 0) { - mes "- You're carrying too many items. -"; - close; - } - if ((ep13_2_dayegg == 1) && (countitem(6093) < 10)) { - mes "We just got fresh eggs from the dragon nest."; - getitem 6093,1; //Egg_Of_Draco - disablenpc "Dragon Egg#ep13_degg06"; - initnpctimer; - close; - } - end; - -OnTimer420000: - enablenpc "Dragon Egg#ep13_degg06"; - stopnpctimer; - end; - -OnEnable: - enablenpc "Dragon Egg#ep13_degg06"; - end; - -OnDisable: - disablenpc "Dragon Egg#ep13_degg06"; - end; -} - -nyd_dun02,68,256,0 script Dragon Egg#ep13_degg11 463,{ - if (checkweight(1201,2) == 0) { - mes "- You're carrying too many items. -"; - close; - } - if ((ep13_2_dayegg == 1) && (countitem(6093) < 10)) { - mes "We just got fresh eggs from the dragon nest."; - getitem 6093,1; //Egg_Of_Draco - disablenpc "Dragon Egg#ep13_degg11"; + disablenpc strnpcinfo(1); initnpctimer; close; } end; OnTimer240000: - enablenpc "Dragon Egg#ep13_degg11"; + enablenpc strnpcinfo(1); stopnpctimer; end; OnEnable: - enablenpc "Dragon Egg#ep13_degg11"; + enablenpc strnpcinfo(1); end; OnDisable: - disablenpc "Dragon Egg#ep13_degg11"; + disablenpc strnpcinfo(1); end; } -nyd_dun02,202,166,0 script Dragon Egg#ep13_degg12 463,{ - if (checkweight(1201,2) == 0) { - mes "- You're carrying too many items. -"; - close; - } - if ((ep13_2_dayegg == 1) && (countitem(6093) < 10)) { - mes "We just got fresh eggs from the dragon nest."; - getitem 6093,1; //Egg_Of_Draco - disablenpc "Dragon Egg#ep13_degg12"; - initnpctimer; - close; - } - end; - -OnTimer240000: - enablenpc "Dragon Egg#ep13_degg12"; - stopnpctimer; - end; - -OnEnable: - enablenpc "Dragon Egg#ep13_degg12"; - end; - -OnDisable: - disablenpc "Dragon Egg#ep13_degg12"; - end; -} - -nyd_dun02,200,165,0 script Dragon Egg#ep13_degg13 463,{ - if (checkweight(1201,2) == 0) { - mes "- You're carrying too many items. -"; - close; - } - if ((ep13_2_dayegg == 1) && (countitem(6093) < 10)) { - mes "We just got fresh eggs from the dragon nest."; - getitem 6093,1; //Egg_Of_Draco - disablenpc "Dragon Egg#ep13_degg13"; - initnpctimer; - close; - } - end; - -OnTimer240000: - enablenpc "Dragon Egg#ep13_degg13"; - stopnpctimer; - end; - -OnEnable: - enablenpc "Dragon Egg#ep13_degg13"; - end; - -OnDisable: - disablenpc "Dragon Egg#ep13_degg13"; - end; -} - -nyd_dun02,201,166,0 script Dragon Egg#ep13_degg16 463,{ - if (checkweight(1201,2) == 0) { - mes "- You're carrying too many items. -"; - close; - } - if ((ep13_2_dayegg == 1) && (countitem(6093) < 10)) { - mes "We just got fresh eggs from the dragon nest."; - getitem 6093,1; //Egg_Of_Draco - disablenpc "Dragon Egg#ep13_degg16"; - initnpctimer; - close; - } - end; - -OnTimer120000: - enablenpc "Dragon Egg#ep13_degg16"; - stopnpctimer; - end; - -OnEnable: - enablenpc "Dragon Egg#ep13_degg16"; - end; - -OnDisable: - disablenpc "Dragon Egg#ep13_degg16"; - end; -} +nyd_dun02,68,256,0 duplicate(Dragon Egg#ep13_degg_1) Dragon Egg#ep13_degg11 463 +nyd_dun02,202,166,0 duplicate(Dragon Egg#ep13_degg_1) Dragon Egg#ep13_degg12 463 +nyd_dun02,200,165,0 duplicate(Dragon Egg#ep13_degg_1) Dragon Egg#ep13_degg13 463 -nyd_dun02,203,167,0 script Dragon Egg#ep13_degg17 463,{ +nyd_dun02,201,166,0 script Dragon Egg#ep13_degg_2 463,{ if (checkweight(1201,2) == 0) { mes "- You're carrying too many items. -"; close; } - else { - } if ((ep13_2_dayegg == 1) && (countitem(6093) < 10)) { mes "We just got fresh eggs from the dragon nest."; getitem 6093,1; //Egg_Of_Draco - disablenpc "Dragon Egg#ep13_degg17"; + disablenpc strnpcinfo(1); initnpctimer; close; } end; OnTimer120000: - enablenpc "Dragon Egg#ep13_degg17"; + enablenpc strnpcinfo(1); stopnpctimer; end; OnEnable: - enablenpc "Dragon Egg#ep13_degg17"; + enablenpc strnpcinfo(1); end; OnDisable: - disablenpc "Dragon Egg#ep13_degg17"; + disablenpc strnpcinfo(1); end; } -nyd_dun02,201,164,0 script Dragon Egg#ep13_degg18 463,{ - if (checkweight(1201,2) == 0) { - mes "- You're carrying too many items. -"; - close; - } - if ((ep13_2_dayegg == 1) && (countitem(6093) < 10)) { - mes "We just got fresh eggs from the dragon nest."; - getitem 6093,1; //Egg_Of_Draco - disablenpc "Dragon Egg#ep13_degg18"; - initnpctimer; - close; - } - end; - -OnTimer120000: - enablenpc "Dragon Egg#ep13_degg18"; - stopnpctimer; - end; - -OnEnable: - enablenpc "Dragon Egg#ep13_degg18"; - end; - -OnDisable: - disablenpc "Dragon Egg#ep13_degg18"; - end; -} +nyd_dun02,201,166,0 duplicate(Dragon Egg#ep13_degg_2) Dragon Egg#ep13_degg16 463 +nyd_dun02,203,167,0 duplicate(Dragon Egg#ep13_degg_2) Dragon Egg#ep13_degg17 463 +nyd_dun02,201,164,0 duplicate(Dragon Egg#ep13_degg_2) Dragon Egg#ep13_degg18 463 nyd_dun02,201,157,5 script Egg Keeper Draco#13_1 2013,3,3,{ @@ -5959,6 +3496,7 @@ nyd_dun02,206,114,5 script Stranger#ep13_2_dan02 456,3,3,{ end; OnInit: +OnDisable: disablenpc "Stranger#ep13_2_dan02"; end; @@ -5966,10 +3504,6 @@ OnEnable: enablenpc "Stranger#ep13_2_dan02"; end; -OnDisable: - disablenpc "Stranger#ep13_2_dan02"; - end; - Oncall: monster "nyd_dun02",206,114,"Runway Dandelion",2026,1,"Stranger#ep13_2_dan04::OnMyMobDead"; end; @@ -5994,13 +3528,8 @@ OnMyMobDead: end; OnTimer300000: - set .@temp_call,rand(1,2); - if (.@temp_call == 1) { - enablenpc "Stranger#ep13_2_dan01"; - } - else { - donpcevent "Stranger#ep13_2_dan02::OnEnable"; - } + if (rand(2)) enablenpc "Stranger#ep13_2_dan01"; + else donpcevent "Stranger#ep13_2_dan02::OnEnable"; stopnpctimer; end; } @@ -6013,13 +3542,8 @@ OnMyMobDead: end; OnTimer300000: - set .@temp_call,rand(1,2); - if (.@temp_call == 1) { - enablenpc "Stranger#ep13_2_dan02"; - } - else { - donpcevent "Stranger#ep13_2_dan01::OnEnable"; - } + if (rand(2)) enablenpc "Stranger#ep13_2_dan02"; + else donpcevent "Stranger#ep13_2_dan01::OnEnable"; stopnpctimer; end; } @@ -6974,24 +4498,20 @@ mid_camp,147,256,3 script Rune Midgarts Magician#1 735,{ } } -spl_fild02,27,218,0 script Half-buried Gem#1 844,{ +function script jewel_13_2 { if (ep13_2_rhea < 5) { mes "- Under a round pile of earth, -"; - mes "- there's a Red Gem -"; + mes "- there's a "+getarg(0)+" Gem -"; mes "- half-buried. -"; close; } else if (ep13_2_rhea == 5) { - set .@check_spljew00,checkquest(8241); - if (.@check_spljew00 == -1) { + if (checkquest(8240+getarg(1)) == -1) { mes "- Under a round pile of earth, -"; - mes "- there's a Red Gem -"; + mes "- there's a "+getarg(0)+" Gem -"; mes "- half-buried. -"; next; - switch(select("Dig out the Gem:Leave it alone")) { - case 1: - break; - case 2: + if(select("Dig out the Gem:Leave it alone")==2) { mes "- You overspread some earth over the Gem -"; mes "- and left the Gem as it was. -"; next; @@ -7001,15 +4521,15 @@ spl_fild02,27,218,0 script Half-buried Gem#1 844,{ } if (rand(1,4) == 2) { mes "- You dug up a pile of earth -"; - mes "- and pulled out the Red Gem -"; - setquest 8241; - getitem 7575,1; //Red_Jewel_ + mes "- and pulled out the "+getarg(0)+" Gem -"; + setquest 8240+getarg(1); + getitem 7574+getarg(1),1; close; } else { mes "- As you dug up a pile of earth, -"; mes "- a Thief Bug attacks you! -"; - donpcevent "Half-buried Gem#1::OnDisable"; + donpcevent "Half-buried Gem#"+getarg(1)+"::OnDisable"; next; mes "["+ strcharinfo(0) +"]"; mes "What the heck is this?!?!?!"; @@ -7018,17 +4538,20 @@ spl_fild02,27,218,0 script Half-buried Gem#1 844,{ } else { mes "- Small pile of earth -"; - mes "- which you dug up the Red Gem -"; + mes "- which you dug up the "+getarg(0)+" Gem -"; close; } } else { mes "- Small pile of earth -"; - mes "- which you dug up the Red Gem -"; + mes "- which you dug up the "+getarg(0)+" Gem -"; close; } end; +} +spl_fild02,27,218,0 script Half-buried Gem#1 844,{ + callfunc "jewel_13_2","Red",1; OnInit: hideoffnpc "Half-buried Gem#1"; @@ -7060,59 +4583,7 @@ OnTimer300000: } man_fild03,227,109,0 script Half-buried Gem#2 844,{ - if (ep13_2_rhea < 5) { - mes "- Under a round pile of earth, -"; - mes "- there's a Blue Gem -"; - mes "- half-buried. -"; - close; - } - else if (ep13_2_rhea == 5) { - set .@check_manjew00,checkquest(8242); - if (.@check_manjew00 == -1) { - mes "- Under a round pile of earth, -"; - mes "- there's a Red Gem -"; - mes "- half-buried. -"; - next; - switch(select("Dig out the Gem:Leave it alone")) { - case 1: - break; - case 2: - mes "- You overspread some earth over the Gem -"; - mes "- and left the Gem as it was. -"; - next; - mes "["+ strcharinfo(0) +"]"; - mes "...What the heck am I doing now..."; - close; - } - if (rand(1,4) == 2) { - mes "- You dug up a pile of earth -"; - mes "- and pulled out the Blue Gem -"; - setquest 8242; - getitem 7576,1; //Blue_Jewel_ - close; - } - else { - mes "- As you dug up a pile of earth, -"; - mes "- a Thief Bug attacks you! -"; - donpcevent "Half-buried Gem#2::OnDisable"; - next; - mes "["+ strcharinfo(0) +"]"; - mes "What the heck is this?!?!?!"; - close; - } - } - else { - mes "- Small pile of earth -"; - mes "- which you dug up the Blue Gem -"; - close; - } - } - else { - mes "- Small pile of earth -"; - mes "- which you dug up the Blue Gem -"; - close; - } - end; + callfunc "jewel_13_2","Blue",2; OnInit: hideoffnpc "Half-buried Gem#2"; @@ -7217,8 +4688,8 @@ mid_camp,7,3,0 script Translator Preparation#1 708,{ //============================================================ man_in01,372,221,5 script Scientist#lifeguard 449,{ if ((isequipped(2782) == 1) && (ep13_2_rhea == 100)) { + mes "[Dr. Lifeguard]"; if (ep13_2_tre == 0) { - mes "[Dr. Lifeguard]"; mes "Recently, it seems like my skin is becoming really dry."; next; mes "[Dr. Lifeguard]"; @@ -7281,225 +4752,67 @@ man_in01,372,221,5 script Scientist#lifeguard 449,{ } else if ((ep13_2_tre == 1) || (ep13_2_tre == 100)) { if (checkweight(1201,1) == 0) { - mes "[Dr. Lifeguard]"; mes "It looks like you're carrying too many things."; mes "Why not put some of your items in storage and come back?"; close; } - set .@dayq_chk,checkquest(2182,PLAYTIME); if ((.@dayq_chk == 0) || (.@dayq_chk == 1)) { - mes "[Dr. Lifeguard]"; mes "The future of the Sapha is up to you."; mes "I do not have any need of your help right now."; close; } else { erasequest 2182; - set .@rand_dayq,rand(1,3); - if (.@rand_dayq == 1) { - mes "[Dr. Lifeguard]"; - mes "Recently, someone who came from Schwaltzvalt gave me a small mineral as a gift from his home town when he saw our study of Bradium."; - next; - mes "[Dr. Lifeguard]"; - mes "I can't say for sure until now,"; - mes "but this mineral seems to have"; - mes "many interesting features."; - next; - mes "[Dr. Lifeguard]"; - mes "As I examine this mineral"; - mes "more and more, it's really"; - mes "different from the one in Jotunheim."; - mes "This mineral must be helpful"; - mes "to make a new vaccine!"; - next; - mes "[Dr. Lifeguard]"; - mes "But the amount of the mineral"; - mes "is too little to make a"; - mes "preparation for the"; - mes "examination."; - next; - mes "[Dr. Lifeguard]"; - mes "You said you're from Rune Midgard, right? Do you think you can bring me a little bit more of that mineral.."; - next; - mes "[Dr. Lifeguard]"; - mes "He said it's from"; - mes "^FF0000Mt. Mjolnir^000000."; - mes "I think ^FF000010^000000 would be enough."; - next; - mes "[Dr. Lifeguard]"; - mes "I'll give you this portable toolbox."; - mes "Things like a detector and a little hammer for mining minerals are included in this toolbox."; - next; - mes "[Dr. Lifeguard]"; - mes "Take it, it shold be"; - mes "helpful in collecting"; - mes "the minerals I need."; - set ep13_2_tre,2; - setquest 2179; - getitem 6076,1; //Portable_Toolbox - close; + switch(rand(1,3)) { + case 1: setarray .@rand_dayq$[0],"Mt. Mjolnir","10","2"; break; + case 2: setarray .@rand_dayq$[0],"Abyss Lake","5","3"; break; + case 3: setarray .@rand_dayq$[0],"Thor Volcano","5","4"; break; } - else if (.@rand_dayq == 2) { - mes "[Dr. Lifeguard]"; - mes "Recently, someone who came from Schwaltzvalt gave me a small mineral as a gift from his home town when he saw our study of Bradium."; - next; - mes "[Dr. Lifeguard]"; - mes "I can't say for sure until now,"; - mes "but this mineral seems to have"; - mes "many interesting features."; - next; - mes "[Dr. Lifeguard]"; - mes "As I examine this mineral"; - mes "more and more, it's really"; - mes "different from the one in Jotunheim."; - mes "This mineral must be helpful"; - mes "to make a new vaccine!"; - next; - mes "[Dr. Lifeguard]"; - mes "But the amount of the mineral"; - mes "is too little to make a"; - mes "preparation for the"; - mes "examination."; - next; - mes "[Dr. Lifeguard]"; - mes "You said you're from Rune Midgard, right? Do you think you can bring me a little bit more of that mineral.."; - next; - mes "[Dr. Lifeguard]"; - mes "He said it's from"; - mes "^FF0000Abyss Lake^000000."; - mes "I think ^FF00005^000000 would be enough."; - next; - mes "[Dr. Lifeguard]"; - mes "I'll give you this portable toolbox."; - mes "Things like a detector and a little hammer for mining minerals are included in this toolbox."; - next; - mes "[Dr. Lifeguard]"; - mes "Take it, it shold be"; - mes "helpful in collecting"; - mes "the minerals I need."; - set ep13_2_tre,3; - setquest 2180; - getitem 6076,1; //Portable_Toolbox - close; - } - else { - mes "[Dr. Lifeguard]"; - mes "Recently, someone who came from Schwaltzvalt gave me a small mineral as a gift from his home town when he saw our study of Bradium."; - next; - mes "[Dr. Lifeguard]"; - mes "I can't say for sure until now,"; - mes "but this mineral seems to have"; - mes "many interesting features."; - next; - mes "[Dr. Lifeguard]"; - mes "As I examine this mineral"; - mes "more and more, it's really"; - mes "different from the one in Jotunheim."; - mes "This mineral must be helpful"; - mes "to make a new vaccine!"; - next; - mes "[Dr. Lifeguard]"; - mes "But the amount of the mineral"; - mes "is too little to make a"; - mes "preparation for the"; - mes "examination."; - next; - mes "[Dr. Lifeguard]"; - mes "You said you're from Rune Midgard, right? Do you think you can bring me a little bit more of that mineral.."; - next; - mes "[Dr. Lifeguard]"; - mes "He said it's from"; - mes "^FF0000Thor Volcano^000000."; - mes "I think ^FF00005^000000 would be enough."; - next; - mes "[Dr. Lifeguard]"; - mes "I'll give you this portable toolbox."; - mes "Things like a detector and a little hammer for mining minerals are included in this toolbox."; - next; - mes "[Dr. Lifeguard]"; - mes "Take it, it shold be"; - mes "helpful in collecting"; - mes "the minerals I need."; - set ep13_2_tre,4; - setquest 2181; - getitem 6076,1; //Portable_Toolbox - close; - } - } - - } - else if (ep13_2_tre == 2) { - if (countitem(6077) > 9) { - mes "[Dr. Lifeguard]"; - mes "Oh! Yes, that's it!"; - mes "This much will be enough!"; + mes "Recently, someone who came from Schwaltzvalt gave me a small mineral as a gift from his home town when he saw our study of Bradium."; next; mes "[Dr. Lifeguard]"; - mes "I really appreciate your help."; + mes "I can't say for sure until now,"; + mes "but this mineral seems to have"; + mes "many interesting features."; next; mes "[Dr. Lifeguard]"; - mes "These are coins of the Manuk."; - mes "This may not be much, but if you collect more, they can be used to buy some items from our merchants."; + mes "As I examine this mineral"; + mes "more and more, it's really"; + mes "different from the one in Jotunheim."; + mes "This mineral must be helpful"; + mes "to make a new vaccine!"; next; mes "[Dr. Lifeguard]"; - mes "If you want to help my study for the sake of the Sapha, come to me at any time."; - mes "I will be very happy for any help you can give."; - set .@stone_chk,countitem(6077); - set .@stoneelse_chk,countitem(6078); - delitem 6077,.@stone_chk; //Rough_Mineral - delitem 6078,.@stoneelse_chk; //Stone_Fragments - delitem 6076,1; //Portable_Toolbox - set ep13_2_tre,100; - getitem 6080,2; //Manuk_Coin - getexp 0,70000; - changequest 2179,2182; - close; - } - else { - mes "[Dr. Lifeguard]"; - mes "The future of the Sapha is up to you."; - mes "I wish you good luck."; - close; - } - } - else if (ep13_2_tre == 3) { - if (countitem(6077) > 4) { - mes "[Dr. Lifeguard]"; - mes "Oh! Yes, that's it!"; - mes "This much will be enough!"; + mes "But the amount of the mineral"; + mes "is too little to make a"; + mes "preparation for the"; + mes "examination."; next; mes "[Dr. Lifeguard]"; - mes "I really appreciate your help."; + mes "You said you're from Rune Midgard, right? Do you think you can bring me a little bit more of that mineral.."; next; mes "[Dr. Lifeguard]"; - mes "These are coins of the Manuk."; - mes "This may not be much, but if you collect more, they can be used to buy some items from our merchants."; + mes "He said it's from"; + mes "^FF0000"+.@rand_dayq$[0]+"^000000."; + mes "I think ^FF0000"+.@rand_dayq$[1]+"^000000 would be enough."; next; mes "[Dr. Lifeguard]"; - mes "If you want to help my study for the sake of the Sapha, come to me at any time."; - mes "I will be very happy for any help you can give."; - set .@stone_chk,countitem(6077); - set .@stoneelse_chk,countitem(6078); - delitem 6077,.@stone_chk; //Rough_Mineral - delitem 6078,.@stoneelse_chk; //Stone_Fragments - delitem 6076,1; //Portable_Toolbox - set ep13_2_tre,100; - getitem 6080,2; //Manuk_Coin - getexp 0,70000; - changequest 2180,2182; - close; - } - else { + mes "I'll give you this portable toolbox."; + mes "Things like a detector and a little hammer for mining minerals are included in this toolbox."; + next; mes "[Dr. Lifeguard]"; - mes "The future of the Sapha is up to you."; - mes "I wish you good luck."; + mes "Take it, it shold be"; + mes "helpful in collecting"; + mes "the minerals I need."; + set ep13_2_tre,atoi(.@rand_dayq$[2]); + setquest 2179+(atoi(.@rand_dayq$[2])-2); + getitem 6076,1; //Portable_Toolbox close; } } - else if (ep13_2_tre == 4) { - if (countitem(6077) > 4) { - mes "[Dr. Lifeguard]"; + else if (ep13_2_tre == 2 || ep13_2_tre == 3 || ep13_2_tre == 4) { + if ((ep13_2_tre == 2 && countitem(6077) > 9) || (ep13_2_tre != 2 && countitem(6077) > 4)) { mes "Oh! Yes, that's it!"; mes "This much will be enough!"; next; @@ -7521,18 +4834,16 @@ man_in01,372,221,5 script Scientist#lifeguard 449,{ set ep13_2_tre,100; getitem 6080,2; //Manuk_Coin getexp 0,70000; - changequest 2181,2182; + changequest 2179+(ep13_2_tre-2),2182; close; } else { - mes "[Dr. Lifeguard]"; mes "The future of the Sapha is up to you."; mes "I wish you good luck."; close; } } else { - mes "[Dr. Lifeguard]"; mes "Hmm..."; close; } @@ -7548,33 +4859,64 @@ man_in01,372,221,5 script Scientist#lifeguard 449,{ } } -mjolnir_01,364,256,0 script #mj01_find -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; +function script find_13_2 { + switch (getarg(0)) { + case 0: setarray .@Check[0],2,10; set .@str$,"Mt. Mjolnir"; break; + case 1: setarray .@Check[0],3,5; set .@str$,"Abyss Lake"; break; + case 2: setarray .@Check[0],4,5; set .@str$,"Thor Volcano"; break; + } + if (ep13_2_tre != .@Check[0] || countitem(6076) != 1 || countitem(6077) >= .@Check[1]) end; + mes "- Just arrived at "+.@str$+". I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; + next; + switch(select("Check current location.:Do nothing.")) { + case 1: + mes "- You pressed the button of the detector. -"; next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,32,309,1,0x00FF00; - viewpoint 1,217,34,2,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } + mes "[Mineral Detector]"; + mes "Bee beep -"; + if (getarg(1)) return; + next; + mes "- Nothing's found. -"; + close; + case 2: + mes "- You decide to do nothing. -"; + close; } - end; } -mjolnir_01,32,309,3 script #mj01_01 111,7,7,{ +- script mjo_no_find -1,{ + end; + +OnTouch: + callfunc "find_13_2",0,0; + end; +} + +mjolnir_03,76,258,0 duplicate(mjo_no_find) #mj03_find_1 -1,5,5 +mjolnir_03,227,204,0 duplicate(mjo_no_find) #mj03_find_2 -1,5,5 +mjolnir_05,82,171,0 duplicate(mjo_no_find) #mj05_find_1 -1,5,5 +mjolnir_05,219,375,0 duplicate(mjo_no_find) #mj05_find_2 -1,5,5 +mjolnir_06,28,332,0 duplicate(mjo_no_find) #mj06_find_1 -1,5,5 +mjolnir_06,275,50,0 duplicate(mjo_no_find) #mj06_find_2 -1,5,5 +mjolnir_06,371,78,0 duplicate(mjo_no_find) #mj06_find_3 -1,5,5 +mjolnir_07,26,373,0 duplicate(mjo_no_find) #mj07_find_1 -1,5,5 +mjolnir_07,214,373,0 duplicate(mjo_no_find) #mj07_find_2 -1,5,5 +mjolnir_07,372,355,0 duplicate(mjo_no_find) #mj07_find_3 -1,5,5 +mjolnir_07,375,233,0 duplicate(mjo_no_find) #mj07_find_4 -1,5,5 +mjolnir_07,26,78,0 duplicate(mjo_no_find) #mj07_find_5 -1,5,5 +mjolnir_07,157,25,0 duplicate(mjo_no_find) #mj07_find_6 -1,5,5 +mjolnir_08,39,239,0 duplicate(mjo_no_find) #mj08_find_1 -1,5,5 +mjolnir_08,36,344,0 duplicate(mjo_no_find) #mj08_find_2 -1,5,5 +mjolnir_08,160,349,0 duplicate(mjo_no_find) #mj08_find_3 -1,5,5 +mjolnir_08,359,258,0 duplicate(mjo_no_find) #mj08_find_4 -1,5,5 +mjolnir_08,193,62,0 duplicate(mjo_no_find) #mj08_find_5 -1,5,5 +mjolnir_11,29,220,0 duplicate(mjo_no_find) #mj11_find_1 -1,5,5 +mjolnir_11,175,29,0 duplicate(mjo_no_find) #mj11_find_2 -1,5,5 +mjolnir_12,199,370,0 duplicate(mjo_no_find) #mj12_find_1 -1,5,5 +mjolnir_12,44,25,0 duplicate(mjo_no_find) #mj12_find_2 -1,5,5 +mjolnir_12,220,37,0 duplicate(mjo_no_find) #mj12_find_3 -1,5,5 + +- script mjo_find -1,{ if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { if (countitem(6077) < 10) { mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; @@ -7584,8 +4926,7 @@ mjolnir_01,32,309,3 script #mj01_01 111,7,7,{ mes "Clang! Clang! Clang! Clang!"; close2; progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { + if (rand(1,6) < 4) { mes "- You failed to mine minerals. -"; getitem 6078,1; //Stone_Fragments close; @@ -7594,18 +4935,12 @@ mjolnir_01,32,309,3 script #mj01_01 111,7,7,{ mes "- You succeeded to mine minerals. -"; emotion e_ic,1; set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,1; //Rough_Mineral - } - else { - getitem 6077,2; //Rough_Mineral - } + if (.@stst == 5) getitem 6077,5; //Rough_Mineral + else if (.@stst == 1) getitem 6077,1; //Rough_Mineral + else getitem 6077,2; //Rough_Mineral close2; - donpcevent "#mj01_01_t::OnEnable"; - disablenpc "#mj01_01"; + donpcevent strnpcinfo(0)+"_t::OnEnable"; + disablenpc strnpcinfo(0); end; } case 2: @@ -7621,18 +4956,34 @@ mjolnir_01,32,309,3 script #mj01_01 111,7,7,{ end; OnInit: - enablenpc "#mj01_01"; + enablenpc strnpcinfo(0); end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - specialeffect EF_COUPLECASTING; - } - } + if (ep13_2_tre == 2 && countitem(6076) == 1 && countitem(6077) < 10) + specialeffect EF_COUPLECASTING; end; } +mjolnir_01,32,309,3 duplicate(mjo_find) #mj01_01 111,7,7 +mjolnir_01,217,34,3 duplicate(mjo_find) #mj01_02 111,7,7 +mjolnir_02,90,195,3 duplicate(mjo_find) #mj02_01 111,5,10 +mjolnir_02,206,187,3 duplicate(mjo_find) #mj02_02 111,7,7 +mjolnir_04,125,380,3 duplicate(mjo_find) #mj04_01 111,7,7 +mjolnir_04,220,130,3 duplicate(mjo_find) #mj04_02 111,7,7 +mjolnir_09,229,214,3 duplicate(mjo_find) #mj09_01 111,10,10 +mjolnir_10,188,260,3 duplicate(mjo_find) #mj10_01 111,10,10 + +mjolnir_01,364,256,0 script #mj01_find -1,5,5,{ + end; + +OnTouch: + callfunc "find_13_2",0,1; + viewpoint 1,32,309,1,0x00FF00; + viewpoint 1,217,34,2,0x00FF00; + close; +} + mjolnir_01,1,1,3 script #mj01_01_t 111,{ end; @@ -7646,65 +4997,6 @@ OnTimer60000: end; } -mjolnir_01,217,34,3 script #mj01_02 111,7,7,{ - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - close; - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,1; //Rough_Mineral - } - else { - getitem 6077,2; //Rough_Mineral - } - close2; - donpcevent "#mj01_02_t::OnEnable"; - disablenpc "#mj01_02"; - end; - } - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#mj01_02"; - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - specialeffect EF_COUPLECASTING; - } - } - end; -} - mjolnir_01,1,1,3 script #mj01_02_t 111,{ OnEnable: initnpctimer; @@ -7720,112 +5012,22 @@ mjolnir_02,313,289,0 script #mj02_find_1 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,90,195,1,0x00FF00; - viewpoint 1,206,187,2,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,90,195,1,0x00FF00; + viewpoint 1,206,187,2,0x00FF00; + close; } mjolnir_02,78,258,0 script #mj02_find_2 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,90,195,1,0x00FF00; - viewpoint 1,206,187,2,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,90,195,1,0x00FF00; + viewpoint 1,206,187,2,0x00FF00; + close; } -mjolnir_02,90,195,3 script #mj02_01 111,5,10,{ - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - close; - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,1; //Rough_Mineral - } - else { - getitem 6077,2; //Rough_Mineral - } - close2; - donpcevent "#mj02_01_t::OnEnable"; - disablenpc "#mj02_01"; - end; - } - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#mj02_01"; - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - specialeffect EF_COUPLECASTING; - } - } - end; -} mjolnir_02,1,1,3 script #mj02_01_t 111,{ OnEnable: @@ -7838,65 +5040,6 @@ OnTimer60000: end; } -mjolnir_02,206,187,3 script #mj02_02 111,7,7,{ - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - close; - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,1; //Rough_Mineral - } - else { - getitem 6077,2; //Rough_Mineral - } - close2; - donpcevent "#mj02_02_t::OnEnable"; - disablenpc "#mj02_02"; - end; - } - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#mj02_02"; - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - specialeffect EF_COUPLECASTING; - } - } - end; -} - mjolnir_02,1,1,3 script #mj02_02_t 111,{ OnEnable: initnpctimer; @@ -7908,193 +5051,34 @@ OnTimer60000: end; } -mjolnir_03,76,258,0 script #mj03_find_1 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_03,227,204,0 script #mj03_find_2 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - mjolnir_04,147,208,0 script #mj04_find_1 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,125,380,1,0x00FF00; - viewpoint 1,220,130,2,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,125,380,1,0x00FF00; + viewpoint 1,220,130,2,0x00FF00; + close; } mjolnir_04,160,77,0 script #mj04_find_2 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,125,380,1,0x00FF00; - viewpoint 1,220,130,2,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,125,380,1,0x00FF00; + viewpoint 1,220,130,2,0x00FF00; + close; } mjolnir_04,361,174,0 script #mj04_find_3 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,125,380,1,0x00FF00; - viewpoint 1,220,130,2,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_04,125,380,3 script #mj04_01 111,7,7,{ - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - close; - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,1; //Rough_Mineral - } - else { - getitem 6077,2; //Rough_Mineral - } - close2; - donpcevent "#mj04_01_t::OnEnable"; - disablenpc "#mj04_01"; - end; - } - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#mj04_01"; - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - specialeffect EF_COUPLECASTING; - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,125,380,1,0x00FF00; + viewpoint 1,220,130,2,0x00FF00; + close; } mjolnir_04,1,1,3 script #mj04_01_t 111,{ @@ -8108,66 +5092,6 @@ OnTimer60000: end; } -mjolnir_04,220,130,3 script #mj04_02 111,7,7,{ - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - close; - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,1; //Rough_Mineral - } - else { - getitem 6077,2; //Rough_Mineral - } - close2; - donpcevent "#mj04_02_t::OnEnable"; - disablenpc "#mj04_02"; - end; - } - break; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#mj04_02"; - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - specialeffect EF_COUPLECASTING; - } - } - end; -} - mjolnir_04,1,1,3 script #mj04_02_t 111,{ OnEnable: initnpctimer; @@ -8179,604 +5103,49 @@ OnTimer60000: end; } -mjolnir_05,82,171,0 script #mj05_find_1 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_05,219,375,0 script #mj05_find_2 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_06,28,332,0 script #mj06_find_1 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_06,275,50,0 script #mj06_find_2 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_06,371,78,0 script #mj06_find_3 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_07,26,373,0 script #mj07_find_1 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_07,214,373,0 script #mj07_find_2 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_07,372,355,0 script #mj07_find_3 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_07,375,233,0 script #mj07_find_4 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_07,26,78,0 script #mj07_find_5 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_07,157,25,0 script #mj07_find_6 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_08,39,239,0 script #mj08_find_1 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_08,36,344,0 script #mj08_find_2 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_08,160,349,0 script #mj08_find_3 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_08,359,258,0 script #mj08_find_4 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_08,193,62,0 script #mj08_find_5 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - mjolnir_09,201,355,0 script #mj09_find_1 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,229,214,1,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,229,214,1,0x00FF00; + close; } mjolnir_09,38,243,0 script #mj09_find_2 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,229,214,1,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,229,214,1,0x00FF00; + close; } mjolnir_09,106,36,0 script #mj09_find_3 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,229,214,1,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,229,214,1,0x00FF00; + close; } mjolnir_09,306,36,0 script #mj09_find_4 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,229,214,1,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,229,214,1,0x00FF00; + close; } mjolnir_09,369,279,0 script #mj09_find_5 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,229,214,1,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_09,229,214,3 script #mj09_01 111,10,10,{ - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - close; - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,1; //Rough_Mineral - } - else { - getitem 6077,2; //Rough_Mineral - } - close2; - donpcevent "#mj09_01_t::OnEnable"; - disablenpc "#mj09_01"; - end; - } - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#mj09_01"; - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - specialeffect EF_COUPLECASTING; - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,229,214,1,0x00FF00; + close; } mjolnir_09,1,1,3 script #mj09_01_t 111,{ @@ -8794,184 +5163,45 @@ mjolnir_10,201,355,0 script #mj10_find_1 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,188,260,1,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,188,260,1,0x00FF00; + close; } mjolnir_10,374,215,0 script #mj10_find_2 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,188,260,1,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,188,260,1,0x00FF00; + close; } mjolnir_10,272,20,0 script #mj10_find_3 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,188,260,1,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,188,260,1,0x00FF00; + close; } mjolnir_10,75,22,0 script #mj10_find_4 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,188,260,1,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,188,260,1,0x00FF00; + close; } mjolnir_10,27,258,0 script #mj10_find_5 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,229,214,1,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_10,188,260,3 script #mj10_01 111,10,10,{ - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,1; //Rough_Mineral - } - else { - getitem 6077,2; //Rough_Mineral - } - - close2; - donpcevent "#mj10_01_t::OnEnable"; - disablenpc "#mj10_01"; - end; - } - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#mj10_01"; - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - specialeffect EF_COUPLECASTING; - } - } - end; + callfunc "find_13_2",0,1; + viewpoint 1,229,214,1,0x00FF00; + close; } mjolnir_10,1,1,3 script #mj10_01_t 111,{ @@ -8985,251 +5215,59 @@ OnTimer60000: end; } -mjolnir_11,29,220,0 script #mj11_find_1 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_11,175,29,0 script #mj11_find_2 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_12,199,370,0 script #mj12_find_1 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_12,44,25,0 script #mj12_find_2 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - -mjolnir_12,220,37,0 script #mj12_find_3 -1,5,5,{ - end; - -OnTouch: - if ((ep13_2_tre == 2) && (countitem(6076) == 1)) { - if (countitem(6077) < 10) { - mes "- Just arrived at Mt. Mjolnir. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - next; - mes "- Nothing's found. -"; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; -} - hu_fild05,335,152,0 script #hu_find_1 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - mes "- Just arrived at Abyss Lake. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,251,345,1,0x00FF00; - viewpoint 1,134,322,2,0x00FF00; - viewpoint 1,72,104,3,0x00FF00; - viewpoint 1,65,99,4,0x00FF00; - viewpoint 1,323,84,5,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",1,1; + viewpoint 1,251,345,1,0x00FF00; + viewpoint 1,134,322,2,0x00FF00; + viewpoint 1,72,104,3,0x00FF00; + viewpoint 1,65,99,4,0x00FF00; + viewpoint 1,323,84,5,0x00FF00; + close; } hu_fild05,89,52,0 script #hu_find_2 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - mes "- Just arrived at Abyss Lake. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,251,345,1,0x00FF00; - viewpoint 1,134,322,2,0x00FF00; - viewpoint 1,72,104,3,0x00FF00; - viewpoint 1,65,99,4,0x00FF00; - viewpoint 1,323,84,5,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",1,1; + viewpoint 1,251,345,1,0x00FF00; + viewpoint 1,134,322,2,0x00FF00; + viewpoint 1,72,104,3,0x00FF00; + viewpoint 1,65,99,4,0x00FF00; + viewpoint 1,323,84,5,0x00FF00; + close; } hu_fild05,42,205,0 script #hu_find_3 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - mes "- Just arrived at Abyss Lake. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,251,345,1,0x00FF00; - viewpoint 1,134,322,2,0x00FF00; - viewpoint 1,72,104,3,0x00FF00; - viewpoint 1,65,99,4,0x00FF00; - viewpoint 1,323,84,5,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",1,1; + viewpoint 1,251,345,1,0x00FF00; + viewpoint 1,134,322,2,0x00FF00; + viewpoint 1,72,104,3,0x00FF00; + viewpoint 1,65,99,4,0x00FF00; + viewpoint 1,323,84,5,0x00FF00; + close; } hu_fild05,276,349,0 script #hu_find_4 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - mes "- Just arrived at Abyss Lake. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,251,345,1,0x00FF00; - viewpoint 1,134,322,2,0x00FF00; - viewpoint 1,72,104,3,0x00FF00; - viewpoint 1,65,99,4,0x00FF00; - viewpoint 1,323,84,5,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",1,1; + viewpoint 1,251,345,1,0x00FF00; + viewpoint 1,134,322,2,0x00FF00; + viewpoint 1,72,104,3,0x00FF00; + viewpoint 1,65,99,4,0x00FF00; + viewpoint 1,323,84,5,0x00FF00; + close; } -hu_fild05,251,345,3 script #hu_01 111,10,10,{ +- script hu_find -1,{ if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { if (countitem(6077) < 5) { mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; @@ -9239,8 +5277,7 @@ hu_fild05,251,345,3 script #hu_01 111,10,10,{ mes "Clang! Clang! Clang! Clang!"; close2; progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { + if (rand(1,6) < 4) { mes "- You failed to mine minerals. -"; getitem 6078,1; //Stone_Fragments close; @@ -9249,17 +5286,11 @@ hu_fild05,251,345,3 script #hu_01 111,10,10,{ mes "- You succeeded to mine minerals. -"; emotion e_ic,1; set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,2; //Rough_Mineral - } - else { - getitem 6077,1; //Rough_Mineral - } - donpcevent "#hu_01_t::OnEnable"; - disablenpc "#hu_01"; + if (.@stst == 5) getitem 6077,5; //Rough_Mineral + else if (.@stst == 1) getitem 6077,2; //Rough_Mineral + else getitem 6077,1; //Rough_Mineral + donpcevent strnpcinfo(0)+"_t::OnEnable"; + disablenpc strnpcinfo(0); close; } case 2: @@ -9275,18 +5306,21 @@ hu_fild05,251,345,3 script #hu_01 111,10,10,{ end; OnInit: - enablenpc "#hu_01"; + enablenpc strnpcinfo(0); end; OnTouch: - if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - specialeffect EF_COUPLECASTING; - } - } + if (ep13_2_tre == 3 && countitem(6076) == 1 && countitem(6077) < 5) + specialeffect EF_COUPLECASTING; end; } +hu_fild05,251,345,3 duplicate(hu_find) #hu_01 111,10,10 +hu_fild05,134,322,3 duplicate(hu_find) #hu_02 111,10,10 +hu_fild05,72,104,3 duplicate(hu_find) #hu_03 111,10,10 +hu_fild05,65,99,3 duplicate(hu_find) #hu_04 111,10,10 +hu_fild05,323,84,3 duplicate(hu_find) #hu_05 111,10,10 + hu_fild05,1,1,3 script #hu_01_t 111,{ OnEnable: initnpctimer; @@ -9297,64 +5331,6 @@ OnTimer60000: stopnpctimer; end; } -hu_fild05,134,322,3 script #hu_02 111,10,10,{ - if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - close; - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,2; //Rough_Mineral - } - else { - getitem 6077,1; //Rough_Mineral - } - donpcevent "#hu_02_t::OnEnable"; - disablenpc "#hu_02"; - close; - } - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#hu_02"; - end; - -OnTouch: - if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - specialeffect EF_COUPLECASTING; - } - } - end; - -} hu_fild05,1,1,3 script #hu_02_t 111,{ OnEnable: @@ -9367,64 +5343,6 @@ OnTimer60000: end; } -hu_fild05,72,104,3 script #hu_03 111,10,10,{ - if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - close; - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,2; //Rough_Mineral - } - else { - getitem 6077,1; //Rough_Mineral - } - donpcevent "#hu_03_t::OnEnable"; - disablenpc "#hu_03"; - close; - } - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#hu_03"; - end; - -OnTouch: - if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - specialeffect EF_COUPLECASTING; - } - } - end; -} - hu_fild05,1,1,3 script #hu_03_t 111,{ OnEnable: initnpctimer; @@ -9436,63 +5354,6 @@ OnTimer60000: end; } -hu_fild05,65,99,3 script #hu_04 111,10,10,{ - if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - close; - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,2; //Rough_Mineral - } - else { - getitem 6077,1; //Rough_Mineral - } - donpcevent "#hu_04_t::OnEnable"; - disablenpc "#hu_04"; - } - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#hu_04"; - end; - -OnTouch: - if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - specialeffect EF_COUPLECASTING; - } - } - end; -} - hu_fild05,1,1,3 script #hu_04_t 111,{ OnEnable: initnpctimer; @@ -9503,63 +5364,6 @@ OnTimer60000: stopnpctimer; end; } -hu_fild05,323,84,3 script #hu_05 111,10,10,{ - if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - close; - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,2 ; //Rough_Mineral - } - else { - getitem 6077,1; //Rough_Mineral - } - donpcevent "#hu_05_t::OnEnable"; - disablenpc "#hu_05"; - close; - } - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#hu_05"; - end; - -OnTouch: - if ((ep13_2_tre == 3) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - specialeffect EF_COUPLECASTING; - } - } - end; -} hu_fild05,1,1,3 script #hu_05_t 111,{ OnEnable: @@ -9576,59 +5380,27 @@ ve_fild03,351,219,0 script #ve_find_1 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 4) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - mes "- Just arrived at Thor Volcano. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,152,134,1,0x00FF00; - viewpoint 1,256,228,2,0x00FF00; - viewpoint 1,85,189,3,0x00FF00; - viewpoint 1,282,268,4,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",2,1; + viewpoint 1,152,134,1,0x00FF00; + viewpoint 1,256,228,2,0x00FF00; + viewpoint 1,85,189,3,0x00FF00; + viewpoint 1,282,268,4,0x00FF00; + close; } ve_fild03,223,51,0 script #ve_find_2 -1,5,5,{ end; OnTouch: - if ((ep13_2_tre == 4) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - mes "- Just arrived at Thor Volcano. I think I can find the mineral by using the Mineral Detector in the Portable Toolbox. -"; - next; - switch(select("Check current location.:Do nothing.")) { - case 1: - mes "- You pressed the button of the detector. -"; - next; - mes "[Mineral Detector]"; - mes "Bee beep -"; - viewpoint 1,152,134,1,0x00FF00; - viewpoint 1,256,228,2,0x00FF00; - viewpoint 1,85,189,3,0x00FF00; - viewpoint 1,282,268,4,0x00FF00; - close; - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - } - end; + callfunc "find_13_2",2,1; + viewpoint 1,152,134,1,0x00FF00; + viewpoint 1,256,228,2,0x00FF00; + viewpoint 1,85,189,3,0x00FF00; + viewpoint 1,282,268,4,0x00FF00; + close; } -ve_fild03,152,134,3 script #ve_01 111,10,10,{ +- script ve_find -1,{ if ((ep13_2_tre == 4) && (countitem(6076) == 1)) { if (countitem(6077) < 5) { mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; @@ -9638,8 +5410,7 @@ ve_fild03,152,134,3 script #ve_01 111,10,10,{ mes "Clang! Clang! Clang! Clang!"; close2; progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { + if (rand(1,6) < 4) { mes "- You failed to mine minerals. -"; getitem 6078,1; //Stone_Fragments close; @@ -9648,17 +5419,11 @@ ve_fild03,152,134,3 script #ve_01 111,10,10,{ mes "- You succeeded to mine minerals. -"; emotion e_ic,1; set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,2; //Rough_Mineral - } - else { - getitem 6077,1; //Rough_Mineral - } - donpcevent "#ve_01_t::OnEnable"; - disablenpc "#ve_01"; + if (.@stst == 5) getitem 6077,5; //Rough_Mineral + else if (.@stst == 1) getitem 6077,2; //Rough_Mineral + else getitem 6077,1; //Rough_Mineral + donpcevent strnpcinfo(0)+"_t::OnEnable"; + disablenpc strnpcinfo(0); close; } case 2: @@ -9674,18 +5439,20 @@ ve_fild03,152,134,3 script #ve_01 111,10,10,{ end; OnInit: - enablenpc "#ve_01"; + enablenpc strnpcinfo(0); end; OnTouch: - if ((ep13_2_tre == 4) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - specialeffect EF_COUPLECASTING; - } - } + if (ep13_2_tre == 4 && countitem(6076) == 1 && countitem(6077) < 5) + specialeffect EF_COUPLECASTING; end; } +ve_fild03,152,134,3 duplicate(ve_find) #ve_01 111,10,10 +ve_fild03,256,228,3 duplicate(ve_find) #ve_02 111,10,10 +ve_fild03,85,189,3 duplicate(ve_find) #ve_03 111,10,10 +ve_fild03,282,268,3 duplicate(ve_find) #ve_04 111,10,10 + ve_fild03,1,1,3 script #ve_01_t 111,{ OnEnable: initnpctimer; @@ -9697,64 +5464,6 @@ OnTimer40000: end; } -ve_fild03,256,228,3 script #ve_02 111,10,10,{ - if ((ep13_2_tre == 4) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - close; - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,2; //Rough_Mineral - } - else { - getitem 6077,1; //Rough_Mineral - } - donpcevent "#ve_02_t::OnEnable"; - disablenpc "#ve_02"; - close; - } - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#ve_02"; - end; - -OnTouch: - if ((ep13_2_tre == 4) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - specialeffect EF_COUPLECASTING; - } - } - end; -} - ve_fild03,1,1,3 script #ve_02_t 111,{ OnEnable: initnpctimer; @@ -9766,64 +5475,6 @@ OnTimer40000: end; } -ve_fild03,85,189,3 script #ve_03 111,10,10,{ - if ((ep13_2_tre == 4) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - close; - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,2; //Rough_Mineral - } - else { - getitem 6077,1; //Rough_Mineral - } - donpcevent "#ve_03_t::OnEnable"; - disablenpc "#ve_03"; - close; - } - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#hu_03"; - end; - -OnTouch: - if ((ep13_2_tre == 4) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - specialeffect EF_COUPLECASTING; - } - } - end; -} - ve_fild03,1,1,3 script #ve_03_t 111,{ OnEnable: initnpctimer; @@ -9835,64 +5486,6 @@ OnTimer40000: end; } -ve_fild03,282,268,3 script #ve_04 111,10,10,{ - if ((ep13_2_tre == 4) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - mes "- I can see some different colored minerals where the detector pointed to. This must be the mineral that Mr. Lifeguard told me about. -"; - next; - switch(select("Mine minerals.:Do nothing.")) { - case 1: - mes "Clang! Clang! Clang! Clang!"; - close2; - progressbar "ffff00",4; - set .@get_stone,rand(1,6); - if (.@get_stone < 4) { - mes "- You failed to mine minerals. -"; - getitem 6078,1; //Stone_Fragments - close; - } - else { - mes "- You succeeded to mine minerals. -"; - emotion e_ic,1; - set .@stst,rand(1,5); - if (.@stst == 5) { - getitem 6077,5; //Rough_Mineral - } - else if (.@stst == 1) { - getitem 6077,2; //Rough_Mineral - } - else { - getitem 6077,1; //Rough_Mineral - } - donpcevent "#ve_04_t::OnEnable"; - disablenpc "#ve_04"; - close; - } - case 2: - mes "- You decide to do nothing. -"; - close; - } - } - else { - mes "- I think I have enough minerals. -"; - close; - } - } - end; - -OnInit: - enablenpc "#ve_04"; - end; - -OnTouch: - if ((ep13_2_tre == 4) && (countitem(6076) == 1)) { - if (countitem(6077) < 5) { - specialeffect EF_COUPLECASTING; - } - } - end; -} - ve_fild03,1,1,3 script #ve_04_t 111,{ OnEnable: initnpctimer; @@ -10215,115 +5808,7 @@ spl_in02,139,65,3 script Middle-Ranked Laphine#la 438,{ } } -splendide,160,265,3 script Purifier#1 844,{ - if (ep13_2_tre1 == 2) { - if (countitem(7193) > 0) { - mes "- You put the seed in the"; - mes "device and watched it"; - mes "as Grenouille told you. -"; - next; - mes "- Booowoong -"; - specialeffect2 EF_HEALSP; - next; - mes "- When the lights gone,"; - mes "a big flower of Alfheim was lied"; - mes "in your hand, instead of the seed. -"; - delitem 7193,1; //Germinating_Sprout - set ep13_2_tre1,3; - getitem 6079,1; //Flower_Of_Alfheim - close; - } - else { - mes "["+ strcharinfo(0) +"]"; - mes "Where are the seeds?"; - close; - } - } - end; -} - -splendide,262,262,3 script Purifier#2 844,{ - if (ep13_2_tre1 == 2) { - if (countitem(7193) > 0) { - mes "- You put the seed in the"; - mes "device and watched it"; - mes "as Grenouille told you. -"; - next; - mes "- Booowoong -"; - specialeffect2 EF_HEALSP; - next; - mes "- When the lights gone,"; - mes "a big flower of Alfheim was lied"; - mes "in your hand, instead of the seed. -"; - delitem 7193,1; //Germinating_Sprout - set ep13_2_tre1,3; - getitem 6079,1; //Flower_Of_Alfheim - close; - } - else { - mes "["+ strcharinfo(0) +"]"; - mes "Where are the seeds?"; - close; - } - } - end; -} - -splendide,262,187,3 script Purifier#3 844,{ - if (ep13_2_tre1 == 2) { - if (countitem(7193) > 0) { - mes "- You put the seed in the"; - mes "device and watched it"; - mes "as Grenouille told you. -"; - next; - mes "- Booowoong -"; - specialeffect2 EF_HEALSP; - next; - mes "- When the lights gone,"; - mes "a big flower of Alfheim was lied"; - mes "in your hand, instead of the seed. -"; - delitem 7193,1; //Germinating_Sprout - set ep13_2_tre1,3; - getitem 6079,1; //Flower_Of_Alfheim - close; - } - else { - mes "["+ strcharinfo(0) +"]"; - mes "Where are the seeds?"; - close; - } - } - end; -} - -splendide,164,82,3 script Purifier#4 844,{ - if (ep13_2_tre1 == 2) { - if (countitem(7193) > 0) { - mes "- You put the seed in the"; - mes "device and watched it"; - mes "as Grenouille told you. -"; - next; - mes "- Booowoong -"; - specialeffect2 EF_HEALSP; - next; - mes "- When the lights gone,"; - mes "a big flower of Alfheim was lied"; - mes "in your hand, instead of the seed. -"; - delitem 7193,1; //Germinating_Sprout - set ep13_2_tre1,3; - getitem 6079,1; //Flower_Of_Alfheim - close; - } - else { - mes "["+ strcharinfo(0) +"]"; - mes "Where are the seeds?"; - close; - } - } - end; -} - -splendide,171,116,3 script Purifier#5 844,{ +- script Purifier -1,{ if (ep13_2_tre1 == 2) { if (countitem(7193) > 0) { mes "- You put the seed in the"; @@ -10350,32 +5835,12 @@ splendide,171,116,3 script Purifier#5 844,{ end; } -splendide,134,280,3 script Purifier#6 844,{ - if (ep13_2_tre1 == 2) { - if (countitem(7193) > 0) { - mes "- You put the seed in the"; - mes "device and watched it"; - mes "as Grenouille told you. -"; - next; - mes "- Booowoong -"; - specialeffect2 EF_HEALSP; - next; - mes "- When the lights gone,"; - mes "a big flower of Alfheim was lied"; - mes "in your hand, instead of the seed. -"; - delitem 7193,1; //Germinating_Sprout - set ep13_2_tre1,3; - getitem 6079,1; //Flower_Of_Alfheim - close; - } - else { - mes "["+ strcharinfo(0) +"]"; - mes "Where are the seeds?"; - close; - } - } - end; -} +splendide,160,265,3 duplicate(Purifier) Purifier#1 844 +splendide,262,262,3 duplicate(Purifier) Purifier#2 844 +splendide,262,187,3 duplicate(Purifier) Purifier#3 844 +splendide,164,82,3 duplicate(Purifier) Purifier#4 844 +splendide,171,116,3 duplicate(Purifier) Purifier#5 844 +splendide,134,280,3 duplicate(Purifier) Purifier#6 844 splendide,205,139,5 script Exhausted Soldier#1 447,{ if ((isequipped(2782) == 1) && (ep13_2_rhea == 100)) { @@ -10813,14 +6278,14 @@ mid_camp,283,198,5 script Bazett Teablack#ep13bs 883,{ emotion e_ic,"Bazett Teablack#ep13bs"; next; mes "[Industrious Man]"; - mes "write..write..."; - mes "crunch..crunch..."; + mes "write...write..."; + mes "crunch...crunch..."; next; mes " - He doesn't seem to recognize that I am standing next to him as he continues writing something. -"; next; mes "[Industrious Man]"; - mes "write..write..."; - mes "crunch..crunch..."; + mes "write...write..."; + mes "crunch...crunch..."; mes "...."; close; } @@ -10833,8 +6298,8 @@ mid_camp,283,198,5 script Bazett Teablack#ep13bs 883,{ emotion e_ic,"Bazett Teablack#ep13bs"; next; mes "[Industrious Man]"; - mes "write..write..."; - mes "crunch..crunch..."; + mes "write...write..."; + mes "crunch...crunch..."; next; mes " - He doesn't seem to recognize that I am standing next to him as he continues writing something. -"; next; @@ -11539,27 +7004,12 @@ OnTouch: end; } -nyd_dun02,143,272,0 script ep13_warp_s1 139,{ - +- script ep13_warp_s_0 -1,{ OnEnable: - enablenpc "ep13_warp_s1"; - specialeffect EF_WIND; + enablenpc strnpcinfo(1); initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_s1"; - end; - OnTimer2000: - specialeffect EF_WIND; - end; - OnTimer4000: - specialeffect EF_WIND; - end; - OnTimer6000: specialeffect EF_WIND; end; @@ -11570,262 +7020,139 @@ OnTimer8000: OnTimer10000: specialeffect EF_STEAL; - disablenpc "ep13_warp_s1"; - end; -} - -nyd_dun02,143,269,0 script ep13_warp_s2 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - -nyd_dun02,143,266,0 script ep13_warp_s3 139,{ - -OnEnable: - enablenpc "ep13_warp_s3"; - specialeffect EF_WIND; - initnpctimer; + disablenpc strnpcinfo(1); end; OnDisable: specialeffect EF_WIND; - disablenpc "ep13_warp_s3"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_s3"; + disablenpc strnpcinfo(1); end; } -nyd_dun02,143,263,0 script ep13_warp_s4 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - -nyd_dun02,146,272,0 script ep13_warp_11 139,{ - +- script ep13_warp_s_1 -1,{ OnEnable: - enablenpc "ep13_warp_11"; - specialeffect EF_WIND; + enablenpc strnpcinfo(1); initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_11"; - end; - OnTimer2000: - specialeffect EF_WIND; - end; - OnTimer4000: - specialeffect EF_WIND; - end; - OnTimer6000: specialeffect EF_WIND; end; OnTimer8000: - specialeffect EF_STEAL; - end; - OnTimer10000: specialeffect EF_STEAL; - disablenpc "ep13_warp_11"; end; -} -nyd_dun02,146,269,0 script ep13_warp_12 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - -nyd_dun02,146,266,0 script ep13_warp_13 139,{ - -OnEnable: - enablenpc "ep13_warp_13"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_13"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: +OnTimer12000: specialeffect EF_STEAL; - disablenpc "ep13_warp_13"; - end; -} - -nyd_dun02,146,263,0 script ep13_warp_14 139,{ - -OnEnable: - enablenpc "ep13_warp_14"; - specialeffect EF_WIND; - initnpctimer; + disablenpc strnpcinfo(1); end; OnDisable: specialeffect EF_WIND; - disablenpc "ep13_warp_14"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_14"; + disablenpc strnpcinfo(1); end; } -nyd_dun02,146,260,0 script ep13_warp_15 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - -nyd_dun02,149,272,0 script ep13_warp_21 139,{ - +- script ep13_warp_s_2 -1,{ OnEnable: - enablenpc "ep13_warp_21"; - specialeffect EF_WIND; + enablenpc strnpcinfo(1); initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_21"; - end; - OnTimer2000: - specialeffect EF_WIND; - end; - OnTimer4000: - specialeffect EF_WIND; - end; - OnTimer6000: - specialeffect EF_WIND; - end; - OnTimer8000: - specialeffect EF_STEAL; + specialeffect EF_WIND; end; OnTimer10000: - specialeffect EF_STEAL; - end; - OnTimer12000: specialeffect EF_STEAL; - disablenpc "ep13_warp_21"; end; -} -nyd_dun02,149,269,0 script ep13_warp_22 139,{ - -OnEnable: - enablenpc "ep13_warp_22"; - specialeffect EF_WIND; - initnpctimer; +OnTimer15000: + specialeffect EF_STEAL; + disablenpc strnpcinfo(1); end; OnDisable: specialeffect EF_WIND; - disablenpc "ep13_warp_22"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_WIND; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; + disablenpc strnpcinfo(1); end; +} -OnTimer15000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_22"; +- script ep13_warp_w_0 -1,{ +OnTouch: + warp "nyd_dun01",214,68; end; } +nyd_dun02,143,272,0 duplicate(ep13_warp_s_0) ep13_warp_s1 139 +nyd_dun02,143,266,0 duplicate(ep13_warp_s_0) ep13_warp_s3 139 +nyd_dun02,146,272,0 duplicate(ep13_warp_s_0) ep13_warp_11 139 +nyd_dun02,146,266,0 duplicate(ep13_warp_s_0) ep13_warp_13 139 +nyd_dun02,149,260,0 duplicate(ep13_warp_s_0) ep13_warp_25 139 +nyd_dun02,149,257,0 duplicate(ep13_warp_s_0) ep13_warp_26 139 +nyd_dun02,152,270,0 duplicate(ep13_warp_s_0) ep13_warp_31 139 +nyd_dun02,152,264,0 duplicate(ep13_warp_s_0) ep13_warp_33 139 +nyd_dun02,155,269,0 duplicate(ep13_warp_s_0) ep13_warp_41 139 +nyd_dun02,155,254,0 duplicate(ep13_warp_s_0) ep13_warp_46 139 +nyd_dun02,158,263,0 duplicate(ep13_warp_s_0) ep13_warp_52 139 +nyd_dun02,158,254,0 duplicate(ep13_warp_s_0) ep13_warp_55 139 +nyd_dun02,161,261,0 duplicate(ep13_warp_s_0) ep13_warp_62 139 +nyd_dun02,161,255,0 duplicate(ep13_warp_s_0) ep13_warp_64 139 +nyd_dun02,161,249,0 duplicate(ep13_warp_s_0) ep13_warp_66 139 +nyd_dun02,164,261,0 duplicate(ep13_warp_s_0) ep13_warp_71 139 +nyd_dun02,164,255,0 duplicate(ep13_warp_s_0) ep13_warp_73 139 +nyd_dun02,164,249,0 duplicate(ep13_warp_s_0) ep13_warp_75 139 +nyd_dun02,167,249,0 duplicate(ep13_warp_s_0) ep13_warp_84 139 +nyd_dun02,170,257,0 duplicate(ep13_warp_s_0) ep13_warp_91 139 +nyd_dun02,170,254,0 duplicate(ep13_warp_s_0) ep13_warp_92 139 +nyd_dun02,170,248,0 duplicate(ep13_warp_s_0) ep13_warp_94 139 +nyd_dun02,170,245,0 duplicate(ep13_warp_s_0) ep13_warp_95 139 + +nyd_dun02,146,263,0 duplicate(ep13_warp_s_1) ep13_warp_14 139 +nyd_dun02,149,272,0 duplicate(ep13_warp_s_1) ep13_warp_21 139 +nyd_dun02,152,258,0 duplicate(ep13_warp_s_1) ep13_warp_35 139 +nyd_dun02,155,266,0 duplicate(ep13_warp_s_1) ep13_warp_42 139 +nyd_dun02,158,251,0 duplicate(ep13_warp_s_1) ep13_warp_56 139 +nyd_dun02,164,258,0 duplicate(ep13_warp_s_1) ep13_warp_72 139 +nyd_dun02,164,246,0 duplicate(ep13_warp_s_1) ep13_warp_76 139 +nyd_dun02,167,255,0 duplicate(ep13_warp_s_1) ep13_warp_82 139 +nyd_dun02,170,251,0 duplicate(ep13_warp_s_1) ep13_warp_93 139 + +nyd_dun02,149,269,0 duplicate(ep13_warp_s_2) ep13_warp_22 139 +nyd_dun02,149,263,0 duplicate(ep13_warp_s_2) ep13_warp_24 139 +nyd_dun02,155,263,0 duplicate(ep13_warp_s_2) ep13_warp_43 139 +nyd_dun02,155,257,0 duplicate(ep13_warp_s_2) ep13_warp_45 139 +nyd_dun02,161,264,0 duplicate(ep13_warp_s_2) ep13_warp_61 139 +nyd_dun02,161,252,0 duplicate(ep13_warp_s_2) ep13_warp_65 139 +nyd_dun02,167,258,0 duplicate(ep13_warp_s_2) ep13_warp_81 139 +nyd_dun02,167,252,0 duplicate(ep13_warp_s_2) ep13_warp_83 139 +nyd_dun02,167,246,0 duplicate(ep13_warp_s_2) ep13_warp_85 139 +nyd_dun02,173,251,0 duplicate(ep13_warp_s_2) ep13_warp_e1 139 +nyd_dun02,173,248,0 duplicate(ep13_warp_s_2) ep13_warp_e2 139 +nyd_dun02,173,245,0 duplicate(ep13_warp_s_2) ep13_warp_e3 139 + +nyd_dun02,143,269,0 duplicate(ep13_warp_w_0) ep13_warp_s2 139,1,1 +nyd_dun02,143,263,0 duplicate(ep13_warp_w_0) ep13_warp_s4 139,1,1 +nyd_dun02,146,269,0 duplicate(ep13_warp_w_0) ep13_warp_12 139,1,1 +nyd_dun02,146,260,0 duplicate(ep13_warp_w_0) ep13_warp_15 139,1,1 +nyd_dun02,149,266,0 duplicate(ep13_warp_w_0) ep13_warp_23 139,1,1 +nyd_dun02,152,267,0 duplicate(ep13_warp_w_0) ep13_warp_32 139,1,1 +nyd_dun02,152,261,0 duplicate(ep13_warp_w_0) ep13_warp_34 139,1,1 +nyd_dun02,155,260,0 duplicate(ep13_warp_w_0) ep13_warp_44 139,1,1 +nyd_dun02,158,266,0 duplicate(ep13_warp_w_0) ep13_warp_51 139,1,1 +nyd_dun02,158,260,0 duplicate(ep13_warp_w_0) ep13_warp_53 139,1,1 +nyd_dun02,158,257,0 duplicate(ep13_warp_w_0) ep13_warp_54 139,1,1 +nyd_dun02,161,258,0 duplicate(ep13_warp_w_0) ep13_warp_63 139,1,1 +nyd_dun02,164,252,0 duplicate(ep13_warp_w_0) ep13_warp_74 139,1,1 +nyd_dun02,173,242,0 duplicate(ep13_warp_w_0) ep13_warp_e4 139,1,1 + nyd_dun02,149,269,0 script ep13_warp_22_2 139,1,1,{ OnInit: +OnDisable: disablenpc "ep13_warp_22_2"; end; @@ -11833,10 +7160,6 @@ OnEnable: enablenpc "ep13_warp_22_2"; end; -OnDisable: - disablenpc "ep13_warp_22_2"; - end; - OnTouch: donpcevent "ep13_warp_31::OnEnable"; donpcevent "ep13_warp_41::OnEnable"; @@ -11847,72 +7170,13 @@ OnTouch: end; } -nyd_dun02,149,266,0 script ep13_warp_23 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - -nyd_dun02,149,263,0 script ep13_warp_24 139,{ - -OnEnable: - enablenpc "ep13_warp_24"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_24"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_WIND; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - end; - -OnTimer15000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_24"; - end; -} - nyd_dun02,149,263,0 script ep13_warp_24_2 139,1,1,{ - -OnInit: - disablenpc "ep13_warp_24_2"; - end; - OnEnable: enablenpc "ep13_warp_24_2"; end; -OnDisable: - disablenpc "ep13_warp_24_2"; - end; - OnTouch: - set .@way_loot,rand(1,2); - if (.@way_loot == 1) { + if (rand(2)) { donpcevent "ep13_warp_33::OnEnable"; donpcevent "ep13_warp_43::OnEnable"; donpcevent "ep13_warp_43_2::OnEnable"; @@ -11924,321 +7188,15 @@ OnTouch: donpcevent "ep13_warp_45::OnEnable"; donpcevent "ep13_warp_45_2::OnEnable"; } - disablenpc "ep13_warp_24_2"; - end; -} - -nyd_dun02,149,260,0 script ep13_warp_25 139,{ - -OnEnable: - enablenpc "ep13_warp_25"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_25"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_25"; - end; -} - -nyd_dun02,149,257,0 script ep13_warp_26 139,{ - -OnEnable: - enablenpc "ep13_warp_26"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_26"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_26"; - end; -} - -nyd_dun02,152,270,0 script ep13_warp_31 139,{ - -OnEnable: - enablenpc "ep13_warp_31"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_31"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_31"; - end; -} - -nyd_dun02,152,267,0 script ep13_warp_32 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - -nyd_dun02,152,264,0 script ep13_warp_33 139,{ - -OnEnable: - enablenpc "ep13_warp_33"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_33"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_33"; - end; -} - -nyd_dun02,152,261,0 script ep13_warp_34 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - -nyd_dun02,152,258,0 script ep13_warp_35 139,{ - -OnEnable: - enablenpc "ep13_warp_35"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_35"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - enablenpc "ep13_warp_35"; - end; -} - -nyd_dun02,155,269,0 script ep13_warp_41 139,{ - -OnEnable: - enablenpc "ep13_warp_41"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_41"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_41"; - end; -} - -nyd_dun02,155,266,0 script ep13_warp_42 139,{ - -OnEnable: - enablenpc "ep13_warp_42"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_42"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_42"; - end; -} - -nyd_dun02,155,263,0 script ep13_warp_43 139,{ - -OnEnable: - enablenpc "ep13_warp_43"; - specialeffect EF_WIND; - initnpctimer; - end; - +OnInit: OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_43"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_WIND; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - end; - -OnTimer15000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_43"; + disablenpc "ep13_warp_24_2"; end; } nyd_dun02,155,263,0 script ep13_warp_43_2 139,1,1,{ - OnInit: +OnDisable: disablenpc "ep13_warp_43_2"; end; @@ -12246,10 +7204,6 @@ OnEnable: enablenpc "ep13_warp_43_2"; end; -OnDisable: - disablenpc "ep13_warp_43_2"; - end; - OnTouch: donpcevent "ep13_warp_52::OnEnable"; donpcevent "ep13_warp_61::OnEnable"; @@ -12258,58 +7212,9 @@ OnTouch: end; } -nyd_dun02,155,260,0 script ep13_warp_44 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - -nyd_dun02,155,257,0 script ep13_warp_45 139,{ - -OnEnable: - enablenpc "ep13_warp_45"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_45"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_WIND; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - end; - -OnTimer15000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_45"; - end; -} - nyd_dun02,155,257,0 script ep13_warp_45_2 139,1,1,{ - OnInit: +OnDisable: disablenpc "ep13_warp_45_2"; end; @@ -12317,10 +7222,6 @@ OnEnable: enablenpc "ep13_warp_45_2"; end; -OnDisable: - disablenpc "ep13_warp_45_2"; - end; - OnTouch: donpcevent "ep13_warp_46::OnEnable"; donpcevent "ep13_warp_55::OnEnable"; @@ -12331,214 +7232,9 @@ OnTouch: end; } -nyd_dun02,155,254,0 script ep13_warp_46 139,{ - -OnEnable: - enablenpc "ep13_warp_46"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_46"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_46"; - end; -} - -nyd_dun02,158,266,0 script ep13_warp_51 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - -nyd_dun02,158,263,0 script ep13_warp_52 139,{ - -OnEnable: - enablenpc "ep13_warp_52"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_52"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_52"; - end; -} - -nyd_dun02,158,260,0 script ep13_warp_53 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - -nyd_dun02,158,257,0 script ep13_warp_54 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - -nyd_dun02,158,254,0 script ep13_warp_55 139,{ - -OnEnable: - enablenpc "ep13_warp_55"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_55"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_55"; - end; -} - -nyd_dun02,158,251,0 script ep13_warp_56 139,{ - -OnEnable: - enablenpc "ep13_warp_56"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_56"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_56"; - end; -} - -nyd_dun02,161,264,0 script ep13_warp_61 139,{ - -OnEnable: - enablenpc "ep13_warp_61"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_61"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_WIND; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - end; - -OnTimer15000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_61"; - end; -} - nyd_dun02,161,264,0 script ep13_warp_61_2 139,1,1,{ - OnInit: +OnDisable: disablenpc "ep13_warp_61_2"; end; @@ -12546,10 +7242,6 @@ OnEnable: enablenpc "ep13_warp_61_2"; end; -OnDisable: - disablenpc "ep13_warp_61_2"; - end; - OnTouch: donpcevent "ep13_warp_62::OnEnable"; donpcevent "ep13_warp_71::OnEnable"; @@ -12560,140 +7252,13 @@ OnTouch: end; } -nyd_dun02,161,261,0 script ep13_warp_62 139,{ - -OnEnable: - enablenpc "ep13_warp_62"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_62"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_62"; - end; -} - -nyd_dun02,161,258,0 script ep13_warp_63 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - -nyd_dun02,161,255,0 script ep13_warp_64 139,{ - -OnEnable: - enablenpc "ep13_warp_64"; - initnpctimer; - specialeffect EF_WIND; - end; - -OnDisable: - disablenpc "ep13_warp_64"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_64"; - end; -} - -nyd_dun02,161,252,0 script ep13_warp_65 139,{ - -OnEnable: - enablenpc "ep13_warp_65"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_65"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_WIND; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - end; - -OnTimer15000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_65"; - end; -} - nyd_dun02,161,252,0 script ep13_warp_65_2 139,1,1,{ -OnInit: - disablenpc "ep13_warp_65_2"; - end; - OnEnable: enablenpc "ep13_warp_65_2"; end; -OnDisable: - disablenpc "ep13_warp_65_2"; - end; - OnTouch: - set way_loot,rand(1,2); - if (way_loot == 1) { + if (rand(2)) { donpcevent "ep13_warp_64::OnEnable"; donpcevent "ep13_warp_73::OnEnable"; donpcevent "ep13_warp_82::OnEnable"; @@ -12707,279 +7272,15 @@ OnTouch: donpcevent "ep13_warp_85::OnEnable"; donpcevent "ep13_warp_85_2::OnEnable"; } - disablenpc "ep13_warp_65_2"; - end; -} - -nyd_dun02,161,249,0 script ep13_warp_66 139,{ - -OnEnable: - enablenpc "ep13_warp_66"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_66"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_66"; - end; -} - -nyd_dun02,164,261,0 script ep13_warp_71 139,{ - -OnEnable: - enablenpc "ep13_warp_71"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_71"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_71"; - end; -} - -nyd_dun02,164,258,0 script ep13_warp_72 139,{ - -OnEnable: - enablenpc "ep13_warp_72"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_72"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_72"; - end; -} - -nyd_dun02,164,255,0 script ep13_warp_73 139,{ - -OnEnable: - enablenpc "ep13_warp_73"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_73"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_73"; - end; -} - -nyd_dun02,164,252,0 script ep13_warp_74 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - -nyd_dun02,164,249,0 script ep13_warp_75 139,{ - -OnEnable: - enablenpc "ep13_warp_75"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_75"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_75"; - end; -} - -nyd_dun02,164,246,0 script ep13_warp_76 139,{ - -OnEnable: - enablenpc "ep13_warp_76"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_76"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_76"; - end; -} - -nyd_dun02,167,258,0 script ep13_warp_81 139,{ - -OnEnable: - enablenpc "ep13_warp_81"; - specialeffect EF_WIND; - initnpctimer; - end; - +OnInit: OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_81"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_WIND; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - end; - -OnTimer15000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_81"; + disablenpc "ep13_warp_65_2"; end; } nyd_dun02,167,258,0 script ep13_warp_81_2 139,1,1,{ OnInit: +OnDisable: disablenpc "ep13_warp_81_2"; end; @@ -12987,10 +7288,6 @@ OnEnable: enablenpc "ep13_warp_81_2"; end; -OnDisable: - disablenpc "ep13_warp_81_2"; - end; - OnTouch: donpcevent "ep13_warp_91::OnEnable"; donpcevent "ep13_warp_92::OnEnable"; @@ -13000,91 +7297,9 @@ OnTouch: end; } -nyd_dun02,167,255,0 script ep13_warp_82 139,{ - -OnEnable: - enablenpc "ep13_warp_82"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_82"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_82"; - end; -} - -nyd_dun02,167,252,0 script ep13_warp_83 139,{ - -OnEnable: - enablenpc "ep13_warp_83"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_83"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_WIND; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - end; - -OnTimer15000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_83"; - end; -} - nyd_dun02,167,252,0 script ep13_warp_83_2 139,1,1,{ - OnInit: +OnDisable: disablenpc "ep13_warp_83_2"; end; @@ -13092,10 +7307,6 @@ OnEnable: enablenpc "ep13_warp_83_2"; end; -OnDisable: - disablenpc "ep13_warp_83_2"; - end; - OnTouch: donpcevent "ep13_warp_84::OnEnable"; donpcevent "ep13_warp_94::OnEnable"; @@ -13104,87 +7315,9 @@ OnTouch: end; } -nyd_dun02,167,249,0 script ep13_warp_84 139,{ - -OnEnable: - enablenpc "ep13_warp_84"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_84"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_84"; - end; -} - -nyd_dun02,167,246,0 script ep13_warp_85 139,{ - -OnEnable: - enablenpc "ep13_warp_85"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_85"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_WIND; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - end; - -OnTimer15000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_85"; - end; -} - nyd_dun02,167,246,0 script ep13_warp_85_2 139,1,1,{ - OnInit: +OnDisable: disablenpc "ep13_warp_85_2"; end; @@ -13192,10 +7325,6 @@ OnEnable: enablenpc "ep13_warp_85_2"; end; -OnDisable: - disablenpc "ep13_warp_85_2"; - end; - OnTouch: donpcevent "ep13_warp_95::OnEnable"; donpcevent "ep13_warp_e3::OnEnable"; @@ -13203,320 +7332,6 @@ OnTouch: end; } -nyd_dun02,170,257,0 script ep13_warp_91 139,{ - -OnEnable: - enablenpc "ep13_warp_91"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_91"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_91"; - end; -} - -nyd_dun02,170,254,0 script ep13_warp_92 139,{ - -OnEnable: - enablenpc "ep13_warp_92"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_92"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_92"; - end; -} - -nyd_dun02,170,251,0 script ep13_warp_93 139,{ - -OnEnable: - enablenpc "ep13_warp_93"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_93"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_93"; - end; -} - -nyd_dun02,170,248,0 script ep13_warp_94 139,{ - -OnEnable: - enablenpc "ep13_warp_94"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_94"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_94"; - end; -} - -nyd_dun02,170,245,0 script ep13_warp_95 139,{ - -OnEnable: - enablenpc "ep13_warp_95"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_95"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_STEAL; - end; - -OnTimer10000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_95"; - end; -} - -nyd_dun02,173,251,0 script ep13_warp_e1 139,{ - -OnEnable: - enablenpc "ep13_warp_e1"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_e1"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_WIND; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - end; - -OnTimer15000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_e1"; - end; -} - -nyd_dun02,173,248,0 script ep13_warp_e2 139,{ - -OnEnable: - enablenpc "ep13_warp_e2"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_e2"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_WIND; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - end; - -OnTimer15000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_e2"; - end; -} - -nyd_dun02,173,245,0 script ep13_warp_e3 139,{ - -OnEnable: - enablenpc "ep13_warp_e3"; - specialeffect EF_WIND; - initnpctimer; - end; - -OnDisable: - specialeffect EF_WIND; - disablenpc "ep13_warp_e3"; - end; - -OnTimer2000: - specialeffect EF_WIND; - end; - -OnTimer4000: - specialeffect EF_WIND; - end; - -OnTimer6000: - specialeffect EF_WIND; - end; - -OnTimer8000: - specialeffect EF_WIND; - end; - -OnTimer10000: - specialeffect EF_STEAL; - end; - -OnTimer12000: - specialeffect EF_STEAL; - end; - -OnTimer15000: - specialeffect EF_STEAL; - disablenpc "ep13_warp_e3"; - end; -} - -nyd_dun02,173,242,0 script ep13_warp_e4 139,1,1,{ -OnTouch: - warp "nyd_dun01",214,68; - end; -} - nyd_dun01,255,142,0 warp nynm_dun1f_to_2f 1,1,nyd_dun02,61,265 nyd_dun02,56,264,0 warp nynm_dun2f_to_1f 1,1,nyd_dun01,249,143 |