Deltarune (Chapter 4) script viewer

← back to main script listing

gml_Object_obj_organ_vertical_pillar_manager_Alarm_0

(view raw script w/o annotations or w/e)
1
for (var a = 0; a < sameattack; a++)
2
{
3
    if (a == 0)
4
    {
5
        var temp_list = ds_list_create();
6
        ds_list_add(temp_list, 0, 1, 2, 3, 4, 5);
7
        ds_list_delete(temp_list, ds_list_find_index(temp_list, first_segment));
8
        if (sameattack)
9
            ds_list_delete(temp_list, ds_list_find_index(temp_list, second_segment));
10
        ds_list_shuffle(temp_list);
11
        segment = ds_list_find_value(temp_list, 0);
12
        ds_list_destroy(temp_list);
13
    }
14
    else
15
    {
16
        segment += (2 + irandom(2));
17
    }
18
    segment %= 6;
19
    if (a == 0)
20
        first_segment = segment;
21
    if (a == 1)
22
        second_segment = segment;
23
    var xpos = 0;
24
    var ypos = 0;
25
    if (difficulty > 0)
26
    {
27
        xpos = 
scr_get_box
scr_get_box

function
scr_get_box(arg0)
{ switch (arg0) { case 0: return obj_growtangle.x + (obj_growtangle.sprite_width * 0.5); break; case 1: return obj_growtangle.y - (obj_growtangle.sprite_height * 0.5); break; case 2: return obj_growtangle.x - (obj_growtangle.sprite_width * 0.5); break; case 3: return obj_growtangle.y + (obj_growtangle.sprite_height * 0.5); break; case 4: return obj_growtangle.x; break; case 5: return obj_growtangle.y; break; return false; } }
(4);
28
        ypos = 
scr_get_box
scr_get_box

function
scr_get_box(arg0)
{ switch (arg0) { case 0: return obj_growtangle.x + (obj_growtangle.sprite_width * 0.5); break; case 1: return obj_growtangle.y - (obj_growtangle.sprite_height * 0.5); break; case 2: return obj_growtangle.x - (obj_growtangle.sprite_width * 0.5); break; case 3: return obj_growtangle.y + (obj_growtangle.sprite_height * 0.5); break; case 4: return obj_growtangle.x; break; case 5: return obj_growtangle.y; break; return false; } }
(1) + 12.5 + (25 * segment);
29
    }
30
    else
31
    {
32
        xpos = 
scr_get_box
scr_get_box

function
scr_get_box(arg0)
{ switch (arg0) { case 0: return obj_growtangle.x + (obj_growtangle.sprite_width * 0.5); break; case 1: return obj_growtangle.y - (obj_growtangle.sprite_height * 0.5); break; case 2: return obj_growtangle.x - (obj_growtangle.sprite_width * 0.5); break; case 3: return obj_growtangle.y + (obj_growtangle.sprite_height * 0.5); break; case 4: return obj_growtangle.x; break; case 5: return obj_growtangle.y; break; return false; } }
(2) + 12.5 + (25 * segment);
33
        ypos = 
scr_get_box
scr_get_box

function
scr_get_box(arg0)
{ switch (arg0) { case 0: return obj_growtangle.x + (obj_growtangle.sprite_width * 0.5); break; case 1: return obj_growtangle.y - (obj_growtangle.sprite_height * 0.5); break; case 2: return obj_growtangle.x - (obj_growtangle.sprite_width * 0.5); break; case 3: return obj_growtangle.y + (obj_growtangle.sprite_height * 0.5); break; case 4: return obj_growtangle.x; break; case 5: return obj_growtangle.y; break; return false; } }
(5);
34
    }
35
    with (
scr_fire_bullet
scr_fire_bullet

function
scr_fire_bullet(arg0, arg1, arg2, arg3, arg4, arg5 = -4, arg6 = 0, arg7 = false, arg8 = 87135)
{ var bullet; if (arg8 != 87135) bullet = instance_create_depth(arg0, arg1, arg8, arg2); else bullet = instance_create(arg0, arg1, arg2); with (bullet) { direction = arg3; speed = arg4; if (arg5 != -4) sprite_index = arg5; updateimageangle = arg6; if (arg6) image_angle = arg3; if (arg7) { with (other)
scr_bullet_inherit(other.id);
} } return bullet; } function scr_fire_bullet_colorize(arg0, arg1, arg2, arg3, arg4, arg5, arg6, arg7 = 0) { var bullet = instance_create(arg0, arg1, arg2); with (bullet) { direction = arg3; speed = arg4; sprite_index = arg5; image_blend = arg6; updateimageangle = arg7; if (arg7) image_angle = arg3; } return bullet; }
(xpos, ypos, obj_organ_enemy_vertical_pillar, 0, 0, spr_organ_bar))
36
    {
37
        image_speed = 0;
38
        image_xscale = 0;
39
        image_yscale = 2;
40
        destroyonhit = false;
41
        active = false;
42
        image_blend = c_gray;
43
        parentid = other.creatorid;
44
        damage = 56;
45
        target = other.target;
46
        if (other.difficulty > 0)
47
        {
48
            green = 1;
49
            image_blend = c_lime;
50
            image_angle = 90;
51
        }
52
        if (other.difficulty == 2)
53
            chorus = 1;
54
        
scr_lerpvar
scr_lerpvar

function
scr_lerpvar()
{ if (argument_count < 6) ___lerpvar =
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3]);
else ___lerpvar =
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3], argument[4], argument[5]);
return ___lerpvar; } function scr_lerpvar_respect() { if (argument_count < 6) ___lerpvar =
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3]);
else ___lerpvar =
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3], argument[4], argument[5]);
___lerpvar.respectglobalinteract = true; return ___lerpvar; }
("image_xscale", 0, 0.4, 13, 3, "in");
55
        
