Deltarune (Chapter 2) script viewer

siner++;

guysiner += 3;

if (guysiner >= 860)

    guysiner -= 860;

shinetimer++;

if (floor(random(15)) == 0)

{

    if (menu != 1)

        anim = instance_create(random_range(100, 540), random(200) + 20, obj_animation);

    else

        anim = instance_create(random_range(100, 390), random(200) + 20, obj_animation);

    anim.sprite_index = spr_shine;

    anim.image_xscale = 3;

    anim.image_yscale = 3;

    anim.image_speed = 0.2;

    anim.depth = depth - 1;

    shinetimer = 0;

}

draw_sprite_ext(spr_shop_cafe_curtains, 1, 0, 0, 2, 2, 0, c_white, 1);

draw_sprite_ext(spr_shop_cafe_guys, 0, -guysiner, -10 + (sin(siner / 60) * 10), 2, 2, 0, c_white, 1);

draw_sprite_ext(spr_shop_cafe_guys, 0, -guysiner + 860, -10 + (sin(siner / 60) * 10), 2, 2, 0, c_white, 1);

draw_sprite_ext(spr_shop_cafe_curtains, 0, 0, 0, 2, 2, 0, c_white, 1);

if (global.fe == 0)

{

    talksiner++;

    if (talksiner >= 16)

        talksiner = 0;

    draw_sprite_ext(spr_shop_cafe_swatch, talksiner / 9, shx, 0, 2, 2, 0, c_white, 1);

}

else

{

    talksiner = 0;

    draw_sprite_ext(spr_shop_cafe_swatch, global.fe - 1, shx, 0, 2, 2, 0, c_white, 1);

}

draw_set_color(c_black);

draw_rectangle(-10, 240, 900, 500, false);

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);

if (menu <= 3 || menu >= 10)

{

    
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);

    
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);

}

if (menu == 4)

    
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);

if (menu == 0)

{

    sell = 0;

    selling = 0;

    sidemessage = 0;

    menuc[1] = 0;

    menuc[2] = 0;

    menuc[3] = 0;

    menuc[4] = 0;

    if (instance_exists(obj_writer) == false)

    {

        global.typer = 6;

        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"
);

        if (mainmessage == 0)

            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"
);

        instance_create(30, 270, obj_writer);

    }

    menumax = 3;

    draw_set_color(c_white);

    
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");

    draw_text(480, 260, string_hash_to_newline(stringsetloc(
Buy
"Buy", "obj_shop1_slash_Draw_0_gml_106_0"
)));

    draw_text(480, 300, string_hash_to_newline(stringsetloc(
Sell
"Sell", "obj_shop1_slash_Draw_0_gml_107_0"
)));

    draw_text(480, 340, string_hash_to_newline(stringsetloc(
Talk
"Talk", "obj_shop1_slash_Draw_0_gml_108_0"
)));

    draw_text(480, 380, string_hash_to_newline(stringsetloc(
Exit
"Exit", "obj_shop1_slash_Draw_0_gml_109_0"
)));

    menuc[menu] = min(menuc[menu], menumax);

    draw_sprite(spr_heart, 0, 450, (135 + (menuc[0] * 20)) * 2);

    if (button1_p())

    {

        onebuffer = 2;

        mainmessage = 1;

        with (obj_writer)

            instance_destroy();

        if (menuc[0] == 0)

            menu = 1;

        if (menuc[0] == 1)

        {

            menu = 10;

            sidemessage = 0;

        }

        if (menuc[0] == 2)

            menu = 3;

        if (menuc[0] == 3)

        {

            sell = 2;

            menu = 4;

        }

    }

}

if (menu == 1 || menu == 2)

