summaryrefslogtreecommitdiff
path: root/npc/015-3/arkim.txt
diff options
context:
space:
mode:
authorJesusaves <cpntb1@ymail.com>2018-07-09 12:07:36 -0300
committerJesusaves <cpntb1@ymail.com>2018-07-09 12:07:36 -0300
commit32298da90daf4762883185cc2c233ba10fd1fa56 (patch)
tree9ca3c95ac480229eef6580dff5bbdcc0291c80cb /npc/015-3/arkim.txt
parent7746323daa14ca0441acb9f858c985e519068f7c (diff)
downloadserverdata-32298da90daf4762883185cc2c233ba10fd1fa56.tar.gz
serverdata-32298da90daf4762883185cc2c233ba10fd1fa56.tar.bz2
serverdata-32298da90daf4762883185cc2c233ba10fd1fa56.tar.xz
serverdata-32298da90daf4762883185cc2c233ba10fd1fa56.zip
Arkim fix, and preparative for teleporter
Diffstat (limited to 'npc/015-3/arkim.txt')
-rw-r--r--npc/015-3/arkim.txt144
1 files changed, 144 insertions, 0 deletions
diff --git a/npc/015-3/arkim.txt b/npc/015-3/arkim.txt
new file mode 100644
index 000000000..7ec10fba6
--- /dev/null
+++ b/npc/015-3/arkim.txt
@@ -0,0 +1,144 @@
+// TMW2 scripts.
+// Authors:
+// Jesusalva
+// Description:
+// Heremit
+// Variables:
+// $ARKIM_ST
+// How many Bat Teeth/Wings were given
+// q1
+// Controls your own progress helping Arkim - Unused, might give place to some real quest later.
+// q2
+// Controls your own progress helping Arkim - Items today
+// q3
+// Controls your own progress helping Arkim - Your timer
+
+015-3,170,169,0 script Arkim NPC_TERRY,{
+ mesn;
+ mesq lg("Hello, young girl...", "Hello, young boy...");
+ next;
+
+L_Loop:
+ .@q1=getq(HurnscaldQuest_Arkim);
+ .@q2=getq2(HurnscaldQuest_Arkim);
+ .@q3=getq3(HurnscaldQuest_Arkim);
+ mesn;
+ mesq l("I am doing a great research with Bats, and thus far I collected @@ Bat Wings and Teeths.", $ARKIM_ST);
+ next;
+ if (.@q3 > $@ARKIM_TIMER) goto L_Timer;
+ // Globally-bound timed quest
+ if (.@q3 < $@ARKIM_TIMER-(60*60*24)) {
+ setq2 HurnscaldQuest_Arkim, 0;
+ setq3 HurnscaldQuest_Arkim, $@ARKIM_TIMER-(60*60*24);
+ }
+ if (.@q2 >= (BaseLevel-17)/3) goto L_Timer;
+ select
+ rif(countitem(BatWing) >= 1, l("Donate a Bat Wing")),
+ rif(countitem(BatTeeth) >= 1, l("Donate a Bat Teeth")),
+ l("I better leave this crazy man to his ordeals..."),
+ l("Had you any breakthrough?");
+ mes "";
+
+ switch (@menu) {
+ case 1:
+ delitem BatWing, 1;
+ getexp 25, 0;
+ Zeny=Zeny+50;
+ break;
+ case 2:
+ delitem BatTeeth, 1;
+ getexp 35, 0;
+ Zeny=Zeny+75;
+ break;
+ case 3:
+ close;
+ break;
+ case 4:
+ goto L_Research;
+ break;
+ }
+ $ARKIM_ST=$ARKIM_ST+1;
+ setq2 HurnscaldQuest_Arkim, .@q2+1;
+ goto L_Loop;
+
+L_Timer:
+ if (BaseLevel < 20)
+ mesc l("You need at least level 20 to help.");
+ mesn;
+ mesq l("You've helped me plenty. Please come back in @@", FuzzyTime($@ARKIM_TIMER+(60*60*24),2,2));
+ close;
+
+// TODO
+L_Research:
+ mesn;
+ mesq l("Let me see... The more Wings and Teethes I collect, the more my research shall advance.");
+ next;
+ select
+ l("Thanks."),
+ rif($ARKIM_ST >= 1400, l("Cursed Arrows")),
+ rif($ARKIM_ST >= 2800, l("Poison Arrows")),
+ rif($ARKIM_ST >= 1200, l("Piberries Infusion")),
+ rif($ARKIM_ST >= 2600, l("Fate's Potion")),
+ rif($ARKIM_ST >= 4000, l("Clotho Liquor")),
+ rif($ARKIM_ST >= 4700, l("Lachesis Brew")),
+ rif($ARKIM_ST >= 6600, l("Atropos Mixture")),
+ rif($ARKIM_ST >= 7500, l("Dark Desert Mushroom"));
+ mes "";
+ mesn;
+
+ switch (@menu) {
+ case 1:
+ mesq l("Good bye!");
+ close;
+ break;
+ case 2:
+ mesq l("The @@ are specially dangerous, and archers love them.", getitemlink(CursedArrow));
+ next;
+ mesn;
+ mesq l("These are being crafted by Alan.");
+ break;
+ case 3:
+ mesq l("The @@ are specially dangerous, and archers love them.", getitemlink(PoisonArrow));
+ next;
+ mesn;
+ mesq l("These are being crafted by Alan.");
+ break;
+ case 4:
+ case 5:
+ case 6:
+ case 7:
+ case 8:
+ mesq l("The @@ is a powerful healing drink.", getitemlink(PiberriesInfusion-4+@menu));
+ next;
+ mesn;
+
+ switch (@menu) {
+ case 4:
+ mesq l("@@ is developing these potions.", "Wyara"); break;
+ default:
+ mesq l("@@ is developing these potions.", "Jesusalva"); // TODO: Fate, Clotho, Lachesis and Atropos
+ break;
+ }
+
+ break;
+ case 9:
+ mesq l("Ah! @@. A very rare drop!", getitemlink(DarkDesertMushrooom));
+ next;
+ mesn;
+ mesq l("You can find it in the bandit market, but it is EXPENSIVE.");
+ break;
+
+ }
+ next;
+ goto L_Research;
+
+OnInit:
+ .sex=G_MALE;
+ .distance=5;
+ // No end; on purpose
+
+OnHour00:
+ $@ARKIM_TIMER=gettimetick(2);
+ end;
+
+}