From 32298da90daf4762883185cc2c233ba10fd1fa56 Mon Sep 17 00:00:00 2001 From: Jesusaves Date: Mon, 9 Jul 2018 12:07:36 -0300 Subject: Arkim fix, and preparative for teleporter --- npc/015-3/_import.txt | 2 +- npc/015-3/arkim.txt | 144 ++++++++++++++++++++++++++++++++++++++++++++++++++ npc/015-3/hermit.txt | 140 ------------------------------------------------ 3 files changed, 145 insertions(+), 141 deletions(-) create mode 100644 npc/015-3/arkim.txt delete mode 100644 npc/015-3/hermit.txt (limited to 'npc/015-3') diff --git a/npc/015-3/_import.txt b/npc/015-3/_import.txt index 2df65ff8f..0b521a5d0 100644 --- a/npc/015-3/_import.txt +++ b/npc/015-3/_import.txt @@ -2,4 +2,4 @@ // This file is generated automatically. All manually added changes will be removed when running the Converter. "npc/015-3/_mobs.txt", "npc/015-3/_warps.txt", -"npc/015-3/hermit.txt", +"npc/015-3/arkim.txt", 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; + +} diff --git a/npc/015-3/hermit.txt b/npc/015-3/hermit.txt deleted file mode 100644 index 506f7198b..000000000 --- a/npc/015-3/hermit.txt +++ /dev/null @@ -1,140 +0,0 @@ -// 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; - if (.@q3 < $@ARKIM_TIMER-(60*60*24)) setq3 HurnscaldQuest_Arkim, $@ARKIM_TIMER-(60*60*24); // Globally-bound timed quest - 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; - -} -- cgit v1.2.3-70-g09d2