Deltarune (Chapter 4) script viewer

← back to main script listing

gml_Object_obj_savemenu_Draw_0

(view raw script w/o annotations or w/e)
1
draw_set_alpha(1);
2
draw_set_color(c_white);
3
var xx = camerax();
4
var yy = cameray();
5
var scale = 1 + global.darkzone;
6
7
var numscale = function(arg0)
8
{
9
    var scale = 1 + global.darkzone;
10
    return round(arg0 / 2) * scale;
11
};
12
13
var menbox = function(arg0, arg1, arg2, arg3)
14
{
15
    var lightbox = function(arg0, arg1, arg2, arg3)
16
    {
17
        draw_sprite_ext(spr_pxwhite, 0, arg0 - 3, arg1 - 3, (arg2 + 6) - arg0, (arg3 + 6) - arg1, 0, c_white, 1);
18
        draw_sprite_ext(spr_pxwhite, 0, arg0, arg1, arg2 - arg0, arg3 - arg1, 0, c_black, 1);
19
    };
20
    
21
    if (global.darkzone == 1)
22
        
scr_darkbox_black
scr_darkbox_black

function
scr_darkbox_black(arg0, arg1, arg2, arg3)
{ draw_set_color(c_black); ossafe_fill_rectangle(arg0 + 20, arg1 + 20, arg2 - 20, arg3 - 20, false);
scr_darkbox(arg0, arg1, arg2, arg3);
}
(arg0, arg1, arg2, arg3);
23
    else
24
        lightbox(arg0, arg1, arg2, arg3);
25
};
26
27
if (saved == 0)
28
    time_current = global.time;
29
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");
30
if (d == 2)
31
    
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));
}
("mainbig");
32
if (menuno == 0)
33
{
34
    if (d == 1)
35
    {
36
        menbox(xx + 53, yy + 52, xx + 267, yy + 155);
37
    }
38
    else
39
    {
40
        
scr_darkbox
scr_darkbox

function
scr_darkbox(arg0, arg1, arg2, arg3)
{ if (!variable_instance_exists(id, "cur_jewel")) cur_jewel = 0; cur_jewel += 1; textbox_width = arg2 - arg0 - 63; if (textbox_width < 0) textbox_width = 0; textbox_height = arg3 - arg1 - 63; if (textbox_height < 0) textbox_height = 0; if (textbox_width > 0) { draw_sprite_stretched(spr_textbox_top, 0, arg0 + 32, arg1, textbox_width, 32); draw_sprite_ext(spr_textbox_top, 0, arg0 + 32, arg3 + 1, textbox_width, -2, 0, c_white, 1); } if (textbox_height > 0) { draw_sprite_ext(spr_textbox_left, 0, arg2 + 1, arg1 + 32, -2, textbox_height, 0, c_white, 1); draw_sprite_ext(spr_textbox_left, 0, arg0, arg1 + 32, 2, textbox_height, 0, c_white, 1); } if (global.flag[8 simplify_vfx] == 0) { draw_sprite_ext(spr_textbox_topleft, cur_jewel / 10, arg0, arg1, 2, 2, 0, c_white, 1); draw_sprite_ext(spr_textbox_topleft, cur_jewel / 10, arg2 + 1, arg1, -2, 2, 0, c_white, 1); draw_sprite_ext(spr_textbox_topleft, cur_jewel / 10, arg0, arg3 + 1, 2, -2, 0, c_white, 1); draw_sprite_ext(spr_textbox_topleft, cur_jewel / 10, arg2 + 1, arg3 + 1, -2, -2, 0, c_white, 1); } else { draw_sprite_ext(spr_textbox_topleft, 0, arg0, arg1, 2, 2, 0, c_white, 1); draw_sprite_ext(spr_textbox_topleft, 0, arg2 + 1, arg1, -2, 2, 0, c_white, 1); draw_sprite_ext(spr_textbox_topleft, 0, arg0, arg3 + 1, 2, -2, 0, c_white, 1); draw_sprite_ext(spr_textbox_topleft, 0, arg2 + 1, arg3 + 1, -2, -2, 0, c_white, 1); } }
(((54 * d) + xx) - 16, (49 * d) + yy, (265 * d) + xx + 16, (135 * d) + yy + (type * 45));
41
        draw_set_color(c_black);
42
        ossafe_fill_rectangle(((64 * d) + xx) - 16, (59 * d) + yy, (255 * d) + xx + 16, (125 * d) + yy + (type * 45), false);
43
    }
44
    draw_set_color(c_white);
45
    if (xcoord == 2)
46
        draw_set_color(c_yellow);
47
    draw_set_font(
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"));
48
    if (global.darkzone == 1)
49
        draw_set_font(
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); }
("mainbig"));
50
    draw_set_halign(fa_left);
51
    if (!
scr_kana_check
scr_kana_check

function
scr_kana_check(arg0)
{ var kanafound = 0; var ___stringlength = string_length(arg0); for (var ___i = 1; ___i <= ___stringlength; ___i++) { if (ord(string_char_at(arg0, ___i)) >= 12352) { kanafound = 1; break; } } return kanafound; }
(name_current))
52
    {
53
        draw_text((60 * d) + xx, (60 * d) + yy, string_hash_to_newline(name_current));
54
    }
55
    else
56
    {
57
        var memfont = draw_get_font();
58
        draw_set_font(fnt_ja_mainbig);
59
        if (global.darkzone == 0)
60
            draw_set_font(fnt_ja_main);
61
        draw_text((60 * d) + xx, (60 * d) + yy, string_hash_to_newline(name_current));
62
        draw_set_font(memfont);
63
    }
64
    draw_set_halign(fa_right);
65
    draw_text((200 * d) + xx, (60 * d) + yy, string_hash_to_newline(stringsetsubloc("LV ~1", global.chapter, "obj_savemenu_slash_Draw_0_gml_34_0")));
66
    draw_text((261 * d) + xx, (60 * d) + yy, 
scr_timedisp
scr_timedisp

function
scr_timedisp(arg0)
{ var minutes = floor(arg0 / 1800); var remmins = minutes % 60; var hours = (minutes - remmins) / 60; var seconds = floor((arg0 / 30) - (minutes * 60)); var hourstring = string(hours) + ":"; var minstring = string(remmins) + ":"; if (remmins < 10) minstring = "0" + minstring; var secstring = string(floor(seconds)); if (seconds < 10) secstring = "0" + secstring; var timedisp = hourstring + minstring + secstring; return timedisp; }
(time_current));
67
    draw_set_halign(fa_center);
