Deltarune (Chapter 4) script viewer

← back to main script listing

gml_Object_obj_organnote_manager_Alarm_1

(view raw script w/o annotations or w/e)
1
var v_pos;
2
if (sameattacker == 0)
3
    v_pos = 
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) - 40;
4
else
5
    v_pos = 
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; } }
(3) + 40;
6
if (bullet_counter < ds_list_size(origin_list))
7
{
8
    special = choose(-3, -2, -1, 0, 1, 2);
9
    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; }
(creatorid.x, creatorid.y, obj_regularbullet, 0, 0, spr_musical_notes))
10
    {
11
        sprite_index = spr_musical_notes;
12
        image_index = ds_list_find_value(other.origin_list, other.bullet_counter);
13
        image_speed = 0;
14
        damage = other.damage;
15
        target = other.target;
16
        grazepoints = 8;
17
        
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; }
("x", x, (
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) - 20) + (20 * ds_list_find_value(other.gap_list, other.bullet_counter)), 12, 0, "out");
18
        
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; }
("y", y, v_pos + (10 * other.special), 12, -3, "out");
19
        active = false;
20
        ds_list_add(other.bullet_list, id);
21
        if (other.special == -3)
22
            snd_play(snd_organikk_note_f);
23
        if (other.special == -2)
24
            snd_play(snd_organikk_note_e);
25
        if (other.special == -1)
26
            snd_play(snd_organikk_note_d);
27
        if (other.special == 0)
28
            snd_play(snd_organikk_note_c);
29
        if (other.special == 1)
30
            snd_play(snd_organikk_note_b);
31
        if (other.special == 2)
32
            snd_play(snd_organikk_note_a);
33
    }
34
    bullet_counter++;
35
    if (repeating)
36
        alarm[1]
 = 2;
gml_Object_obj_organnote_manager_Alarm_1.gml

var v_pos; if (sameattacker == 0) v_pos =
scr_get_box(1) - 40;
else v_pos =
scr_get_box(3) + 40;
if (bullet_counter < ds_list_size(origin_list)) { special = choose(-3, -2, -1, 0, 1, 2); with (
scr_fire_bullet(creatorid.x, creatorid.y, obj_regularbullet, 0, 0, spr_musical_notes))
{ sprite_index = spr_musical_notes; image_index = ds_list_find_value(other.origin_list, other.bullet_counter); image_speed = 0; damage = other.damage; target = other.target; grazepoints = 8;
scr_lerpvar("x", x, (
scr_get_box(2) - 20) + (20 * ds_list_find_value(other.gap_list, other.bullet_counter)), 12, 0, "out");
scr_lerpvar("y", y, v_pos + (10 * other.special), 12, -3, "out");
active = false; ds_list_add(other.bullet_list, id); if (other.special == -3) snd_play(snd_organikk_note_f); if (other.special == -2) snd_play(snd_organikk_note_e); if (other.special == -1) snd_play(snd_organikk_note_d); if (other.special == 0) snd_play(snd_organikk_note_c); if (other.special == 1) snd_play(snd_organikk_note_b); if (other.special == 2) snd_play(snd_organikk_note_a); } bullet_counter++; if (repeating) alarm[1]
 = 2;
else alarm[1]
 = 3;
} else { ds_list_shuffle(bullet_list); if (repeating) alarm[2]
 = 1;
else alarm[2]
 = 12;
}
37
    else
38
        alarm[1]
 = 3;
gml_Object_obj_organnote_manager_Alarm_1.gml