scr_script_delayed
scr_script_delayed

function
scr_script_delayed()
{ var __scriptdelay = instance_create(0, 0, obj_script_delayed); __scriptdelay.script = argument[0]; __scriptdelay.alarm[0] = argument[1]; __scriptdelay.target = id; for (var __i = 0; __i < (argument_count - 2); __i++) __scriptdelay.script_arg[__i] = argument[__i + 2]; __scriptdelay.arg_count = argument_count - 2; return __scriptdelay; }
(scr_lerpvar, 13, "image_xscale", 0.4, 1.25, 3, -1, "out");
56
        if (a == 0)
57
            
scr_script_delayed
scr_script_delayed

function
scr_script_delayed()
{ var __scriptdelay = instance_create(0, 0, obj_script_delayed); __scriptdelay.script = argument[0]; __scriptdelay.alarm[0] = argument[1]; __scriptdelay.target = id; for (var __i = 0; __i < (argument_count - 2); __i++) __scriptdelay.script_arg[__i] = argument[__i + 2]; __scriptdelay.arg_count = argument_count - 2; return __scriptdelay; }
(snd_play, 13, 289, 1, 2);
58
        for (var c = 0; c < (6 + (other.pop * 2)); c++)
59
        {
60
            with (
scr_fire_bullet
scr_fire_bullet

function
scr_fire_bullet(arg0, arg1, arg2, arg3, arg4, arg5 = -4, arg6 = 0, arg7 = false, arg8 = 87135)
{ var bullet; if (arg8 != 87135) bullet = instance_create_depth(arg0, arg1, arg8, arg2); else bullet = instance_create(arg0, arg1, arg2); with (bullet) { direction = arg3; speed = arg4; if (arg5 != -4) sprite_index = arg5; updateimageangle = arg6; if (arg6) image_angle = arg3; if (arg7) { with (other)
scr_bullet_inherit(other.id);
} } return bullet; } function scr_fire_bullet_colorize(arg0, arg1, arg2, arg3, arg4, arg5, arg6, arg7 = 0) { var bullet = instance_create(arg0, arg1, arg2); with (bullet) { direction = arg3; speed = arg4; sprite_index = arg5; image_blend = arg6; updateimageangle = arg7; if (arg7) image_angle = arg3; } return bullet; }
(x, y, obj_bulletparent, 0, 0, spr_organ_bar))
61
            {
62
                active = false;
63
                im_a_bar = true;
64
                damage = 56;
65
                target = other.target;
66
                depth = other.depth + 1;
67
                if (other.chorus == 1)
68
                    image_blend = c_lime;
69
                else
70
                    image_blend = c_gray;
71
                image_speed = 0;
72
                image_alpha = 0.5;
73
                image_xscale = 0;
74
                image_yscale = 2;
75
                image_angle = other.image_angle;
76
                
scr_script_delayed
scr_script_delayed

function
scr_script_delayed()
{ var __scriptdelay = instance_create(0, 0, obj_script_delayed); __scriptdelay.script = argument[0]; __scriptdelay.alarm[0] = argument[1]; __scriptdelay.target = id; for (var __i = 0; __i < (argument_count - 2); __i++) __scriptdelay.script_arg[__i] = argument[__i + 2]; __scriptdelay.arg_count = argument_count - 2; return __scriptdelay; }
(scr_lerpvar, c * 3, "image_xscale", 0, 2, 8);
77
                
scr_script_delayed
scr_script_delayed

function
scr_script_delayed()
{ var __scriptdelay = instance_create(0, 0, obj_script_delayed); __scriptdelay.script = argument[0]; __scriptdelay.alarm[0] = argument[1]; __scriptdelay.target = id; for (var __i = 0; __i < (argument_count - 2); __i++) __scriptdelay.script_arg[__i] = argument[__i + 2]; __scriptdelay.arg_count = argument_count - 2; return __scriptdelay; }
(scr_lerpvar, c * 3, "image_alpha", 0.25, 0, 8, 5, "in");
78
            }
79
        }