68
    draw_text_width((160 * d) + xx, (85 * d) + yy, string_hash_to_newline(
scr_roomname
scr_roomname

function
scr_roomname(arg0)
{ roomname = stringsetloc(
Dark World?
"Dark World?", "scr_roomname_slash_scr_roomname_gml_1_0"
);
if (arg0 == 0) roomname = stringsetloc(
---
"---", "scr_roomname_slash_scr_roomname_gml_2_0"
);
if (arg0 == 15) roomname = stringsetloc(
Kris's Room
"Kris's Room", "scr_roomname_slash_scr_roomname_gml_4_0_b"
);
if (arg0 == 24) roomname = stringsetloc(
Hometown
"Hometown", "scr_roomname_slash_scr_roomname_gml_5_0_b"
);
if (arg0 == 49) roomname = stringsetloc(
Noelle's House
"Noelle's House", "scr_roomname_slash_scr_roomname_gml_6_0"
);
if (arg0 == 65) roomname = stringsetloc(
My Castle Town
"My Castle Town", "scr_roomname_slash_scr_roomname_gml_5_0"
);
var church_name_a = stringsetloc(
Dark Sanctuary
"Dark Sanctuary", "scr_roomname_slash_scr_roomname_gml_7_0_b"
);
if (arg0 == 108) roomname = stringsetsubloc("~1 - Atrium", church_name_a, "scr_roomname_slash_scr_roomname_gml_8_0_c"); if (arg0 == 177) roomname = stringsetsubloc("~1 - Lower Left", church_name_a, "scr_roomname_slash_scr_roomname_gml_9_0_c"); if (arg0 == 227) roomname = stringsetsubloc("~1 - Lower Right", church_name_a, "scr_roomname_slash_scr_roomname_gml_10_0"); if (arg0 == 115) roomname = stringsetsubloc("~1 - Study", church_name_a, "scr_roomname_slash_scr_roomname_gml_11_0_b"); if (arg0 == 219) roomname = stringsetsubloc("~1 - Library", church_name_a, "scr_roomname_slash_scr_roomname_gml_12_0"); if (arg0 == 218) roomname = stringsetsubloc("~1 - Small Piano", church_name_a, "scr_roomname_slash_scr_roomname_gml_13_0"); var church_name_b = stringsetloc(
2nd Sanctuary
"2nd Sanctuary", "scr_roomname_slash_scr_roomname_gml_15_0"
);
if (arg0 == 247) roomname = stringsetsubloc("~1 - Atrium", church_name_b, "scr_roomname_slash_scr_roomname_gml_16_0"); if (arg0 == 251) roomname = stringsetsubloc("~1 - Floor", church_name_b, "scr_roomname_slash_scr_roomname_gml_17_0"); if (arg0 == 257) roomname = stringsetsubloc("~1 - Study", church_name_b, "scr_roomname_slash_scr_roomname_gml_18_0"); if (arg0 == 304) roomname = stringsetsubloc("~1 - Study", church_name_b, "scr_roomname_slash_scr_roomname_gml_19_0"); var church_name_c = stringsetloc(
3rd Sanctuary
"3rd Sanctuary", "scr_roomname_slash_scr_roomname_gml_21_0"
);
if (arg0 == 270) roomname = church_name_c; if (arg0 == 277) roomname = stringsetsubloc("~1 - Stairs", church_name_c, "scr_roomname_slash_scr_roomname_gml_23_0"); if (arg0 == 280) roomname = stringsetsubloc("~1 - Last Chamber", church_name_c, "scr_roomname_slash_scr_roomname_gml_24_0"); if (arg0 == 322) roomname = stringsetloc(
MIKE ZONE
"MIKE ZONE", "scr_roomname_slash_scr_roomname_gml_29_0"
);
if (arg0 == 298) roomname = stringsetloc(
Castle Town - TV Building
"Castle Town - TV Building", "scr_roomname_slash_scr_roomname_gml_30_0"
);
return roomname; }
(room)), 360);
69
    draw_set_halign(fa_left);
70
    var myoff = 0;
71
    if (global.darkzone == 0 && ycoord == 1)
72
        myoff = -21;
73
    if (xcoord < 2)
74
        draw_sprite(heartsprite, 0, xx + (71 * d) + (xcoord * 90 * d), yy + (114 * d) + (ycoord * 42) + myoff);
75
    if (xcoord < 2)
76
    {
77
        draw_text(xx + (85 * d), yy + (110 * d), string_hash_to_newline(stringsetloc(
Save
"Save", "obj_savemenu_slash_Draw_0_gml_47_0"
)));
78
        draw_text(xx + (175 * d), yy + (110 * d), string_hash_to_newline(stringsetloc(
Return
"Return", "obj_savemenu_slash_Draw_0_gml_48_0"
)));
79
        if (type == 1)
80
        {
81
            if (global.darkzone == 1)
82
            {
83
                draw_text(xx + (85 * d), yy + (130 * d), stringsetloc(
Storage
"Storage", "obj_savemenu_slash_Draw_0_gml_52_0_b"
));
84
                if (!haverecruited)
85
                    draw_set_color(c_gray);
86
                draw_text(xx + (175 * d), yy + (130 * d), stringsetloc(
Recruits
"Recruits", "obj_savemenu_slash_Draw_0_gml_54_0"
));
87
            }
88
            if (global.darkzone == 0)
89
            {
90
                var xoff = 0;
91
                if (global.lang == "ja")
92
                    xoff = 0;
93
                var title = stringsetloc(
Return to Title
"Return to Title", "obj_darkcontroller_slash_Draw_0_gml_95_0"
);
94
                draw_text(xx + 85 + xoff, yy + 130, title);
95
            }
96
        }
97
    }
98
    else
99
    {
100
        draw_text(xx + (85 * d), yy + (110 * d), string_hash_to_newline(stringsetloc(
File saved.
"File saved.", "obj_savemenu_slash_Draw_0_gml_52_0"
)));
101
    }
102
}
103
else if (menuno == 1)
104
{
105
    
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");
106
    if (d == 2)
107
        
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));
}
("mainbig");
108
    if (overwrite == 0)
109
    {
110
        draw_set_color(c_black);
111
        draw_set_alpha(0.8);
112
        ossafe_fill_rectangle(xx - 10, yy - 10, xx + 640 + 10, yy + 480 + 10, 0);
113
        draw_set_alpha(1);
114
    }
115
    var yoff = 0;
116
    var wmod = numscale(28);
117
    var mwidth = numscale(520);
118
    var mheight = numscale(105);
119
    var mx = xx + numscale(60);
120
    var my = yy + 12 + numscale(yoff);
121
    menbox(mx, my, mx + mwidth, my + mheight);
122
    mwidth = numscale(520);
123
    mheight = numscale(321);
124
    mx = numscale(60);
125
    my = numscale(124) + yoff;
126
    menbox(xx + mx, yy + my, xx + mx + mwidth, yy + my + mheight);
127
    if (global.darkzone == 1)
128
    {
129
        for (var i = 0; i < 3; i++)
130
            draw_sprite_ext(spr_textbox_top, 0, xx + mx + 14, yy + 208 + (84 * i) + yoff, mwidth * 0.948, 2, 0, c_white, 1);
131
    }
132
    else
133
    {
134
        for (var i = 0; i < 3; i++)
135
            draw_sprite_ext(spr_pxwhite, 0, xx + mx, yy + 104 + (42 * i) + yoff + 4, mwidth, 3, 0, c_white, 1);
136
    }
137
    var ybo = numscale(32);
138
    var yline = yy + ybo + yoff;
139
    var xline = [xx + numscale(320), xx + mx + numscale(40), xx + mx + numscale(483), xx + numscale(320)];
