summaryrefslogtreecommitdiff
path: root/npc/042-1/hasan.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/042-1/hasan.txt')
-rw-r--r--npc/042-1/hasan.txt30
1 files changed, 26 insertions, 4 deletions
diff --git a/npc/042-1/hasan.txt b/npc/042-1/hasan.txt
index 21364a44..63acf2c0 100644
--- a/npc/042-1/hasan.txt
+++ b/npc/042-1/hasan.txt
@@ -4,6 +4,7 @@
if ($scorp) goto L_Fear;
+ if (FLAGS & FLAG_TUTORIAL_DONE) goto L_Tut_Done;
if (hasan == 4) goto L_Thank;
if (hasan == 3) goto L_Trick;
if (hasan > 0) goto L_Toll;
@@ -54,7 +55,11 @@ L_Pay:
mes "He grins gloatingly.";
mes "[Hasan]";
mes "\"Very well. You may pass.\"";
- //TODO: set variables
+ set hasan, 0;
+ set kaan, 0;
+ set sorfina, 0;
+ set tanisha, 0;
+ set FLAGS, FLAGS | FLAG_TUTORIAL_DONE;
close;
L_Cheat:
@@ -86,7 +91,11 @@ L_Thank:
mes "\"I tell you something: Cool persons are allowed to pass for free.";
mes "And you can have this.\"";
getitem "SharpKnife", 1;
- //TODO: clear all vars and set flag
+ set hasan, 0;
+ set kaan, 0;
+ set sorfina, 0;
+ set tanisha, 0;
+ set FLAGS, FLAGS | FLAG_TUTORIAL_DONE;
close;
L_Fear:
@@ -95,6 +104,14 @@ L_Fear:
mes "He seems close to tears.";
close;
+L_Tut_Done:
+ mes "[Hasan]";
+ if (baselevel >= 40)
+ mes "\"Welcome to the suburbs of Tulimshar. I wonder what an experienced adventurer like you is doing here.\"";
+ if (baselevel < 40)
+ mes "\"Bah, nothing interesting is happening here.\"";
+ close;
+
onScorpionDeath:
set $scorp, 0;
if (hasan != 3)
@@ -105,10 +122,15 @@ onScorpionDeath:
}
042-1.gat,117,76,0 script #barrier 127,2,2{
- //TODO: check variable
+ if (FLAGS & FLAG_TUTORIAL_DONE)
+ goto L_Tut;
warp "042-1.gat", 110, 73;
if ($scorp)
message strcharinfo(0), "Hasan: \"Please help me!\"";
- message strcharinfo(0), "Hasan: \"Stop!\"";
+ if (!$scorp)
+ message strcharinfo(0), "Hasan: \"Stop!\"";
+ end;
+L_Tut:
+ warp "022-1.gat", 23, 38;
end;
}