80
        
scr_script_delayed
scr_script_delayed

function
scr_script_delayed()
{ var __scriptdelay = instance_create(0, 0, obj_script_delayed); __scriptdelay.script = argument[0]; __scriptdelay.alarm[0] = argument[1]; __scriptdelay.target = id; for (var __i = 0; __i < (argument_count - 2); __i++) __scriptdelay.script_arg[__i] = argument[__i + 2]; __scriptdelay.arg_count = argument_count - 2; return __scriptdelay; }
(scr_var, 16, "active", true);
81
        
scr_script_delayed
scr_script_delayed

function
scr_script_delayed()
{ var __scriptdelay = instance_create(0, 0, obj_script_delayed); __scriptdelay.script = argument[0]; __scriptdelay.alarm[0] = argument[1]; __scriptdelay.target = id; for (var __i = 0; __i < (argument_count - 2); __i++) __scriptdelay.script_arg[__i] = argument[__i + 2]; __scriptdelay.arg_count = argument_count - 2; return __scriptdelay; }
(scr_var, 16, "image_speed", 1);
82
        if (image_blend != c_lime)
83
            
scr_script_delayed
scr_script_delayed

function
scr_script_delayed()
{ var __scriptdelay = instance_create(0, 0, obj_script_delayed); __scriptdelay.script = argument[0]; __scriptdelay.alarm[0] = argument[1]; __scriptdelay.target = id; for (var __i = 0; __i < (argument_count - 2); __i++) __scriptdelay.script_arg[__i] = argument[__i + 2]; __scriptdelay.arg_count = argument_count - 2; return __scriptdelay; }
(scr_var, 16, "image_blend", 16777215);
84
        if (image_blend != c_lime)
85
            
scr_script_delayed
scr_script_delayed

function
scr_script_delayed()
{ var __scriptdelay = instance_create(0, 0, obj_script_delayed); __scriptdelay.script = argument[0]; __scriptdelay.alarm[0] = argument[1]; __scriptdelay.target = id; for (var __i = 0; __i < (argument_count - 2); __i++) __scriptdelay.script_arg[__i] = argument[__i + 2]; __scriptdelay.arg_count = argument_count - 2; return __scriptdelay; }
(scr_var, other.interval, "image_blend", 8421504);
86
        
scr_script_delayed
scr_script_delayed

function
scr_script_delayed()
{ var __scriptdelay = instance_create(0, 0, obj_script_delayed); __scriptdelay.script = argument[0]; __scriptdelay.alarm[0] = argument[1]; __scriptdelay.target = id; for (var __i = 0; __i < (argument_count - 2); __i++) __scriptdelay.script_arg[__i] = argument[__i + 2]; __scriptdelay.arg_count = argument_count - 2; return __scriptdelay; }
(scr_var, other.interval, "active", false);
87
        