140
    draw_set_color(c_white);
141
    draw_set_halign(fa_center);
142
    draw_text(xline[0], yline, global.truename);
143
    draw_set_halign(fa_left);
144
    draw_text(xline[1], yline, string_hash_to_newline(stringsetsubloc("LV ~1", global.chapter, "obj_savemenu_slash_Draw_0_gml_34_0")));
145
    draw_set_halign(fa_right);
146
    draw_text(xline[2], yline, 
scr_timedisp
scr_timedisp

function
scr_timedisp(arg0)
{ var minutes = floor(arg0 / 1800); var remmins = minutes % 60; var hours = (minutes - remmins) / 60; var seconds = floor((arg0 / 30) - (minutes * 60)); var hourstring = string(hours) + ":"; var minstring = string(remmins) + ":"; if (remmins < 10) minstring = "0" + minstring; var secstring = string(floor(seconds)); if (seconds < 10) secstring = "0" + secstring; var timedisp = hourstring + minstring + secstring; return timedisp; }
(time_current));
147
    draw_set_halign(fa_center);
148
    draw_text(xline[3], yline + ybo, room_current);
149
    draw_set_halign(fa_left);
150
    newfile = stringsetloc(
New File
"New File", "obj_savemenu_slash_Draw_0_gml_115_0"
);
151
    var mspace = numscale(84);
152
    for (var i = 0; i < 3; i++)
153
    {
154
        draw_set_color(c_white);
155
        if (mpos == i)
156
            draw_set_color(c_yellow);
157
        if (level_file[i] != 0)
158
        {
159
            var xl = [xx + mx + numscale(64), xx + mx + numscale(483), xx + numscale(320)];
160
            draw_set_halign(fa_left);
161
            draw_text(xl[0], yy + my + numscale(20) + (i * mspace), string_hash_to_newline(stringsetsubloc("LV ~1", global.chapter, "obj_savemenu_slash_Draw_0_gml_34_0")));
162
            draw_set_halign(fa_right);
163
            draw_text(xl[1], yy + my + numscale(20) + (i * mspace), 
scr_timedisp
scr_timedisp

function
scr_timedisp(arg0)
{ var minutes = floor(arg0 / 1800); var remmins = minutes % 60; var hours = (minutes - remmins) / 60; var seconds = floor((arg0 / 30) - (minutes * 60)); var hourstring = string(hours) + ":"; var minstring = string(remmins) + ":"; if (remmins < 10) minstring = "0" + minstring; var secstring = string(floor(seconds)); if (seconds < 10) secstring = "0" + secstring; var timedisp = hourstring + minstring + secstring; return timedisp; }
(time_file[i]));
164
            draw_set_halign(fa_center);
165
            draw_text(xl[2], yy + my + numscale(52) + (i * mspace), 
scr_roomname
scr_roomname

function
scr_roomname(arg0)
{ roomname = stringsetloc(
Dark World?
"Dark World?", "scr_roomname_slash_scr_roomname_gml_1_0"
);
if (arg0 == 0) roomname = stringsetloc(
---
"---", "scr_roomname_slash_scr_roomname_gml_2_0"
);
if (arg0 == 15) roomname = stringsetloc(
Kris's Room
"Kris's Room", "scr_roomname_slash_scr_roomname_gml_4_0_b"
);
if (arg0 == 24) roomname = stringsetloc(
Hometown
"Hometown", "scr_roomname_slash_scr_roomname_gml_5_0_b"
);
if (arg0 == 49) roomname = stringsetloc(
Noelle's House
"Noelle's House", "scr_roomname_slash_scr_roomname_gml_6_0"
);
if (arg0 == 65) roomname = stringsetloc(
My Castle Town
"My Castle Town", "scr_roomname_slash_scr_roomname_gml_5_0"
);
var church_name_a = stringsetloc(
Dark Sanctuary
"Dark Sanctuary", "scr_roomname_slash_scr_roomname_gml_7_0_b"
);
if (arg0 == 108) roomname = stringsetsubloc("~1 - Atrium", church_name_a, "scr_roomname_slash_scr_roomname_gml_8_0_c"); if (arg0 == 177) roomname = stringsetsubloc("~1 - Lower Left", church_name_a, "scr_roomname_slash_scr_roomname_gml_9_0_c"); if (arg0 == 227) roomname = stringsetsubloc("~1 - Lower Right", church_name_a, "scr_roomname_slash_scr_roomname_gml_10_0"); if (arg0 == 115) roomname = stringsetsubloc("~1 - Study", church_name_a, "scr_roomname_slash_scr_roomname_gml_11_0_b"); if (arg0 == 219) roomname = stringsetsubloc("~1 - Library", church_name_a, "scr_roomname_slash_scr_roomname_gml_12_0"); if (arg0 == 218) roomname = stringsetsubloc("~1 - Small Piano", church_name_a, "scr_roomname_slash_scr_roomname_gml_13_0"); var church_name_b = stringsetloc(
2nd Sanctuary
"2nd Sanctuary", "scr_roomname_slash_scr_roomname_gml_15_0"
);
if (arg0 == 247) roomname = stringsetsubloc("~1 - Atrium", church_name_b, "scr_roomname_slash_scr_roomname_gml_16_0"); if (arg0 == 251) roomname = stringsetsubloc("~1 - Floor", church_name_b, "scr_roomname_slash_scr_roomname_gml_17_0"); if (arg0 == 257) roomname = stringsetsubloc("~1 - Study", church_name_b, "scr_roomname_slash_scr_roomname_gml_18_0"); if (arg0 == 304) roomname = stringsetsubloc("~1 - Study", church_name_b, "scr_roomname_slash_scr_roomname_gml_19_0"); var church_name_c = stringsetloc(
3rd Sanctuary
"3rd Sanctuary", "scr_roomname_slash_scr_roomname_gml_21_0"
);
if (arg0 == 270) roomname = church_name_c; if (arg0 == 277) roomname = stringsetsubloc("~1 - Stairs", church_name_c, "scr_roomname_slash_scr_roomname_gml_23_0"); if (arg0 == 280) roomname = stringsetsubloc("~1 - Last Chamber", church_name_c, "scr_roomname_slash_scr_roomname_gml_24_0"); if (arg0 == 322) roomname = stringsetloc(
MIKE ZONE
"MIKE ZONE", "scr_roomname_slash_scr_roomname_gml_29_0"
);
if (arg0 == 298) roomname = stringsetloc(
Castle Town - TV Building
"Castle Town - TV Building", "scr_roomname_slash_scr_roomname_gml_30_0"
);
return roomname; }
(roome_file[i]));
166
            if (!
scr_kana_check
scr_kana_check

function
scr_kana_check(arg0)
{ var kanafound = 0; var ___stringlength = string_length(arg0); for (var ___i = 1; ___i <= ___stringlength; ___i++) { if (ord(string_char_at(arg0, ___i)) >= 12352) { kanafound = 1; break; } } return kanafound; }
(name_file[i]))
167
            {
168
                var xpo = xx + numscale(320);
169
                var thisyoff = numscale(20);
170
                draw_text(xpo, yy + my + thisyoff + (i * mspace), name_file[i]);
171
            }
172
            else
173
            {
174
                var memfont = draw_get_font();
175
                draw_set_font(fnt_ja_mainbig);
176
                if (global.darkzone == 0)
177
                    draw_set_font(fnt_ja_main);
178
                draw_text(xx + (160 * scale), yy + my + (10 * scale) + (i * mspace), name_file[i]);
179
                draw_set_font(memfont);
180
            }
181
            draw_set_halign(fa_left);
182
            draw_set_color(c_white);
183
        }
184
        else
185
        {
186
            draw_set_halign(fa_center);
187
            draw_text(xx + (160 * scale), yy + my + (18 * scale) + (i * mspace), newfile);
188
            draw_set_halign(fa_left);
189
            draw_set_color(c_white);
190
        }
191
    }
