summaryrefslogtreecommitdiff
path: root/npc/042-1/testnpcs.txt
blob: 58057f11d89206c5e83c9d39a18aab8c3c5825ff (plain) (blame)
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
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
//TODO: put npcs in different files and give names

042-2.gat,28,26,0	script	Granny	154,{

	if (tutorial > 2) goto L_Again;
	if (tutorial == 1) goto L_Clothes;

	mes "[Granny]";
	mes "\"Ah, you're waking up. It seems you collapsed after you left the boat that brought you to Tulimshar.";
	mes "A group of ragtags immediatly took advantage of that and stole all your stuff!\"";
	next;
//TODO: add name of granddaughter
	mes "\"My little granddaughter saw that, but couldn't do something to stop them.";
	mes "She brought someone to help. It was too late to catch the thieves, but at least they brought you here to recover.\"";
	next;
	mes "\"This area of the town is full of shady poeple, so I don't think there's a chance to get back your stuff.\"";
	mes "She has a sad look on her face, but then she shakes her head and smiles.";
	next;
	mes "[Granny]";
	mes "\"I'm glad you're feeling better now. You're not used to the hot weather, right?";
	mes "Are you here to look for some work? Many young people come to our Tulimshar for this reason.\"";
	next;
	mes "\"I can tell you some useful things, if you to hear.\"";
	menu
		"That would be great!",L_Tut,
		"No, thanks. I already know how things are going.",L_SkipTut;

L_Tut:
	mes "[Server]";
	mes "The explanations in this tutorial are based on the official client version 0.5.2";
	mes "If you're using another client, settings and controls may be different.";

	mes "She smiles at you.";
	mes "[Granny]";
	mes "\"A wise decision.\"";
	next;
	mes "\"Ok, I hope you didn't forget how to walk. Just use the arrow keys or click at the place you want to go to.\"";
	next;
	mes "\"And you really should get dressed again. I gave you an old shirt of my son.\"";
	next;
	set tutorial, 1;
L_Naked:
	mes "\"Press F3 or click at the button for your equipment in the bar at the upper right corner to open your inventory.\"";
	next;
	mes "\"Then click on the shirt and press the equip button.\"";
	next;
	mes "\"Talk to me again when you got dressed. You can either click on me, or press N to focus on me and T to talk.\"";
	close;

L_Clothes:
	if (getequipid(equip_torso) < 0) goto L_Naked;
	mes "[Granny]";
	mes "\"That's much better, don't you think so?\"";
	next;
	mes "\"You know, there are different kind of items. You can also use usable items in your inventory.\"";
	next;
	mes "\"But you might find it more useful to put them on a shortcut. Press F8 to open your shortcut window.\"";
	next;
	mes "\"You can select the item you want to put on a shortcut with your mouse and then click on the position in the shortcut window you want to place it.\"";
	next;
	mes "\"I think this will help you a bit. To get more informations, press the button settings and look at the controls. You can also change them as you like.\"";
	next;
	mes "\"Now you should go to see my granddaughter, she is very worried. She's in the storehouse, that's the building just a few steps southeast from here.\"";
	next;
	mes "\"Oh, and if you're looking for work, you should talk to Aidan when you go to main Tulimshar. They're giving rewards for monster hunting.";
	mes "You can find him near the south gate. Well, good luck.\"";
	set tutorial, 2;
	close;

L_Again:
	mes "[Granny]";
	mes "\"TODO: put here a menu for explaining things again\"";
	close;

L_SkipTut:
	mes "[Granny]";
	mes "\"Really? You seem quite unexperienced. Listening to some advices won't hurt.\"";
	menu
		"Thinking about it twice... please tell me.",L_Tut,
		"Yeah, but thanks for the offer. Bye",-;
	mes "[Granny]";
	mes "\"If you think so. Good luck.\"";
	//TODO:set flag
close;
}

042-2.gat,37,89,0	script	YoungGirl	114,{
	mes "[YoungGirl]";
	mes "\"Hey! You're up again!\"";
	emotion 3;
	next;
	mes "\"Are you feeling better?\"";
	menu
		"Yes, thank you.",-,
		"Yeah, but all my stuff is gone.",-;
	mes "[YoungGirl]";
	mes "\"I see. It was really bad luck how you \"";

	//TODO: remove knife from beginning items
	mes "\"TODO: find some transition\"";
	next;
L_Maggots:
	set tutorial, 3;
	mes "\"There are some maggots eating the goods and I shall get rid of them.";
	mes "But they're so yucky!\"";
	next;
	mes "\"If you kill them, I'll give you my knife.";
	mes "What do you say?\"";
	menu
		"Sure!",-,
		"That's your job.",L_Close;
	mes "[YoungGirl]";
	mes "\"Wonderful!\"";
	if ($@TUT_MAGGOT) goto L_Blocked;
	set $@TUT_MAGGOT, 1;
	set $@TUT_COUNTER, 0;
	getitem "knife", 1;
	next;
	mes "\"Ok, listen what to do.";
	mes "Equip the knife and kill the maggots.\"";
	next;
	mes "\"Press A to focus on a monster. With X you can focus and attack.";
	mes "But it also works to click on the monster with your mouse.\"";
	next;
	mes "\"If you press Shift, you can abort your attack.\"";
	next;
	mes "\"Maggots aren't aggressive, so they won't attack you until you attacked. Take them out one by one.";
	mes "Sometimes dead monsters leave some useful things. You can pick them up with pressing Z.\"";
	close2;
	warp "042-2.gat", 33, 87;
	areamonster "042-2.gat", 31, 85, 35, 89, "", 1002, 5, "YoungGirl::onMaggotDeath";
	startnpctimer;
	end;

L_Blocked:
	mes "[YoungGirl]";
	//TODO: make this more plausible
	mes "\"Oh, someone else is already in there. Let's wait a short while.\"";
	close;

OnTimer1000:
	setnpctimer 0;
	if (getareausers("042-2.gat", 29, 85, 36, 90) < 1)
		goto L_CleanUp;
	areatimer "042-2.gat", 29, 85, 36, 90, 10, "YoungGirl::onTick";
	end;

L_CleanUp:
	set $@TUT_MAGGOT, 0;
	killmonster "042-2.gat", "YoungGirl::onMaggotDeath";
	stopnpctimer;
	setnpctimer 0;
	end;

onTick:
	if (isdead(0)) end;
	if (hp > 20)
		goto L_NoHeal;
	heal MaxHp, 0;
	message strcharinfo(0), "YoungGirl: You're doing good!";
L_NoHeal:
	if ($@TUT_COUNTER < 5)
		end;
	warp "042-2.gat", 36, 90;
	set tutorial, 4;
	goto L_CleanUp;
	close;

onMaggotDeath:
	set $@TUT_COUNTER, $@TUT_COUNTER + 1;
	end;

L_Close:
	close;
}

042-1.gat,18,80,0	script	Man	156,{
end;
}
042-1.gat,105,72,0	script	YoungMan	162,{
end;
}
042-1.gat,110,74,0	script	ManWithShabbyClothes	189,{
end;
}