scr_script_delayed
scr_script_delayed

function
scr_script_delayed()
{ var __scriptdelay = instance_create(0, 0, obj_script_delayed); __scriptdelay.script = argument[0]; __scriptdelay.alarm[0] = argument[1]; __scriptdelay.target = id; for (var __i = 0; __i < (argument_count - 2); __i++) __scriptdelay.script_arg[__i] = argument[__i + 2]; __scriptdelay.arg_count = argument_count - 2; return __scriptdelay; }
(scr_lerpvar, other.interval, "image_xscale", 1, 0, 4);
88
        if (image_blend != c_lime && other.onlybars)
89
        {
90
            var randoff = choose(12.5, 137.5);
91
            for (a = 0; a < 6; a++)
92
                
scr_script_delayed
scr_script_delayed

function
scr_script_delayed()
{ var __scriptdelay = instance_create(0, 0, obj_script_delayed); __scriptdelay.script = argument[0]; __scriptdelay.alarm[0] = argument[1]; __scriptdelay.target = id; for (var __i = 0; __i < (argument_count - 2); __i++) __scriptdelay.script_arg[__i] = argument[__i + 2]; __scriptdelay.arg_count = argument_count - 2; return __scriptdelay; }
(scr_fire_bullet, 16, x, (y - 75) + (((25 * a) + randoff) % 150), 1438, (a % 2) * 180, 0);
93
        }
94
        alarm[0]
 = other.interval + 4;
gml_Object_obj_organ_vertical_pillar_manager_Alarm_0.gml

for (var a = 0; a < sameattack; a++) { if (a == 0) { var temp_list = ds_list_create(); ds_list_add(temp_list, 0, 1, 2, 3, 4, 5); ds_list_delete(temp_list, ds_list_find_index(temp_list, first_segment)); if (sameattack) ds_list_delete(temp_list, ds_list_find_index(temp_list, second_segment)); ds_list_shuffle(temp_list); segment = ds_list_find_value(temp_list, 0); ds_list_destroy(temp_list); } else { segment += (2 + irandom(2)); } segment %= 6; if (a == 0) first_segment = segment; if (a == 1) second_segment = segment; var xpos = 0; var ypos = 0; if (difficulty > 0) { xpos =
scr_get_box(4);
ypos =
scr_get_box(1) + 12.5 + (25 * segment);
} else { xpos =
scr_get_box(2) + 12.5 + (25 * segment);
ypos =
scr_get_box(5);
} with (
scr_fire_bullet(xpos, ypos, obj_organ_enemy_vertical_pillar, 0, 0, spr_organ_bar))
{ image_speed = 0; image_xscale = 0; image_yscale = 2; destroyonhit = false; active = false; image_blend = c_gray; parentid = other.creatorid; damage = 56; target = other.target; if (other.difficulty > 0) { green = 1; image_blend = c_lime; image_angle = 90; } if (other.difficulty == 2) chorus = 1;
scr_lerpvar("image_xscale", 0, 0.4, 13, 3, "in");
scr_script_delayed(scr_lerpvar, 13, "image_xscale", 0.4, 1.25, 3, -1, "out");
if (a == 0)
scr_script_delayed(snd_play, 13, 289, 1, 2);
for (var c = 0; c < (6 + (other.pop * 2)); c++) { with (
scr_fire_bullet(x, y, obj_bulletparent, 0, 0, spr_organ_bar))
{ active = false; im_a_bar = true; damage = 56; target = other.target; depth = other.depth + 1; if (other.chorus == 1) image_blend = c_lime; else image_blend = c_gray; image_speed = 0; image_alpha = 0.5; image_xscale = 0; image_yscale = 2; image_angle = other.image_angle;
scr_script_delayed(scr_lerpvar, c * 3, "image_xscale", 0, 2, 8);
scr_script_delayed(scr_lerpvar, c * 3, "image_alpha", 0.25, 0, 8, 5, "in");
} }
scr_script_delayed(scr_var, 16, "active", true);
scr_script_delayed(scr_var, 16, "image_speed", 1);
if (image_blend != c_lime)
scr_script_delayed(scr_var, 16, "image_blend", 16777215);
if (image_blend != c_lime)
scr_script_delayed(scr_var, other.interval, "image_blend", 8421504);
scr_script_delayed(scr_var, other.interval, "active", false);
scr_script_delayed(scr_lerpvar, other.interval, "image_xscale", 1, 0, 4);
if (image_blend != c_lime && other.onlybars) { var randoff = choose(12.5, 137.5); for (a = 0; a < 6; a++)
scr_script_delayed(scr_fire_bullet, 16, x, (y - 75) + (((25 * a) + randoff) % 150), 1438, (a % 2) * 180, 0);
} alarm[0]
 = other.interval + 4;
} } alarm[0]
 = interval;
