Undertale Yellow script viewer - gml_Object_obj_battle_boss_attacking_code_Alarm

gml_Object_obj_battle_boss_attacking_code_Alarm_1

var game_mode = global.game_mode

var battle_enemy_name = global.battle_enemy_name

var enemy_missed = false

if instance_exists(obj_text_damage_count)

    with (obj_text_damage_count)

        instance_destroy()

if instance_exists(obj_text_miss)

    enemy_missed = true

    with (obj_text_miss)

        instance_destroy()

with (obj_target_bar_battle)

    instance_destroy()

if instance_exists(obj_battle_hp_enemy_attacking_parent)

    with (obj_battle_hp_enemy_attacking_parent)

        instance_destroy()

if (global.current_hp_enemy < 0)

    global.current_hp_enemy = 0

if (global.current_hp_enemy == 0)

    with (obj_battle_generator)

        audio_extend = false

    audio_stop_all()

    if (game_mode == "customs")

        script_execute(gml_Script_scr_create_quote_bubble_battle_defeat)

        instance_create(0, 0, obj_quote_defeat)

    else if (global.game_mode == "yellow")

        switch battle_enemy_name

            case "ceroba genocide":

                obj_ceroba_body.death_sprite = true

                scr_audio_fade_outscr_audio_fade_out

function scr_audio_fade_out(argument0, argument1) //gml_Script_scr_audio_fade_out
{
    var snd = argument0
    var fade_len = argument1
    if (!audio_is_playing(snd))
        return false;
    audio_sound_gain(snd, 0, fade_len)
    if instance_exists(obj_audio_fade_helper)
    {
        with (obj_audio_fade_helper)
        {
            if (audio_to_fade == snd)
                return false;
        }
    }
    with (instance_create(0, 0, obj_audio_fade_helper))
        audio_to_fade = snd
}
(mus_trial_by_fury, 500)

                break

            case "starlo":

                obj_starlo_boss_body.death_sprite = true

                scr_audio_fade_outscr_audio_fade_out

function scr_audio_fade_out(argument0, argument1) //gml_Script_scr_audio_fade_out
{
    var snd = argument0
    var fade_len = argument1
    if (!audio_is_playing(snd))
        return false;
    audio_sound_gain(snd, 0, fade_len)
    if instance_exists(obj_audio_fade_helper)
    {
        with (obj_audio_fade_helper)
        {
            if (audio_to_fade == snd)
                return false;
        }
    }
    with (instance_create(0, 0, obj_audio_fade_helper))
        audio_to_fade = snd
}
(mus_showdown, 500)

                break

            case "decibat":

            case "micro froggit":

                global.enemy_dead = true

                instance_create(0, 0, obj_dialogue_battle_win_genocide)

                audio_play_sound(snd_monster_damage_death, 20, false)

                break

            case "axis":

                obj_axis_body.death_sprite = true

                scr_audio_fade_outscr_audio_fade_out

function scr_audio_fade_out(argument0, argument1) //gml_Script_scr_audio_fade_out
{
    var snd = argument0
    var fade_len = argument1
    if (!audio_is_playing(snd))
        return false;
    audio_sound_gain(snd, 0, fade_len)
    if instance_exists(obj_audio_fade_helper)
    {
        with (obj_audio_fade_helper)
        {
            if (audio_to_fade == snd)
                return false;
        }
    }
    with (instance_create(0, 0, obj_audio_fade_helper))
        audio_to_fade = snd
}
(mus_guns_blazing, 500)

                break

            case "axis genocide":

                obj_axis_body_geno.alarm[0] = 50

                break

            case "guardener":

                scr_audio_fade_outscr_audio_fade_out

