|
1
|
scr_board_populatevarsscr_board_populatevars
function scr_board_populatevars()
{
if (!variable_instance_exists(id, "kris"))
kris = 0;
if (!variable_instance_exists(id, "susie"))
susie = 0;
if (!variable_instance_exists(id, "ralsei"))
ralsei = 0;
if (kris == 0)
{
with (obj_mainchara_board)
{
if (name == "kris")
other.kris = id;
}
}
if (ralsei == 0)
{
with (obj_mainchara_board)
{
if (name == "ralsei")
other.ralsei = id;
}
}
if (susie == 0)
{
with (obj_mainchara_board)
{
if (name == "susie")
other.susie = id;
}
}
} ();
|
|
2
|
scr_gameshow_populatevarsscr_gameshow_populatevars
function scr_gameshow_populatevars()
{
if (!variable_instance_exists(id, "kr_real"))
kr_real = 0;
if (!variable_instance_exists(id, "su_real"))
su_real = 0;
if (!variable_instance_exists(id, "ra_real"))
ra_real = 0;
if (!variable_instance_exists(id, "tenna"))
tenna = 0;
if (kr_real == 0)
{
with (obj_mainchara)
other.kr_real = id;
}
if (su_real == 0)
{
with (obj_caterpillarchara)
{
if (name == "susie")
other.su_real = id;
}
}
if (ra_real == 0)
{
with (obj_caterpillarchara)
{
if (name == "ralsei")
other.ra_real = id;
}
}
if (tenna == 0)
{
with (obj_actor_tenna)
other.tenna = id;
}
} ();
|
|
3
|
if (active == 1)
|
|
4
|
{
|
|
5
|
if (kris.boat == true)
|
|
6
|
boated = true;
|
|
7
|
if (boated)
|
|
8
|
{
|
|
9
|
suwalk = 1;
|
|
10
|
supickgrass = false;
|
|
11
|
supickgrasstimer = 0;
|
|
12
|
targx = 0;
|
|
13
|
targy = 0;
|
|
14
|
}
|
|
15
|
if (boated == true && kris.boat == false && susie.canfreemove == true)
|
|
16
|
{
|
|
17
|
boated = false;
|
|
18
|
if (susie.x < 350)
|
|
19
|
supickgrass = true;
|
|
20
|
else
|
|
21
|
scr_pathfind_to_pointscr_pathfind_to_point
function scr_pathfind_to_point(arg0, arg1, arg2)
{
var __destx = arg1 + 16;
var __desty = arg2 + 16;
if (arg1 < 12 && arg2 < 8)
{
__destx = 128 + (32 * arg1) + 16;
__desty = 64 + (32 * arg2) + 16;
}
with (obj_mainchara_board)
{
if (name == arg0)
{
path_end();
is_moving_timer = 0;
is_moving = true;
path_target_x = __destx;
path_target_y = __desty;
follow = false;
if (argument_count == 4)
{
if (argument3 != -1)
path_end_facing = argument3;
}
if (argument_count == 5)
{
if (argument4 != -1)
allow_diagonals = argument4;
}
}
}
} ("susie", 10, 6, 0);
|
|
22
|
}
|
|
23
|
if (supickgrass == true)
|
|
24
|
{
|
|
25
|
if (supickgrasstimer == 0)
|
|
26
|
{
|
|
27
|
var targ = 0;
|
|
28
|
var targfound = 0;
|
|
29
|
with (obj_board_grabbablegrass)
|
|
30
|
{
|
|
31
|
if (active && !targfound)
|
|
32
|
{
|
|
33
|
targfound = true;
|
|
34
|
targ = id;
|
|
35
|
}
|
|
36
|
}
|
|
37
|
if (i_ex(targ) && global.flag[1052 tenna_deleted_grass] == 0)
|
|
38
|
{
|
|
39
|
targx = targ.x;
|
|
40
|
targy = targ.y - 10;
|
|
41
|
scr_pathfind_to_pointscr_pathfind_to_point
function scr_pathfind_to_point(arg0, arg1, arg2)
{
var __destx = arg1 + 16;
var __desty = arg2 + 16;
if (arg1 < 12 && arg2 < 8)
{
__destx = 128 + (32 * arg1) + 16;
__desty = 64 + (32 * arg2) + 16;
}
with (obj_mainchara_board)
{
if (name == arg0)
{
path_end();
is_moving_timer = 0;
is_moving = true;
path_target_x = __destx;
path_target_y = __desty;
follow = false;
if (argument_count == 4)
{
if (argument3 != -1)
path_end_facing = argument3;
}
if (argument_count == 5)
{
if (argument4 != -1)
allow_diagonals = argument4;
}
}
}
} ("susie", targx, targy, 0);
|
|
42
|
supickgrasstimer = 1;
|
|
43
|
}
|
|
44
|
else
|
|
45
|
{
|
|
46
|
debug_print("no more grass");
|
|
47
|
scr_pathfind_to_pointscr_pathfind_to_point
function scr_pathfind_to_point(arg0, arg1, arg2)
{
var __destx = arg1 + 16;
var __desty = arg2 + 16;
if (arg1 < 12 && arg2 < 8)
{
__destx = 128 + (32 * arg1) + 16;
__desty = 64 + (32 * arg2) + 16;
}
with (obj_mainchara_board)
{
if (name == arg0)
{
path_end();
is_moving_timer = 0;
is_moving = true;
path_target_x = __destx;
path_target_y = __desty;
follow = false;
if (argument_count == 4)
{
if (argument3 != -1)
path_end_facing = argument3;
}
if (argument_count == 5)
{
if (argument4 != -1)
allow_diagonals = argument4;
}
}
}
} ("susie", 4, 5, 2);
|
|
48
|
supickgrasstimer = 999;
|
|
49
|
}
|
|
50
|
}
|
|
51
|
if (supickgrasstimer == 1)
|
|
52
|
{
|
|
53
|
if (scr_board_checklocationscr_board_checklocation
function scr_board_checklocation()
{
var _name = argument0;
var _xloc = argument1;
var _yloc = argument2;
if (_xloc < 12)
_xloc = board_tilex(_xloc);
if (_yloc < 12)
_yloc = board_tiley(_yloc);
var _tol = 4;
if (argument_count == 4)
_tol = argument3;
var targ = 0;
with (obj_mainchara_board)
{
if (name == _name)
targ = id;
}
if (!i_ex(targ))
{
debug_message("target does not exist");
return false;
}
if (abs(targ.x - _xloc) < _tol && abs(targ.y - _yloc) < _tol)
return true;
} ("susie", targx, targy, 1))
|
|
54
|
{
|
|
55
|
scr_pathfind_endscr_pathfind_end
function scr_pathfind_end(arg0)
{
with (obj_mainchara_board)
{
if (name == arg0)
{
path_end();
path_target_x = -1;
path_target_y = -1;
is_moving_timer = 0;
is_moving = false;
}
}
} ("susie");
|
|
56
|
scr_play_recordingscr_play_recording
function scr_play_recording(arg0, arg1)
{
with (obj_mainchara_board)
{
if (name == arg0)
{
susierecordcon = 2;
susierecordcount = 0;
susierecordstring = arg1;
susierecordsave = false;
}
}
} ("susie", "0101");
|
|
57
|
supickgrasstimer = -1;
|
|
58
|
scr_delay_var("supickgrasstimer", 0, 15);
|
|
59
|
}
|
|
60
|
}
|
|
61
|
}
|
|
62
|
if (con == 0 && obj_board_camera.con == 0)
|
|
63
|
{
|
|
64
|
if (talk == 0)
|
|
65
|
{
|
|
66
|
timer++;
|
|
67
|
if (timer == 15)
|
|
68
|
{
|
|
69
|
timer = 0;
|
|
70
|
tenna.bounce = 1;
|
|
71
|
var tetalk = stringsetloc(The pier!#Like the ocean,#of the city!"The pier!#Like the ocean,#of the city!", "obj_b3dock2_slash_Step_0_gml_94_0" );
|
|
72
|
scr_couchtalkscr_couchtalk
function scr_couchclear(arg0)
{
with (obj_couchwriter)
{
if (speaker == arg0)
instance_destroy();
}
}
function scr_couchtalk(arg0, arg1)
{
var ix = -1;
var iy = -1;
if (argument_count >= 6)
{
ix = argument4;
iy = argument5;
}
var couchtext = instance_create_depth(ix, iy, 5000, obj_couchwriter);
couchtext.mystring = arg0;
couchtext.speaker = arg1;
if (argument_count >= 3)
couchtext.cleartext = argument2;
if (argument_count >= 4)
couchtext.drawtime = argument3;
if (argument_count >= 7)
couchtext.customsnd = argument6;
if (argument_count >= 8)
couchtext.customcolor = argument7;
if (argument_count >= 9)
couchtext.talkrate = argument8;
if (argument_count >= 10)
couchtext.talklength = argument9;
return couchtext;
} (tetalk, "tenna", 2, 60);
|
|
73
|
talk = 1;
|
|
74
|
}
|
|
75
|
}
|
|
76
|
}
|
|
77
|
if (!kris.boat && suwalk == 0 && obj_board_camera.con == 0)
|
|
78
|
{
|
|
79
|
suwalktimer++;
|
|
80
|
if (suwalktimer == 1)
|
|
81
|
ralsei.follow = 1;
|
|
82
|
if (suwalktimer == 15)
|
|
83
|
{
|
|
84
|
if (susie.x == 128)
|
|
85
|
scr_pathfind_to_pointscr_pathfind_to_point
function scr_pathfind_to_point(arg0, arg1, arg2)
{
var __destx = arg1 + 16;
var __desty = arg2 + 16;
if (arg1 < 12 && arg2 < 8)
{
__destx = 128 + (32 * arg1) + 16;
__desty = 64 + (32 * arg2) + 16;
}
with (obj_mainchara_board)
{
if (name == arg0)
{
path_end();
is_moving_timer = 0;
is_moving = true;
path_target_x = __destx;
path_target_y = __desty;
follow = false;
if (argument_count == 4)
{
if (argument3 != -1)
path_end_facing = argument3;
}
if (argument_count == 5)
{
if (argument4 != -1)
allow_diagonals = argument4;
}
}
}
} ("susie", 10, choose(3, 4, 5), 3);
|
|
86
|
if (susie.x == 480)
|
|
87
|
scr_pathfind_to_pointscr_pathfind_to_point
function scr_pathfind_to_point(arg0, arg1, arg2)
{
var __destx = arg1 + 16;
var __desty = arg2 + 16;
if (arg1 < 12 && arg2 < 8)
{
__destx = 128 + (32 * arg1) + 16;
__desty = 64 + (32 * arg2) + 16;
}
with (obj_mainchara_board)
{
if (name == arg0)
{
path_end();
is_moving_timer = 0;
is_moving = true;
path_target_x = __destx;
path_target_y = __desty;
follow = false;
if (argument_count == 4)
{
if (argument3 != -1)
path_end_facing = argument3;
}
if (argument_count == 5)
{
if (argument4 != -1)
allow_diagonals = argument4;
}
}
}
} ("susie", choose(1, 2, 3), 1, 0);
|
|
88
|
if (susie.y == 64)
|
|
89
|
{
|
|
90
|
var rand = choose(0, 1);
|
|
91
|
if (rand)
|
|
92
|
scr_pathfind_to_pointscr_pathfind_to_point
function scr_pathfind_to_point(arg0, arg1, arg2)
{
var __destx = arg1 + 16;
var __desty = arg2 + 16;
if (arg1 < 12 && arg2 < 8)
{
__destx = 128 + (32 * arg1) + 16;
__desty = 64 + (32 * arg2) + 16;
}
with (obj_mainchara_board)
{
if (name == arg0)
{
path_end();
is_moving_timer = 0;
is_moving = true;
path_target_x = __destx;
path_target_y = __desty;
follow = false;
if (argument_count == 4)
{
if (argument3 != -1)
path_end_facing = argument3;
}
if (argument_count == 5)
{
if (argument4 != -1)
allow_diagonals = argument4;
}
}
}
} ("susie", 10, choose(3, 4, 5), 3);
|
|
93
|
else
|
|
94
|
scr_pathfind_to_pointscr_pathfind_to_point
function scr_pathfind_to_point(arg0, arg1, arg2)
{
var __destx = arg1 + 16;
var __desty = arg2 + 16;
if (arg1 < 12 && arg2 < 8)
{
__destx = 128 + (32 * arg1) + 16;
__desty = 64 + (32 * arg2) + 16;
}
with (obj_mainchara_board)
{
if (name == arg0)
{
path_end();
is_moving_timer = 0;
is_moving = true;
path_target_x = __destx;
path_target_y = __desty;
follow = false;
if (argument_count == 4)
{
if (argument3 != -1)
path_end_facing = argument3;
}
if (argument_count == 5)
{
if (argument4 != -1)
allow_diagonals = argument4;
}
}
}
} ("susie", choose(1, 2, 3), 1, 0);
|
|
95
|
}
|
|
96
|
}
|
|
97
|
}
|
|
98
|
}
|
|
99
|
else
|
|
100
|
{
|
|
101
|
suwalk = 0;
|
|
102
|
suwalktimer = 0;
|
|
103
|
}
|