192
    draw_set_halign(fa_center);
193
    if (mpos == 3)
194
        draw_set_color(c_yellow);
195
    returntxt = stringsetloc(
Return
"Return", "obj_savemenu_slash_Draw_0_gml_48_0"
);
196
    var bo = 0;
197
    if (global.darkzone == 0)
198
        bo = 3;
199
    draw_text(xx + (160 * scale), yy + my + (135 * scale) + bo, string_hash_to_newline(returntxt));
200
    draw_set_halign(fa_left);
201
    draw_set_color(c_white);
202
    if (overwrite == 0)
203
    {
204
        if (mpos < 3)
205
        {
206
            if (level_file[mpos] != 0)
207
                draw_sprite(heartsprite, 0, xx + mx + (16 * scale), yy + my + (mspace * mpos) + (14 * scale));
208
            else
209
                draw_sprite(heartsprite, 0, (xx + (160 * scale)) - (string_width(newfile) / 2) - (16 * scale), yy + my + (18 * scale) + (mpos * mspace) + (string_height(newfile) / 4));
210
        }
211
        else
212
        {
213
            bo = 0;
214
            if (global.darkzone == 0)
215
                bo = 3;
216
            draw_sprite(heartsprite, 0, (xx + (160 * scale)) - string_width(returntxt), yy + my + (135 * scale) + (string_height(returntxt) / 4) + bo);
217
        }
218
    }
219
    if (overwrite == 0)
220
    {
221
        if (down_p())
222
            mpos++;
223
        if (up_p())
224
            mpos--;
225
        mpos = clamp(mpos, 0, 3);
226
        if (button1_p() && buffer < 0)
227
        {
228
            if (mpos == 3)
229
            {
230
                menuno = 0;
231
                buffer = 3;
232
                mpos = global.filechoice;
233
                snd_play(snd_select);
234
            }
235
            else if (level_file[mpos] != 0 && mpos != global.filechoice)
236
            {
237
                overwrite = 0.5;
238
                buffer = 3;
239
                overcoord = 0;
240
            }
241
            else
242
            {
243
                menuno = 2;
244
                global.filechoice = mpos;
245
                snd_play(snd_save);
246
                
scr_save
scr_save

function
scr_save()
{
scr_saveprocess(global.filechoice);
filechoicebk2 = global.filechoice; global.filechoice = 9;
scr_saveprocess(9);
global.filechoice = filechoicebk2; iniwrite = ossafe_ini_open("dr.ini"); ini_write_string(
scr_ini_chapter(global.chapter, global.filechoice), "Name", global.truename);
ini_write_real(
scr_ini_chapter(global.chapter, global.filechoice), "Level", global.lv);
ini_write_real(
scr_ini_chapter(global.chapter, global.filechoice), "Love", global.llv);
ini_write_real(
scr_ini_chapter(global.chapter, global.filechoice), "Time", global.time);
ini_write_real(
scr_ini_chapter(global.chapter, global.filechoice), "Date", date_current_datetime());
ini_write_real(
scr_ini_chapter(global.chapter, global.filechoice), "Room", scr_get_id_by_room_index(room));
ini_write_real(
scr_ini_chapter(global.chapter, global.filechoice), "InitLang", global.flag[912 language]);
var uraboss = 0; if (global.chapter == 1) { if (global.flag[241 JEVIL_plot] == 6) uraboss = 1; else if (global.flag[241 JEVIL_plot] == 7) uraboss = 2; } else { uraboss = scr_get_secret_boss_result(global.chapter); } ini_write_real(
scr_ini_chapter(global.chapter, global.filechoice), "UraBoss", uraboss);
ini_write_string(
scr_ini_chapter(global.chapter, global.filechoice), "Version", string(global.versionno));
ossafe_ini_close(); scr_store_ura_result(global.chapter, global.filechoice, uraboss); ossafe_ini_open("keyconfig_" + string(global.filechoice) + ".ini"); for (i = 0; i < 10; i += 1) ini_write_real("KEYBOARD_CONTROLS", string(i), global.input_k[i]); for (i = 0; i < 10; i += 1) ini_write_real("GAMEPAD_CONTROLS", string(i), global.input_g[i]); ini_write_real("SHOULDERLB_REASSIGN", "SHOULDERLB_REASSIGN", obj_gamecontroller.gamepad_shoulderlb_reassign); ossafe_ini_close(); ossafe_savedata_save(); }
();
247
                saved = 1;
248
                xcoord = 2;
249
                buffer = 3;
250
                if (d == 2)
251
                {
252
                    name = global.truename;
253
                    love = global.llv;
254
                }
255
                
scr_roomname
scr_roomname

function
scr_roomname(arg0)
{ roomname = stringsetloc(
Dark World?
"Dark World?", "scr_roomname_slash_scr_roomname_gml_1_0"
);
if (arg0 == 0) roomname = stringsetloc(
---
"---", "scr_roomname_slash_scr_roomname_gml_2_0"
);
if (arg0 == 15) roomname = stringsetloc(
Kris's Room
"Kris's Room", "scr_roomname_slash_scr_roomname_gml_4_0_b"
);
if (arg0 == 24) roomname = stringsetloc(
Hometown
"Hometown", "scr_roomname_slash_scr_roomname_gml_5_0_b"
);
if (arg0 == 49) roomname = stringsetloc(
Noelle's House
"Noelle's House", "scr_roomname_slash_scr_roomname_gml_6_0"
);
if (arg0 == 65) roomname = stringsetloc(
My Castle Town
"My Castle Town", "scr_roomname_slash_scr_roomname_gml_5_0"
);
var church_name_a = stringsetloc(
Dark Sanctuary
"Dark Sanctuary", "scr_roomname_slash_scr_roomname_gml_7_0_b"
);
if (arg0 == 108) roomname = stringsetsubloc("~1 - Atrium", church_name_a, "scr_roomname_slash_scr_roomname_gml_8_0_c"); if (arg0 == 177) roomname = stringsetsubloc("~1 - Lower Left", church_name_a, "scr_roomname_slash_scr_roomname_gml_9_0_c"); if (arg0 == 227) roomname = stringsetsubloc("~1 - Lower Right", church_name_a, "scr_roomname_slash_scr_roomname_gml_10_0"); if (arg0 == 115) roomname = stringsetsubloc("~1 - Study", church_name_a, "scr_roomname_slash_scr_roomname_gml_11_0_b"); if (arg0 == 219) roomname = stringsetsubloc("~1 - Library", church_name_a, "scr_roomname_slash_scr_roomname_gml_12_0"); if (arg0 == 218) roomname = stringsetsubloc("~1 - Small Piano", church_name_a, "scr_roomname_slash_scr_roomname_gml_13_0"); var church_name_b = stringsetloc(
2nd Sanctuary
"2nd Sanctuary", "scr_roomname_slash_scr_roomname_gml_15_0"
);
if (arg0 == 247) roomname = stringsetsubloc("~1 - Atrium", church_name_b, "scr_roomname_slash_scr_roomname_gml_16_0"); if (arg0 == 251) roomname = stringsetsubloc("~1 - Floor", church_name_b, "scr_roomname_slash_scr_roomname_gml_17_0"); if (arg0 == 257) roomname = stringsetsubloc("~1 - Study", church_name_b, "scr_roomname_slash_scr_roomname_gml_18_0"); if (arg0 == 304) roomname = stringsetsubloc("~1 - Study", church_name_b, "scr_roomname_slash_scr_roomname_gml_19_0"); var church_name_c = stringsetloc(
3rd Sanctuary
"3rd Sanctuary", "scr_roomname_slash_scr_roomname_gml_21_0"
);
if (arg0 == 270) roomname = church_name_c; if (arg0 == 277) roomname = stringsetsubloc("~1 - Stairs", church_name_c, "scr_roomname_slash_scr_roomname_gml_23_0"); if (arg0 == 280) roomname = stringsetsubloc("~1 - Last Chamber", church_name_c, "scr_roomname_slash_scr_roomname_gml_24_0"); if (arg0 == 322) roomname = stringsetloc(
MIKE ZONE
"MIKE ZONE", "scr_roomname_slash_scr_roomname_gml_29_0"
);
if (arg0 == 298) roomname = stringsetloc(
Castle Town - TV Building
"Castle Town - TV Building", "scr_roomname_slash_scr_roomname_gml_30_0"
);
return roomname; }
(room);
256
                level = global.lv;
257
                time = global.time;
258
                minutes = floor(time / 1800);
259
                seconds = round(((time / 1800) - minutes) * 60);
260
                if (seconds == 60)
261
                    seconds = 59;
262
                if (seconds < 10)
263
                    seconds = "0" + string(seconds);
264
            }
265
        }
266
        if (button2_p() && buffer < 0)
267
        {
268
            menuno = 0;
269
            buffer = 3;
270
            mpos = global.filechoice;
271
            snd_play(snd_select);
272
        }
273
    }
