diff options
Diffstat (limited to 'npc/015-3')
| -rw-r--r-- | npc/015-3/_import.txt | 1 | ||||
| -rw-r--r-- | npc/015-3/hermit.txt | 130 |
2 files changed, 131 insertions, 0 deletions
diff --git a/npc/015-3/_import.txt b/npc/015-3/_import.txt index 15e3dd8fb..2df65ff8f 100644 --- a/npc/015-3/_import.txt +++ b/npc/015-3/_import.txt @@ -2,3 +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", diff --git a/npc/015-3/hermit.txt b/npc/015-3/hermit.txt new file mode 100644 index 000000000..863007a9a --- /dev/null +++ b/npc/015-3/hermit.txt @@ -0,0 +1,130 @@ +// 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 >= 12) 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: + 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 >= 400, l("Cursed Arrows")), + rif($ARKIM_ST >= 800, l("Poison Arrows")), + rif($ARKIM_ST >= 200, l("Piberries Infusion")), + rif($ARKIM_ST >= 600, l("Fate's Potion")), + rif($ARKIM_ST >= 1000, l("Clotho Liquor")), + rif($ARKIM_ST >= 1200, l("Lachesis Brew")), + rif($ARKIM_ST >= 1600, l("Atropos Mixture")), + rif($ARKIM_ST >= 2000, 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; + mesq l("@@ is developing these potions.", "Jesusalva"); // TODO: NPCs: ??, Fate, Clotho, Lachesis and Atropos + break; + case 3: + mesq l("Ah! @@. A very rare drop!", getitemlink(DarkDesertMushrooom)); + next; + mesn; + mesq l("You can find it in the bandit market for just 50,000 GP."); + break; + + } + next; + goto L_Research; + +OnInit: + .sex=G_MALE; + .distance=5; + // No end; on purpose + +OnHour00: + $@ARKIM_TIMER=gettimetick(2); + end; + +} |