var v_pos; if (sameattacker == 0) v_pos =
scr_get_box(1) - 40;
else v_pos =
scr_get_box(3) + 40;
if (bullet_counter < ds_list_size(origin_list)) { special = choose(-3, -2, -1, 0, 1, 2); with (
scr_fire_bullet(creatorid.x, creatorid.y, obj_regularbullet, 0, 0, spr_musical_notes))
{ sprite_index = spr_musical_notes; image_index = ds_list_find_value(other.origin_list, other.bullet_counter); image_speed = 0; damage = other.damage; target = other.target; grazepoints = 8;
scr_lerpvar("x", x, (
scr_get_box(2) - 20) + (20 * ds_list_find_value(other.gap_list, other.bullet_counter)), 12, 0, "out");
scr_lerpvar("y", y, v_pos + (10 * other.special), 12, -3, "out");
active = false; ds_list_add(other.bullet_list, id); if (other.special == -3) snd_play(snd_organikk_note_f); if (other.special == -2) snd_play(snd_organikk_note_e); if (other.special == -1) snd_play(snd_organikk_note_d); if (other.special == 0) snd_play(snd_organikk_note_c); if (other.special == 1) snd_play(snd_organikk_note_b); if (other.special == 2) snd_play(snd_organikk_note_a); } bullet_counter++; if (repeating) alarm[1]
 = 2;
else alarm[1]
 = 3;
} else { ds_list_shuffle(bullet_list); if (repeating) alarm[2]
 = 1;
else alarm[2]
 = 12;
}
39
}
40
else
41
{
42
    ds_list_shuffle(bullet_list);
43
    if (repeating)
44
        alarm[2]
 = 1;
gml_Object_obj_organnote_manager_Alarm_2.gml

var played = false; repeat (simulnotes) { if (ds_list_size(bullet_list)) { var cur_note = ds_list_find_value(bullet_list, 0); with (cur_note) { shway_counter = choose(0, 10 * pi); active = true; direction =
scr_at_player(x, y);
scr_lerpvar("speed", -5, 0, 10, 0, "in");
if (other.sameattacker == 0) scr_var_delayed("direction", 270 + irandom_range(-5, 5), 12); else scr_var_delayed("direction", 90 + irandom_range(-5, 5), 12);
scr_script_delayed(scr_afterimage_grow, 12);
if (other.sameattacker == 0 && played < 2) played++; if (image_index == 0) {
scr_script_delayed(scr_var, 12, "speed", 4);
scr_script_delayed(scr_script_repeat, 12, scr_bullet_shway, 240, 1);
} if (image_index == 1) {
scr_script_delayed(scr_script_repeat, 12, scr_bullet_shway, 240, 1);
scr_script_delayed(scr_var, 12, "speed", 5);
} if (image_index == 2) {
scr_script_delayed(scr_script_repeat, 12, scr_bullet_shway, 240, 1);
scr_script_delayed(scr_var, 12, "speed", 3.75);
} } ds_list_delete(bullet_list, 0); } } if (ds_list_size(bullet_list)) { alarm[2]
 = interval;
} else { alarm[1]
 = 1;
bullet_counter = 0; repeating = true; ds_list_clear(origin_list); if (sameattack == 1) { ds_list_add(origin_list, 0, 0, 0, 1, 1, 1, 2, 2, 2); ds_list_add(origin_list, irandom(2)); } else { ds_list_add(origin_list, 0, 0, 1, 1, 2, 2); } ds_list_shuffle(origin_list); ds_list_clear(gap_list); ds_list_add(gap_list, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9); ds_list_shuffle(gap_list); if (sameattack == 2) { repeat (4) ds_list_delete(gap_list, 0); } ds_list_sort(gap_list, true); }
45
    else
46
        alarm[2]
 = 12;
gml_Object_obj_organnote_manager_Alarm_2.gml

var played = false; repeat (simulnotes) { if (ds_list_size(bullet_list)) { var cur_note = ds_list_find_value(bullet_list, 0); with (cur_note) { shway_counter = choose(0, 10 * pi); active = true; direction =
scr_at_player(x, y);
scr_lerpvar("speed", -5, 0, 10, 0, "in");
if (other.sameattacker == 0) scr_var_delayed("direction", 270 + irandom_range(-5, 5), 12); else scr_var_delayed("direction", 90 + irandom_range(-5, 5), 12);
scr_script_delayed(scr_afterimage_grow, 12);
if (other.sameattacker == 0 && played < 2) played++; if (image_index == 0) {
scr_script_delayed(scr_var, 12, "speed", 4);
scr_script_delayed(scr_script_repeat, 12, scr_bullet_shway, 240, 1);
} if (image_index == 1) {
scr_script_delayed(scr_script_repeat, 12, scr_bullet_shway, 240, 1);
scr_script_delayed(scr_var, 12, "speed", 5);
} if (image_index == 2) {
scr_script_delayed(scr_script_repeat, 12, scr_bullet_shway, 240, 1);
scr_script_delayed(scr_var, 12, "speed", 3.75);
} } ds_list_delete(bullet_list, 0); } } if (ds_list_size(bullet_list)) { alarm[2]
 = interval;
} else { alarm[1]
 = 1;
bullet_counter = 0; repeating = true; ds_list_clear(origin_list); if (sameattack == 1) { ds_list_add(origin_list, 0, 0, 0, 1, 1, 1, 2, 2, 2); ds_list_add(origin_list, irandom(2)); } else { ds_list_add(origin_list, 0, 0, 1, 1, 2, 2); } ds_list_shuffle(origin_list); ds_list_clear(gap_list); ds_list_add(gap_list, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9); ds_list_shuffle(gap_list); if (sameattack == 2) { repeat (4) ds_list_delete(gap_list, 0); } ds_list_sort(gap_list, true); }
47
}