274
    if (overwrite == 1)
275
    {
276
        draw_sprite_ext(spr_pxwhite, 0, xx - 10, yy - 10, 650, 490, 0, c_black, 0.8);
277
        saved = 2;
278
        menbox(xx + numscale(10), yy + numscale(100), xx + numscale(630), yy + numscale(380));
279
        overwritetext = stringsetsubloc("Overwrite Slot ~1?", mpos + 1, "obj_savemenu_slash_Draw_0_gml_215_0");
280
        draw_set_color(c_white);
281
        draw_set_halign(fa_center);
282
        draw_text(xx + numscale(320), yy + numscale(123), string_hash_to_newline(overwritetext));
283
        draw_set_color(c_yellow);
284
        var currentSpace = numscale(70);
285
        var horzspace = numscale(80);
286
        draw_set_halign(fa_left);
287
        draw_text(xx + horzspace, yy + numscale(165) + currentSpace, string_hash_to_newline(stringsetsubloc("LV ~1", global.chapter, "obj_savemenu_slash_Draw_0_gml_34_0")));
288
        draw_set_halign(fa_right);
289
        draw_text((xx + numscale(640)) - horzspace, yy + numscale(165) + currentSpace, 
scr_timedisp
scr_timedisp

function
scr_timedisp(arg0)
{ var minutes = floor(arg0 / 1800); var remmins = minutes % 60; var hours = (minutes - remmins) / 60; var seconds = floor((arg0 / 30) - (minutes * 60)); var hourstring = string(hours) + ":"; var minstring = string(remmins) + ":"; if (remmins < 10) minstring = "0" + minstring; var secstring = string(floor(seconds)); if (seconds < 10) secstring = "0" + secstring; var timedisp = hourstring + minstring + secstring; return timedisp; }
(time_current));
290
        draw_set_halign(fa_center);
291
        draw_text(xx + numscale(320), yy + numscale(195) + currentSpace, room_current);
292
        var memfont = draw_get_font();
293
        if (
scr_kana_check
scr_kana_check

function
scr_kana_check(arg0)
{ var kanafound = 0; var ___stringlength = string_length(arg0); for (var ___i = 1; ___i <= ___stringlength; ___i++) { if (ord(string_char_at(arg0, ___i)) >= 12352) { kanafound = 1; break; } } return kanafound; }
(name_current))
294
        {
295
            draw_set_font(fnt_ja_mainbig);
296
            if (global.darkzone == 0)
297
                draw_set_font(fnt_ja_main);
298
        }
299
        draw_text(xx + numscale(320), yy + numscale(165) + currentSpace, name_current);
300
        draw_set_font(memfont);
301
        draw_set_halign(fa_left);
302
        draw_set_color(c_white);
303
        draw_set_color(c_white);
304
        draw_set_halign(fa_left);
305
        draw_text(xx + horzspace, yy + numscale(165), string_hash_to_newline(stringsetsubloc("LV ~1", global.chapter, "obj_savemenu_slash_Draw_0_gml_34_0")));
306
        draw_set_halign(fa_right);
307
        draw_text((xx + numscale(640)) - horzspace, yy + numscale(165), 
scr_timedisp
scr_timedisp

function
scr_timedisp(arg0)
{ var minutes = floor(arg0 / 1800); var remmins = minutes % 60; var hours = (minutes - remmins) / 60; var seconds = floor((arg0 / 30) - (minutes * 60)); var hourstring = string(hours) + ":"; var minstring = string(remmins) + ":"; if (remmins < 10) minstring = "0" + minstring; var secstring = string(floor(seconds)); if (seconds < 10) secstring = "0" + secstring; var timedisp = hourstring + minstring + secstring; return timedisp; }
(time_file[mpos]));
308
        draw_set_halign(fa_center);
309
        draw_text(xx + numscale(320), yy + numscale(195), 
scr_roomname
scr_roomname

function
scr_roomname(arg0)
{ roomname = stringsetloc(
Dark World?
"Dark World?", "scr_roomname_slash_scr_roomname_gml_1_0"
);
if (arg0 == 0) roomname = stringsetloc(
---
"---", "scr_roomname_slash_scr_roomname_gml_2_0"
);
if (arg0 == 15) roomname = stringsetloc(
Kris's Room
"Kris's Room", "scr_roomname_slash_scr_roomname_gml_4_0_b"
);
if (arg0 == 24) roomname = stringsetloc(
Hometown
"Hometown", "scr_roomname_slash_scr_roomname_gml_5_0_b"
);
if (arg0 == 49) roomname = stringsetloc(
Noelle's House
"Noelle's House", "scr_roomname_slash_scr_roomname_gml_6_0"
);
if (arg0 == 65) roomname = stringsetloc(
My Castle Town
"My Castle Town", "scr_roomname_slash_scr_roomname_gml_5_0"
);
var church_name_a = stringsetloc(
Dark Sanctuary
"Dark Sanctuary", "scr_roomname_slash_scr_roomname_gml_7_0_b"
);
if (arg0 == 108) roomname = stringsetsubloc("~1 - Atrium", church_name_a, "scr_roomname_slash_scr_roomname_gml_8_0_c"); if (arg0 == 177) roomname = stringsetsubloc("~1 - Lower Left", church_name_a, "scr_roomname_slash_scr_roomname_gml_9_0_c"); if (arg0 == 227) roomname = stringsetsubloc("~1 - Lower Right", church_name_a, "scr_roomname_slash_scr_roomname_gml_10_0"); if (arg0 == 115) roomname = stringsetsubloc("~1 - Study", church_name_a, "scr_roomname_slash_scr_roomname_gml_11_0_b"); if (arg0 == 219) roomname = stringsetsubloc("~1 - Library", church_name_a, "scr_roomname_slash_scr_roomname_gml_12_0"); if (arg0 == 218) roomname = stringsetsubloc("~1 - Small Piano", church_name_a, "scr_roomname_slash_scr_roomname_gml_13_0"); var church_name_b = stringsetloc(
2nd Sanctuary
"2nd Sanctuary", "scr_roomname_slash_scr_roomname_gml_15_0"
);
if (arg0 == 247) roomname = stringsetsubloc("~1 - Atrium", church_name_b, "scr_roomname_slash_scr_roomname_gml_16_0"); if (arg0 == 251) roomname = stringsetsubloc("~1 - Floor", church_name_b, "scr_roomname_slash_scr_roomname_gml_17_0"); if (arg0 == 257) roomname = stringsetsubloc("~1 - Study", church_name_b, "scr_roomname_slash_scr_roomname_gml_18_0"); if (arg0 == 304) roomname = stringsetsubloc("~1 - Study", church_name_b, "scr_roomname_slash_scr_roomname_gml_19_0"); var church_name_c = stringsetloc(
3rd Sanctuary
"3rd Sanctuary", "scr_roomname_slash_scr_roomname_gml_21_0"
);
if (arg0 == 270) roomname = church_name_c; if (arg0 == 277) roomname = stringsetsubloc("~1 - Stairs", church_name_c, "scr_roomname_slash_scr_roomname_gml_23_0"); if (arg0 == 280) roomname = stringsetsubloc("~1 - Last Chamber", church_name_c, "scr_roomname_slash_scr_roomname_gml_24_0"); if (arg0 == 322) roomname = stringsetloc(
MIKE ZONE
"MIKE ZONE", "scr_roomname_slash_scr_roomname_gml_29_0"
);
if (arg0 == 298) roomname = stringsetloc(
Castle Town - TV Building
"Castle Town - TV Building", "scr_roomname_slash_scr_roomname_gml_30_0"
);
return roomname; }
(roome_file[mpos]));
310
        memfont = draw_get_font();
311
        if (
scr_kana_check
scr_kana_check

function
scr_kana_check(arg0)
{ var kanafound = 0; var ___stringlength = string_length(arg0); for (var ___i = 1; ___i <= ___stringlength; ___i++) { if (ord(string_char_at(arg0, ___i)) >= 12352) { kanafound = 1; break; } } return kanafound; }
(name_file[mpos]))
312
        {
313
            draw_set_font(fnt_ja_mainbig);
314
            if (global.darkzone == 0)
315
                draw_set_font(fnt_ja_main);
316
        }
317
        draw_text(xx + numscale(320), yy + numscale(165), name_file[mpos]);
318
        draw_set_font(memfont);
319
        draw_set_halign(fa_left);
320
        draw_set_color(c_white);
321
        savetxt = stringsetloc(
Save
"Save", "obj_savemenu_slash_Draw_0_gml_47_0"
);
322
        returntxt = stringsetloc(
Return
"Return", "obj_savemenu_slash_Draw_0_gml_48_0"
);
323
        if (left_p() || right_p())
324
            overcoord = 1 - overcoord;
325
        if (overcoord == 0)
326
            draw_set_color(c_yellow);
327
        else
328
            draw_set_color(c_white);
329
        draw_text(xx + numscale(170), yy + numscale(324), string_hash_to_newline(savetxt));
330
        if (overcoord == 1)
331
            draw_set_color(c_yellow);
332
        else
333
            draw_set_color(c_white);
334
        draw_text(xx + numscale(350), yy + numscale(324), string_hash_to_newline(returntxt));
335
        if (overcoord == 0)
336
            draw_sprite(heartsprite, 0, xx + numscale(142), yy + numscale(324) + (string_height(savetxt) / 4));
337
        else
338
            draw_sprite(heartsprite, 0, xx + numscale(322), yy + numscale(324) + (string_height(returntxt) / 4));
339
        if (button1_p() && buffer < 0)
340
        {
341
            if (overcoord == 0)
342
            {
343
                menuno = 2;
344
                global.filechoice = mpos;
345
                snd_play(snd_save);
346
                script_execute(scr_save);
347
                saved = 1;
348
                xcoord = 2;
349
                buffer = 3;
350
                if (d == 2)
351
                {
352
                    name = global.truename;
353
                    love = global.llv;
354
                }
355
                
scr_roomname
scr_roomname

function
scr_roomname(arg0)
{ roomname = stringsetloc(
Dark World?
"Dark World?", "scr_roomname_slash_scr_roomname_gml_1_0"
);
if (arg0 == 0) roomname = stringsetloc(
---
"---", "scr_roomname_slash_scr_roomname_gml_2_0"
);
if (arg0 == 15) roomname = stringsetloc(
Kris's Room
"Kris's Room", "scr_roomname_slash_scr_roomname_gml_4_0_b"
);
if (arg0 == 24) roomname = stringsetloc(
Hometown
"Hometown", "scr_roomname_slash_scr_roomname_gml_5_0_b"
);
if (arg0 == 49) roomname = stringsetloc(
Noelle's House
"Noelle's House", "scr_roomname_slash_scr_roomname_gml_6_0"
);
if (arg0 == 65) roomname = stringsetloc(
My Castle Town
"My Castle Town", "scr_roomname_slash_scr_roomname_gml_5_0"
);
var church_name_a = stringsetloc(
Dark Sanctuary
"Dark Sanctuary", "scr_roomname_slash_scr_roomname_gml_7_0_b"
);
if (arg0 == 108) roomname = stringsetsubloc("~1 - Atrium", church_name_a, "scr_roomname_slash_scr_roomname_gml_8_0_c"); if (arg0 == 177) roomname = stringsetsubloc("~1 - Lower Left", church_name_a, "scr_roomname_slash_scr_roomname_gml_9_0_c"); if (arg0 == 227) roomname = stringsetsubloc("~1 - Lower Right", church_name_a, "scr_roomname_slash_scr_roomname_gml_10_0"); if (arg0 == 115) roomname = stringsetsubloc("~1 - Study", church_name_a, "scr_roomname_slash_scr_roomname_gml_11_0_b"); if (arg0 == 219) roomname = stringsetsubloc("~1 - Library", church_name_a, "scr_roomname_slash_scr_roomname_gml_12_0"); if (arg0 == 218) roomname = stringsetsubloc("~1 - Small Piano", church_name_a, "scr_roomname_slash_scr_roomname_gml_13_0"); var church_name_b = stringsetloc(
2nd Sanctuary
"2nd Sanctuary", "scr_roomname_slash_scr_roomname_gml_15_0"
);
if (arg0 == 247) roomname = stringsetsubloc("~1 - Atrium", church_name_b, "scr_roomname_slash_scr_roomname_gml_16_0"); if (arg0 == 251) roomname = stringsetsubloc("~1 - Floor", church_name_b, "scr_roomname_slash_scr_roomname_gml_17_0"); if (arg0 == 257) roomname = stringsetsubloc("~1 - Study", church_name_b, "scr_roomname_slash_scr_roomname_gml_18_0"); if (arg0 == 304) roomname = stringsetsubloc("~1 - Study", church_name_b, "scr_roomname_slash_scr_roomname_gml_19_0"); var church_name_c = stringsetloc(
3rd Sanctuary
"3rd Sanctuary", "scr_roomname_slash_scr_roomname_gml_21_0"
);
if (arg0 == 270) roomname = church_name_c; if (arg0 == 277) roomname = stringsetsubloc("~1 - Stairs", church_name_c, "scr_roomname_slash_scr_roomname_gml_23_0"); if (arg0 == 280) roomname = stringsetsubloc("~1 - Last Chamber", church_name_c, "scr_roomname_slash_scr_roomname_gml_24_0"); if (arg0 == 322) roomname = stringsetloc(
MIKE ZONE
"MIKE ZONE", "scr_roomname_slash_scr_roomname_gml_29_0"
);
if (arg0 == 298) roomname = stringsetloc(
Castle Town - TV Building
"Castle Town - TV Building", "scr_roomname_slash_scr_roomname_gml_30_0"
);
return roomname; }
(room);
356
                level = global.lv;
357
                time = global.time;
358
                minutes = floor(time / 1800);
359
                seconds = round(((time / 1800) - minutes) * 60);
360
                if (seconds == 60)
361
                    seconds = 59;
362
                if (seconds < 10)
363
                    seconds = "0" + string(seconds);
364
            }
365
            else
366
            {
367
                overwrite = 0;
368
                buffer = 3;
369
                saved = 0;
370
            }
371
        }
372
        if (button2_p() && buffer < 0)
373
        {
374
            overwrite = 0;
375
            buffer = 3;
376
            saved = 0;
377
        }
378
    }