{

    draw_set_color(c_white);

    
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");

    for (i = 0; i < itemtotal; i += 1)

    {

        draw_text(60, 260 + (i * 40), string_hash_to_newline(shopitemname[i]));

        draw_text(300, 260 + (i * 40), string_hash_to_newline(stringsetsubloc(
$Argument №11
"$~1", string(buyvalue[i]), "obj_shop_ch2_swatch_slash_Draw_0_gml_120_0"
)));

    }

    draw_text(60, 260 + (itemtotal * 40), string_hash_to_newline(stringsetloc(
Exit
"Exit", "obj_shop1_slash_Draw_0_gml_139_0"
)));

    if (menu == 1)

    {

        menumax = 4;

        if (instance_exists(obj_writer) == false)

        {

            if (sidemessage == 0)

                msgsetloc(0, 
Face 0Our menu
is
specially
prepared.
"\\E0Our menu&is&specially&prepared.", "obj_shop_ch2_swatch_slash_Draw_0_gml_132_0"
);

            if (sidemessage == 1)

            {

                _rr = floor(random(10));

                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"
);

            }

            if (sidemessage == 2)

                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"
);

            if (sidemessage == 3)

                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"
);

            if (sidemessage == 4)

                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"
);

            if (sidemessage == 5)

                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"
);

            if (murder == 1)

                global.msg[0] = stringsetloc(
Wait for input*
"/*", "obj_shop1_slash_Draw_0_gml_153_0"
);

            instance_create(450, 260, obj_writer);

        }

        menuc[menu] = min(menuc[menu], menumax);

        draw_sprite(spr_heart, 0, 30, 270 + (menuc[1] * 40));

        if (button1_p() && onebuffer < 0)

        {

            menu = 2;

            onebuffer = 2;

            with (obj_writer)

                instance_destroy();

            if (menuc[1] == menumax)

                menu = 0;

        }

        if (button2_p() && twobuffer < 0 && onebuffer < 2)

        {

            menu = 0;

            twobuffer = 2;

            minimenuy = 220;

            with (obj_writer)

                instance_destroy();

        }

        menuc[2] = 0;

    }

    if (menu == 2)

    {

        menumax = 1;

        draw_set_color(c_white);

        
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");

        var y1_off = langopt(260, 290);

        var y2_off = langopt(290, 260);

        draw_text(460, y1_off, string_hash_to_newline(stringsetloc(
Buy it for
"Buy it for", "obj_shop1_slash_Draw_0_gml_167_0"
)));

        draw_text(460, y2_off, string_hash_to_newline(stringsetsubloc(
$Argument №11 ?
"$~1 ?", string(buyvalue[menuc[1]]), "obj_shop_ch2_swatch_slash_Draw_0_gml_160_0"
)));

        draw_text(480, 340, string_hash_to_newline(stringsetloc(
Yes
"Yes", "obj_shop1_slash_Draw_0_gml_169_0"
)));

        draw_text(480, 370, string_hash_to_newline(stringsetloc(
No
"No", "obj_shop1_slash_Draw_0_gml_170_0"
)));

        menuc[menu] = min(menuc[menu], menumax);

        draw_sprite(spr_heart, 0, 450, 350 + (menuc[2] * 30));

        if (button2_p() && twobuffer < 0)

        {

            menu = 1;

            sidemessage = 2;

            twobuffer = 2;

            onebuffer = 2;

        }

        if (button1_p() && onebuffer < 0 && twobuffer < 0)

        {

            if (menuc[2] == 0)

            {

                afford = 0;

                if (global.gold >= buyvalue[menuc[1]])

                    afford = 1;

                if (afford == 1)

                {

                    _pocketed = 0;

                    if (itemtype[menuc[1]] == "item")

                        
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]]);

                    if (itemtype[menuc[1]] == "weapon")

                        
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]]);

                    if (itemtype[menuc[1]] == "armor")

                        
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]]);

                    if (noroom == 0)

                    {

                        global.gold -= buyvalue[menuc[1]];

                        snd_play(snd_locker);

                        if (_pocketed == 1)

                            sidemessage = 5;

                        else

                            sidemessage = 1;

                    }

                    if (noroom == 1)

                        sidemessage = 4;

                }

                else

                {

                    sidemessage = 3;

                }

            }

            if (menuc[2] == 1)

                sidemessage = 2;

            menu = 1;

        }

    }

    if (menuc[1] != 4)

    {

        if (minimenuy <= 20)

            minimenuy = 20;

        if (minimenuy > 20)

            minimenuy -= 5;

        if (minimenuy > 50)

            minimenuy -= 5;

        if (minimenuy > 100)

            minimenuy -= 8;

        if (minimenuy > 150)

            minimenuy -= 10;

    }

    else if (minimenuy < 200)

    {

        minimenuy += 40;

    }

    if (minimenuy >= 200)

        minimenuy = 200;

}

