Deltarune (Chapter 2) script viewer

← back to main script listing

gml_Object_obj_writer_Create_0

(view raw script w/o annotations or w/e)
1 
skipme = 0;
2 
forcebutton1 = 0;
3 
textsound = snd_text;
4 
charline = 33;
5 
originalcharline = charline;
6 
hspace = 8;
7 
vspace = 18;
8 
rate = 1;
9 
mycolor = c_white;
10 
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");
11 
shake = 0;
12 
special = 0;
13 
skippable = 1;
14 
automash_timer = 0;
15 
if (global.flag[6 disable_text_skip] == 1)
16 
    skippable = 0;
17 
f = 1;
18 
if (global.darkzone == 1)
19 
    f = 2;
20 
prevent_mash_buffer = 0;
21 
formattext = true;
22 
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;
...
();
23 
autoaster = 1;
24 
drawaster = 1;
25 
pos = 2;
26 
lineno = 0;
27 
aster = 0;
28 
halt = 0;
29 
reachedend = 0;
30 
xcolor = c_black;
31 
wxskip = 0;
32 
msgno = 0;
33 
first_alarm = 0;
34 
firstnoise = 0;
35 
noiseskip = 0;
36 
formatted = 0;
37 
colorchange = 0;
38 
fontchange = 0;
39 
sound_played = 0;
40 
sound_timer = 0;
41 
sound_count = 0;
42 
jpspecial = 0;
43 
jpused = 0;
44 
writingx = x;
45 
writingy = y;
46 
dialoguer = 0;
47 
smallface = 505050;
48 
faced = 0;
49 
facedever = 0;
50 
facer = 0;
51 
siner = 0;
52 
specfade = 1;
53 
autocenter = 0;
54 
miniface_current_pos = -1;
55 
miniface_pos = 0;
56 
miniface_drawn = 0;
57 
for (i = 0; i < 7; i += 1)
58 
{
59 
    specx[i] = i * 6;
60 
    specy[i] = i * 6;
61 
}
62 
mystring = global.msg[0];
63 
for (j = 0; j < 100; j += 1)
64 
    nstring[j] = global.msg[j];
65 
length = string_length(mystring);
66 
alarm[0] = rate;
gml_Object_obj_writer_Alarm_0.gml

if (rate > 2)
{
    alarm[1] = 1;
}
else
{
    sound_timer--;
    if (first_alarm == 1 && pos >= 2 && sound_timer <= 0)
        scr_textsound();
}
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;
}
67 
if (rate < 3)
68 
    alarm[2] = 1;
gml_Object_obj_writer_Alarm_2.gml

if (firstnoise == 0)
{
    firstnoise = 1;
    scr_textsound();
}
69 
else
70 
    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 == "&" || 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
            {
                snd_play(textsound);
            }
            with (obj_face_parent)
                mouthmove = 1;
            miniface_pos++;
        }
    }
}
();