Deltarune (Chapter 1) script viewer

← back to main script listing

gml_Object_obj_writer_Alarm_0

(view raw script w/o annotations or w/e)
1 
if (rate > 2)
2 
    alarm[1] = 1;
gml_Object_obj_writer_Alarm_1.gml

if (pos < (length + 2))
    scr_textsound();
3 
else if (first_alarm == 1 && pos >= 2)
4 
    scr_textsound
scr_textsound

function scr_textsound()
{
    playtextsound = 1;
    if (button2_h() == 1)
        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 == "&")
        {
            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)
        {
            snd_play(textsound);
            with (obj_face_parent)
                mouthmove = 1;
        }
    }
}
();
5 
if (pos <= length)
6 
    alarm[0] = rate;
gml_Object_obj_writer_Alarm_0.gml

if (rate > 2)
    alarm[1] = 1;
else if (first_alarm == 1 && pos >= 2)
    scr_textsound();
if (pos <= length)
    alarm[0] = rate;
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 += 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;
}
7 
if (first_alarm == 0)
8 
{
9 
    getchar = string_char_at(mystring, 1);
10 
    if (getchar == "\\")
11 
        pos += 3;
12 
    else
13 
        pos += 1;
14 
    first_alarm = 1;
15 
}
16 
else
17 
{
18 
    getchar = string_char_at(mystring, pos);
19 
    nextchar = string_char_at(mystring, pos + 1);
20 
    if (getchar == "&")
21 
        pos += 1;
22 
    if (getchar == "\\")
23 
        pos += 3;
24 
    if (getchar == "/")
25 
    {
26 
        halt = 1;
27 
        if (nextchar == "%")
28 
            halt = 2;
29 
        alarm[0] = -1;
gml_Object_obj_writer_Alarm_0.gml

if (rate > 2)
    alarm[1] = 1;
else if (first_alarm == 1 && pos >= 2)
    scr_textsound();
if (pos <= length)
    alarm[0] = rate;
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 += 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;
}
30 
    }
31 
    getchar = string_char_at(mystring, pos);
32 
    nextchar = string_char_at(mystring, pos + 1);
33 
    if (getchar == "|")
34 
        pos += 2;
35 
    if (getchar == "^")
36 
    {
37 
        pos += 2;
38 
        if (alarm[0] > 0)
39 
        {
40 
            if (nextchar == "1")
41 
                alarm[0] += 5;
gml_Object_obj_writer_Alarm_0.gml

if (rate > 2)
    alarm[1] = 1;
else if (first_alarm == 1 && pos >= 2)
    scr_textsound();
if (pos <= length)
    alarm[0] = rate;
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 += 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;
}
42 
            if (nextchar == "2")
43 
                alarm[0] += 10;
gml_Object_obj_writer_Alarm_0.gml

if (rate > 2)
    alarm[1] = 1;
else if (first_alarm == 1 && pos >= 2)
    scr_textsound();
if (pos <= length)
    alarm[0] = rate;
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 += 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;
}
44 
            if (nextchar == "3")
45 
                alarm[0] += 15;
gml_Object_obj_writer_Alarm_0.gml

if (rate > 2)
    alarm[1] = 1;
else if (first_alarm == 1 && pos >= 2)
    scr_textsound();
if (pos <= length)
    alarm[0] = rate;
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 += 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;
}
46 
            if (nextchar == "4")
47 
                alarm[0] += 20;
gml_Object_obj_writer_Alarm_0.gml

if (rate > 2)
    alarm[1] = 1;
else if (first_alarm == 1 && pos >= 2)
    scr_textsound();
if (pos <= length)
    alarm[0] = rate;
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 += 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;
}
48 
            if (nextchar == "5")
49 
                alarm[0] += 30;
gml_Object_obj_writer_Alarm_0.gml

if (rate > 2)
    alarm[1] = 1;
else if (first_alarm == 1 && pos >= 2)
    scr_textsound();
if (pos <= length)
    alarm[0] = rate;
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 += 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;
}
50 
            if (nextchar == "6")
51 
                alarm[0] += 40;
gml_Object_obj_writer_Alarm_0.gml

if (rate > 2)
    alarm[1] = 1;
else if (first_alarm == 1 && pos >= 2)
    scr_textsound();
if (pos <= length)
    alarm[0] = rate;
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 += 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;
}
52 
            if (nextchar == "7")
53 
                alarm[0] += 60;
gml_Object_obj_writer_Alarm_0.gml

if (rate > 2)
    alarm[1] = 1;
else if (first_alarm == 1 && pos >= 2)
    scr_textsound();
if (pos <= length)
    alarm[0] = rate;
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 += 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;
}
54 
            if (nextchar == "8")
55 
                alarm[0] += 90;
gml_Object_obj_writer_Alarm_0.gml

if (rate > 2)
    alarm[1] = 1;
else if (first_alarm == 1 && pos >= 2)
    scr_textsound();
if (pos <= length)
    alarm[0] = rate;
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 += 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;
}
56 
            if (nextchar == "9")
57 
                alarm[0] += 150;
gml_Object_obj_writer_Alarm_0.gml

if (rate > 2)
    alarm[1] = 1;
else if (first_alarm == 1 && pos >= 2)
    scr_textsound();
if (pos <= length)
    alarm[0] = rate;
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 += 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;
}
58 
        }
59 
    }
60 
    pos += 1;
61 
}