function scr_audio_fade_out(argument0, argument1) //gml_Script_scr_audio_fade_out
{
    var snd = argument0
    var fade_len = argument1
    if (!audio_is_playing(snd))
        return false;
    audio_sound_gain(snd, 0, fade_len)
    if instance_exists(obj_audio_fade_helper)
    {
        with (obj_audio_fade_helper)
        {
            if (audio_to_fade == snd)
                return false;
        }
    }
    with (instance_create(0, 0, obj_audio_fade_helper))
        audio_to_fade = snd
}
(mus_guardener_theme, 500)

                obj_guardener_body.death_sprite = true

                break

            case "ceroba":

                obj_battle_enemy_ceroba_phase_2_outro.scene += 1

                break

            case "el bailador":

                if (global.route != 3)

                    script_execute(gml_Script_scr_create_quote_bubble_battle_defeat)

                    instance_create(0, 0, obj_quote_defeat)

                else

                    global.enemy_dead = true

                    instance_create(0, 0, obj_dialogue_battle_win_genocide)

                    audio_play_sound(snd_monster_damage_death, 20, false)

                break

            case "martlet genocide final":

                break

            default:

                script_execute(gml_Script_scr_create_quote_bubble_battle_defeat)

                instance_create(0, 0, obj_quote_defeat)

else

    if (enemy_missed == false)

        global.enemy_sparing = false

    scr_determine_special_effect_enemyscr_determine_special_effect_enemy

function scr_determine_special_effect_enemy(argument0) //gml_Script_scr_determine_special_effect_enemy
{
    var battle_enemy_name = global.battle_enemy_name
    if (global.game_mode == "customs")
    {
    }
    else if (global.game_mode == "yellow")
    {
        switch battle_enemy_name
        {
            case "martlet pacifist":
                scr_enemy_mode_shift_martlet_pacifist(argument0)
                break
            case "martlet genocide":
                scr_enemy_mode_shift_martlet_genocide(argument0)
                break
        }

    }
    global.special_effect_end_value = argument0
}
("Fight 1")

    global.important_cutscene = script_execute(gml_Script_scr_determine_important_cutscene_attacking)

    global.can_attack = script_execute(gml_Script_scr_determine_can_attack_attacking)

    if (global.important_cutscene == false && global.can_attack == true)

        global.enemy_attacking = true

    if (global.can_attack == false)

        with (obj_dialogue_box_battle)

100

            no_loop_can_attack = false

101

102

    instance_destroy()

103

104

instance_destroy()

