Deltarune (Chapter 4) script viewer

skipme = 0;

forcebutton1 = 0;

textsound = snd_text;

charline = 33;

originalcharline = charline;

hspace = 8;

vspace = 18;

rate = 1;

mycolor = c_white;

myfont = 
scr_84_get_font
scr_84_get_font

function 
scr_84_get_font(arg0)
{
    if (!variable_global_exists("chemg_last_get_font"))
        global.chemg_last_get_font = "";
    if (arg0 != global.chemg_last_get_font)
        global.chemg_last_get_font = arg0;
    return ds_map_find_value(global.font_map, arg0);
}
("main");

textalpha = 1;

textalphagain = 0;

fadeonend = 0;

shake = 0;

special = 0;

skippable = 1;

automash_timer = 0;

if (global.flag[6 disable_text_skip] == 1)

    skippable = 0;

f = 1;

if (global.darkzone == 1)

    f = 2;

prevent_mash_buffer = 0;

formattext = true;

runcheck = false;

disablebutton1 = false;

scr_texttype
scr_texttype

function 
scr_texttype()
{
    var font_set = true;
    var extra_ja_vspace = 0;
    textscale = 1;
    switch (global.typer)
    {
        case 0:
            font_set = false;
            break;
        case 1:
            
scr_textsetup(
scr_84_get_font("main"), c_white, x, y, 33, 0, 1, snd_text, 8, 18, 0);
            break;
        case 2:
            
scr_textsetup(
scr_84_get_font("main"), c_white, x, y, 33, 0, 2, snd_nosound, 8, 18, 0);
            break;
        case 3:
            
scr_textsetup(
scr_84_get_font("main"), c_white, x, y, 33, 0, 2, snd_text, 8, 18, 1);
            break;
        case 4:
            
scr_textsetup(
scr_84_get_font("mainbig"), c_white, x, y, 33, 0, 1, snd_text, 16, 28, 1);
            extra_ja_vspace = 2;
            break;
        case 5:
            
scr_textsetup(
scr_84_get_font("main"), c_white, x, y, 33, 0, 1, snd_text, 8, 18, 0);
            break;
        case 6:
            
scr_textsetup(
scr_84_get_font("mainbig"), c_white, x, y, 33, 0, 1, snd_text, 16, 36, 1);
            break;
        case 7:
            
scr_textsetup(
scr_84_get_font("main"), c_white, x, y, 33, 0, 1, snd_txttor, 8, 18, 0);
            break;
        case 8:
            
scr_textsetup(
scr_84_get_font("main"), c_white, x, y, 33, 0, 2, snd_txttor, 8, 18, 0);
            break;
        case 10:
            
scr_textsetup(
scr_84_get_font("main"), c_white, x, y, 33, 0, 1, snd_txtsus, 8, 18, 0);
            break;
        case 11:
            
scr_textsetup(
scr_84_get_font("main"), c_white, x, y, 33, 0, 1, snd_txtsus, 8, 18, 0);
            break;
        case 12:
            
scr_textsetup(
scr_84_get_font("main"), c_white, x, y, 33, 0, 1, snd_txtnoe, 8, 18, 0);
            break;
        case 13:
            
scr_textsetup(
scr_84_get_font("main"), c_white, x, y, 33, 0, 1, snd_txtber, 8, 18, 0);
            break;
        case 14:
            
scr_textsetup(
scr_84_get_font("comicsans"), c_white, x, y, 33, 0, 1, snd_txtsans, 8, 18, 0);
            break;
        case 15:
            
scr_textsetup(
scr_84_get_font("main"), c_white, x, y, 33, 0, 1, snd_text, 8, 18, 0);
            break;
        case 16:
            font_set = false;
            break;
        case 17:
            
scr_textsetup(
scr_84_get_font("main"), c_white, x, y, 33, 0, 1, snd_txtund, 8, 18, 0);
            break;
        case 18:
            
scr_textsetup(
scr_84_get_font("main"), c_white, x, y, 33, 0, 1, snd_txtasg, 8, 18, 0);
            break;
        case 19:
            
scr_textsetup(
scr_84_get_font("main"), c_white, x, y, 33, 0, 1, snd_text, 8, 18, 0);
            break;
        case 20:
            
scr_textsetup(
scr_84_get_font("main"), c_white, x, y, 33, 0, 1, snd_txtal, 8, 18, 0);
            break;
        case 21:
            
scr_textsetup(
scr_84_get_font("main"), c_white, x, y, 33, 0, 1, snd_txtal, 8, 18, 0);
            break;
        case 22:
            
scr_textsetup(
scr_84_get_font("tinynoelle"), c_white, x, y + 7, 33, 0, 1, snd_txtal, 6, 18, 0);
            break;
        case 23:
            
scr_textsetup(
scr_84_get_font("tinynoelle"), c_white, x, y + 7, 33, 0, 1, snd_txtnoe, 6, 18, 0);
            break;
        case 30:
            
scr_textsetup(
scr_84_get_font("mainbig"), c_white, x, y, 33, 0, 1, snd_txtsus, 16, 36, 1);
            break;
        case 31:
            
scr_textsetup(
scr_84_get_font("mainbig"), c_white, x, y, 33, 0, 1, snd_txtral, 16, 36, 1);
            break;
        case 32:
            
scr_textsetup(
scr_84_get_font("mainbig"), c_white, x, y, 33, 0, 1, snd_txtlan, 16, 36, 1);
            break;
        case 33:
            
scr_textsetup(
scr_84_get_font("mainbig"), c_white, x, y, 33, 0, 1, snd_dadtxt, 16, 36, 1);
            break;
        case 35:
            
scr_textsetup(
scr_84_get_font("mainbig"), c_white, x, y, 33, 0, 1, snd_txtjok, 16, 36, 1);
            break;
        case 36:
            
scr_textsetup(
scr_84_get_font("mainbig"), c_white, x, y, 33, 0, 1, snd_nosound, 16, 36, 1);
            break;
        case 37:
            
scr_textsetup(
scr_84_get_font("mainbig"), c_white, x, y, 33, 0, 3, snd_txtsus, 18, 36, 1);
            break;
        case 40:
            
scr_textsetup(
scr_84_get_font("main"), c_white, x, y, 33, 0, 2, snd_nosound, 8, 18, 0);
            break;
...
();

autoaster = 1;

drawaster = 1;

pos = 2;

lineno = 0;

aster = 0;

halt = 0;

reachedend = 0;

xcolor = c_black;

wxskip = 0;

preventcskip = false;

msgno = 0;

first_alarm = 0;

firstnoise = 0;

noiseskip = 0;

formatted = 0;

colorchange = 0;

fontchange = 0;

sound_played = 0;

sound_timer = 0;

sound_count = 0;

reachedend_sound = 305;

reachedend_sound_played = 0;

reachedend_sound_play = 0;

jpspecial = 0;

jpused = 0;

writingx = x;

writingy = y;

dialoguer = 0;

smallface = 505050;

faced = 0;

facedever = 0;

facer = 0;

siner = 0;

specfade = 1;

autocenter = 0;

miniface_current_pos = -1;

miniface_pos = 0;

miniface_drawn = 0;

hangonpos = false;

for (i = 0; i < 7; i += 1)

{

    specx[i] = i * 6;

    specy[i] = i * 6;

}

for (i = 0; i < 9; i++)

    object_made[i] = 0;

mystring = global.msg[0];

for (j = 0; j < 100; j += 1)

    nstring[j] = global.msg[j];

length = string_length(mystring);

alarm[0]
 = rate;
gml_Object_obj_writer_Alarm_0.gml

var playsound = 0;
if (rate > 2)
{
    alarm[1]
 = 1;
}
else
{
    sound_timer--;
    if (first_alarm == 1 && pos >= 2 && sound_timer <= 0)
        playsound = 1;
}
if (pos <= length)
    alarm[0]
 = rate;
else
    reachedend = 1;
if (first_alarm == 0)
{
    getchar = string_char_at(mystring, 1);
    if (getchar == "\\")
        pos += 3;
    else
        pos += 1;
    first_alarm = 1;
}
else
{
    getchar = string_char_at(mystring, pos);
    nextchar = string_char_at(mystring, pos + 1);
    if (getchar == "`")
    {
        pos += 2;
        exit;
    }
    if (getchar == "&" || getchar == "\n")
        pos += 1;
    if (getchar == "\\")
        pos += 3;
    if (getchar == "/")
    {
        halt = 1;
        if (nextchar == "%")
            halt = 2;
        alarm[0]
 = -1;
    }
    getchar = string_char_at(mystring, pos);
    nextchar = string_char_at(mystring, pos + 1);
    if (getchar == "|")
        pos += 2;
    if (getchar == "^")
    {
        pos += 2;
        if (alarm[0] > 0)
        {
            if (nextchar == "1")
                alarm[0]
 += 5;
            if (nextchar == "2")
                alarm[0]
 += 10;
            if (nextchar == "3")
                alarm[0]
 += 15;
            if (nextchar == "4")
                alarm[0]
 += 20;
            if (nextchar == "5")
                alarm[0]
 += 30;
            if (nextchar == "6")
                alarm[0]
 += 40;
            if (nextchar == "7")
                alarm[0]
 += 60;
            if (nextchar == "8")
                alarm[0]
 += 90;
            if (nextchar == "9")
                alarm[0]
 += 150;
        }
    }
    pos += 1;
}
if (reachedend_sound_play)
{
    if (reachedend && !reachedend_sound_played)
        playsound = 0;
}
if (playsound)
    
scr_textsound();

if (rate < 3)

    alarm[2]
 = 1;
gml_Object_obj_writer_Alarm_2.gml

if (firstnoise == 0)
{
    firstnoise = 1;
    
scr_textsound();
}

else

    
scr_textsound
scr_textsound

function 
scr_textsound()
{
    playtextsound = 1;
    if (button2_h() == 1)
    {
        var dontplaysound = true;
        if (variable_instance_exists(id, "runcheck"))
        {
            if (runcheck)
                dontplaysound = false;
        }
        if (dontplaysound)
            playtextsound = 0;
    }
    if (skippable == 0)
        playtextsound = 1;
    if (playtextsound == 1)
    {
        if (rate <= 2)
            getchar = string_char_at(mystring, pos);
        else
            getchar = string_char_at(mystring, pos - 1);
        play = 1;
        playcheck = 0;
        if (getchar == "&" || getchar == "\n")
        {
            if (rate < 3)
            {
                playcheck = 1;
                getchar = string_char_at(mystring, pos + 1);
            }
            else
            {
                play = 0;
            }
        }
        if (getchar == " ")
            play = 0;
        if (getchar == "^")
            play = 0;
        if (getchar == "!")
            play = 0;
        if (getchar == ".")
            play = 0;
        if (getchar == "?")
            play = 0;
        if (getchar == ",")
            play = 0;
        if (getchar == ":")
            play = 0;
        if (getchar == "/")
            play = 0;
        if (getchar == "\\")
            play = 0;
        if (getchar == "|")
            play = 0;
        if (getchar == "*")
            play = 0;
        if (play == 1)
        {
            if (textsound == snd_txtq)
            {
                audio_stop_sound(snd_txtq_2);
                qv = snd_play(snd_txtq_2);
                qp = 0.9 + random(0.15);
                snd_pitch(qv, qp);
                sound_timer = 2;
            }
            else if (textsound == snd_txtspam)
            {
                audio_stop_sound(snd_txtspam2);
                snd_play_x(snd_txtspam2, 0.8, 1.2);
                sound_timer = 2;
            }
            else if (textsound == snd_txtsans)
            {
                audio_stop_sound(snd_txtsans);
                qv = snd_play(snd_txtsans);
                sound_timer = 2;
            }
            else if (textsound == snd_txtjack_high_cute || textsound == snd_txtjack_low2)
            {
                if (textsound == snd_txtjack_high_cute)
                {
                    audio_stop_sound(snd_txtjack_high_cute);
                    qv = snd_play(snd_txtjack_high_cute);
                    qp = 0.75 + random(0.5);
                    snd_pitch(qv, qp);
                    sound_timer = 3;
                }
                if (textsound == snd_txtjack_low2)
                {
                    audio_stop_sound(snd_txtjack_low2);
                    qv = snd_play(snd_txtjack_low2);
                    qp = 0.75 + random(0.5);
                    snd_pitch(qv, qp);
                    sound_timer = 3;
                }
            }
            else if (textsound == snd_txger)
            {
...
();