|
1
|
var cx = camerax();
|
|
2
|
scr_populatecharsscr_populatechars
function scr_populatechars()
{
if (!variable_instance_exists(id, "kris"))
kris = 0;
if (!variable_instance_exists(id, "ralsei"))
ralsei = 0;
if (!variable_instance_exists(id, "susie"))
susie = 0;
if (!variable_instance_exists(id, "noelle"))
noelle = 0;
if (kris == 0)
{
with (obj_mainchara)
other.kris = id;
}
if (susie == 0)
{
with (obj_caterpillarchara)
{
if (name == "susie")
other.susie = id;
}
}
if (ralsei == 0)
{
with (obj_caterpillarchara)
{
if (name == "ralsei")
other.ralsei = id;
}
}
if (noelle == 0)
{
with (obj_caterpillarchara)
{
if (name == "noelle")
other.noelle = id;
}
}
} ();
|
|
3
|
if (!init)
|
|
4
|
{
|
|
5
|
var _end = scr_heromarkerscr_heromarker
function scr_heromarker(arg0 = "", arg1 = "")
{
var ____foundmarker = -4;
var xpos = -1;
var ypos = -1;
var objindextocheck = 1365;
if (string_pos("kr", arg0) != 0)
objindextocheck = 544;
if (string_pos("su", arg0) != 0)
objindextocheck = 522;
if (string_pos("ra", arg0) != 0)
objindextocheck = 75;
if (string_pos("no", arg0) != 0)
objindextocheck = 933;
if (string_pos("gen", arg0) != 0)
objindextocheck = 1365;
with (objindextocheck)
{
if (variable_instance_exists(id, "extflag"))
{
if (extflag == arg1)
____foundmarker = id;
}
}
if (instance_exists(____foundmarker))
{
xpos = ____foundmarker.x;
ypos = ____foundmarker.y;
}
if (____foundmarker == -4)
{
debug_message("scr_heromarker(" + arg0 + "," + arg1 + ") Object Not Found");
return [-4, -4, -4];
}
return [xpos, ypos, ____foundmarker];
}
function scr_genmarker(arg0 = "")
{
var marker = -4;
with (obj_genmarker)
{
if (extflag == arg0)
marker = id;
}
return marker;
} (undefined, "blackend");
|
|
6
|
var _start = scr_heromarkerscr_heromarker
function scr_heromarker(arg0 = "", arg1 = "")
{
var ____foundmarker = -4;
var xpos = -1;
var ypos = -1;
var objindextocheck = 1365;
if (string_pos("kr", arg0) != 0)
objindextocheck = 544;
if (string_pos("su", arg0) != 0)
objindextocheck = 522;
if (string_pos("ra", arg0) != 0)
objindextocheck = 75;
if (string_pos("no", arg0) != 0)
objindextocheck = 933;
if (string_pos("gen", arg0) != 0)
objindextocheck = 1365;
with (objindextocheck)
{
if (variable_instance_exists(id, "extflag"))
{
if (extflag == arg1)
____foundmarker = id;
}
}
if (instance_exists(____foundmarker))
{
xpos = ____foundmarker.x;
ypos = ____foundmarker.y;
}
if (____foundmarker == -4)
{
debug_message("scr_heromarker(" + arg0 + "," + arg1 + ") Object Not Found");
return [-4, -4, -4];
}
return [xpos, ypos, ____foundmarker];
}
function scr_genmarker(arg0 = "")
{
var marker = -4;
with (obj_genmarker)
{
if (extflag == arg0)
marker = id;
}
return marker;
} (undefined, "blackstart");
|
|
7
|
blackloc[0] = _end[0];
|
|
8
|
blackloc[1] = _start[0];
|
|
9
|
init = 1;
|
|
10
|
var lpo = scr_heromarkerscr_heromarker
function scr_heromarker(arg0 = "", arg1 = "")
{
var ____foundmarker = -4;
var xpos = -1;
var ypos = -1;
var objindextocheck = 1365;
if (string_pos("kr", arg0) != 0)
objindextocheck = 544;
if (string_pos("su", arg0) != 0)
objindextocheck = 522;
if (string_pos("ra", arg0) != 0)
objindextocheck = 75;
if (string_pos("no", arg0) != 0)
objindextocheck = 933;
if (string_pos("gen", arg0) != 0)
objindextocheck = 1365;
with (objindextocheck)
{
if (variable_instance_exists(id, "extflag"))
{
if (extflag == arg1)
____foundmarker = id;
}
}
if (instance_exists(____foundmarker))
{
xpos = ____foundmarker.x;
ypos = ____foundmarker.y;
}
if (____foundmarker == -4)
{
debug_message("scr_heromarker(" + arg0 + "," + arg1 + ") Object Not Found");
return [-4, -4, -4];
}
return [xpos, ypos, ____foundmarker];
}
function scr_genmarker(arg0 = "")
{
var marker = -4;
with (obj_genmarker)
{
if (extflag == arg0)
marker = id;
}
return marker;
} (undefined, "lockedinpoint");
|
|
11
|
lockpoint = lpo[0];
|
|
12
|
var pos = scr_heromarkerscr_heromarker
function scr_heromarker(arg0 = "", arg1 = "")
{
var ____foundmarker = -4;
var xpos = -1;
var ypos = -1;
var objindextocheck = 1365;
if (string_pos("kr", arg0) != 0)
objindextocheck = 544;
if (string_pos("su", arg0) != 0)
objindextocheck = 522;
if (string_pos("ra", arg0) != 0)
objindextocheck = 75;
if (string_pos("no", arg0) != 0)
objindextocheck = 933;
if (string_pos("gen", arg0) != 0)
objindextocheck = 1365;
with (objindextocheck)
{
if (variable_instance_exists(id, "extflag"))
{
if (extflag == arg1)
____foundmarker = id;
}
}
if (instance_exists(____foundmarker))
{
xpos = ____foundmarker.x;
ypos = ____foundmarker.y;
}
if (____foundmarker == -4)
{
debug_message("scr_heromarker(" + arg0 + "," + arg1 + ") Object Not Found");
return [-4, -4, -4];
}
return [xpos, ypos, ____foundmarker];
}
function scr_genmarker(arg0 = "")
{
var marker = -4;
with (obj_genmarker)
{
if (extflag == arg0)
marker = id;
}
return marker;
} (undefined, "germark");
|
|
13
|
gerson = scr_marker_extscr_marker_ext
function scr_marker_ext(arg0, arg1, arg2, arg3 = 1, arg4 = 1, arg5 = 0, arg6 = 0, arg7 = 16777215, arg8 = depth, arg9 = false, arg10 = -1, arg11 = 1)
{
var thismarker = instance_create(arg0, arg1, obj_marker);
with (thismarker)
{
depth = arg8;
sprite_index = arg2;
image_speed = arg5;
image_xscale = arg3;
image_yscale = arg4;
image_index = arg6;
image_blend = arg7;
image_alpha = arg11;
if (arg9)
scr_depth_alt();
}
if (arg10 > 0)
scr_doom(thismarker, arg10);
return thismarker;
}
function scr_marker_fromasset(arg0, arg1 = depth, arg2 = false)
{
if (is_undefined(arg0))
{
debug_message("Warning: scr_marker_fromasset() sprite_instance didn't exist");
return -4;
}
var sprite = layer_sprite_get_sprite(arg0);
var index = layer_sprite_get_index(arg0);
var imagespeed = layer_sprite_get_speed(arg0);
var xscale = layer_sprite_get_xscale(arg0);
var yscale = layer_sprite_get_yscale(arg0);
var angle = layer_sprite_get_angle(arg0);
var blend = layer_sprite_get_blend(arg0);
var alpha = layer_sprite_get_alpha(arg0);
var xloc = layer_sprite_get_x(arg0);
var yloc = layer_sprite_get_y(arg0);
var thismarker = instance_create_depth(xloc, yloc, arg1, obj_marker);
with (thismarker)
{
sprite_index = sprite;
image_index = index;
image_speed = imagespeed;
image_xscale = xscale;
image_yscale = yscale;
image_angle = angle;
image_blend = blend;
image_alpha = alpha;
if (arg2)
scr_depth_alt(id, arg2);
}
return thismarker;
}
function scr_assetgetinfo(arg0)
{
var sprite = layer_sprite_get_sprite(arg0);
var index = layer_sprite_get_index(arg0);
var xloc = layer_sprite_get_x(arg0);
var yloc = layer_sprite_get_y(arg0);
var xscale = layer_sprite_get_xscale(arg0);
var yscale = layer_sprite_get_yscale(arg0);
var angle = layer_sprite_get_angle(arg0);
var blend = layer_sprite_get_blend(arg0);
var alpha = layer_sprite_get_alpha(arg0);
var imagespeed = layer_sprite_get_speed(arg0);
return [sprite, index, xloc, yloc, xscale, yscale, angle, blend, alpha, imagespeed];
} (pos[0], pos[1], spr_gerson_walk_armor_left, 2, 2, 0, 0, c_black, undefined, 1);
|
|
14
|
if (global.tempflag[90] == 1)
|
|
15
|
{
|
|
16
|
pos = scr_heromarkerscr_heromarker
function scr_heromarker(arg0 = "", arg1 = "")
{
var ____foundmarker = -4;
var xpos = -1;
var ypos = -1;
var objindextocheck = 1365;
if (string_pos("kr", arg0) != 0)
objindextocheck = 544;
if (string_pos("su", arg0) != 0)
objindextocheck = 522;
if (string_pos("ra", arg0) != 0)
objindextocheck = 75;
if (string_pos("no", arg0) != 0)
objindextocheck = 933;
if (string_pos("gen", arg0) != 0)
objindextocheck = 1365;
with (objindextocheck)
{
if (variable_instance_exists(id, "extflag"))
{
if (extflag == arg1)
____foundmarker = id;
}
}
if (instance_exists(____foundmarker))
{
xpos = ____foundmarker.x;
ypos = ____foundmarker.y;
}
if (____foundmarker == -4)
{
debug_message("scr_heromarker(" + arg0 + "," + arg1 + ") Object Not Found");
return [-4, -4, -4];
}
return [xpos, ypos, ____foundmarker];
}
function scr_genmarker(arg0 = "")
{
var marker = -4;
with (obj_genmarker)
{
if (extflag == arg0)
marker = id;
}
return marker;
} ("kris", "warp1");
|
|
17
|
setxy(pos[0], pos[1], 1049);
|
|
18
|
setxy(pos[0], pos[1], 1235);
|
|
19
|
scr_caterpillar_interpolatescr_caterpillar_interpolate
function scr_caterpillar_interpolate(arg0 = "none")
{
if (arg0 == "all")
{
with (obj_caterpillarchara)
scr_caterpillar_interpolate_old();
}
else if (arg0 == "none")
{
if (object_index == obj_caterpillarchara)
scr_caterpillar_interpolate_old();
}
else
{
with (obj_caterpillarchara)
{
if (name == arg0)
scr_caterpillar_interpolate_old();
}
}
}
function scr_caterinterp(arg0 = "none")
{
scr_caterpillar_interpolate(arg0);
}
function scr_caterpillar_interpolate_old()
{
_newfacing = scr_facing_letter_to_number(scr_get_cardinal_direction(point_direction(x, y, obj_mainchara.x, obj_mainchara.y)));
remx[0] = obj_mainchara.x;
remy[0] = obj_mainchara.y;
facing[0] = _newfacing;
for (_iaia = target; _iaia > 0; _iaia -= 1)
{
remx[_iaia] = lerp(obj_mainchara.x, x, _iaia / target);
if (global.darkzone == 1)
remy[_iaia] = lerp(obj_mainchara.y, y + 16, _iaia / target);
else
remy[_iaia] = lerp(obj_mainchara.y, y + 6, _iaia / target);
facing[_iaia] = _newfacing;
}
} ("all");
|
|
20
|
global.facing = pos[2].image_index;
|
|
21
|
global.tempflag[90] = 0;
|
|
22
|
}
|
|
23
|
}
|
|
24
|
if (dolock == 0 && cx > 0)
|
|
25
|
{
|
|
26
|
if (cx <= lockpoint)
|
|
27
|
{
|
|
28
|
dolock = 1;
|
|
29
|
layer_set_visible("ASSETS_HIDEME", 1);
|
|
30
|
layer_set_visible("TILES_HIDEME", 1);
|
|
31
|
var gen = scr_genmarker("blockoff");
|
|
32
|
blockoff = instance_create(gen.x, gen.y, obj_solidblocksized);
|
|
33
|
scr_sizeexactscr_sizeexact
function scr_sizeexact(arg0, arg1, arg2 = id)
{
with (arg2)
{
if (!sprite_exists(sprite_index))
{
debug_message("Can't size, no sprite");
exit;
}
var _w = sprite_get_width(sprite_index);
var _h = sprite_get_width(sprite_index);
image_xscale = arg0 / _w;
image_yscale = arg1 / _h;
}
} (gen.sprite_width, gen.sprite_height, blockoff);
|
|
34
|
}
|
|
35
|
}
|
|
36
|
if (con == 0)
|
|
37
|
{
|
|
38
|
if (scr_trigcheckscr_trigcheck
function scr_trigcheck(arg0)
{
var ____trig = 0;
if (is_string(arg0))
{
with (obj_trigger)
{
if (extflag == arg0)
{
if (place_meeting(x, y, obj_mainchara))
____trig++;
}
}
}
return ____trig;
}
function scr_trigcheck_ext(arg0, arg1 = id)
{
var ____trig = 0;
if (is_string(arg0))
{
with (obj_trigger)
{
if (extflag == arg0)
{
if (place_meeting(x, y, arg1))
____trig++;
}
}
}
return ____trig;
} ("cut1"))
|
|
39
|
{
|
|
40
|
con = 1;
|
|
41
|
global.interact = 1;
|
|
42
|
cutscene_master = scr_cutscene_makescr_cutscene_make
function scr_cutscene_make()
{
_cutscene_master = instance_create(0, 0, obj_cutscene_master);
_cutscene_master.master_object = id;
return _cutscene_master;
} ();
|
|
43
|
c_msgruncheck(1);
|
|
44
|
c_speakerc_speaker
function c_speaker(arg0)
{
c_cmd("speaker", arg0, 0, 0, 0);
} ("susie");
|
|
45
|
c_msgsetlocc_msgsetloc
function c_msgsetloc(arg0, arg1, arg2)
{
var msg_index = arg0;
var english = arg1;
var localized_string_id = arg2;
var str = english;
if (!is_english())
str = scr_84_get_lang_string(localized_string_id);
c_msgset(msg_index, str);
} (0, Face C* Damn,Delay 11 it's dark in here...Wait for inputClose Message"\\EC* Damn^1, it's dark in here.../%", "obj_dw_churchb_fireplace_slash_Step_0_gml_56_0" );
|
|
46
|
c_talk_waitc_talk_wait
function c_talk_wait()
{
c_talk();
c_waittalk();
}
function c_talkwait()
{
c_talk_wait();
} ();
|
|
47
|
var campos = scr_heromarkerscr_heromarker
function scr_heromarker(arg0 = "", arg1 = "")
{
var ____foundmarker = -4;
var xpos = -1;
var ypos = -1;
var objindextocheck = 1365;
if (string_pos("kr", arg0) != 0)
objindextocheck = 544;
if (string_pos("su", arg0) != 0)
objindextocheck = 522;
if (string_pos("ra", arg0) != 0)
objindextocheck = 75;
if (string_pos("no", arg0) != 0)
objindextocheck = 933;
if (string_pos("gen", arg0) != 0)
objindextocheck = 1365;
with (objindextocheck)
{
if (variable_instance_exists(id, "extflag"))
{
if (extflag == arg1)
____foundmarker = id;
}
}
if (instance_exists(____foundmarker))
{
xpos = ____foundmarker.x;
ypos = ____foundmarker.y;
}
if (____foundmarker == -4)
{
debug_message("scr_heromarker(" + arg0 + "," + arg1 + ") Object Not Found");
return [-4, -4, -4];
}
return [xpos, ypos, ____foundmarker];
}
function scr_genmarker(arg0 = "")
{
var marker = -4;
with (obj_genmarker)
{
if (extflag == arg0)
marker = id;
}
return marker;
} (undefined, "cam1");
|
|
48
|
var pantime = 30;
|
|
49
|
c_pannablec_pannable
function c_pannable(arg0)
{
c_cmd("pannable", arg0, 0, 0, 0);
} ();
|
|
50
|
c_panc_pan
function c_pan(arg0, arg1, arg2)
{
c_cmd("pan", arg0, arg1, arg2, 0);
} (campos[0], campos[1], pantime);
|
|
51
|
c_waitc_wait
function c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
} (pantime);
|
|
52
|
c_waitc_wait
function c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
} (12);
|
|
53
|
c_msgruncheck(0);
|
|
54
|
c_speakerc_speaker
function c_speaker(arg0)
{
c_cmd("speaker", arg0, 0, 0, 0);
} ("susie");
|
|
55
|
c_msgsetlocc_msgsetloc
function c_msgsetloc(arg0, arg1, arg2)
{
var msg_index = arg0;
var english = arg1;
var localized_string_id = arg2;
var str = english;
if (!is_english())
str = scr_84_get_lang_string(localized_string_id);
c_msgset(msg_index, str);
} (0, Face Z* Hey!Wait for inputClose Message"\\EZ* Hey!/%", "obj_dw_churchb_fireplace_slash_Step_0_gml_69_0" );
|
|
56
|
c_talkc_talk
function c_talk()
{
c_cmd("talk", 0, 0, 0, 0);
} ();
|
|
57
|
c_var_instancec_var_instance
function c_var_instance(arg0, arg1, arg2)
{
c_cmd_x("var", arg0, arg1, arg2, 0, 0, 0);
} (gerson, "hspeed", -4);
|
|
58
|
c_var_instancec_var_instance
function c_var_instance(arg0, arg1, arg2)
{
c_cmd_x("var", arg0, arg1, arg2, 0, 0, 0);
} (gerson, "image_speed", 0.25);
|
|
59
|
c_wait_talkc_wait_talk
function c_wait_talk()
{
c_cmd("waitdialoguer", 0, 0, 0, 0);
} ();
|
|
60
|
c_panc_pan
function c_pan(arg0, arg1, arg2)
{
c_cmd("pan", arg0, arg1, arg2, 0);
} (cx, cameray(), pantime);
|
|
61
|
c_waitc_wait
function c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
} (pantime);
|
|
62
|
c_speakerc_speaker
function c_speaker(arg0)
{
c_cmd("speaker", arg0, 0, 0, 0);
} ("susie");
|
|
63
|
c_msgsetlocc_msgsetloc
function c_msgsetloc(arg0, arg1, arg2)
{
var msg_index = arg0;
var english = arg1;
var localized_string_id = arg2;
var str = english;
if (!is_english())
str = scr_84_get_lang_string(localized_string_id);
c_msgset(msg_index, str);
} (0, Face Z* Hey,Delay 11 old man!Delay 11 The hell are you going!?Wait for input"\\EZ* Hey^1, old man^1! The hell are you going!?/", "obj_dw_churchb_fireplace_slash_Step_0_gml_81_0" );
|
|
64
|
c_msgnextlocc_msgnextloc
function c_msgnextloc(arg0, arg1)
{
var str = arg0;
var localized_string_id = arg1;
if (!is_english())
str = scr_84_get_lang_string(localized_string_id);
c_msgnext(str);
} (Face Z* C'mon,Delay 11 Kris!Delay 11 After him!Wait for inputClose Message"\\EZ* C'mon^1, Kris^1! After him!/%", "obj_dw_churchb_fireplace_slash_Step_0_gml_82_0" );
|
|
65
|
c_talk_waitc_talk_wait
function c_talk_wait()
{
c_talk();
c_waittalk();
}
function c_talkwait()
{
c_talk_wait();
} ();
|
|
66
|
c_actortocaterpillarc_actortocaterpillar
function c_actortocaterpillar()
{
c_cmd("actortocaterpillar", 0, 0, 0, 0);
} ();
|
|
67
|
c_actortokrisc_actortokris
function c_actortokris()
{
c_cmd("actortokris", 0, 0, 0, 0);
} ();
|
|
68
|
c_pannablec_pannable
function c_pannable(arg0)
{
c_cmd("pannable", arg0, 0, 0, 0);
} (0);
|
|
69
|
c_waitc_wait
function c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
} (1);
|
|
70
|
c_terminatekillactorsc_terminatekillactors
function c_terminatekillactors()
{
c_cmd("terminatekillactors", 0, 0, 0, 0);
} ();
|
|
71
|
}
|
|
72
|
}
|
|
73
|
if (con == 1 && !instance_exists(obj_cutscene_master))
|
|
74
|
{
|
|
75
|
with (gerson)
|
|
76
|
{
|
|
77
|
image_speed = 0;
|
|
78
|
image_index = 0;
|
|
79
|
hspeed = 0;
|
|
80
|
var pos = scr_heromarkerscr_heromarker
function scr_heromarker(arg0 = "", arg1 = "")
{
var ____foundmarker = -4;
var xpos = -1;
var ypos = -1;
var objindextocheck = 1365;
if (string_pos("kr", arg0) != 0)
objindextocheck = 544;
if (string_pos("su", arg0) != 0)
objindextocheck = 522;
if (string_pos("ra", arg0) != 0)
objindextocheck = 75;
if (string_pos("no", arg0) != 0)
objindextocheck = 933;
if (string_pos("gen", arg0) != 0)
objindextocheck = 1365;
with (objindextocheck)
{
if (variable_instance_exists(id, "extflag"))
{
if (extflag == arg1)
____foundmarker = id;
}
}
if (instance_exists(____foundmarker))
{
xpos = ____foundmarker.x;
ypos = ____foundmarker.y;
}
if (____foundmarker == -4)
{
debug_message("scr_heromarker(" + arg0 + "," + arg1 + ") Object Not Found");
return [-4, -4, -4];
}
return [xpos, ypos, ____foundmarker];
}
function scr_genmarker(arg0 = "")
{
var marker = -4;
with (obj_genmarker)
{
if (extflag == arg0)
marker = id;
}
return marker;
} (undefined, "germark2");
|
|
81
|
setxy(pos[0], pos[1]);
|
|
82
|
}
|
|
83
|
global.interact = 0;
|
|
84
|
con = 2;
|
|
85
|
}
|
|
86
|
if (con == 2 && gerson.x > (cx + 60))
|
|
87
|
{
|
|
88
|
gerson.hspeed = -8;
|
|
89
|
gerson.image_speed = 0.25;
|
|
90
|
con = 3;
|
|
91
|
}
|