1	var game_mode = global.game_mode
2	var battle_enemy_name = global.battle_enemy_name
3	var enemy_missed = false
4	if instance_exists(obj_text_damage_count)
5	{
6	with (obj_text_damage_count)
7	instance_destroy()
8	}
9	if instance_exists(obj_text_miss)
10	{
11	enemy_missed = true
12	with (obj_text_miss)
13	instance_destroy()
14	}
15	with (obj_target_bar_battle)
16	instance_destroy()
17	if instance_exists(obj_battle_hp_enemy_attacking_parent)
18	{
19	with (obj_battle_hp_enemy_attacking_parent)
20	instance_destroy()
21	}
22	if (global.current_hp_enemy < 0)
23	global.current_hp_enemy = 0
24	if (global.current_hp_enemy == 0)
25	{
26	with (obj_battle_generator)
27	audio_extend = false
28	audio_stop_all()
29	if (game_mode == "customs")
30	{
31	script_execute(gml_Script_scr_create_quote_bubble_battle_defeat)
32	instance_create(0, 0, obj_quote_defeat)
33	}
34	else if (global.game_mode == "yellow")
35	{
36	switch battle_enemy_name
37	{
38	case "ceroba genocide":
39	obj_ceroba_body.death_sprite = true
40	scr_audio_fade_out scr_audio_fade_out function scr_audio_fade_out(argument0, argument1) //gml_Script_scr_audio_fade_out { var snd = argument0 var fade_len = argument1 if (!audio_is_playing(snd)) return false; audio_sound_gain(snd, 0, fade_len) if instance_exists(obj_audio_fade_helper) { with (obj_audio_fade_helper) { if (audio_to_fade == snd) return false; } } with (instance_create(0, 0, obj_audio_fade_helper)) audio_to_fade = snd } (mus_trial_by_fury, 500)
41	break
42	case "starlo":
43	obj_starlo_boss_body.death_sprite = true
44	scr_audio_fade_out scr_audio_fade_out function scr_audio_fade_out(argument0, argument1) //gml_Script_scr_audio_fade_out { var snd = argument0 var fade_len = argument1 if (!audio_is_playing(snd)) return false; audio_sound_gain(snd, 0, fade_len) if instance_exists(obj_audio_fade_helper) { with (obj_audio_fade_helper) { if (audio_to_fade == snd) return false; } } with (instance_create(0, 0, obj_audio_fade_helper)) audio_to_fade = snd } (mus_showdown, 500)
45	break
46	case "decibat":
47	case "micro froggit":
48	global.enemy_dead = true
49	instance_create(0, 0, obj_dialogue_battle_win_genocide)
50	audio_play_sound(snd_monster_damage_death, 20, false)
51	break
52	case "axis":
53	obj_axis_body.death_sprite = true
54	scr_audio_fade_out scr_audio_fade_out function scr_audio_fade_out(argument0, argument1) //gml_Script_scr_audio_fade_out { var snd = argument0 var fade_len = argument1 if (!audio_is_playing(snd)) return false; audio_sound_gain(snd, 0, fade_len) if instance_exists(obj_audio_fade_helper) { with (obj_audio_fade_helper) { if (audio_to_fade == snd) return false; } } with (instance_create(0, 0, obj_audio_fade_helper)) audio_to_fade = snd } (mus_guns_blazing, 500)
55	break
56	case "axis genocide":
57	obj_axis_body_geno.alarm[0] = 50
58	break
59	case "guardener":
60	scr_audio_fade_out scr_audio_fade_out function scr_audio_fade_out(argument0, argument1) //gml_Script_scr_audio_fade_out { var snd = argument0 var fade_len = argument1 if (!audio_is_playing(snd)) return false; audio_sound_gain(snd, 0, fade_len) if instance_exists(obj_audio_fade_helper) { with (obj_audio_fade_helper) { if (audio_to_fade == snd) return false; } } with (instance_create(0, 0, obj_audio_fade_helper)) audio_to_fade = snd } (mus_guardener_theme, 500)
61	obj_guardener_body.death_sprite = true
62	break
63	case "ceroba":
64	obj_battle_enemy_ceroba_phase_2_outro.scene += 1
65	break
66	case "el bailador":
67	if (global.route != 3)
68	{
69	script_execute(gml_Script_scr_create_quote_bubble_battle_defeat)
70	instance_create(0, 0, obj_quote_defeat)
71	}
72	else
73	{
74	global.enemy_dead = true
75	instance_create(0, 0, obj_dialogue_battle_win_genocide)
76	audio_play_sound(snd_monster_damage_death, 20, false)
77	}
78	break
79	case "martlet genocide final":
80	break
81	default:
82	script_execute(gml_Script_scr_create_quote_bubble_battle_defeat)
83	instance_create(0, 0, obj_quote_defeat)
84	}
85
86	}
87	}
88	else
89	{
90	if (enemy_missed == false)
91	global.enemy_sparing = false
92	scr_determine_special_effect_enemy scr_determine_special_effect_enemy function scr_determine_special_effect_enemy(argument0) //gml_Script_scr_determine_special_effect_enemy { var battle_enemy_name = global.battle_enemy_name if (global.game_mode == "customs") { } else if (global.game_mode == "yellow") { switch battle_enemy_name { case "martlet pacifist": scr_enemy_mode_shift_martlet_pacifist(argument0) break case "martlet genocide": scr_enemy_mode_shift_martlet_genocide(argument0) break } } global.special_effect_end_value = argument0 } ("Fight 1")
93	global.important_cutscene = script_execute(gml_Script_scr_determine_important_cutscene_attacking)
94	global.can_attack = script_execute(gml_Script_scr_determine_can_attack_attacking)
95	if (global.important_cutscene == false && global.can_attack == true)
96	global.enemy_attacking = true
97	if (global.can_attack == false)
98	{
99	with (obj_dialogue_box_battle)
100	no_loop_can_attack = false
101	}
102	instance_destroy()
103	}
104	instance_destroy()