summaryrefslogtreecommitdiff
path: root/npc/001-1/sandra.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/001-1/sandra.txt')
-rw-r--r--npc/001-1/sandra.txt109
1 files changed, 109 insertions, 0 deletions
diff --git a/npc/001-1/sandra.txt b/npc/001-1/sandra.txt
new file mode 100644
index 00000000..dcef65c9
--- /dev/null
+++ b/npc/001-1/sandra.txt
@@ -0,0 +1,109 @@
+//
+
+001-1.gat,110,71,0 script Sandra 114,{
+ if (TMW_Quest >= 12) goto L_Done;
+ if (TMW_Quest == 11) goto L_Progress;
+ if (TMW_Quest == 10) goto L_Start;
+
+ mes "[Sandra]";
+ mes "\"Hunting monsters for potion ingredients can sometimes be a difficult task. Maybe you could help me at some point.\"";
+ close;
+
+L_Start:
+
+ set @TEMP, rand(4);
+ if(@TEMP == 0) goto L_Opening0;
+ if(@TEMP == 1) goto L_Opening1;
+ if(@TEMP == 2) goto L_Opening2;
+ if(@TEMP == 3) goto L_Opening3;
+
+L_Opening0:
+ mes "[Sandra]";
+ mes "\"In the outskirts of Tulimshar, there are some scorpions... I need a favor, please help me! Will you?\"";
+ next;
+ goto L_Ask;
+
+L_Opening1:
+ mes "[Sandra]";
+ mes "\"When you venture to the outskirts of Tulimshar, you can spot scorpions. Will you help me kill some?\"";
+ next;
+ goto L_Ask;
+
+L_Opening2:
+ mes "[Sandra]";
+ mes "\"The Scorpion Stinger carries many properties used in potions. Would you get some for me?\"";
+ next;
+ goto L_Ask;
+
+L_Opening3:
+ mes "[Sandra]";
+ mes "\"You look sturdy enough, will you help me get something?\"";
+ next;
+ goto L_Ask;
+
+L_Ask:
+ menu
+ "Yes.", L_Yes,
+ "No.", L_No;
+
+L_Yes:
+ set @TEMP, rand(3);
+ if(@TEMP == 0) goto L_Req0;
+ if(@TEMP == 1) goto L_Req1;
+ if(@TEMP == 2) goto L_Req2;
+
+L_Req0:
+ mes "[Sandra]";
+ mes "\"I need 5 Scorpion Stingers.\"";
+ next;
+ goto L_Set;
+
+L_Req1:
+ mes "[Sandra]";
+ mes "\"I heard a while ago that stingers from scorpions can be used for medical purposes. I need you to help me get 5 Scorpion Stingers.\"";
+ next;
+ goto L_Set;
+
+L_Req2:
+ mes "[Sandra]";
+ mes "\"Bring me 5 Scorpion Stingers. I'll give you something if you do!\"";
+ next;
+ goto L_Set;
+
+L_Set:
+ set TMW_Quest,11;
+ mes "[Sandra]";
+ mes "\"Please get them for me!\"";
+ close;
+
+L_Progress:
+ if (countitem("ScorpionStinger") < 5) goto L_NotEnough;
+ mes "[Sandra]";
+ mes "\"Excellent! You brought me 5 Scorpion Stingers!\"";
+ getinventorylist;
+ if (@inventorylist_count + (countitem("ScorpionStinger") == 5) - (countitem("Arrow") == 0) > 99) goto L_TooMany;
+ delitem "ScorpionStinger", 5;
+ getitem "Bow", 1;
+ getitem "Arrow", 100;
+ set TMW_Quest, 12;
+ close;
+
+L_NotEnough:
+ mes "[Sandra]";
+ mes "\"Please hurry and bring me 5 Scorpion Stingers.\"";
+ close;
+
+L_Done:
+ mes "[Sandra]";
+ mes "\"Thank you for all your help!\"";
+ close;
+
+L_No:
+ close;
+
+L_TooMany:
+ next;
+ mes "[Sandra]";
+ mes "\"You don't have room for my reward. I'll wait until you do.\"";
+ close;
+}