if (menu == 3)

{

    menumax = 4;

    draw_set_color(c_white);

    
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");

    draw_text(80, 260, string_hash_to_newline(stringsetloc(
About yourself
"About yourself", "obj_shop1_slash_Draw_0_gml_217_0"
)));

    draw_text(80, 300, stringsetloc(
Mission Statement
"Mission Statement", "obj_shop_ch2_swatch_slash_Draw_0_gml_213_0"
));

    draw_text(80, 340, stringsetloc(
Rouxls Kaard
"Rouxls Kaard", "obj_shop_ch2_swatch_slash_Draw_0_gml_214_0"
));

    if (global.flag[309 spamton_plot] >= 5 && global.flag[309 spamton_plot] < 9)

    {

        draw_set_color(c_yellow);

        draw_text(80, 380, stringsetloc(
Basement
"Basement", "obj_shop_ch2_swatch_slash_Draw_0_gml_222_0"
));

    }

    else if (global.flag[309 spamton_plot] == 9)

    {

        draw_set_color(c_yellow);

        draw_text(80, 380, stringsetloc(
Basement Robot
"Basement Robot", "obj_shop_ch2_swatch_slash_Draw_0_gml_227_0"
));

    }

    else

    {

        draw_text(80, 380, stringsetloc(
Outfit
"Outfit", "obj_shop_ch2_swatch_slash_Draw_0_gml_217_0"
));

    }

    draw_set_color(c_white);

    draw_text(80, 420, string_hash_to_newline(stringsetloc(
Exit
"Exit", "obj_shop1_slash_Draw_0_gml_240_0"
)));

    if (instance_exists(obj_writer) == false)

    {

        global.msg[0] = stringsetloc(
Chatting
would be
our
pleasure.
"Chatting&would be&our&pleasure.", "obj_shop_ch2_swatch_slash_Draw_0_gml_236_0"
);

        instance_create(440, 260, obj_writer);

    }

    menuc[menu] = min(menuc[menu], menumax);

    draw_sprite(spr_heart, 0, 50, 270 + (menuc[3] * 40));

    if (button1_p() && onebuffer < 0)

    {

        onebuffer = 2;

        with (obj_writer)

            instance_destroy();

        if (menuc[3] < menumax)

        {

            sell = menuc[3] + 3;

            menu = 4;

        }

        else

        {

            menu = 0;

        }

    }

    else if (button2_p() && twobuffer < 0 && onebuffer < 0)

    {

        twobuffer = 2;

        menu = 0;

        with (obj_writer)

            instance_destroy();

    }

}

if (menu == 10)

