diff options
Diffstat (limited to 'npc/042-1/hasan.txt')
| -rw-r--r-- | npc/042-1/hasan.txt | 30 |
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; } |