379
    if (overwrite == 0.5)
380
        overwrite = 1;
381
}
382
else if (menuno == 2)
383
{
384
    draw_sprite_ext(spr_pxwhite, 0, xx - 10, yy - 10, 650, 490, 0, c_black, 0.8);
385
    var yoff = 0;
386
    var ybo = 0;
387
    var ybo2 = 0;
388
    if (global.darkzone == 0)
389
    {
390
        ybo = 6;
391
        ybo2 = 1;
392
    }
393
    var wmod = numscale(28);
394
    var mwidth = numscale(520);
395
    var mheight = numscale(105);
396
    var mx = numscale(60);
397
    var my = numscale(12) + yoff;
398
    menbox(xx + mx, yy + my + ybo, xx + mx + mwidth, yy + my + mheight + ybo2);
399
    mwidth = numscale(520);
400
    mheight = numscale(273);
401
    mx = numscale(60);
402
    my = numscale(124) + yoff;
403
    menbox(xx + mx, yy + my, xx + mx + mwidth, (yy + my + mheight) - ybo);
404
    if (global.darkzone == 1)
405
    {
406
        for (var i = 0; i < 2; i++)
407
            draw_sprite_ext(spr_textbox_top, 0, xx + mx + 14, yy + 208 + (84 * i) + yoff, mwidth * 0.948, 2, 0, c_white, 1);
408
    }
409
    else
410
    {
411
        for (var i = 0; i < 2; i++)
412
            draw_sprite_ext(spr_pxwhite, 0, xx + mx, yy + numscale(208) + (numscale(84) * i) + yoff + 4, mwidth, 3, 0, c_white, 1);
413
    }
414
    draw_set_color(c_yellow);
415
    draw_set_halign(fa_center);
416
    draw_text(xx + numscale(320), yy + numscale(32) + yoff, global.truename);
417
    draw_set_halign(fa_left);
418
    draw_text(xx + mx + numscale(40), yy + numscale(32) + yoff, string_hash_to_newline(stringsetsubloc("LV ~1", global.chapter, "obj_savemenu_slash_Draw_0_gml_34_0")));
419
    draw_set_halign(fa_right);
420
    draw_text(xx + mx + numscale(483), yy + numscale(32) + yoff, 
scr_timedisp
scr_timedisp

function
scr_timedisp(arg0)
{ var minutes = floor(arg0 / 1800); var remmins = minutes % 60; var hours = (minutes - remmins) / 60; var seconds = floor((arg0 / 30) - (minutes * 60)); var hourstring = string(hours) + ":"; var minstring = string(remmins) + ":"; if (remmins < 10) minstring = "0" + minstring; var secstring = string(floor(seconds)); if (seconds < 10) secstring = "0" + secstring; var timedisp = hourstring + minstring + secstring; return timedisp; }
(time_current));
421
    draw_set_halign(fa_center);
422
    draw_text(xx + numscale(320), yy + numscale(64) + yoff, room_current);
423
    draw_set_halign(fa_left);
424
    draw_set_color(c_white);
425
    newfile = stringsetloc(
New File
"New File", "obj_savemenu_slash_Draw_0_gml_115_0"
);
426
    var mspace = numscale(84);
427
    for (var i = 0; i < 3; i++)
428
    {
429
        draw_set_color(c_white);
430
        if (mpos == i)
431
            draw_set_color(c_yellow);
432
        if (mpos != i)
433
        {
434
            draw_set_color(#444444);
435
            if (level_file[i] != 0)
436
            {
437
                draw_set_halign(fa_left);
438
                draw_text(xx + mx + numscale(64), yy + my + numscale(20) + (i * mspace), string_hash_to_newline(stringsetsubloc("LV ~1", global.chapter, "obj_savemenu_slash_Draw_0_gml_34_0")));
439
                draw_set_halign(fa_right);
440
                draw_text(xx + mx + numscale(483), yy + my + numscale(20) + (i * mspace), 
scr_timedisp
scr_timedisp

function
scr_timedisp(arg0)
{ var minutes = floor(arg0 / 1800); var remmins = minutes % 60; var hours = (minutes - remmins) / 60; var seconds = floor((arg0 / 30) - (minutes * 60)); var hourstring = string(hours) + ":"; var minstring = string(remmins) + ":"; if (remmins < 10) minstring = "0" + minstring; var secstring = string(floor(seconds)); if (seconds < 10) secstring = "0" + secstring; var timedisp = hourstring + minstring + secstring; return timedisp; }
(time_file[i]));
441
                draw_set_halign(fa_center);
442
                draw_text(xx + numscale(320), yy + my + numscale(52) + (i * mspace), 
scr_roomname
scr_roomname

function
scr_roomname(arg0)
{ roomname = stringsetloc(
Dark World?
"Dark World?", "scr_roomname_slash_scr_roomname_gml_1_0"
);
if (arg0 == 0) roomname = stringsetloc(
---
"---", "scr_roomname_slash_scr_roomname_gml_2_0"
);
if (arg0 == 15) roomname = stringsetloc(
Kris's Room
"Kris's Room", "scr_roomname_slash_scr_roomname_gml_4_0_b"
);
if (arg0 == 24) roomname = stringsetloc(
Hometown
"Hometown", "scr_roomname_slash_scr_roomname_gml_5_0_b"
);
if (arg0 == 49) roomname = stringsetloc(
Noelle's House
"Noelle's House", "scr_roomname_slash_scr_roomname_gml_6_0"
);
if (arg0 == 65) roomname = stringsetloc(
My Castle Town
"My Castle Town", "scr_roomname_slash_scr_roomname_gml_5_0"
);
var church_name_a = stringsetloc(
Dark Sanctuary
"Dark Sanctuary", "scr_roomname_slash_scr_roomname_gml_7_0_b"
);
if (arg0 == 108) roomname = stringsetsubloc("~1 - Atrium", church_name_a, "scr_roomname_slash_scr_roomname_gml_8_0_c"); if (arg0 == 177) roomname = stringsetsubloc("~1 - Lower Left", church_name_a, "scr_roomname_slash_scr_roomname_gml_9_0_c"); if (arg0 == 227) roomname = stringsetsubloc("~1 - Lower Right", church_name_a, "scr_roomname_slash_scr_roomname_gml_10_0"); if (arg0 == 115) roomname = stringsetsubloc("~1 - Study", church_name_a, "scr_roomname_slash_scr_roomname_gml_11_0_b"); if (arg0 == 219) roomname = stringsetsubloc("~1 - Library", church_name_a, "scr_roomname_slash_scr_roomname_gml_12_0"); if (arg0 == 218) roomname = stringsetsubloc("~1 - Small Piano", church_name_a, "scr_roomname_slash_scr_roomname_gml_13_0"); var church_name_b = stringsetloc(
2nd Sanctuary
"2nd Sanctuary", "scr_roomname_slash_scr_roomname_gml_15_0"
);
if (arg0 == 247) roomname = stringsetsubloc("~1 - Atrium", church_name_b, "scr_roomname_slash_scr_roomname_gml_16_0"); if (arg0 == 251) roomname = stringsetsubloc("~1 - Floor", church_name_b, "scr_roomname_slash_scr_roomname_gml_17_0"); if (arg0 == 257) roomname = stringsetsubloc("~1 - Study", church_name_b, "scr_roomname_slash_scr_roomname_gml_18_0"); if (arg0 == 304) roomname = stringsetsubloc("~1 - Study", church_name_b, "scr_roomname_slash_scr_roomname_gml_19_0"); var church_name_c = stringsetloc(
3rd Sanctuary
"3rd Sanctuary", "scr_roomname_slash_scr_roomname_gml_21_0"
);
if (arg0 == 270) roomname = church_name_c; if (arg0 == 277) roomname = stringsetsubloc("~1 - Stairs", church_name_c, "scr_roomname_slash_scr_roomname_gml_23_0"); if (arg0 == 280) roomname = stringsetsubloc("~1 - Last Chamber", church_name_c, "scr_roomname_slash_scr_roomname_gml_24_0"); if (arg0 == 322) roomname = stringsetloc(
MIKE ZONE
"MIKE ZONE", "scr_roomname_slash_scr_roomname_gml_29_0"
);
if (arg0 == 298) roomname = stringsetloc(
Castle Town - TV Building
"Castle Town - TV Building", "scr_roomname_slash_scr_roomname_gml_30_0"
);
return roomname; }
(roome_file[i]));
443
                var memfont = draw_get_font();
444
                if (
scr_kana_check
scr_kana_check

function
scr_kana_check(arg0)
{ var kanafound = 0; var ___stringlength = string_length(arg0); for (var ___i = 1; ___i <= ___stringlength; ___i++) { if (ord(string_char_at(arg0, ___i)) >= 12352) { kanafound = 1; break; } } return kanafound; }
(name_file[i]))
445
                {
446
                    draw_set_font(fnt_ja_mainbig);
447
                    if (global.darkzone == 0)
448
                        draw_set_font(fnt_ja_main);
449
                }
450
                draw_text(xx + numscale(320), yy + my + numscale(20) + (i * mspace), name_file[i]);
451
                draw_set_font(memfont);
452
                draw_set_halign(fa_left);
453
                draw_set_color(c_white);
454
            }
455
            else
456
            {
457
                draw_set_halign(fa_center);
458
                draw_text(xx + numscale(320), yy + my + numscale(36) + (i * mspace), newfile);
459
                draw_set_halign(fa_left);
460
                draw_set_color(c_white);
461
            }
462
        }
463
        else
464
        {
465
            filesaved = stringsetloc(
File Saved
"File Saved", "obj_savemenu_slash_Draw_0_gml_371_0"
);
466
            draw_set_halign(fa_center);
467
            draw_text(xx + numscale(320), yy + my + numscale(36) + (i * mspace), filesaved);
468
            draw_set_halign(fa_left);
469
            draw_set_color(c_white);
470
        }
471
    }
472
    draw_set_halign(fa_center);
473
    draw_set_halign(fa_left);
474
    draw_set_color(c_white);
475
    if (button1_p() || button2_p())
476
    {
477
        if (buffer < 0)
478
        {
479
            global.interact = 0;
480
            with (obj_mainchara)
481
                onebuffer = 3;
482
            instance_destroy();
483
        }
484
    }
485
}
486
else if (menuno == 10 || menuno == 11)
487
{
488
    menbox(xx + 53, yy + 52, xx + 267, yy + 155);
489
    yes = stringsetloc(
Yes
"Yes", "obj_savemenu_slash_Draw_0_gml_518_0"
);
490
    no = stringsetloc(
No
"No", "obj_savemenu_slash_Draw_0_gml_519_0"
);
491
    var prompt = stringsetloc(
Really return to title?
"Really return to title?", "obj_savemenu_slash_Draw_0_gml_520_0"
);
492
    draw_text(xx + 85, yy + 64, prompt);
493
    draw_text(xx + 85, yy + 130, yes);
494
    draw_text(xx + 175, yy + 130, no);
495
    if (menuno == 10)
496
        draw_sprite_ext(heartsprite, 0, xx + 71 + (90 * quitxcoord), yy + 135, 1, 1, 0, c_white, 1);
497
}