summaryrefslogtreecommitdiff
path: root/npc/re
diff options
context:
space:
mode:
authoreuphyy <euphyy@54d463be-8e91-2dee-dedb-b68131a5f0ec>2012-07-11 15:02:20 +0000
committereuphyy <euphyy@54d463be-8e91-2dee-dedb-b68131a5f0ec>2012-07-11 15:02:20 +0000
commita673d5b975c6e2fa3fc2984dcaa833b17e0e0dfe (patch)
tree4162cea6d7f5ab244017fd986223e47287e2bdc2 /npc/re
parent5c8c70df6834c8c37e206514ab640150d22d4d68 (diff)
downloadhercules-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
Diffstat (limited to 'npc/re')
-rw-r--r--npc/re/quests/quests_13_1.txt2
-rw-r--r--npc/re/quests/quests_13_2.txt7399
2 files changed, 608 insertions, 6793 deletions
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