Deltarune (Chapter 5) script viewer

← back to main script listing

gml_Object_DEVICE_CHOICE_Draw_0

(view raw script w/o annotations or w/e)
1
scr_84_set_draw_font
scr_84_set_draw_font

function
scr_84_set_draw_font(arg0)
{ global.chemg_font = arg0; draw_set_font(
scr_84_get_font(arg0));
}
("main");
2
draw_set_halign(fa_left);
3
draw_set_valign(fa_top);
4
xfade = (10 - fadebuffer) / 10;
5
if (xfade > 1)
6
    xfade = 1;
7
if (TYPE <= 2)
8
{
9
    if (DRAWHEART == 1)
10
        draw_sprite_ext(IMAGE_SOUL_BLUR, 0, HEARTX + xoff, HEARTY + yoff, 1, 1, 0, c_white, 0.6 * xfade);
11
    draw_set_alpha(xfade);
12
    if (TYPE < 2)
13
    {
14
        for (i = 0; i <= XMAX; i += 1)
15
        {
16
            draw_set_color(c_white);
17
            if (CURX == i)
18
                draw_set_color(c_yellow);
19
            draw_text(NAMEX[i][0], NAMEY[i][0], string_hash_to_newline(NAME[i][0]));
20
        }
21
    }
22
    if (TYPE == 2)
23
    {
24
        for (i = 0; i <= YMAX; i += 1)
25
        {
26
            draw_set_color(c_white);
27
            if (CURY == i)
28
                draw_set_color(c_yellow);
29
            draw_text(NAMEX[0][i], NAMEY[0][i], string_hash_to_newline(NAME[0][i]));
30
        }
31
    }
32
    draw_set_alpha(1);
33
}
34
if (TYPE == 3)
35
{
36
    if (DRAWHEART == 1)
37
        draw_sprite_ext(IMAGE_SOUL_BLUR, 0, HEARTX, HEARTY, 1, 1, 0, c_white, 0.5 * xfade);
38
    draw_set_alpha(xfade);
39
    for (j = 0; j <= YMAX; j += 1)
40
    {
41
        for (i = 0; i <= XMAX; i += 1)
42
        {
43
            draw_set_color(c_white);
44
            if (CURX == i && CURY == j)
45
                draw_set_color(c_yellow);
46
            var str = string_hash_to_newline(NAME[i][j]);
47
            if (string_char_at(str, 1) == "(" && string_length(str) > 3)
48
                str = string_copy(str, 4, string_length(str) - 3);
49
            if (str != "<" && str != ">")
50
                draw_text(NAMEX[i][j], NAMEY[i][j], str);
51
        }
52
    }
53
    draw_set_color(c_white);
54
    if (string_length(NAMESTRING) == STRINGMAX)
55
        draw_set_color(c_yellow);
56
    var width = string_width(NAMESTRING);
57
    draw_text((320 - width) / 2, PLAYERNAMEY, string_hash_to_newline(NAMESTRING));
58
    draw_set_alpha(1);
59
}