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
|
// Evol scripts.
// Author:
// Toams
// Description:
// helper scripts for rowboat usage
// TODO:
// make the script dialog different if there is no rowboat present at the cave
// calling the Rowboat
001-1,200,60,0 script Curious Hole NPC_NO_SPRITE,{
.@monadad = getq(ArtisQuests_MonaDad);
narrator(S_LAST_BLANK_LINE | S_LAST_NEXT,
l("You see a curious hole behind some rocks"),
l("'Hey anyone there?'"),
l("..."),
l("Altough you can't get rid of the feeling someone is listening on the other side, you don't get any replies"));
if (.@monadad < 3)
{
close;
}
else
{
narrator(S_LAST_BLANK_LINE | S_LAST_NEXT,
l("Suddenly you remember the strange phrase Mona overheard Sophialla saying"),
l("Maybe you should try this phrase?"));
if (askyesno() == ASK_YES)
{
mesn strcharinfo(0);
mesc l("Sagratha is great.");
next;
speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
l("Hello, a rowboat is on his way to the beach. Please wait for a while for it to arrive.");
doevent("#Rowboat::OnMoveToBeach");
close;
}
else
close;
}
OnInit:
.distance = 1;
}
//unmounting the rowboat at eastern beach
001-1,202,62,0 script unmountrowboateast NPC_HIDDEN,1,1,{
function UnMount {
narrator(S_LAST_BLANK_LINE | S_LAST_NEXT,
l("Do you want to leave the boat?"));
if (askyesno() == ASK_YES)
{
slide_or_warp("001-1", 199, 62);
setmount 0;
close;
}
}
OnTouch:
UnMount;
end;
OnInit:
.sex = G_OTHER;
.distance = 1;
}
//unmounting the rowboat at southern beach
001-1,68,143,0 script unmountrowboatsouth NPC_HIDDEN,1,1,{
function UnMount {
narrator(S_LAST_BLANK_LINE | S_LAST_NEXT,
l("Do you want to leave the boat?"));
if (askyesno() == ASK_YES)
{
slide_or_warp("001-1", 68, 138);
setmount 0;
close;
}
}
OnTouch:
UnMount;
end;
OnInit:
.sex = G_OTHER;
.distance = 1;
}
//unmounting the rowboat at western beach
001-1,25,101,0 script unmountrowboatwest NPC_HIDDEN,1,1,{
function UnMount {
narrator(S_LAST_BLANK_LINE | S_LAST_NEXT,
l("Do you want to leave the boat?"));
if (askyesno() == ASK_YES)
{
slide_or_warp("001-1", 27, 101);
setmount 0;
close;
}
}
OnTouch:
UnMount;
end;
OnInit:
.sex = G_OTHER;
.distance = 1;
}
function script ForcedUnmount {
setmount 0;
return;
}
|
