|
1
|
scr_depthscr_depth
depth = 50000 - ((y * 10) + (sprite_height * 10)); (0, 0, 0, 0, 0);
|
|
2
|
scr_npc_animscr_npc_anim
tt = 0;
if (myinteract == 3)
{
if (instance_exists(OBJ_WRITER))
{
image_speed = 0.2;
if (OBJ_WRITER.halt != 0)
tt = 1;
}
else
{
tt = 1;
}
}
if (tt == 1)
{
image_speed = 0;
image_index = 0;
} ();
|
|
3
|
script_execute(scr_npcdir, 2);
|
|
4
|
image_alpha = 0;
|
|
5
|
if (instance_exists(obj_mainchara))
|
|
6
|
{
|
|
7
|
dist = distance_to_object(obj_mainchara);
|
|
8
|
if (dist < 60)
|
|
9
|
{
|
|
10
|
disto = 5 / (dist + 2);
|
|
11
|
if (disto > 1)
|
|
12
|
disto = 1;
|
|
13
|
image_alpha = disto;
|
|
14
|
}
|
|
15
|
}
|
|
16
|
if (con == 1)
|
|
17
|
{
|
|
18
|
global.interact = 1;
|
|
19
|
con = 2;
|
|
20
|
tempvol = caster_get_volume(global.currentsong);
|
|
21
|
}
|
|
22
|
if (con == 2)
|
|
23
|
{
|
|
24
|
global.interact = 1;
|
|
25
|
tempvol -= 0.02;
|
|
26
|
if (tempvol <= 0)
|
|
27
|
{
|
|
28
|
tempvol = 0;
|
|
29
|
con = 3;
|
|
30
|
caster_pause(global.currentsong);
|
|
31
|
}
|
|
32
|
caster_set_volume(global.currentsong, tempvol);
|
|
33
|
}
|
|
34
|
if (con == 3)
|
|
35
|
global.interact = 1;
|
|
36
|
if (con == 3 && instance_exists(OBJ_WRITER) == 0)
|
|
37
|
{
|
|
38
|
global.interact = 1;
|
|
39
|
race = caster_load("music/race.ogg");
|
|
40
|
con = 4;
|
|
41
|
alarm[4] = 15; gml_Object_obj_napstablook_farm2_Alarm_4.gml
con += 1;
|
|
42
|
}
|
|
43
|
if (con == 4)
|
|
44
|
global.interact = 1;
|
|
45
|
if (con == 5)
|
|
46
|
{
|
|
47
|
global.interact = 1;
|
|
48
|
direction = 90;
|
|
49
|
global.facing = 2;
|
|
50
|
global.msc = 0;
|
|
51
|
global.typer = 5;
|
|
52
|
global.msg[0] = \R 3...Delay 22
2...Delay 22
1...Delay 22Close MessageClose Messagescr_gettextscr_gettext
var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_napstablook_farm2_270") ;
|
|
53
|
instance_create(view_xview[0] + 60, 20, OBJ_WRITER);
|
|
54
|
con = 6;
|
|
55
|
}
|
|
56
|
if (con == 6)
|
|
57
|
global.interact = 1;
|
|
58
|
if (con == 6 && instance_exists(OBJ_WRITER) == 0)
|
|
59
|
{
|
|
60
|
bringback = 0;
|
|
61
|
caster_loop(race, 1, 1);
|
|
62
|
global.msg[0] = \R GO!!!Delay 22Close MessageClose Messagescr_gettextscr_gettext
var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_napstablook_farm2_284") ;
|
|
63
|
instance_create(view_xview[0] + 60, 20, OBJ_WRITER);
|
|
64
|
defaultspeed = -0.13;
|
|
65
|
snail[0].hspeed = defaultspeed;
|
|
66
|
snail[0].image_speed = 0.25;
|
|
67
|
snail[1].hspeed = -0.18;
|
|
68
|
snail[1].image_speed = 0.25;
|
|
69
|
snail[2].hspeed = -0.17;
|
|
70
|
snail[2].image_speed = 0.25;
|
|
71
|
con = 7;
|
|
72
|
}
|
|
73
|
if (con == 7 && instance_exists(OBJ_WRITER) == 0)
|
|
74
|
{
|
|
75
|
if (control_check_pressed(0) && blcontimer <= 15)
|
|
76
|
{
|
|
77
|
snd_stop(snd_b);
|
|
78
|
snd_play(snd_b);
|
|
79
|
if (blconyes == 1)
|
|
80
|
{
|
|
81
|
with (blcon)
|
|
82
|
instance_destroy();
|
|
83
|
with (blcon2)
|
|
84
|
instance_destroy();
|
|
85
|
}
|
|
86
|
blcon = instance_create(obj_mainchara.x, obj_mainchara.y - 10, obj_cosmeticblcon);
|
|
87
|
blcon2 = instance_create(snail[0].x, snail[0].y - 10, obj_cosmeticblcon);
|
|
88
|
snail[0].hspeed = 0;
|
|
89
|
encouragement += 1;
|
|
90
|
blconyes = 1;
|
|
91
|
blcontimer = 11 + random(8);
|
|
92
|
}
|
|
93
|
if (blcontimer <= 0 && blconyes == 1)
|
|
94
|
{
|
|
95
|
with (blcon)
|
|
96
|
instance_destroy();
|
|
97
|
with (blcon2)
|
|
98
|
instance_destroy();
|
|
99
|
blconyes = 0;
|
|
100
|
if (encouragement == 1 && snailsad == 0)
|
|
101
|
{
|
|
102
|
defaultspeed -= 0.01;
|
|
103
|
snail[0].hspeed = defaultspeed;
|
|
104
|
}
|
|
105
|
if (encouragement == 2)
|
|
106
|
snail[0].hspeed = defaultspeed;
|
|
107
|
if (encouragement >= 3)
|
|
108
|
{
|
|
109
|
defaultspeed += (0.01 * encouragement);
|
|
110
|
snail[0].hspeed = defaultspeed;
|
|
111
|
}
|
|
112
|
encouragement = 0;
|
|
113
|
}
|
|
114
|
if (snail[0].hspeed > 0 || encouragement > 30)
|
|
115
|
{
|
|
116
|
if (snail[0].hspeed > 0 || encouragement > 90)
|
|
117
|
{
|
|
118
|
snail[1].hspeed = -0.4;
|
|
119
|
snail[2].hspeed = -0.44;
|
|
120
|
}
|
|
121
|
if (snail[0].hspeed > 0 || encouragement > 70)
|
|
122
|
{
|
|
123
|
if (snail[0].sprite_index == spr_snailyellow_hopeless2)
|
|
124
|
snail[0].sprite_index = spr_snailyellow_hopeless3;
|
|
125
|
}
|
|
126
|
if (snail[0].hspeed > 0 || encouragement > 50)
|
|
127
|
{
|
|
128
|
if (snail[0].sprite_index == spr_snailyellow_hopeless)
|
|
129
|
{
|
|
130
|
snail[0].sprite_index = spr_snailyellow_hopeless2;
|
|
131
|
snailsad = 2;
|
|
132
|
}
|
|
133
|
}
|
|
134
|
if (snail[0].hspeed > 0 || encouragement > 30)
|
|
135
|
{
|
|
136
|
if (snail[0].sprite_index == spr_snailyellow)
|
|
137
|
{
|
|
138
|
snail[0].sprite_index = spr_snailyellow_hopeless;
|
|
139
|
snailsad = 1;
|
|
140
|
}
|
|
141
|
}
|
|
142
|
snail[0].hspeed = 0;
|
|
143
|
}
|
|
144
|
blcontimer -= 1;
|
|
145
|
snailtimer -= 1;
|
|
146
|
if (snail[0].x < 490)
|
|
147
|
won = 1;
|
|
148
|
if (snail[0].x < 480)
|
|
149
|
con = 8;
|
|
150
|
if (snail[1].x < 480)
|
|
151
|
{
|
|
152
|
con = 8;
|
|
153
|
if (won == 1)
|
|
154
|
won = 2;
|
|
155
|
}
|
|
156
|
if (snail[2].x < 480)
|
|
157
|
{
|
|
158
|
con = 8;
|
|
159
|
if (won == 1)
|
|
160
|
won = 2;
|
|
161
|
}
|
|
162
|
}
|
|
163
|
if (con == 8)
|
|
164
|
{
|
|
165
|
caster_free(race);
|
|
166
|
snd_play(snd_select);
|
|
167
|
global.msg[0] = \R RACE END!!!Delay 22Close MessageClose Messagescr_gettextscr_gettext
var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_napstablook_farm2_374") ;
|
|
168
|
instance_create(view_xview[0] + 60, 20, OBJ_WRITER);
|
|
169
|
caster_resume(global.currentsong);
|
|
170
|
global.msc = 0;
|
|
171
|
snail[0].hspeed = 0;
|
|
172
|
snail[1].hspeed = 0;
|
|
173
|
snail[2].hspeed = 0;
|
|
174
|
snail[0].image_speed = 0;
|
|
175
|
snail[1].image_speed = 0;
|
|
176
|
snail[2].image_speed = 0;
|
|
177
|
con = 9;
|
|
178
|
alarm[4] = 30; gml_Object_obj_napstablook_farm2_Alarm_4.gml
con += 1;
|
|
179
|
}
|
|
180
|
if (con == 10)
|
|
181
|
{
|
|
182
|
tempvol += 0.02;
|
|
183
|
if (tempvol >= 1)
|
|
184
|
{
|
|
185
|
tempvol = 1;
|
|
186
|
con = 11;
|
|
187
|
}
|
|
188
|
caster_set_volume(global.currentsong, tempvol);
|
|
189
|
}
|
|
190
|
if (con == 11)
|
|
191
|
{
|
|
192
|
direction = 180;
|
|
193
|
global.facing = 1;
|
|
194
|
if (won == 0)
|
|
195
|
{
|
|
196
|
global.msg[0] = * oh.........Delay 11
* you both tried your best...Wait for inputscr_gettextscr_gettext
var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_napstablook_farm2_402") ;
|
|
197
|
global.msg[1] = * but the snail looks
discouraged...Wait for inputscr_gettextscr_gettext
var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_napstablook_farm2_403") ;
|
|
198
|
global.msg[2] = * her best wasn't good
enough...Wait for inputscr_gettextscr_gettext
var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_napstablook_farm2_404") ;
|
|
199
|
global.msg[3] = * oh..........Wait for inputClose MessageClose Messagescr_gettextscr_gettext
var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_napstablook_farm2_405") ;
|
|
200
|
if (snailsad > 0)
|
|
201
|
{
|
|
202
|
global.msg[0] = * oh........Delay 11
* looks like you encouraged
your snail too much...Wait for inputscr_gettextscr_gettext
var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_napstablook_farm2_408") ;
|
|
203
|
global.msg[1] = * all that pressure to
succeed...Delay 11
* really got to her...Wait for inputscr_gettextscr_gettext
var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_napstablook_farm2_409") ;
|
|
204
|
global.msg[2] = * oh........Wait for inputClose MessageClose Messagescr_gettextscr_gettext
var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_napstablook_farm2_410") ;
|
|
205
|
}
|
|
206
|
}
|
|
207
|
if (won == 1)
|
|
208
|
{
|
|
209
|
global.msg[0] = * you won...Delay 11 congratulations.Wait for inputscr_gettextscr_gettext
var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_napstablook_farm2_415") ;
|
|
210
|
global.msg[1] = * as a prize,Delay 11 you get 9G.Wait for inputscr_gettextscr_gettext
var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_napstablook_farm2_416") ;
|
|
211
|
global.msg[2] = * sorry...Delay 11 we have to make
a profit somehow...Wait for inputClose MessageClose Messagescr_gettextscr_gettext
var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_napstablook_farm2_417") ;
|
|
212
|
global.gold += 9;
|
|
213
|
}
|
|
214
|
if (won == 2)
|
|
215
|
{
|
|
216
|
global.msg[0] = * your snail lost by a
thin margin.Wait for inputscr_gettextscr_gettext
var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_napstablook_farm2_422") ;
|
|
217
|
global.msg[1] = * actually,Delay 11 the snail is
under the false belief
that it won...Wait for inputscr_gettextscr_gettext
var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_napstablook_farm2_423") ;
|
|
218
|
global.msg[2] = * oh no...Delay 11 the snail is looking
over here...Wait for inputscr_gettextscr_gettext
var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_napstablook_farm2_424") ;
|
|
219
|
global.msg[3] = * here,Delay 11 i'll give you some
money...Delay 11
* act like you won...Wait for inputscr_gettextscr_gettext
var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_napstablook_farm2_426") ;
|
|
220
|
global.msg[4] = * (You got 30G.)Wait for inputClose MessageClose Messagescr_gettextscr_gettext
var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_napstablook_farm2_427") ;
|
|
221
|
global.gold += 30;
|
|
222
|
}
|
|
223
|
scr_regulartextscr_regulartext
global.typer = 5;
global.facechoice = 0;
global.faceemotion = 0;
global.msc = 0;
instance_create(0, 0, obj_dialoguer); ();
|
|
224
|
con = 12;
|
|
225
|
}
|
|
226
|
if (con == 12)
|
|
227
|
buffer = 8;
|
|
228
|
if (con == 12 && instance_exists(OBJ_WRITER) == 0)
|
|
229
|
{
|
|
230
|
bringback = 1;
|
|
231
|
global.interact = 0;
|
|
232
|
con = 13;
|
|
233
|
}
|
|
234
|
if (bringback == 1)
|
|
235
|
{
|
|
236
|
there = 0;
|
|
237
|
if (snail[0].sprite_index != spr_snailyellow)
|
|
238
|
snail[0].sprite_index = spr_snailyellow;
|
|
239
|
for (i = 0; i < 3; i += 1)
|
|
240
|
{
|
|
241
|
if (snail[i].x < snail[i].xstart)
|
|
242
|
{
|
|
243
|
snail[i].x += 4;
|
|
244
|
snail[i].image_speed = 0.334;
|
|
245
|
}
|
|
246
|
else
|
|
247
|
{
|
|
248
|
snail[i].x = snail[i].xstart;
|
|
249
|
snail[i].image_speed = 0;
|
|
250
|
there += 1;
|
|
251
|
}
|
|
252
|
}
|
|
253
|
if (there >= 3)
|
|
254
|
bringback = 2;
|
|
255
|
}
|