{

    menuc[11] = 0;

    menuc[12] = 0;

    menuc[13] = 0;

    menumax = 4;

    draw_set_color(c_white);

    
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");

    draw_text(80, 260, string_hash_to_newline(stringsetloc(
Sell Items
"Sell Items", "obj_shop1_slash_Draw_0_gml_278_0"
)));

    draw_text(80, 300, string_hash_to_newline(stringsetloc(
Sell Weapons
"Sell Weapons", "obj_shop1_slash_Draw_0_gml_279_0"
)));

    draw_text(80, 340, string_hash_to_newline(stringsetloc(
Sell Armor
"Sell Armor", "obj_shop1_slash_Draw_0_gml_280_0"
)));

    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"
)));

    draw_text(80, 420, string_hash_to_newline(stringsetloc(
Return
"Return", "obj_shop_ch2_swatch_slash_Draw_0_gml_274_0"
)));

    if (instance_exists(obj_writer) == false)

    {

        if (sidemessage == 0)

            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"
);

        if (sidemessage == 1)

            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"
);

        if (sidemessage == 2)

            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"
);

        instance_create(460, 260, obj_writer);

    }

    menuc[menu] = min(menuc[menu], menumax);

    draw_sprite(spr_heart, 0, 50, 270 + (menuc[10] * 40));

    if (button1_p() && onebuffer < 0)

    {

        pagemax = 0;

        sidemessage2 = 0;

        onebuffer = 2;

        with (obj_writer)

            instance_destroy();

        can = 1;

        idealmenu = menuc[10] + 11;

        if (idealmenu == 11)

        {

            
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);

            if (itemcount == 12)

            {

                sidemessage = 2;

                can = 0;

            }

            nothingcount = itemcount;

            
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;
    }
}
();

            selltype = "item";

            selltotal = 12;

            for (i = 0; i < selltotal; i++)

            {

                itemsellvalue[i] = global.itemvalue[i];

                itemsellname[i] = global.itemnameb[i];

            }

        }

        if (idealmenu == 12)

        {

            
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);

            if (itemcount == 48)

            {

                sidemessage = 2;

                can = 0;

            }

            
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;
    }
}
();

        }

        if (idealmenu == 13)

        {

            
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);

            if (itemcount == 48)

            {

                sidemessage = 2;

                can = 0;

            }

            
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;
    }
}
();

        }

        if (idealmenu == 14)

        {

            
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);

            if (itemcount == global.flag[64 storage_size])

            {

                sidemessage = 2;

                can = 0;

            }

            selltype = "pocket";

            nothingcount = 0;

            selltotal = global.flag[64 storage_size];

            for (i = 0; i < global.flag[64 storage_size]; i++)

            {

                
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#Argument №11HP
"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]);

                itemsellvalue[i] = value;

                itemsellname[i] = itemnameb;

            }

            idealmenu = 11;

        }

        if (menuc[10] < menumax)

        {

            if (can == 1)

                menu = idealmenu;

            sidemessage1 = 0;

        }

        else

        {

            menu = 0;

        }

        submenu = 0;

        submenuc[1] = 0;

    }

    if (button2_p() && twobuffer < 0 && onebuffer < 0)

    {

        twobuffer = 2;

        menu = 0;

        with (obj_writer)

            instance_destroy();

    }

}

if (menu == 11 || menu == 12 || menu == 13)

{

    if (instance_exists(obj_writer) == false)

    {

        if (sidemessage2 == 0 && menu == 11)

            msgsetloc(0, 
An ITEM
to delight
our Queen?
"An ITEM&to delight&our Queen?", "obj_shop_ch2_swatch_slash_Draw_0_gml_366_0"
);

        if (sidemessage2 == 0 && menu == 12)

            msgsetloc(0, 
A WEAPON
to protect
our Queen?
"A WEAPON&to protect&our Queen?", "obj_shop_ch2_swatch_slash_Draw_0_gml_367_0"
);

        if (sidemessage2 == 0 && menu == 13)

            msgsetloc(0, 
ARMOR
to adorn
our Queen?
"ARMOR&to adorn&our Queen?", "obj_shop_ch2_swatch_slash_Draw_0_gml_368_0"
);

        if (sidemessage2 == 1)

            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"
);

        if (sidemessage2 == 2)

            msgsetloc(0, 
Changed
your mind?
We'll
wait.
"Changed&your mind?&We'll&wait.", "obj_shop_ch2_swatch_slash_Draw_0_gml_370_0"
);

        if (sidemessage2 == 3)

            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"
);

        if (sidemessage2 == 4)

            msgsetloc(0, 
Black is
the color
of
sorrow.
"Black is&the color&of&sorrow.", "obj_shop_ch2_swatch_slash_Draw_0_gml_372_0"
);

        instance_create(450, 260, obj_writer);

    }

}

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);

if (menu == 15 || menu == 16 || menu == 17)

