1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
|
// Variables used: nibble 4 and 5 of QUEST_SouthTulimshar
002-3.gat,42,45,6|script|Nathan|109,
{
// This NPC previously used the variable TMW_Quest
callfunc "ClearVarTMW_Quest";
set @state, ((QUEST_SouthTulimshar & BYTE_2_MASK) >> BYTE_2_SHIFT);
if (@state >= 20) goto L_Nathan_Complete;
if (@state == 19) goto L_Nathan_UGQ_Naem;
if (@state == 18) goto L_Nathan_Help_Cool;
if (@state == 17) goto L_Nathan_Help_Done;
if (@state == 16) goto L_Nathan_Waits_3;
if (@state == 15) goto L_Nathan_Help_3;
if (@state == 14) goto L_Nathan_Waits_2;
if (@state == 13) goto L_Nathan_Help_2;
if (@state == 12) goto L_Nathan_Waits_1;
if (@state == 11) goto L_Nathan_Help_1;
if (@state == 9) goto L_Nathan_Cool;
if (@state == 8) goto L_Nathan_Okay;
mes "[Nathan the Miner]";
mes "\"It's very dangerous in here. We had a big earthquake here just recently, too... so be careful!\"";
goto L_Close;
L_Nathan_Okay:
set @state, 9;
callsub S_Update_Var;
mes "[Nathan]";
mes "\"Hey there! Just mining away down here. You say Nickos was worried about us? Nothing down here we can't handle, but you should try to be safe down here yourself. The monsters can be rather aggressive. Come to think of it, you might want to check on Naem to make sure he's okay. You can find him in the southeast parts of the mine.\"";
goto L_Close;
L_Nathan_Cool:
mes "[Nathan]";
mes "\"Hey, be careful down here, the monsters can be rather aggressive! You might want to check on Naem too. He's at the southeast parts of the mine.\"";
goto L_Close;
L_Nathan_Help_1:
set @state, 12;
callsub S_Update_Var;
mes "[Nathan]";
mes "\"Oh, hey again! Nickos told you we need some help down here too? Yeah, Naem could use a spare pair of hands moving his bags of ore to me. He's got a lot of work built up. Just go talk to him and he'll give you the bags. You might have to make a few trips, but I'll make it worth your troubles.\"";
goto L_Close;
L_Nathan_Waits_1:
mes "[Nathan]";
mes "\"Naem could use some help moving his bags of ore to me. He's got a lot of work built up. Just go talk to him and he'll give you the bags. You might have to make a few trips, but I'll make it worth your troubles.\"";
goto L_Close;
L_Nathan_Help_2:
set @state, 14;
callsub S_Update_Var;
mes "You give the bag of ore to Nathan";
next;
mes "[Nathan]";
mes "\"Ah, thank you. Just a couple more and we'll have caught up!\"";
goto L_Close;
L_Nathan_Waits_2:
mes "[Nathan]";
mes "\"Just a couple more and we'll be all caught up!\"";
goto L_Close;
L_Nathan_Help_3:
set @state, 16;
callsub S_Update_Var;
mes "You hand the bag of ore to Nathan.";
next;
mes "[Nathan]";
mes "\"Just one more bag and you'll be done!\"";
goto L_Close;
L_Nathan_Waits_3:
mes "[Nathan]";
mes "\"Just get one more bag of ore from Naem and bring it to me and you'll be done.\"";
goto L_Close;
L_Nathan_Help_Done:
getinventorylist;
if (@inventorylist_count == 100)
goto L_Nathan_TooMany;
set @state, 18;
callsub S_Update_Var;
getitem "MinersHat", 1;
mes "[Nathan]";
mes "You hand the bag of ore to Nathan.";
next;
mes "\"Ah, that should be it! Thank you for your help. Here, take this Miner's Hat. You're a real miner now!\"";
next;
mes "\"Oh, and I noticed a problem with these angry scorpions down here, they seem to make things much more difficult. Maybe you could tell Nickos about it on your way out?\"";
goto L_Close;
L_Nathan_TooMany:
mes "[Nathan]";
mes "\"You have too many items for me to give you a reward.\"";
goto L_Close;
L_Nathan_Help_Cool:
mes "[Nathan]";
mes "\"Be safe down here, it's dangerous for the unexperienced. Mining is a dangerous job, but somebody's got to do it!\"";
goto L_Close;
L_Nathan_UGQ_Naem:
mes "[Nathan]";
mes "\"Thanks for thinning down the angry scorpion population. It sure has made mining a little easier down here! Oh, you say Nickos has given you permission to check out the underground palace? Talk to Naem, he's got the key and the code.\"";
goto L_Close;
L_Nathan_Complete:
mes "[Nathan]";
mes "\"Mining is a dangerous job, but somebody's got to do it!\"";
goto L_Close;
L_Close:
set @state, 0;
close;
S_Update_Var:
set QUEST_SouthTulimshar, (QUEST_SouthTulimshar & ~(BYTE_2_MASK) | (@state << BYTE_2_SHIFT));
return;
}
|
