Deltarune (Chapter 2) script viewer

← back to main script listing

gml_Object_obj_shop_ch2_swatch_Draw_0

(view raw script w/o annotations or w/e)
1
siner++;
2
guysiner += 3;
3
if (guysiner >= 860)
4
    guysiner -= 860;
5
shinetimer++;
6
if (floor(random(15)) == 0)
7
{
8
    if (menu != 1)
9
        anim = instance_create(random_range(100, 540), random(200) + 20, obj_animation);
10
    else
11
        anim = instance_create(random_range(100, 390), random(200) + 20, obj_animation);
12
    anim.sprite_index = spr_shine;
13
    anim.image_xscale = 3;
14
    anim.image_yscale = 3;
15
    anim.image_speed = 0.2;
16
    anim.depth = depth - 1;
17
    shinetimer = 0;
18
}
19
draw_sprite_ext(spr_shop_cafe_curtains, 1, 0, 0, 2, 2, 0, c_white, 1);
20
draw_sprite_ext(spr_shop_cafe_guys, 0, -guysiner, -10 + (sin(siner / 60) * 10), 2, 2, 0, c_white, 1);
21
draw_sprite_ext(spr_shop_cafe_guys, 0, -guysiner + 860, -10 + (sin(siner / 60) * 10), 2, 2, 0, c_white, 1);
22
draw_sprite_ext(spr_shop_cafe_curtains, 0, 0, 0, 2, 2, 0, c_white, 1);
23
if (global.fe == 0)
24
{
25
    talksiner++;
26
    if (talksiner >= 16)
27
        talksiner = 0;
28
    draw_sprite_ext(spr_shop_cafe_swatch, talksiner / 9, shx, 0, 2, 2, 0, c_white, 1);
29
}
30
else
31
{
32
    talksiner = 0;
33
    draw_sprite_ext(spr_shop_cafe_swatch, global.fe - 1, shx, 0, 2, 2, 0, c_white, 1);
34
}
35
draw_set_color(c_black);
36
draw_rectangle(-10, 240, 900, 500, false);
37
scr_shopmenu
scr_shopmenu