95
    }
96
}
97
alarm[0]
 = interval;
gml_Object_obj_organ_vertical_pillar_manager_Alarm_0.gml

for (var a = 0; a < sameattack; a++) { if (a == 0) { var temp_list = ds_list_create(); ds_list_add(temp_list, 0, 1, 2, 3, 4, 5); ds_list_delete(temp_list, ds_list_find_index(temp_list, first_segment)); if (sameattack) ds_list_delete(temp_list, ds_list_find_index(temp_list, second_segment)); ds_list_shuffle(temp_list); segment = ds_list_find_value(temp_list, 0); ds_list_destroy(temp_list); } else { segment += (2 + irandom(2)); } segment %= 6; if (a == 0) first_segment = segment; if (a == 1) second_segment = segment; var xpos = 0; var ypos = 0; if (difficulty > 0) { xpos =
scr_get_box(4);
ypos =
scr_get_box(1) + 12.5 + (25 * segment);
} else { xpos =
scr_get_box(2) + 12.5 + (25 * segment);
ypos =
scr_get_box(5);
} with (
scr_fire_bullet(xpos, ypos, obj_organ_enemy_vertical_pillar, 0, 0, spr_organ_bar))
{ image_speed = 0; image_xscale = 0; image_yscale = 2; destroyonhit = false; active = false; image_blend = c_gray; parentid = other.creatorid; damage = 56; target = other.target; if (other.difficulty > 0) { green = 1; image_blend = c_lime; image_angle = 90; } if (other.difficulty == 2) chorus = 1;
scr_lerpvar("image_xscale", 0, 0.4, 13, 3, "in");
scr_script_delayed(scr_lerpvar, 13, "image_xscale", 0.4, 1.25, 3, -1, "out");
if (a == 0)
scr_script_delayed(snd_play, 13, 289, 1, 2);
for (var c = 0; c < (6 + (other.pop * 2)); c++) { with (
scr_fire_bullet(x, y, obj_bulletparent, 0, 0, spr_organ_bar))
{ active = false; im_a_bar = true; damage = 56; target = other.target; depth = other.depth + 1; if (other.chorus == 1) image_blend = c_lime; else image_blend = c_gray; image_speed = 0; image_alpha = 0.5; image_xscale = 0; image_yscale = 2; image_angle = other.image_angle;
scr_script_delayed(scr_lerpvar, c * 3, "image_xscale", 0, 2, 8);
scr_script_delayed(scr_lerpvar, c * 3, "image_alpha", 0.25, 0, 8, 5, "in");
} }
scr_script_delayed(scr_var, 16, "active", true);
scr_script_delayed(scr_var, 16, "image_speed", 1);
if (image_blend != c_lime)
scr_script_delayed(scr_var, 16, "image_blend", 16777215);
if (image_blend != c_lime)
scr_script_delayed(scr_var, other.interval, "image_blend", 8421504);
scr_script_delayed(scr_var, other.interval, "active", false);
scr_script_delayed(scr_lerpvar, other.interval, "image_xscale", 1, 0, 4);
if (image_blend != c_lime && other.onlybars) { var randoff = choose(12.5, 137.5); for (a = 0; a < 6; a++)
scr_script_delayed(scr_fire_bullet, 16, x, (y - 75) + (((25 * a) + randoff) % 150), 1438, (a % 2) * 180, 0);
} alarm[0]
 = other.interval + 4;
} } alarm[0]
 = interval;