{

    menumax = 1;

    draw_set_color(c_white);

    
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");

    var y1_off = langopt(260, 290);

    var y2_off = langopt(290, 260);

    draw_text(460, y1_off, string_hash_to_newline(stringsetloc(
Sell it for
"Sell it for", "obj_shop1_slash_Draw_0_gml_365_0"
)));

    draw_text(460, y2_off, string_hash_to_newline(stringsetsubloc(
$Argument №11 ?
"$~1 ?", string(sellvalue), "obj_shop_ch2_swatch_slash_Draw_0_gml_387_0"
)));

    draw_text(480, 340, string_hash_to_newline(stringsetloc(
Yes
"Yes", "obj_shop1_slash_Draw_0_gml_367_0"
)));

    draw_text(480, 370, string_hash_to_newline(stringsetloc(
No
"No", "obj_shop1_slash_Draw_0_gml_368_0"
)));

    menuc[menu] = min(menuc[menu], menumax);

    draw_sprite(spr_heart, 0, 450, 350 + (menuc[menu] * 30));

}

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);

if (menu == 4)

{

    if (sell == 0)

        menu = 0;

    if (instance_exists(obj_writer) == false && selling == 0)

    {

        selling = 1;

        if (sell == 1)

        {

        }

        if (sell == 2)

            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"
);

        if (sell == 3)

        {

            
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");

            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"
);

            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"
);

            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"
);

            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"
);

            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"
);

        }

        if (sell == 4)

        {

            
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");

            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"
);

            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"
);

            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"
);

            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"
);

            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"
);

            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"
);

            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"
);

            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"
);

            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"
);

        }

        if (sell == 5)

        {

            if (global.plot < 150)

            {

                
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");

                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"
);

                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"
);

                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"
);

                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"
);

                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"
);

                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"
);

                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"
);

            }

            else

            {

                
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");

                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"
);

                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"
);

                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"
);

                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"
);

                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"
);

                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"
);

                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"
);

            }

        }

        if (sell == 6)

        {

            if (global.flag[309 spamton_plot] >= 5 && global.flag[309 spamton_plot] < 9)

            {

                
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");

                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"
);

                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"
);

                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"
);

            }

            else if (global.flag[309 spamton_plot] == 9)

            {

                
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");

                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"
);

                msgnextloc(
* ...Wait for input
"* .../", "obj_shop_ch2_swatch_slash_Draw_0_gml_488_0"
);

                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"
);

                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"
);

                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"
);

                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"
);

                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"
);

                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"
);

                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"
);

                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"
);

                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"
);

            }

            else

            {

                
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");

                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"
);

                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"
);

                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"
);

                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"
);

            }

        }

        instance_create(30, 270, obj_writer);

    }

    if (selling == 1 && instance_exists(obj_writer) == false)

    {

        if (sell == 2)

        {

            selling = 2;

            event_user(1);

        }

        else

        {

            if (sell == 1 || sell == 7)

                menu = 0;

            else

                menu = 3;

            sell = 0;

            selling = 0;

        }

    }

}

if (down_p())

{

    if (menu != 11 && menu != 12 && menu != 13)

    {

        menuc[menu] += 1;

        if (menuc[menu] > menumax)

            menuc[menu] = 0;

    }

}

if (up_p())

{

    if (menu != 11 && menu != 12 && menu != 13)

    {

        menuc[menu] -= 1;

        if (menuc[menu] < 0)

            menuc[menu] = menumax;

    }

}

if (menu < 4 || menu >= 10)

{

    draw_text(440, 420, "$" + string_hash_to_newline(string(global.gold)));

    if (menu == 1 || menu == 2)

    {

        if (menuc[1] < 4)

        {

            if (itemtype[menuc[1]] == "item")

                
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);

            if (itemtype[menuc[1]] == "armor")

                
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);

            if (itemtype[menuc[1]] == "weapon")

                
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);

            
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");

            if (itemcount < 10)

                roomstring = "0" + string(itemcount);

            else

                roomstring = string(itemcount);

            if (itemcount > 0)

                draw_text(520, 430, string_hash_to_newline(stringsetsubloc(
Space:Argument №11
"Space:~1", roomstring, "obj_shop_ch2_swatch_slash_Draw_0_gml_557_0"
)));

            if (itemcount == 0)

                draw_text(520, 430, string_hash_to_newline(stringsetloc(
NO SPACE
"NO SPACE", "obj_shop1_slash_Draw_0_gml_571_0"
)));

        }

    }

}

onebuffer -= 1;

twobuffer -= 1;