function scr_shopmenu(arg0) { if (arg0 == 0) { if (menu == 1 || menu == 2) { scr_darkbox_black(400, minimenuy, 640, 255); draw_set_color(c_white); scr_84_set_draw_font("mainbig"); if (menuc[1] == 0) draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[0])); if (menuc[1] == 1) draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[1])); if (menuc[1] == 2) draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[2])); if (menuc[1] == 3) draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[3])); scr_84_set_draw_font("dotumche"); if (itemtype[menuc[1]] == "weapon" || itemtype[menuc[1]] == "armor") { for (i = 0; i < 3; i += 1) { can_index = 0; facetype = spr_headkris; which = global.char[i]; if (global.char[i] == 1) facetype = spr_headkris; if (global.char[i] == 2) facetype = spr_headsusie; if (global.char[i] == 3) facetype = spr_headralsei; if (which != 0) { if (i == 0) { locx = 0; locy = 0; } if (i == 1) { locx = 100; locy = 0; } if (i == 2) { locx = 0; locy = 45; } if (canequip[menuc[1]][which] == 0) can_index = 8; draw_sprite(facetype, can_index, 426 + locx, minimenuy + 140 + locy); if (itemtype[menuc[1]] == "weapon" && can_index != 8) { draw_set_color(c_white); sum[0] = itematk[menuc[1]] - global.itemat[which][0]; sum[1] = itemmagic[menuc[1]] - global.itemmag[which][0]; for (j = 0; j < 2; j += 1) { dcolor = c_white; addt = ""; draw_set_color(c_white); if (sum[j] > 0) { draw_set_color(c_yellow); addt = "+"; } if (sum[j] < 0) draw_set_color(c_aqua); draw_sprite_ext(spr_shopicon, j, 470 + locx, minimenuy + locy + 135 + (20 * j), 1, 1, 0, dcolor, 1); draw_text(490 + locx, minimenuy + locy + 135 + (20 * j), string_hash_to_newline(addt + string(sum[j]))); } } if (itemtype[menuc[1]] == "armor" && can_index != 8) { sum[0] = itemdef[menuc[1]] - global.itemdf[which][1]; sum[1] = itemdef[menuc[1]] - global.itemdf[which][2]; for (j = 0; j < 2; j += 1) { dcolor = c_white; addt = ""; draw_set_color(c_white); if (sum[j] > 0) { draw_set_color(c_yellow); addt = "+"; } if (sum[j] < 0) draw_set_color(c_aqua); draw_sprite_ext(spr_shopicon, 2 + j, 470 + locx, minimenuy + locy + 135 + (20 * j), 1, 1, 0, dcolor, 1); draw_text(490 + locx, minimenuy + 135 + (20 * j) + locy, string_hash_to_newline(addt + string(sum[j]))); } } } } } } } if (arg0 == 4) { if (menu == 11 || menu == 15) { ...
(0);
38
if (menu <= 3 || menu >= 10)
39
{
40
    scr_darkbox_black
scr_darkbox_black

function scr_darkbox_black(arg0, arg1, arg2, arg3) { draw_set_color(c_black); draw_rectangle(arg0 + 20, arg1 + 20, arg2 - 20, arg3 - 20, false); scr_darkbox(arg0, arg1, arg2, arg3); }
(0, 240, 415, 480);
41
    scr_darkbox_black
scr_darkbox_black

function scr_darkbox_black(arg0, arg1, arg2, arg3) { draw_set_color(c_black); draw_rectangle(arg0 + 20, arg1 + 20, arg2 - 20, arg3 - 20, false); scr_darkbox(arg0, arg1, arg2, arg3); }
(400, 240, 640, 480);
42
}
43
if (menu == 4)
44
    scr_darkbox_black
scr_darkbox_black

function scr_darkbox_black(arg0, arg1, arg2, arg3) { draw_set_color(c_black); draw_rectangle(arg0 + 20, arg1 + 20, arg2 - 20, arg3 - 20, false); scr_darkbox(arg0, arg1, arg2, arg3); }
(0, 240, 640, 480);
45
if (menu == 0)
46
{
47
    sell = 0;
48
    selling = 0;
49
    sidemessage = 0;
50
    menuc[1] = 0;
51
    menuc[2] = 0;
52
    menuc[3] = 0;
53
    menuc[4] = 0;
54
    if (instance_exists(obj_writer) == false)
55
    {
56
        global.typer = 6;
57
        msgsetloc(0, 
Face 0* Don't be blue.
* We're here for you.
"\\E0* Don't be blue.&* We're here for you.", "obj_shop_ch2_swatch_slash_Draw_0_gml_79_0"
);
58
        if (mainmessage == 0)
59
            msgsetloc(0, 
Face 0* Welcome to Color
Cafe.
* Let us warm your day.
"\\E0* Welcome to Color&Cafe.&* Let us warm your day.", "obj_shop_ch2_swatch_slash_Draw_0_gml_81_0"
);
60
        instance_create(30, 270, obj_writer);
61
    }
62
    menumax = 3;
63
    draw_set_color(c_white);
64
    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");
65
    draw_text(480, 260, string_hash_to_newline(stringsetloc(
Buy
"Buy", "obj_shop1_slash_Draw_0_gml_106_0"
)));
66
    draw_text(480, 300, string_hash_to_newline(stringsetloc(
Sell
"Sell", "obj_shop1_slash_Draw_0_gml_107_0"
)));
67
    draw_text(480, 340, string_hash_to_newline(stringsetloc(
Talk
"Talk", "obj_shop1_slash_Draw_0_gml_108_0"
)));
68
    draw_text(480, 380, string_hash_to_newline(stringsetloc(
Exit
"Exit", "obj_shop1_slash_Draw_0_gml_109_0"
)));
69
    draw_sprite(spr_heart, 0, 450, (135 + (menuc[0] * 20)) * 2);
70
    if (button1_p())
71
    {
72
        onebuffer = 2;
73
        mainmessage = 1;
74
        with (obj_writer)
75
            instance_destroy();
76
        if (menuc[0] == 0)
77
            menu = 1;
78
        if (menuc[0] == 1)
79
        {
80
            menu = 10;
81
            sidemessage = 0;
82
        }
83
        if (menuc[0] == 2)
84
            menu = 3;
85
        if (menuc[0] == 3)
86
        {
87
            sell = 2;
88
            menu = 4;
89
        }
90
    }
91
}
92
if (menu == 1 || menu == 2)
93
{
94
    draw_set_color(c_white);
95
    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");
96
    for (i = 0; i < itemtotal; i += 1)
97
    {
98
        draw_text(60, 260 + (i * 40), string_hash_to_newline(shopitemname[i]));
99
        draw_text(300, 260 + (i * 40), string_hash_to_newline(stringsetsubloc("$~1", string(buyvalue[i]), "obj_shop_ch2_swatch_slash_Draw_0_gml_120_0")));
100
    }
101
    draw_text(60, 260 + (itemtotal * 40), string_hash_to_newline(stringsetloc(
Exit
"Exit", "obj_shop1_slash_Draw_0_gml_139_0"
)));
102
    if (menu == 1)
103
    {
104
        menumax = 4;
105
        if (instance_exists(obj_writer) == false)
106
        {
107
            if (sidemessage == 0)
108
                msgsetloc(0, 
Face 0Our menu
is
specially
prepared.
"\\E0Our menu&is&specially&prepared.", "obj_shop_ch2_swatch_slash_Draw_0_gml_132_0"
);
109
            if (sidemessage == 1)
110
            {
111
                _rr = floor(random(10));
112
                msgsetloc(0, 
Face 0Queen
thanks you
for your
patronage.
"\\E0Queen&thanks you&for your&patronage.", "obj_shop_ch2_swatch_slash_Draw_0_gml_136_0"
);
113
            }
114
            if (sidemessage == 2)
115
                msgsetloc(0, 
Face 0Take your
time.
We'll be
waiting.
"\\E0Take your&time.&We'll be&waiting.", "obj_shop_ch2_swatch_slash_Draw_0_gml_139_0"
);
116
            if (sidemessage == 3)
117
                msgsetloc(0, 
Face 0You can't
afford it.
... maybe
next time?
"\\E0You can't&afford it.&... maybe&next time?", "obj_shop_ch2_swatch_slash_Draw_0_gml_140_0"
);
118
            if (sidemessage == 4)
119
                msgsetloc(0, 
Face 0Seems your
bags are
full. Shall
we assist?
"\\E0Seems your&bags are&full. Shall&we assist?", "obj_shop_ch2_swatch_slash_Draw_0_gml_141_0"
);
120
            if (sidemessage == 5)
121
                msgsetloc(0, 
Face 2Thanks, it'll
be in your
STORAGE.
"\\E2Thanks, it'll&be in your&STORAGE.", "obj_shop_ch2_swatch_slash_Draw_0_gml_142_0"
);
122
            if (murder == 1)
123
                global.msg[0] = stringsetloc(
Wait for input*
"/*", "obj_shop1_slash_Draw_0_gml_153_0"
);
124
            instance_create(450, 260, obj_writer);
125
        }
126
        draw_sprite(spr_heart, 0, 30, 270 + (menuc[1] * 40));
127
        if (button1_p() && onebuffer < 0)
128
        {
129
            menu = 2;
130
            onebuffer = 2;
131
            with (obj_writer)
132
                instance_destroy();
133
            if (menuc[1] == menumax)
134
                menu = 0;
135
        }
136
        if (button2_p() && twobuffer < 0 && onebuffer < 2)
137
        {
138
            menu = 0;
139
            twobuffer = 2;
140
            minimenuy = 220;
141
            with (obj_writer)
142
                instance_destroy();
143
        }
144
        menuc[2] = 0;
145
    }
146
    if (menu == 2)
147
    {
148
        menumax = 1;
149
        draw_set_color(c_white);
150
        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");
151
        var y1_off = langopt(260, 290);
152
        var y2_off = langopt(290, 260);
153
        draw_text(460, y1_off, string_hash_to_newline(stringsetloc(
Buy it for
"Buy it for", "obj_shop1_slash_Draw_0_gml_167_0"
)));
154
        draw_text(460, y2_off, string_hash_to_newline(stringsetsubloc("$~1 ?", string(buyvalue[menuc[1]]), "obj_shop_ch2_swatch_slash_Draw_0_gml_160_0")));
155
        draw_text(480, 340, string_hash_to_newline(stringsetloc(
Yes
"Yes", "obj_shop1_slash_Draw_0_gml_169_0"
)));
156
        draw_text(480, 370, string_hash_to_newline(stringsetloc(
No
"No", "obj_shop1_slash_Draw_0_gml_170_0"
)));
157
        draw_sprite(spr_heart, 0, 450, 350 + (menuc[2] * 30));
158
        if (button2_p() && twobuffer < 0)
159
        {
160
            menu = 1;
161
            sidemessage = 2;
162
            twobuffer = 2;
163
            onebuffer = 2;
164
        }
165
        if (button1_p() && onebuffer < 0 && twobuffer < 0)
166
        {
167
            if (menuc[2] == 0)
168
            {
169
                afford = 0;
170
                if (global.gold >= buyvalue[menuc[1]])
171
                    afford = 1;
172
                if (afford == 1)
173
                {
174
                    _pocketed = 0;
175
                    if (itemtype[menuc[1]] == "item")
176
                        scr_itemget
scr_itemget

function scr_itemget(arg0) { var __i = 0; var loop = 1; noroom = 0; _pocketed = 0; _noroominventory = 0; global.item[12] = 999; while (loop == 1) { if (global.item[__i] == 0) { global.item[__i] = arg0; break; } if (__i == 12) { _noroominventory = 1; noroom = 1; for (var __j = 0; __j < global.flag[64 storage_size]; __j++) { if (global.pocketitem[__j] == 0) { global.pocketitem[__j] = arg0; _pocketed = 1; noroom = 0; break; } } break; } __i += 1; } script_execute(scr_iteminfo_all); }
(item[menuc[1]]);
177
                    if (itemtype[menuc[1]] == "weapon")
178
                        scr_weaponget
scr_weaponget

function scr_weaponget(arg0) { noroom = 0; var legacy = 0; var __i = 0; if (legacy == 0) { var __itemcount = 0; __weapon[0] = arg0; for (__i = 0; __i < 48; __i++) { if (global.weapon[__i] != 0) { __weapon[__itemcount + 1] = global.weapon[__i]; __itemcount++; } } if (__itemcount >= 48) { noroom = 1; } else { for (__i = 0; __i < 48; __i++) { if (__i <= __itemcount) global.weapon[__i] = __weapon[__i]; else global.weapon[__i] = 0; } } } else if (legacy) { loop = 1; global.weapon[48] = 999; while (loop == 1) { if (global.weapon[__i] == 0) { global.weapon[__i] = arg0; break; } if (__i == 48) { noroom = 1; break; } __i += 1; } } script_execute(scr_weaponinfo_all); }
(item[menuc[1]]);
179
                    if (itemtype[menuc[1]] == "armor")
180
                        scr_armorget
scr_armorget

function scr_armorget(arg0) { noroom = 0; var legacy = 0; var __i = 0; if (legacy == 0) { var __itemcount = 0; __armor[0] = arg0; for (__i = 0; __i < 48; __i++) { if (global.armor[__i] != 0) { __armor[__itemcount + 1] = global.armor[__i]; __itemcount++; } } if (__itemcount >= 48) { noroom = 1; } else { for (__i = 0; __i < 48; __i++) { if (__i <= __itemcount) global.armor[__i] = __armor[__i]; else global.armor[__i] = 0; } } } else if (legacy) { loop = 1; global.armor[48] = 999; while (loop == 1) { if (global.armor[__i] == 0) { global.armor[__i] = arg0; break; } if (__i == 48) { noroom = 1; break; } __i += 1; } } script_execute(scr_armorinfo_all); }
(item[menuc[1]]);
181
                    if (noroom == 0)
182
                    {
183
                        global.gold -= buyvalue[menuc[1]];
184
                        snd_play(snd_locker);
185
                        if (_pocketed == 1)
186
                            sidemessage = 5;
187
                        else
188
                            sidemessage = 1;
189
                    }
190
                    if (noroom == 1)
191
                        sidemessage = 4;
192
                }
193
                else
194
                {
195
                    sidemessage = 3;
196
                }
197
            }
198
            if (menuc[2] == 1)
199
                sidemessage = 2;
200
            menu = 1;
201
        }
202
    }
203
    if (menuc[1] != 4)
204
    {
205
        if (minimenuy <= 20)
206
            minimenuy = 20;
207
        if (minimenuy > 20)
208
            minimenuy -= 5;
209
        if (minimenuy > 50)
210
            minimenuy -= 5;
211
        if (minimenuy > 100)
212
            minimenuy -= 8;
213
        if (minimenuy > 150)
214
            minimenuy -= 10;
215
    }
216
    else if (minimenuy < 200)
217
    {
218
        minimenuy += 40;
219
    }
220
    if (minimenuy >= 200)
221
        minimenuy = 200;
222
}
223
if (menu == 3)
224
{
225
    menumax = 4;
226
    draw_set_color(c_white);
227
    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");
228
    draw_text(80, 260, string_hash_to_newline(stringsetloc(
About yourself
"About yourself", "obj_shop1_slash_Draw_0_gml_217_0"
)));
229
    draw_text(80, 300, stringsetloc(
Mission Statement
"Mission Statement", "obj_shop_ch2_swatch_slash_Draw_0_gml_213_0"
));
230
    draw_text(80, 340, stringsetloc(
Rouxls Kaard
"Rouxls Kaard", "obj_shop_ch2_swatch_slash_Draw_0_gml_214_0"
));
231
    if (global.flag[309 spamton_plot] >= 5 && global.flag[309 spamton_plot] < 9)
232
    {
233
        draw_set_color(c_yellow);
234
        draw_text(80, 380, stringsetloc(
Basement
"Basement", "obj_shop_ch2_swatch_slash_Draw_0_gml_222_0"
));
235
    }
236
    else if (global.flag[309 spamton_plot] == 9)
237
    {
238
        draw_set_color(c_yellow);
239
        draw_text(80, 380, stringsetloc(
Basement Robot
"Basement Robot", "obj_shop_ch2_swatch_slash_Draw_0_gml_227_0"
));
240
    }
241
    else
242
    {
243
        draw_text(80, 380, stringsetloc(
Outfit
"Outfit", "obj_shop_ch2_swatch_slash_Draw_0_gml_217_0"
));
244
    }
245
    draw_set_color(c_white);
246
    draw_text(80, 420, string_hash_to_newline(stringsetloc(
Exit
"Exit", "obj_shop1_slash_Draw_0_gml_240_0"
)));
247
    if (instance_exists(obj_writer) == false)
248
    {
249
        global.msg[0] = stringsetloc(
Chatting
would be
our
pleasure.
"Chatting&would be&our&pleasure.", "obj_shop_ch2_swatch_slash_Draw_0_gml_236_0"
);
250
        instance_create(440, 260, obj_writer);
251
    }
252
    draw_sprite(spr_heart, 0, 50, 270 + (menuc[3] * 40));
253
    if (button1_p() && onebuffer < 0)
254
    {
255
        onebuffer = 2;
256
        with (obj_writer)
257
            instance_destroy();
258
        if (menuc[3] < menumax)
259
        {
260
            sell = menuc[3] + 3;
261
            menu = 4;
262
        }
263
        else
264
        {
265
            menu = 0;
266
        }
267
    }
268
    else if (button2_p() && twobuffer < 0 && onebuffer < 0)
269
    {
270
        twobuffer = 2;
271
        menu = 0;
272
        with (obj_writer)
273
            instance_destroy();
274
    }
275
}
276
if (menu == 10)
277
{
278
    menuc[11] = 0;
279
    menuc[12] = 0;
280
    menuc[13] = 0;
281
    menumax = 4;
282
    draw_set_color(c_white);
283
    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");
284
    draw_text(80, 260, string_hash_to_newline(stringsetloc(
Sell Items
"Sell Items", "obj_shop1_slash_Draw_0_gml_278_0"
)));
285
    draw_text(80, 300, string_hash_to_newline(stringsetloc(
Sell Weapons
"Sell Weapons", "obj_shop1_slash_Draw_0_gml_279_0"
)));
286
    draw_text(80, 340, string_hash_to_newline(stringsetloc(
Sell Armor
"Sell Armor", "obj_shop1_slash_Draw_0_gml_280_0"
)));
287
    draw_text(80, 380, string_hash_to_newline(stringsetloc(
Sell Pocket Items
"Sell Pocket Items", "obj_shop_ch2_swatch_slash_Draw_0_gml_273_0"
)));
288
    draw_text(80, 420, string_hash_to_newline(stringsetloc(
Return
"Return", "obj_shop_ch2_swatch_slash_Draw_0_gml_274_0"
)));
289
    if (instance_exists(obj_writer) == false)
290
    {
291
        if (sidemessage == 0)
292
            msgsetloc(0, 
Queen...
Makes us
buy trash
for her.
"Queen...&Makes us&buy trash&for her.", "obj_shop_ch2_swatch_slash_Draw_0_gml_278_0"
);
293
        if (sidemessage == 1)
294
            msgsetloc(0, 
That's all.
Need any
help with
your bags?
"That's all.&Need any&help with&your bags?", "obj_shop_ch2_swatch_slash_Draw_0_gml_279_0"
);
295
        if (sidemessage == 2)
296
            msgsetloc(0, 
It seems
you don't
have
anything.
"It seems&you don't&have&anything.", "obj_shop_ch2_swatch_slash_Draw_0_gml_280_0"
);
297
        instance_create(460, 260, obj_writer);
298
    }
299
    draw_sprite(spr_heart, 0, 50, 270 + (menuc[10] * 40));
300
    if (button1_p() && onebuffer < 0)
301
    {
302
        pagemax = 0;
303
        sidemessage2 = 0;
304
        onebuffer = 2;
305
        with (obj_writer)
306
            instance_destroy();
307
        can = 1;
308
        idealmenu = menuc[10] + 11;
309
        if (idealmenu == 11)
310
        {
311
            scr_itemcheck
scr_itemcheck

function scr_itemcheck(arg0) { haveit = 0; itemcount = 0; for (var __i = 0; __i < 12; __i += 1) { if (global.item[__i] == arg0) haveit = 1; if (global.item[__i] == arg0) itemcount += 1; } return haveit; }
(0);
312
            if (itemcount == 12)
313
            {
314
                sidemessage = 2;
315
                can = 0;
316
            }
317
            nothingcount = itemcount;
318
            scr_iteminfo_all
scr_iteminfo_all

function scr_iteminfo_all() { for (i = 0; i < 12; i += 1) { itemid = global.item[i]; scr_iteminfo(itemid); global.itemnameb[i] = itemnameb; global.itemdescb[i] = itemdescb; global.itemvalue[i] = value; global.itemusable[i] = usable; } }
();
319
            selltype = "item";
320
            selltotal = 12;
321
            for (i = 0; i < selltotal; i++)
322
            {
323
                itemsellvalue[i] = global.itemvalue[i];
324
                itemsellname[i] = global.itemnameb[i];
325
            }
326
        }
327
        if (idealmenu == 12)
328
        {
329
            scr_weaponcheck_inventory
scr_weaponcheck_inventory

function scr_weaponcheck_inventory(arg0) { haveit = 0; itemcount = 0; for (i = 0; i < 48; i += 1) { if (global.weapon[i] == arg0) haveit = 1; if (global.weapon[i] == arg0) itemcount += 1; } return haveit; }
(0);
330
            if (itemcount == 48)
331
            {
332
                sidemessage = 2;
333
                can = 0;
334
            }
335
            scr_weaponinfo_all
scr_weaponinfo_all

function scr_weaponinfo_all() { for (i = 0; i < 48; i += 1) { scr_weaponinfo(global.weapon[i]); weaponname[i] = weaponnametemp; weapondesc[i] = weapondesctemp; wmessage2[i] = wmessage2temp; wmessage3[i] = wmessage3temp; wmessage4[i] = wmessage4temp; weaponat[i] = weaponattemp; weapondf[i] = weapondftemp; weaponmag[i] = weaponmagtemp; weaponbolts[i] = weaponboltstemp; weaponstyle[i] = weaponstyletemp; weapongrazeamt[i] = weapongrazeamttemp; weapongrazesize[i] = weapongrazesizetemp; weaponchar1[i] = weaponchar1temp; weaponchar2[i] = weaponchar2temp; weaponchar3[i] = weaponchar3temp; weaponchar4[i] = weaponchar4temp; weaponvalue[i] = value; weaponability[i] = weaponabilitytemp; weaponabilityicon[i] = weaponabilityicontemp; weaponicon[i] = weaponicontemp; } }
();
336
        }
337
        if (idealmenu == 13)
338
        {
339
            scr_armorcheck_inventory
scr_armorcheck_inventory

function scr_armorcheck_inventory(arg0) { haveit = 0; itemcount = 0; for (i = 0; i < 48; i += 1) { if (global.armor[i] == arg0) haveit = 1; if (global.armor[i] == arg0) itemcount += 1; } return haveit; }
(0);
340
            if (itemcount == 48)
341
            {
342
                sidemessage = 2;
343
                can = 0;
344
            }
345
            scr_armorinfo_all
scr_armorinfo_all

function scr_armorinfo_all() { for (i = 0; i < 48; i += 1) { scr_armorinfo(global.armor[i]); armorname[i] = armornametemp; armordesc[i] = armordesctemp; amessage2[i] = amessage2temp; amessage3[i] = amessage3temp; amessage4[i] = amessage4temp; armorat[i] = armorattemp; armordf[i] = armordftemp; armormag[i] = armormagtemp; armorbolts[i] = armorboltstemp; armorgrazeamt[i] = armorgrazeamttemp; armorgrazesize[i] = armorgrazesizetemp; armorchar1[i] = armorchar1temp; armorchar2[i] = armorchar2temp; armorchar3[i] = armorchar3temp; armorchar4[i] = armorchar4temp; armorvalue[i] = value; armorability[i] = armorabilitytemp; armorabilityicon[i] = armorabilityicontemp; armoricon[i] = armoricontemp; armorelement[i] = armorelementtemp; armorelementamount[i] = armorelementamounttemp; } }
();
346
        }
347
        if (idealmenu == 14)
348
        {
349
            scr_itemcheck_pocket
scr_itemcheck_pocket

function scr_itemcheck_pocket(arg0) { haveit = 0; itemcount = 0; for (var __i = 0; __i < global.flag[64 storage_size]; __i += 1) { if (global.pocketitem[__i] == arg0) haveit = 1; if (global.pocketitem[__i] == arg0) itemcount += 1; } return haveit; }
(0);
350
            if (itemcount == global.flag[64 storage_size])
351
            {
352
                sidemessage = 2;
353
                can = 0;
354
            }
355
            selltype = "pocket";
356
            nothingcount = 0;
357
            selltotal = global.flag[64 storage_size];
358
            for (i = 0; i < global.flag[64 storage_size]; i++)
359
            {
360
                scr_iteminfo
scr_iteminfo

function scr_iteminfo(arg0) { usable = 0; replaceable = 0; value = 0; itemtarget = 0; itemnameb = " "; itemdescb = " "; switch (arg0) { case 0: itemnameb = " "; itemdescb = "---"; break; case 1: itemnameb = stringsetloc(
Dark Candy
"Dark Candy", "scr_iteminfo_slash_scr_iteminfo_gml_15_0"
); itemdescb = stringsetloc(
Heals#40HP
"Heals#40HP", "scr_iteminfo_slash_scr_iteminfo_gml_16_0"
); itemtarget = 1; value = 25; usable = 1; break; case 2: itemnameb = stringsetloc(
ReviveMint
"ReviveMint", "scr_iteminfo_slash_scr_iteminfo_gml_22_0"
); itemdescb = stringsetloc(
Heal#Downed#Ally
"Heal#Downed#Ally", "scr_iteminfo_slash_scr_iteminfo_gml_23_0"
); itemtarget = 1; value = 400; usable = 1; break; case 3: itemnameb = stringsetloc(
Glowshard
"Glowshard", "scr_iteminfo_slash_scr_iteminfo_gml_29_0"
); itemdescb = stringsetloc(
Sell#at#shops
"Sell#at#shops", "scr_iteminfo_slash_scr_iteminfo_gml_30_0"
); itemtarget = 0; value = 200 + (global.chapter * 100); usable = 0; break; case 4: itemnameb = stringsetloc(
Manual
"Manual", "scr_iteminfo_slash_scr_iteminfo_gml_36_0"
); itemdescb = stringsetloc(
Read#out of#battle
"Read#out of#battle", "scr_iteminfo_slash_scr_iteminfo_gml_37_0"
); itemtarget = 2; value = 1; usable = 0; break; case 5: itemnameb = stringsetloc(
BrokenCake
"BrokenCake", "scr_iteminfo_slash_scr_iteminfo_gml_43_0"
); itemdescb = stringsetloc(
Heals#20HP
"Heals#20HP", "scr_iteminfo_slash_scr_iteminfo_gml_44_0"
); itemtarget = 1; value = 5; usable = 1; break; case 6: itemnameb = stringsetloc(
Top Cake
"Top Cake", "scr_iteminfo_slash_scr_iteminfo_gml_50_0"
); itemdescb = stringsetloc(
Heals#team#160HP
"Heals#team#160HP", "scr_iteminfo_slash_scr_iteminfo_gml_51_0"
); itemtarget = 2; value = 150; usable = 1; break; case 7: var healamount = (global.chapter == 1) ? 80 : 140; itemnameb = stringsetloc(
Spincake
"Spincake", "scr_iteminfo_slash_scr_iteminfo_gml_58_0"
); itemdescb = stringsetsubloc("Heals#team#~1HP", string(healamount), "scr_iteminfo_slash_scr_iteminfo_gml_59_0"); itemtarget = 2; value = 5; usable = 1; break; case 8: itemnameb = stringsetloc(
Darkburger
"Darkburger", "scr_iteminfo_slash_scr_iteminfo_gml_65_0"
); itemdescb = stringsetloc(
Heals#70HP
"Heals#70HP", "scr_iteminfo_slash_scr_iteminfo_gml_66_0"
); itemtarget = 1; value = 70; usable = 1; break; case 9: itemnameb = stringsetloc(
LancerCookie
"LancerCookie", "scr_iteminfo_slash_scr_iteminfo_gml_72_0"
); itemdescb = stringsetloc(
Heals#50HP
"Heals#50HP", "scr_iteminfo_slash_scr_iteminfo_gml_73_0"
); itemtarget = 1; value = 10; usable = 1; break; case 10: itemnameb = stringsetloc(
GigaSalad
"GigaSalad", "scr_iteminfo_slash_scr_iteminfo_gml_79_0"
); itemdescb = stringsetloc(
Heals#4HP
"Heals#4HP", "scr_iteminfo_slash_scr_iteminfo_gml_80_0"
); itemtarget = 1; value = 10; usable = 1; break; case 11: itemnameb = stringsetloc(
ClubsSandwich
"ClubsSandwich", "scr_iteminfo_slash_scr_iteminfo_gml_86_0"
); itemdescb = stringsetloc(
Heals#team#70HP
"Heals#team#70HP", "scr_iteminfo_slash_scr_iteminfo_gml_87_0"
); itemtarget = 2; value = 70; usable = 1; break; case 12: itemnameb = stringsetloc(
HeartsDonut
"HeartsDonut", "scr_iteminfo_slash_scr_iteminfo_gml_93_0"
); itemdescb = stringsetloc(
Healing#varies
"Healing#varies", "scr_iteminfo_slash_scr_iteminfo_gml_94_0"
); itemtarget = 1; value = 40; usable = 1; break; case 13: itemnameb = stringsetloc(
ChocDiamond
"ChocDiamond", "scr_iteminfo_slash_scr_iteminfo_gml_100_0"
); ...
(global.pocketitem[i]);
361
                itemsellvalue[i] = value;
362
                itemsellname[i] = itemnameb;
363
            }
364
            idealmenu = 11;
365
        }
366
        if (menuc[10] < menumax)
367
        {
368
            if (can == 1)
369
                menu = idealmenu;
370
            sidemessage1 = 0;
371
        }
372
        else
373
        {
374
            menu = 0;
375
        }
376
        submenu = 0;
377
        submenuc[1] = 0;
378
    }
379
    if (button2_p() && twobuffer < 0 && onebuffer < 0)
380
    {
381
        twobuffer = 2;
382
        menu = 0;
383
        with (obj_writer)
384
            instance_destroy();
385
    }
386
}
387
if (menu == 11 || menu == 12 || menu == 13)
388
{
389
    if (instance_exists(obj_writer) == false)
390
    {
391
        if (sidemessage2 == 0 && menu == 11)
392
            msgsetloc(0, 
An ITEM
to delight
our Queen?
"An ITEM&to delight&our Queen?", "obj_shop_ch2_swatch_slash_Draw_0_gml_366_0"
);
393
        if (sidemessage2 == 0 && menu == 12)
394
            msgsetloc(0, 
A WEAPON
to protect
our Queen?
"A WEAPON&to protect&our Queen?", "obj_shop_ch2_swatch_slash_Draw_0_gml_367_0"
);
395
        if (sidemessage2 == 0 && menu == 13)
396
            msgsetloc(0, 
ARMOR
to adorn
our Queen?
"ARMOR&to adorn&our Queen?", "obj_shop_ch2_swatch_slash_Draw_0_gml_368_0"
);
397
        if (sidemessage2 == 1)
398
            msgsetloc(0, 
I'm sure
she's going
to enjoy
this.
"I'm sure&she's going&to enjoy&this.", "obj_shop_ch2_swatch_slash_Draw_0_gml_369_0"
);
399
        if (sidemessage2 == 2)
400
            msgsetloc(0, 
Changed
your mind?
We'll
wait.
"Changed&your mind?&We'll&wait.", "obj_shop_ch2_swatch_slash_Draw_0_gml_370_0"
);
401
        if (sidemessage2 == 3)
402
            msgsetloc(0, 
There are
some things
we cannot
buy.
"There are&some things&we cannot&buy.", "obj_shop_ch2_swatch_slash_Draw_0_gml_371_0"
);
403
        if (sidemessage2 == 4)
404
            msgsetloc(0, 
Black is
the color
of
sorrow.
"Black is&the color&of&sorrow.", "obj_shop_ch2_swatch_slash_Draw_0_gml_372_0"
);
405
        instance_create(450, 260, obj_writer);
406
    }
407
}
408
scr_shopmenu
scr_shopmenu

function scr_shopmenu(arg0) { if (arg0 == 0) { if (menu == 1 || menu == 2) { scr_darkbox_black(400, minimenuy, 640, 255); draw_set_color(c_white); scr_84_set_draw_font("mainbig"); if (menuc[1] == 0) draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[0])); if (menuc[1] == 1) draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[1])); if (menuc[1] == 2) draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[2])); if (menuc[1] == 3) draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[3])); scr_84_set_draw_font("dotumche"); if (itemtype[menuc[1]] == "weapon" || itemtype[menuc[1]] == "armor") { for (i = 0; i < 3; i += 1) { can_index = 0; facetype = spr_headkris; which = global.char[i]; if (global.char[i] == 1) facetype = spr_headkris; if (global.char[i] == 2) facetype = spr_headsusie; if (global.char[i] == 3) facetype = spr_headralsei; if (which != 0) { if (i == 0) { locx = 0; locy = 0; } if (i == 1) { locx = 100; locy = 0; } if (i == 2) { locx = 0; locy = 45; } if (canequip[menuc[1]][which] == 0) can_index = 8; draw_sprite(facetype, can_index, 426 + locx, minimenuy + 140 + locy); if (itemtype[menuc[1]] == "weapon" && can_index != 8) { draw_set_color(c_white); sum[0] = itematk[menuc[1]] - global.itemat[which][0]; sum[1] = itemmagic[menuc[1]] - global.itemmag[which][0]; for (j = 0; j < 2; j += 1) { dcolor = c_white; addt = ""; draw_set_color(c_white); if (sum[j] > 0) { draw_set_color(c_yellow); addt = "+"; } if (sum[j] < 0) draw_set_color(c_aqua); draw_sprite_ext(spr_shopicon, j, 470 + locx, minimenuy + locy + 135 + (20 * j), 1, 1, 0, dcolor, 1); draw_text(490 + locx, minimenuy + locy + 135 + (20 * j), string_hash_to_newline(addt + string(sum[j]))); } } if (itemtype[menuc[1]] == "armor" && can_index != 8) { sum[0] = itemdef[menuc[1]] - global.itemdf[which][1]; sum[1] = itemdef[menuc[1]] - global.itemdf[which][2]; for (j = 0; j < 2; j += 1) { dcolor = c_white; addt = ""; draw_set_color(c_white); if (sum[j] > 0) { draw_set_color(c_yellow); addt = "+"; } if (sum[j] < 0) draw_set_color(c_aqua); draw_sprite_ext(spr_shopicon, 2 + j, 470 + locx, minimenuy + locy + 135 + (20 * j), 1, 1, 0, dcolor, 1); draw_text(490 + locx, minimenuy + 135 + (20 * j) + locy, string_hash_to_newline(addt + string(sum[j]))); } } } } } } } if (arg0 == 4) { if (menu == 11 || menu == 15) { ...
(4);
409
if (menu == 15 || menu == 16 || menu == 17)
410
{
411
    menumax = 1;
412
    draw_set_color(c_white);
413
    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");
414
    var y1_off = langopt(260, 290);
415
    var y2_off = langopt(290, 260);
416
    draw_text(460, y1_off, string_hash_to_newline(stringsetloc(
Sell it for
"Sell it for", "obj_shop1_slash_Draw_0_gml_365_0"
)));
417
    draw_text(460, y2_off, string_hash_to_newline(stringsetsubloc("$~1 ?", string(sellvalue), "obj_shop_ch2_swatch_slash_Draw_0_gml_387_0")));
418
    draw_text(480, 340, string_hash_to_newline(stringsetloc(
Yes
"Yes", "obj_shop1_slash_Draw_0_gml_367_0"
)));
419
    draw_text(480, 370, string_hash_to_newline(stringsetloc(
No
"No", "obj_shop1_slash_Draw_0_gml_368_0"
)));
420
    draw_sprite(spr_heart, 0, 450, 350 + (menuc[menu] * 30));
421
}
422
scr_shopmenu
scr_shopmenu

function scr_shopmenu(arg0) { if (arg0 == 0) { if (menu == 1 || menu == 2) { scr_darkbox_black(400, minimenuy, 640, 255); draw_set_color(c_white); scr_84_set_draw_font("mainbig"); if (menuc[1] == 0) draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[0])); if (menuc[1] == 1) draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[1])); if (menuc[1] == 2) draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[2])); if (menuc[1] == 3) draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[3])); scr_84_set_draw_font("dotumche"); if (itemtype[menuc[1]] == "weapon" || itemtype[menuc[1]] == "armor") { for (i = 0; i < 3; i += 1) { can_index = 0; facetype = spr_headkris; which = global.char[i]; if (global.char[i] == 1) facetype = spr_headkris; if (global.char[i] == 2) facetype = spr_headsusie; if (global.char[i] == 3) facetype = spr_headralsei; if (which != 0) { if (i == 0) { locx = 0; locy = 0; } if (i == 1) { locx = 100; locy = 0; } if (i == 2) { locx = 0; locy = 45; } if (canequip[menuc[1]][which] == 0) can_index = 8; draw_sprite(facetype, can_index, 426 + locx, minimenuy + 140 + locy); if (itemtype[menuc[1]] == "weapon" && can_index != 8) { draw_set_color(c_white); sum[0] = itematk[menuc[1]] - global.itemat[which][0]; sum[1] = itemmagic[menuc[1]] - global.itemmag[which][0]; for (j = 0; j < 2; j += 1) { dcolor = c_white; addt = ""; draw_set_color(c_white); if (sum[j] > 0) { draw_set_color(c_yellow); addt = "+"; } if (sum[j] < 0) draw_set_color(c_aqua); draw_sprite_ext(spr_shopicon, j, 470 + locx, minimenuy + locy + 135 + (20 * j), 1, 1, 0, dcolor, 1); draw_text(490 + locx, minimenuy + locy + 135 + (20 * j), string_hash_to_newline(addt + string(sum[j]))); } } if (itemtype[menuc[1]] == "armor" && can_index != 8) { sum[0] = itemdef[menuc[1]] - global.itemdf[which][1]; sum[1] = itemdef[menuc[1]] - global.itemdf[which][2]; for (j = 0; j < 2; j += 1) { dcolor = c_white; addt = ""; draw_set_color(c_white); if (sum[j] > 0) { draw_set_color(c_yellow); addt = "+"; } if (sum[j] < 0) draw_set_color(c_aqua); draw_sprite_ext(spr_shopicon, 2 + j, 470 + locx, minimenuy + locy + 135 + (20 * j), 1, 1, 0, dcolor, 1); draw_text(490 + locx, minimenuy + 135 + (20 * j) + locy, string_hash_to_newline(addt + string(sum[j]))); } } } } } } } if (arg0 == 4) { if (menu == 11 || menu == 15) { ...
(5);
423
if (menu == 4)
424
{
425
    if (sell == 0)
426
        menu = 0;
427
    if (instance_exists(obj_writer) == false && selling == 0)
428
    {
429
        selling = 1;
430
        if (sell == 1)
431
        {
432
        }
433
        if (sell == 2)
434
            msgsetloc(0, 
Face 0* Please come again.
* We'll be waiting for you
with rose-tinted glasses...Wait for inputClose Message
"\\E0* Please come again.&* We'll be waiting for you&with rose-tinted glasses.../%", "obj_shop_ch2_swatch_slash_Draw_0_gml_415_0"
);
435
        if (sell == 3)
436
        {
437
            scr_speaker
scr_speaker

function scr_speaker(arg0) { _speaker = arg0; global.typer = 5; if (global.darkzone == 1) global.typer = 6; if (global.fighting == 1) global.typer = 4; global.fc = 0; global.fe = 0; if (_speaker == "silent" && global.darkzone == 0) global.typer = 2; if (_speaker == "silent" && global.darkzone == 1) global.typer = 36; if (_speaker == "balloon" || _speaker == "enemy") global.typer = 50; if (_speaker == "sans") { global.typer = 14; global.fc = 6; } if (_speaker == "undyne" || _speaker == "und") { global.typer = 17; global.fc = 9; } if (_speaker == "temmie" || _speaker == "tem") global.typer = 21; if (_speaker == "jevil") global.typer = 35; if (_speaker == "catti") global.fc = 13; if (_speaker == "jockington" || _speaker == "joc") global.fc = 14; if (_speaker == "catty" || _speaker == "caddy") global.fc = 16; if (_speaker == "bratty" || _speaker == "bra") global.fc = 17; if (_speaker == "rouxls" || _speaker == "rou") global.fc = 18; if (_speaker == "burgerpants" || _speaker == "bur") global.fc = 19; if (_speaker == "spamton") { if (global.fighting == 0) global.typer = 66; else global.typer = 68; } if (_speaker == "sneo") global.typer = 67; if (_speaker == "susie" || _speaker == "sus") { global.fc = 1; global.typer = 10; if (global.darkzone == 1) { global.typer = 30; if (global.fighting == 1) global.typer = 47; } } if (_speaker == "ralsei" || _speaker == "ral") { global.fc = 2; global.typer = 31; if (global.fighting == 1) global.typer = 45; if (global.flag[30 ralsei_hat_state] == 1) global.typer = 6; } if (_speaker == "noelle" || _speaker == "noe") { global.fc = 3; if (global.darkzone == 0) global.typer = 12; else global.typer = 56; if (global.fighting == 1) global.typer = 59; } if (_speaker == "toriel" || _speaker == "tor") { global.fc = 4; global.typer = 7; } if (_speaker == "asgore" || _speaker == "asg") { global.fc = 10; global.typer = 18; } if (_speaker == "king" || _speaker == "kin") { global.fc = 20; global.typer = 33; if (global.chapter == 1) { if (global.plot < 235) global.typer = 36; } if (global.fighting == 1) ...
("no_name");
438
            msgsetloc(0, 
* Ah,Delay 11 forgive me for not introducing myself sooner,Delay 11 young masters.Wait for input
"* Ah^1, forgive me for not introducing myself sooner^1, young masters./", "obj_shop_ch2_swatch_slash_Draw_0_gml_421_0"
);
439
            msgnextloc(
* I am Swatch,Delay 11 Our Lady Grace's head butler.Wait for input
"* I am Swatch^1, Our Lady Grace's head butler./", "obj_shop_ch2_swatch_slash_Draw_0_gml_422_0"
);
440
            msgnextloc(
* When we are not attending to her needs,Delay 11 I and the Queen's other staff,Delay 11Wait for input
"* When we are not attending to her needs^1, I and the Queen's other staff^1,/", "obj_shop_ch2_swatch_slash_Draw_0_gml_423_0"
);
441
            msgnextloc(
* Use this room as our humble yet colorful gift-shop-slash-cafe.Wait for input
"* Use this room as our humble yet colorful gift-shop-slash-cafe./", "obj_shop_ch2_swatch_slash_Draw_0_gml_424_0"
);
442
            msgnextloc(
* Please,Delay 11 shop to your heart's content. We are eager to serve your any wish.Wait for inputClose Message
"* Please^1, shop to your heart's content. We are eager to serve your any wish./%", "obj_shop_ch2_swatch_slash_Draw_0_gml_425_0"
);
443
        }
444
        if (sell == 4)
445
        {
446
            scr_speaker
scr_speaker

function scr_speaker(arg0) { _speaker = arg0; global.typer = 5; if (global.darkzone == 1) global.typer = 6; if (global.fighting == 1) global.typer = 4; global.fc = 0; global.fe = 0; if (_speaker == "silent" && global.darkzone == 0) global.typer = 2; if (_speaker == "silent" && global.darkzone == 1) global.typer = 36; if (_speaker == "balloon" || _speaker == "enemy") global.typer = 50; if (_speaker == "sans") { global.typer = 14; global.fc = 6; } if (_speaker == "undyne" || _speaker == "und") { global.typer = 17; global.fc = 9; } if (_speaker == "temmie" || _speaker == "tem") global.typer = 21; if (_speaker == "jevil") global.typer = 35; if (_speaker == "catti") global.fc = 13; if (_speaker == "jockington" || _speaker == "joc") global.fc = 14; if (_speaker == "catty" || _speaker == "caddy") global.fc = 16; if (_speaker == "bratty" || _speaker == "bra") global.fc = 17; if (_speaker == "rouxls" || _speaker == "rou") global.fc = 18; if (_speaker == "burgerpants" || _speaker == "bur") global.fc = 19; if (_speaker == "spamton") { if (global.fighting == 0) global.typer = 66; else global.typer = 68; } if (_speaker == "sneo") global.typer = 67; if (_speaker == "susie" || _speaker == "sus") { global.fc = 1; global.typer = 10; if (global.darkzone == 1) { global.typer = 30; if (global.fighting == 1) global.typer = 47; } } if (_speaker == "ralsei" || _speaker == "ral") { global.fc = 2; global.typer = 31; if (global.fighting == 1) global.typer = 45; if (global.flag[30 ralsei_hat_state] == 1) global.typer = 6; } if (_speaker == "noelle" || _speaker == "noe") { global.fc = 3; if (global.darkzone == 0) global.typer = 12; else global.typer = 56; if (global.fighting == 1) global.typer = 59; } if (_speaker == "toriel" || _speaker == "tor") { global.fc = 4; global.typer = 7; } if (_speaker == "asgore" || _speaker == "asg") { global.fc = 10; global.typer = 18; } if (_speaker == "king" || _speaker == "kin") { global.fc = 20; global.typer = 33; if (global.chapter == 1) { if (global.plot < 235) global.typer = 36; } if (global.fighting == 1) ...
("no_name");
447
            msgsetloc(0, 
* Does a woman of Our Lady Grace's caliber not deserve -Wait for input
"* Does a woman of Our Lady Grace's caliber not deserve -/", "obj_shop_ch2_swatch_slash_Draw_0_gml_431_0"
);
448
            msgnextloc(
* A coven of powerful men and women to dote upon her every movement?Wait for input
"* A coven of powerful men and women to dote upon her every movement?/", "obj_shop_ch2_swatch_slash_Draw_0_gml_432_0"
);
449
            msgnextloc(
* To have rap anthems written to her kindness --Wait for input
"* To have rap anthems written to her kindness --/", "obj_shop_ch2_swatch_slash_Draw_0_gml_433_0"
);
450
            msgnextloc(
* Which are then bitcrushed beyond recognition to make them more 'computer'?Wait for input
"* Which are then bitcrushed beyond recognition to make them more 'computer'?/", "obj_shop_ch2_swatch_slash_Draw_0_gml_434_0"
);
451
            msgnextloc(
* To have melons,Delay 11 smashed,Delay 11 with karate chops,Delay 11 repeatedly,Delay 11 for no apparent reason?Wait for input
"* To have melons^1, smashed^1, with karate chops^1, repeatedly^1, for no apparent reason?/", "obj_shop_ch2_swatch_slash_Draw_0_gml_435_0"
);
452
            msgnextloc(
* To have barrels,Delay 11 thrown,Delay 11 from the rafters --Wait for input
"* To have barrels^1, thrown^1, from the rafters --/", "obj_shop_ch2_swatch_slash_Draw_0_gml_436_0"
);
453
            msgnextloc(
* And make us smash them all with karate chops before the timer runs out?Wait for input
"* And make us smash them all with karate chops before the timer runs out?/", "obj_shop_ch2_swatch_slash_Draw_0_gml_437_0"
);
454
            msgnextloc(
* But the barrels,Delay 11 are full of melons,Delay 11 and we have to smash those too?Wait for input
"* But the barrels^1, are full of melons^1, and we have to smash those too?/", "obj_shop_ch2_swatch_slash_Draw_0_gml_438_0"
);
455
            msgnextloc(
* Yes. The answer is...Delay 11 yes.Wait for inputClose Message
"* Yes. The answer is..^1. yes./%", "obj_shop_ch2_swatch_slash_Draw_0_gml_439_0"
);
456
        }
457
        if (sell == 5)
458
        {
459
            if (global.plot < 150)
460
            {
461
                scr_speaker
scr_speaker

function scr_speaker(arg0) { _speaker = arg0; global.typer = 5; if (global.darkzone == 1) global.typer = 6; if (global.fighting == 1) global.typer = 4; global.fc = 0; global.fe = 0; if (_speaker == "silent" && global.darkzone == 0) global.typer = 2; if (_speaker == "silent" && global.darkzone == 1) global.typer = 36; if (_speaker == "balloon" || _speaker == "enemy") global.typer = 50; if (_speaker == "sans") { global.typer = 14; global.fc = 6; } if (_speaker == "undyne" || _speaker == "und") { global.typer = 17; global.fc = 9; } if (_speaker == "temmie" || _speaker == "tem") global.typer = 21; if (_speaker == "jevil") global.typer = 35; if (_speaker == "catti") global.fc = 13; if (_speaker == "jockington" || _speaker == "joc") global.fc = 14; if (_speaker == "catty" || _speaker == "caddy") global.fc = 16; if (_speaker == "bratty" || _speaker == "bra") global.fc = 17; if (_speaker == "rouxls" || _speaker == "rou") global.fc = 18; if (_speaker == "burgerpants" || _speaker == "bur") global.fc = 19; if (_speaker == "spamton") { if (global.fighting == 0) global.typer = 66; else global.typer = 68; } if (_speaker == "sneo") global.typer = 67; if (_speaker == "susie" || _speaker == "sus") { global.fc = 1; global.typer = 10; if (global.darkzone == 1) { global.typer = 30; if (global.fighting == 1) global.typer = 47; } } if (_speaker == "ralsei" || _speaker == "ral") { global.fc = 2; global.typer = 31; if (global.fighting == 1) global.typer = 45; if (global.flag[30 ralsei_hat_state] == 1) global.typer = 6; } if (_speaker == "noelle" || _speaker == "noe") { global.fc = 3; if (global.darkzone == 0) global.typer = 12; else global.typer = 56; if (global.fighting == 1) global.typer = 59; } if (_speaker == "toriel" || _speaker == "tor") { global.fc = 4; global.typer = 7; } if (_speaker == "asgore" || _speaker == "asg") { global.fc = 10; global.typer = 18; } if (_speaker == "king" || _speaker == "kin") { global.fc = 20; global.typer = 33; if (global.chapter == 1) { if (global.plot < 235) global.typer = 36; } if (global.fighting == 1) ...
("no_name");
462
                msgsetloc(0, 
* Rouxls? I am afraid I am not familiar with a guest of that moniker...Wait for input
"* Rouxls? I am afraid I am not familiar with a guest of that moniker.../", "obj_shop_ch2_swatch_slash_Draw_0_gml_447_0"
);
463
                msgnextloc(
* Ah,Delay 11 wait. Are you perchance referring to that unbearable -Wait for input
"* Ah^1, wait. Are you perchance referring to that unbearable -/", "obj_shop_ch2_swatch_slash_Draw_0_gml_448_0"
);
464
                msgnextloc(
* Err,Delay 11 UNIQUE Man who barged in here and demanded to be made "Butler Supremeth?"Wait for input
"* Err^1, UNIQUE Man who barged in here and demanded to be made \"Butler Supremeth?\"/", "obj_shop_ch2_swatch_slash_Draw_0_gml_449_0"
);
465
                msgnextloc(
* I am afraid that person...Delay 11 is now banned from this establishment.Wait for input
"* I am afraid that person..^1. is now banned from this establishment./", "obj_shop_ch2_swatch_slash_Draw_0_gml_450_0"
);
466
                msgnextloc(
* And may have suffered injuries as a result of his,Delay 11 err...Delay 11 rather swift ejection.Wait for input
"* And may have suffered injuries as a result of his^1, err..^1. rather swift ejection./", "obj_shop_ch2_swatch_slash_Draw_0_gml_451_0"
);
467
                msgnextloc(
* Please do not mention him again.Wait for input
"* Please do not mention him again./", "obj_shop_ch2_swatch_slash_Draw_0_gml_452_0"
);
468
                msgnextloc(
* We are still cleaning up the worms he left on the floor.Wait for inputClose Message
"* We are still cleaning up the worms he left on the floor./%", "obj_shop_ch2_swatch_slash_Draw_0_gml_453_0"
);
469
            }
470
            else
471
            {
472
                scr_speaker
scr_speaker

function scr_speaker(arg0) { _speaker = arg0; global.typer = 5; if (global.darkzone == 1) global.typer = 6; if (global.fighting == 1) global.typer = 4; global.fc = 0; global.fe = 0; if (_speaker == "silent" && global.darkzone == 0) global.typer = 2; if (_speaker == "silent" && global.darkzone == 1) global.typer = 36; if (_speaker == "balloon" || _speaker == "enemy") global.typer = 50; if (_speaker == "sans") { global.typer = 14; global.fc = 6; } if (_speaker == "undyne" || _speaker == "und") { global.typer = 17; global.fc = 9; } if (_speaker == "temmie" || _speaker == "tem") global.typer = 21; if (_speaker == "jevil") global.typer = 35; if (_speaker == "catti") global.fc = 13; if (_speaker == "jockington" || _speaker == "joc") global.fc = 14; if (_speaker == "catty" || _speaker == "caddy") global.fc = 16; if (_speaker == "bratty" || _speaker == "bra") global.fc = 17; if (_speaker == "rouxls" || _speaker == "rou") global.fc = 18; if (_speaker == "burgerpants" || _speaker == "bur") global.fc = 19; if (_speaker == "spamton") { if (global.fighting == 0) global.typer = 66; else global.typer = 68; } if (_speaker == "sneo") global.typer = 67; if (_speaker == "susie" || _speaker == "sus") { global.fc = 1; global.typer = 10; if (global.darkzone == 1) { global.typer = 30; if (global.fighting == 1) global.typer = 47; } } if (_speaker == "ralsei" || _speaker == "ral") { global.fc = 2; global.typer = 31; if (global.fighting == 1) global.typer = 45; if (global.flag[30 ralsei_hat_state] == 1) global.typer = 6; } if (_speaker == "noelle" || _speaker == "noe") { global.fc = 3; if (global.darkzone == 0) global.typer = 12; else global.typer = 56; if (global.fighting == 1) global.typer = 59; } if (_speaker == "toriel" || _speaker == "tor") { global.fc = 4; global.typer = 7; } if (_speaker == "asgore" || _speaker == "asg") { global.fc = 10; global.typer = 18; } if (_speaker == "king" || _speaker == "kin") { global.fc = 20; global.typer = 33; if (global.chapter == 1) { if (global.plot < 235) global.typer = 36; } if (global.fighting == 1) ...
("no_name");
473
                msgsetloc(0, 
* Oh,Delay 11 you defeated that simpleton? Wonderful,Delay 11 wonderful.Wait for input
"* Oh^1, you defeated that simpleton? Wonderful^1, wonderful./", "obj_shop_ch2_swatch_slash_Draw_0_gml_457_0"
);
474
                msgnextloc(
* After he stole our flower display for one of his "boo-kettes,Delay 11"Wait for input
"* After he stole our flower display for one of his \"boo-kettes^1,\"/", "obj_shop_ch2_swatch_slash_Draw_0_gml_458_0"
);
475
                msgnextloc(
* Tasque Manager told me she saw him in the hallway,Delay 11Wait for input
"* Tasque Manager told me she saw him in the hallway^1,/", "obj_shop_ch2_swatch_slash_Draw_0_gml_459_0"
);
476
                msgnextloc(
* Where,Delay 11 opening with "Ah,Delay 11 thou muste be 50% Likelye to be Queene",Delay 11Wait for input
"* Where^1, opening with \"Ah^1, thou muste be 50`% Likelye to be Queene\"^1,/", "obj_shop_ch2_swatch_slash_Draw_0_gml_460_0"
);
477
                msgnextloc(
* He thrust the vase upon her,Delay 11 and asked to be her "minion for life."Wait for input
"* He thrust the vase upon her^1, and asked to be her \"minion for life.\"/", "obj_shop_ch2_swatch_slash_Draw_0_gml_461_0"
);
478
                msgnextloc(
* ...Delay 11 he was promptly electrocuted to the ground.Wait for input
"* ..^1. he was promptly electrocuted to the ground./", "obj_shop_ch2_swatch_slash_Draw_0_gml_462_0"
);
479
                msgnextloc(
* Well. Enough of the unpleasantries. Would you like a toasted marshmallow?Wait for inputClose Message
"* Well. Enough of the unpleasantries. Would you like a toasted marshmallow?/%", "obj_shop_ch2_swatch_slash_Draw_0_gml_463_0"
);
480
            }
481
        }
482
        if (sell == 6)
483
        {
484
            if (global.flag[309 spamton_plot] >= 5 && global.flag[309 spamton_plot] < 9)
485
            {
486
                scr_speaker
scr_speaker

function scr_speaker(arg0) { _speaker = arg0; global.typer = 5; if (global.darkzone == 1) global.typer = 6; if (global.fighting == 1) global.typer = 4; global.fc = 0; global.fe = 0; if (_speaker == "silent" && global.darkzone == 0) global.typer = 2; if (_speaker == "silent" && global.darkzone == 1) global.typer = 36; if (_speaker == "balloon" || _speaker == "enemy") global.typer = 50; if (_speaker == "sans") { global.typer = 14; global.fc = 6; } if (_speaker == "undyne" || _speaker == "und") { global.typer = 17; global.fc = 9; } if (_speaker == "temmie" || _speaker == "tem") global.typer = 21; if (_speaker == "jevil") global.typer = 35; if (_speaker == "catti") global.fc = 13; if (_speaker == "jockington" || _speaker == "joc") global.fc = 14; if (_speaker == "catty" || _speaker == "caddy") global.fc = 16; if (_speaker == "bratty" || _speaker == "bra") global.fc = 17; if (_speaker == "rouxls" || _speaker == "rou") global.fc = 18; if (_speaker == "burgerpants" || _speaker == "bur") global.fc = 19; if (_speaker == "spamton") { if (global.fighting == 0) global.typer = 66; else global.typer = 68; } if (_speaker == "sneo") global.typer = 67; if (_speaker == "susie" || _speaker == "sus") { global.fc = 1; global.typer = 10; if (global.darkzone == 1) { global.typer = 30; if (global.fighting == 1) global.typer = 47; } } if (_speaker == "ralsei" || _speaker == "ral") { global.fc = 2; global.typer = 31; if (global.fighting == 1) global.typer = 45; if (global.flag[30 ralsei_hat_state] == 1) global.typer = 6; } if (_speaker == "noelle" || _speaker == "noe") { global.fc = 3; if (global.darkzone == 0) global.typer = 12; else global.typer = 56; if (global.fighting == 1) global.typer = 59; } if (_speaker == "toriel" || _speaker == "tor") { global.fc = 4; global.typer = 7; } if (_speaker == "asgore" || _speaker == "asg") { global.fc = 10; global.typer = 18; } if (_speaker == "king" || _speaker == "kin") { global.fc = 20; global.typer = 33; if (global.chapter == 1) { if (global.plot < 235) global.typer = 36; } if (global.fighting == 1) ...
("no_name");
487
                msgsetloc(0, 
* What? Basement? There's no basement here.Wait for input
"* What? Basement? There's no basement here./", "obj_shop_ch2_swatch_slash_Draw_0_gml_480_0"
);
488
                msgnextloc(
* You need to relax. Have a drink,Delay 11 and talk softly...Wait for input
"* You need to relax. Have a drink^1, and talk softly.../", "obj_shop_ch2_swatch_slash_Draw_0_gml_481_0"
);
489
                msgnextloc(
* You're bothering the other customers.Wait for inputClose Message
"* You're bothering the other customers./%", "obj_shop_ch2_swatch_slash_Draw_0_gml_482_0"
);
490
            }
491
            else if (global.flag[309 spamton_plot] == 9)
492
            {
493
                scr_speaker
scr_speaker

function scr_speaker(arg0) { _speaker = arg0; global.typer = 5; if (global.darkzone == 1) global.typer = 6; if (global.fighting == 1) global.typer = 4; global.fc = 0; global.fe = 0; if (_speaker == "silent" && global.darkzone == 0) global.typer = 2; if (_speaker == "silent" && global.darkzone == 1) global.typer = 36; if (_speaker == "balloon" || _speaker == "enemy") global.typer = 50; if (_speaker == "sans") { global.typer = 14; global.fc = 6; } if (_speaker == "undyne" || _speaker == "und") { global.typer = 17; global.fc = 9; } if (_speaker == "temmie" || _speaker == "tem") global.typer = 21; if (_speaker == "jevil") global.typer = 35; if (_speaker == "catti") global.fc = 13; if (_speaker == "jockington" || _speaker == "joc") global.fc = 14; if (_speaker == "catty" || _speaker == "caddy") global.fc = 16; if (_speaker == "bratty" || _speaker == "bra") global.fc = 17; if (_speaker == "rouxls" || _speaker == "rou") global.fc = 18; if (_speaker == "burgerpants" || _speaker == "bur") global.fc = 19; if (_speaker == "spamton") { if (global.fighting == 0) global.typer = 66; else global.typer = 68; } if (_speaker == "sneo") global.typer = 67; if (_speaker == "susie" || _speaker == "sus") { global.fc = 1; global.typer = 10; if (global.darkzone == 1) { global.typer = 30; if (global.fighting == 1) global.typer = 47; } } if (_speaker == "ralsei" || _speaker == "ral") { global.fc = 2; global.typer = 31; if (global.fighting == 1) global.typer = 45; if (global.flag[30 ralsei_hat_state] == 1) global.typer = 6; } if (_speaker == "noelle" || _speaker == "noe") { global.fc = 3; if (global.darkzone == 0) global.typer = 12; else global.typer = 56; if (global.fighting == 1) global.typer = 59; } if (_speaker == "toriel" || _speaker == "tor") { global.fc = 4; global.typer = 7; } if (_speaker == "asgore" || _speaker == "asg") { global.fc = 10; global.typer = 18; } if (_speaker == "king" || _speaker == "kin") { global.fc = 20; global.typer = 33; if (global.chapter == 1) { if (global.plot < 235) global.typer = 36; } if (global.fighting == 1) ...
("no_name");
494
                msgsetloc(0, 
* ...Delay 11 So that's what happened.Wait for input
"* ..^1. So that's what happened./", "obj_shop_ch2_swatch_slash_Draw_0_gml_487_0"
);
495
                msgnextloc(
* ...Wait for input
"* .../", "obj_shop_ch2_swatch_slash_Draw_0_gml_488_0"
);
496
                msgnextloc(
* That robot was the embodiment of a Lightner's dream.Wait for input
"* That robot was the embodiment of a Lightner's dream./", "obj_shop_ch2_swatch_slash_Draw_0_gml_489_0"
);
497
                msgnextloc(
* A dream I helped create...Delay 11 once.Wait for input
"* A dream I helped create..^1. once./", "obj_shop_ch2_swatch_slash_Draw_0_gml_490_0"
);
498
                msgnextloc(
* Splashing color from the motion of their hand.Wait for input
"* Splashing color from the motion of their hand./", "obj_shop_ch2_swatch_slash_Draw_0_gml_491_0"
);
499
                msgnextloc(
* The Lightner filled it with their own hope,Delay 11 giving it an incredible power.Wait for input
"* The Lightner filled it with their own hope^1, giving it an incredible power./", "obj_shop_ch2_swatch_slash_Draw_0_gml_492_0"
);
500
                msgnextloc(
* ...Delay 11 but,Delay 11 in the end,Delay 11 nothing ever came of it.Wait for input
"* ..^1. but^1, in the end^1, nothing ever came of it./", "obj_shop_ch2_swatch_slash_Draw_0_gml_493_0"
);
501
                msgnextloc(
* And it was left in the basement with the rest of the corrupted data.Wait for input
"* And it was left in the basement with the rest of the corrupted data./", "obj_shop_ch2_swatch_slash_Draw_0_gml_494_0"
);
502
                msgnextloc(
* ...Delay 11 But that crooked salesman!Delay 11 Somehow,Delay 11 he learned about the robot,Delay 11Wait for input
"* ..^1. But that crooked salesman^1! Somehow^1, he learned about the robot^1,/", "obj_shop_ch2_swatch_slash_Draw_0_gml_495_0"
);
503
                msgnextloc(
* And thought he could use its power to fulfill his own twisted dreams.Wait for input
"* And thought he could use its power to fulfill his own twisted dreams./", "obj_shop_ch2_swatch_slash_Draw_0_gml_496_0"
);
504
                msgnextloc(
* What a pity. To think he was once a valued customer...Wait for inputClose Message
"* What a pity. To think he was once a valued customer.../%", "obj_shop_ch2_swatch_slash_Draw_0_gml_497_0"
);
505
            }
506
            else
507
            {
508
                scr_speaker
scr_speaker

function scr_speaker(arg0) { _speaker = arg0; global.typer = 5; if (global.darkzone == 1) global.typer = 6; if (global.fighting == 1) global.typer = 4; global.fc = 0; global.fe = 0; if (_speaker == "silent" && global.darkzone == 0) global.typer = 2; if (_speaker == "silent" && global.darkzone == 1) global.typer = 36; if (_speaker == "balloon" || _speaker == "enemy") global.typer = 50; if (_speaker == "sans") { global.typer = 14; global.fc = 6; } if (_speaker == "undyne" || _speaker == "und") { global.typer = 17; global.fc = 9; } if (_speaker == "temmie" || _speaker == "tem") global.typer = 21; if (_speaker == "jevil") global.typer = 35; if (_speaker == "catti") global.fc = 13; if (_speaker == "jockington" || _speaker == "joc") global.fc = 14; if (_speaker == "catty" || _speaker == "caddy") global.fc = 16; if (_speaker == "bratty" || _speaker == "bra") global.fc = 17; if (_speaker == "rouxls" || _speaker == "rou") global.fc = 18; if (_speaker == "burgerpants" || _speaker == "bur") global.fc = 19; if (_speaker == "spamton") { if (global.fighting == 0) global.typer = 66; else global.typer = 68; } if (_speaker == "sneo") global.typer = 67; if (_speaker == "susie" || _speaker == "sus") { global.fc = 1; global.typer = 10; if (global.darkzone == 1) { global.typer = 30; if (global.fighting == 1) global.typer = 47; } } if (_speaker == "ralsei" || _speaker == "ral") { global.fc = 2; global.typer = 31; if (global.fighting == 1) global.typer = 45; if (global.flag[30 ralsei_hat_state] == 1) global.typer = 6; } if (_speaker == "noelle" || _speaker == "noe") { global.fc = 3; if (global.darkzone == 0) global.typer = 12; else global.typer = 56; if (global.fighting == 1) global.typer = 59; } if (_speaker == "toriel" || _speaker == "tor") { global.fc = 4; global.typer = 7; } if (_speaker == "asgore" || _speaker == "asg") { global.fc = 10; global.typer = 18; } if (_speaker == "king" || _speaker == "kin") { global.fc = 20; global.typer = 33; if (global.chapter == 1) { if (global.plot < 235) global.typer = 36; } if (global.fighting == 1) ...
("no_name");
509
                msgsetloc(0, 
* Ah,Delay 11 my outfit. Yes,Delay 11 the monochrome look is quite suitable,Delay 11 isn't it?Wait for input
"* Ah^1, my outfit. Yes^1, the monochrome look is quite suitable^1, isn't it?/", "obj_shop_ch2_swatch_slash_Draw_0_gml_472_0"
);
510
                msgnextloc(
* Black suit,Delay 11 colored glasses. Many people have failed to imitate this look.Wait for input
"* Black suit^1, colored glasses. Many people have failed to imitate this look./", "obj_shop_ch2_swatch_slash_Draw_0_gml_473_0"
);
511
                msgnextloc(
* Some even going so far as to attempt to impersonate me...Wait for input
"* Some even going so far as to attempt to impersonate me.../", "obj_shop_ch2_swatch_slash_Draw_0_gml_474_0"
);
512
                msgnextloc(
* In order to get the...Delay 11 Oh,Delay 11 nevermind. Macaron?Wait for inputClose Message
"* In order to get the..^1. Oh^1, nevermind. Macaron?/%", "obj_shop_ch2_swatch_slash_Draw_0_gml_475_0"
);
513
            }
514
        }
515
        instance_create(30, 270, obj_writer);
516
    }
517
    if (selling == 1 && instance_exists(obj_writer) == false)
518
    {
519
        if (sell == 2)
520
        {
521
            selling = 2;
522
            event_user(1);
523
        }
524
        else
525
        {
526
            if (sell == 1 || sell == 7)
527
                menu = 0;
528
            else
529
                menu = 3;
530
            sell = 0;
531
            selling = 0;
532
        }
533
    }
534
}
535
if (down_p())
536
{
537
    if (menu != 11 && menu != 12 && menu != 13)
538
    {
539
        menuc[menu] += 1;
540
        if (menuc[menu] > menumax)
541
            menuc[menu] = 0;
542
    }
543
}
544
if (up_p())
545
{
546
    if (menu != 11 && menu != 12 && menu != 13)
547
    {
548
        menuc[menu] -= 1;
549
        if (menuc[menu] < 0)
550
            menuc[menu] = menumax;
551
    }
552
}
553
if (menu < 4 || menu >= 10)
554
{
555
    draw_text(440, 420, "$" + string_hash_to_newline(string(global.gold)));
556
    if (menu == 1 || menu == 2)
557
    {
558
        if (menuc[1] < 4)
559
        {
560
            if (itemtype[menuc[1]] == "item")
561
                scr_itemcheck_inventory_and_pocket
scr_itemcheck_inventory_and_pocket

function scr_itemcheck_inventory_and_pocket(arg0) { var _haveeither = 0; var itemcounttotal = 0; scr_itemcheck(arg0); if (haveit == 1) _haveeither = 1; itemcounttotal += itemcount; scr_itemcheck_pocket(arg0); if (haveit == 1) _haveeither = 1; itemcounttotal += itemcount; haveit = _haveeither; itemcount = itemcounttotal; return haveit; }
(0);
562
            if (itemtype[menuc[1]] == "armor")
563
                scr_armorcheck_inventory
scr_armorcheck_inventory

function scr_armorcheck_inventory(arg0) { haveit = 0; itemcount = 0; for (i = 0; i < 48; i += 1) { if (global.armor[i] == arg0) haveit = 1; if (global.armor[i] == arg0) itemcount += 1; } return haveit; }
(0);
564
            if (itemtype[menuc[1]] == "weapon")
565
                scr_weaponcheck_inventory
scr_weaponcheck_inventory

function scr_weaponcheck_inventory(arg0) { haveit = 0; itemcount = 0; for (i = 0; i < 48; i += 1) { if (global.weapon[i] == arg0) haveit = 1; if (global.weapon[i] == arg0) itemcount += 1; } return haveit; }
(0);
566
            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)); }
("dotumche");
567
            if (itemcount < 10)
568
                roomstring = "0" + string(itemcount);
569
            else
570
                roomstring = string(itemcount);
571
            if (itemcount > 0)
572
                draw_text(520, 430, string_hash_to_newline(stringsetsubloc("Space:~1", roomstring, "obj_shop_ch2_swatch_slash_Draw_0_gml_557_0")));
573
            if (itemcount == 0)
574
                draw_text(520, 430, string_hash_to_newline(stringsetloc(
NO SPACE
"NO SPACE", "obj_shop1_slash_Draw_0_gml_571_0"
)));
575
        }
576
    }
577
}
578
onebuffer -= 1;
579
twobuffer -= 1;