|
1
|
pal_swap_set(spr_lw_church_palette, 2, false);
|
|
2
|
draw_sprite(bg_church_entrance_door_open, image_index, x, y);
|
|
3
|
pal_swap_reset();
|
|
4
|
if (is_cracked || is_open)
|
|
5
|
{
|
|
6
|
var ballregionl = 310;
|
|
7
|
var ballregionr = 330;
|
|
8
|
var bally = 150;
|
|
9
|
var timer_speed = 1;
|
|
10
|
if (type == 2)
|
|
11
|
bally = 100;
|
|
12
|
if (is_cracked)
|
|
13
|
bally = 100;
|
|
14
|
if (is_open)
|
|
15
|
{
|
|
16
|
bally = 100;
|
|
17
|
timer_speed = 0.2;
|
|
18
|
}
|
|
19
|
timer++;
|
|
20
|
if (timer >= timer_speed)
|
|
21
|
{
|
|
22
|
timer = 0;
|
|
23
|
var _y = is_open ? random_range(40, 100) : bally;
|
|
24
|
var ball = scr_markerscr_marker
function scr_marker(arg0, arg1, arg2)
{
thismarker = instance_create(arg0, arg1, obj_marker);
with (thismarker)
{
sprite_index = arg2;
image_speed = 0;
}
return thismarker;
} (random_range(ballregionl, ballregionr), _y, spr_ball);
|
|
25
|
ball.image_blend = c_black;
|
|
26
|
scr_doomscr_doom
function scr_doom(arg0 = id, arg1)
{
with (instance_create_depth(0, 0, 0, obj_doom))
{
alarm[0]
target = arg0;
persistent = arg0.persistent;
}
} (ball, 60);
|
|
27
|
var randomscale = 0.3 + random(0.1);
|
|
28
|
scr_lerpvar_instancescr_lerpvar_instance
function scr_lerpvar_instance()
{
__lerpvar = instance_create(0, 0, obj_lerpvar);
__lerpvar.target = argument[0];
__lerpvar.varname = argument[1];
__lerpvar.pointa = argument[2];
__lerpvar.pointb = argument[3];
__lerpvar.maxtime = argument[4];
if (argument_count >= 6)
__lerpvar.easetype = argument[5];
if (argument_count >= 7)
__lerpvar.easeinout = argument[6];
return __lerpvar;
}
function scr_lerp_var_instance()
{
if (argument_count >= 6)
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4, argument5);
else if (argument_count >= 7)
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4, argument5, argument6);
else
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4);
}
function scr_lerp_instance_var()
{
if (argument_count >= 6)
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4, argument5);
else if (argument_count >= 7)
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4, argument5, argument6);
else
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4);
} (ball, "image_xscale", 0, randomscale, 10, -1, "out");
|
|
29
|
scr_lerpvar_instancescr_lerpvar_instance
function scr_lerpvar_instance()
{
__lerpvar = instance_create(0, 0, obj_lerpvar);
__lerpvar.target = argument[0];
__lerpvar.varname = argument[1];
__lerpvar.pointa = argument[2];
__lerpvar.pointb = argument[3];
__lerpvar.maxtime = argument[4];
if (argument_count >= 6)
__lerpvar.easetype = argument[5];
if (argument_count >= 7)
__lerpvar.easeinout = argument[6];
return __lerpvar;
}
function scr_lerp_var_instance()
{
if (argument_count >= 6)
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4, argument5);
else if (argument_count >= 7)
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4, argument5, argument6);
else
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4);
}
function scr_lerp_instance_var()
{
if (argument_count >= 6)
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4, argument5);
else if (argument_count >= 7)
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4, argument5, argument6);
else
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4);
} (ball, "image_yscale", 0, randomscale, 10, -1, "out");
|
|
30
|
scr_lerpvar_instancescr_lerpvar_instance
function scr_lerpvar_instance()
{
__lerpvar = instance_create(0, 0, obj_lerpvar);
__lerpvar.target = argument[0];
__lerpvar.varname = argument[1];
__lerpvar.pointa = argument[2];
__lerpvar.pointb = argument[3];
__lerpvar.maxtime = argument[4];
if (argument_count >= 6)
__lerpvar.easetype = argument[5];
if (argument_count >= 7)
__lerpvar.easeinout = argument[6];
return __lerpvar;
}
function scr_lerp_var_instance()
{
if (argument_count >= 6)
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4, argument5);
else if (argument_count >= 7)
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4, argument5, argument6);
else
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4);
}
function scr_lerp_instance_var()
{
if (argument_count >= 6)
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4, argument5);
else if (argument_count >= 7)
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4, argument5, argument6);
else
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4);
} (ball, "image_alpha", 0.4, 0, 60);
|
|
31
|
ball.image_xscale = 0;
|
|
32
|
ball.image_yscale = 0;
|
|
33
|
ball.depth = depth - 100;
|
|
34
|
var _gravity = is_open ? 0.1 : 0.2;
|
|
35
|
ball.gravity = -_gravity;
|
|
36
|
ball.friction = 0.1;
|
|
37
|
var _range = is_open ? 6 : 3;
|
|
38
|
ball.hspeed = random_range(-_range, _range);
|
|
39
|
}
|
|
40
|
}
|
|
41
|
else
|
|
42
|
{
|
|
43
|
var ballregionl = 310;
|
|
44
|
var ballregionr = 330;
|
|
45
|
var bally = 100;
|
|
46
|
timer++;
|
|
47
|
if (timer >= 4)
|
|
48
|
{
|
|
49
|
timer = 0;
|
|
50
|
var ball = scr_markerscr_marker
function scr_marker(arg0, arg1, arg2)
{
thismarker = instance_create(arg0, arg1, obj_marker);
with (thismarker)
{
sprite_index = arg2;
image_speed = 0;
}
return thismarker;
} (random_range(ballregionl, ballregionr), bally, spr_ball);
|
|
51
|
ball.image_blend = c_black;
|
|
52
|
scr_doomscr_doom
function scr_doom(arg0 = id, arg1)
{
with (instance_create_depth(0, 0, 0, obj_doom))
{
alarm[0]
target = arg0;
persistent = arg0.persistent;
}
} (ball, 60);
|
|
53
|
var randomscale = 0.3 + random(0.1);
|
|
54
|
scr_lerpvar_instancescr_lerpvar_instance
function scr_lerpvar_instance()
{
__lerpvar = instance_create(0, 0, obj_lerpvar);
__lerpvar.target = argument[0];
__lerpvar.varname = argument[1];
__lerpvar.pointa = argument[2];
__lerpvar.pointb = argument[3];
__lerpvar.maxtime = argument[4];
if (argument_count >= 6)
__lerpvar.easetype = argument[5];
if (argument_count >= 7)
__lerpvar.easeinout = argument[6];
return __lerpvar;
}
function scr_lerp_var_instance()
{
if (argument_count >= 6)
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4, argument5);
else if (argument_count >= 7)
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4, argument5, argument6);
else
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4);
}
function scr_lerp_instance_var()
{
if (argument_count >= 6)
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4, argument5);
else if (argument_count >= 7)
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4, argument5, argument6);
else
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4);
} (ball, "image_xscale", 0, randomscale, 10, -1, "out");
|
|
55
|
scr_lerpvar_instancescr_lerpvar_instance
function scr_lerpvar_instance()
{
__lerpvar = instance_create(0, 0, obj_lerpvar);
__lerpvar.target = argument[0];
__lerpvar.varname = argument[1];
__lerpvar.pointa = argument[2];
__lerpvar.pointb = argument[3];
__lerpvar.maxtime = argument[4];
if (argument_count >= 6)
__lerpvar.easetype = argument[5];
if (argument_count >= 7)
__lerpvar.easeinout = argument[6];
return __lerpvar;
}
function scr_lerp_var_instance()
{
if (argument_count >= 6)
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4, argument5);
else if (argument_count >= 7)
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4, argument5, argument6);
else
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4);
}
function scr_lerp_instance_var()
{
if (argument_count >= 6)
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4, argument5);
else if (argument_count >= 7)
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4, argument5, argument6);
else
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4);
} (ball, "image_yscale", 0, randomscale, 10, -1, "out");
|
|
56
|
scr_lerpvar_instancescr_lerpvar_instance
function scr_lerpvar_instance()
{
__lerpvar = instance_create(0, 0, obj_lerpvar);
__lerpvar.target = argument[0];
__lerpvar.varname = argument[1];
__lerpvar.pointa = argument[2];
__lerpvar.pointb = argument[3];
__lerpvar.maxtime = argument[4];
if (argument_count >= 6)
__lerpvar.easetype = argument[5];
if (argument_count >= 7)
__lerpvar.easeinout = argument[6];
return __lerpvar;
}
function scr_lerp_var_instance()
{
if (argument_count >= 6)
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4, argument5);
else if (argument_count >= 7)
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4, argument5, argument6);
else
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4);
}
function scr_lerp_instance_var()
{
if (argument_count >= 6)
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4, argument5);
else if (argument_count >= 7)
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4, argument5, argument6);
else
return scr_lerpvar_instance(argument0, argument1, argument2, argument3, argument4);
} (ball, "image_alpha", 0.4, 0, 60);
|
|
57
|
ball.image_xscale = 0;
|
|
58
|
ball.image_yscale = 0;
|
|
59
|
ball.depth = 300000;
|
|
60
|
ball.gravity = -0.2;
|
|
61
|
ball.friction = 0.1;
|
|
62
|
ball.hspeed = random_range(-3, 3);
|
|
63
|
}
|
|
64
|
}
|