Undertale Yellow script viewer

if (draw_enabled == false)

    return;

draw_set_font(fnt_dotumche)

draw_set_color(c_black)

if (global.enemy_sparing && message_current == 2)

    draw_set_color(c_fuchsia)

draw_set_halign(fa_left)

draw_set_valign(fa_top)

var x_offset = 21

var y_offset = 9

if (global.turns_passed == 0 && message_current == 0)

    y_offset = 25

if (enemy_talker != 0 && enemy_talker[message_current] != 0)

    x_offset = 9

if (text_effect == "twitchy")

    scr_draw_text_effect_twitchy_quotebubble_battle
scr_draw_text_effect_twitchy_quotebubble_battle

function scr_draw_text_effect_twitchy_quotebubble_battle(argument0, argument1, argument2) //gml_Script_scr_draw_text_effect_twitchy_quotebubble_battle
{
    var twitchy_text_probability = global.twitchy_text_probability
    var twitchy_text_intensity = global.twitchy_text_intensity
    str_indent = ""
    str_indent_count = 0
    str_offset = (-(string_width(string_hash_to_newline(string_copy("A", 1, 1)))))
    for (var i = 1; i <= characters; i += 1)
    {
        twitchy_text_offset_x = 0
        twitchy_text_offset_y = 0
        twitchy_text_number = irandom_range(1, twitchy_text_probability)
        if (twitchy_text_number == twitchy_text_probability)
        {
            twitch_direction = irandom_range(1, 4)
            switch twitch_direction
            {
                case 1:
                    twitchy_text_offset_x = 1
                    twitchy_text_offset_y = 0
                    break
                case 2:
                    twitchy_text_offset_x = -1
                    twitchy_text_offset_y = 0
                    break
                case 3:
                    twitchy_text_offset_x = 0
                    twitchy_text_offset_y = 1
                    break
                case 4:
                    twitchy_text_offset_x = 0
                    twitchy_text_offset_y = -1
                    break
            }

        }
        str_char = string_char_at(argument0, i)
        if (str_char == "#")
        {
            str_indent_count += 1
            if (str_indent_count == 1)
                str_indent = "#"
            else if (str_indent_count == 2)
                str_indent = "##"
            else if (str_indent_count == 3)
                str_indent = "###"
            else if (str_indent_count == 4)
                str_indent = "####"
            str_offset = (-(string_width(string_hash_to_newline(string_copy("A", 1, 1))))) * 2
        }
        str_offset += string_width(string_hash_to_newline(string_copy("A", 1, 1)))
        if (string_lettersdigits(str_char) == "")
            draw_text((argument1 + str_offset), argument2, string_hash_to_newline(str_indent + str_char))
        else
            draw_text((argument1 + str_offset + twitchy_text_offset_x * twitchy_text_intensity), (argument2 + twitchy_text_offset_y * twitchy_text_intensity), string_hash_to_newline(str_indent + str_char))
    }
}
(message[message_current], (obj_quote_bubble_battle.x + x_offset), (obj_quote_bubble_battle.y + y_offset))

else if (text_effect == "circle")

    scr_draw_text_effect_circle_quotebubble_battle
scr_draw_text_effect_circle_quotebubble_battle

function scr_draw_text_effect_circle_quotebubble_battle(argument0, argument1, argument2) //gml_Script_scr_draw_text_effect_circle_quotebubble_battle
{
    var circle_text_angle_increase = 0
    var circle_text_radius = global.circle_text_radius
    var circle_text_speed = global.circle_text_speed
    str_indent = ""
    str_indent_count = 0
    str_offset = (-(string_width(string_hash_to_newline(string_copy("A", 1, 1)))))
    for (var i = 1; i <= characters; i += 1)
    {
        str_char = string_char_at(argument0, i)
        if (str_char == "#")
        {
            str_indent_count += 1
            if (str_indent_count == 1)
                str_indent = "#"
            else if (str_indent_count == 2)
                str_indent = "##"
            else if (str_indent_count == 3)
                str_indent = "###"
            else if (str_indent_count == 4)
                str_indent = "####"
            str_offset = (-(string_width(string_hash_to_newline(string_copy("A", 1, 1))))) * 2
        }
        str_offset += string_width(string_hash_to_newline(string_copy("A", 1, 1)))
        draw_text((argument1 + str_offset + circle_text_radius * (cos((circle_text_angle + circle_text_angle_increase) * circle_text_angle_direction * 0.008726646259971648))), (argument2 - circle_text_radius * (sin((circle_text_angle + circle_text_angle_increase) * circle_text_angle_direction * 0.008726646259971648))), string_hash_to_newline(str_indent + str_char))
        circle_text_angle_increase += circle_text_speed
    }
    circle_text_angle += circle_text_speed
}
(message[message_current], (obj_quote_bubble_battle.x + x_offset), (obj_quote_bubble_battle.y + y_offset))