Deltarune (Chapter 3) script viewer

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

draw_sprite_ext(bg_seam_shop_ch2, 2, 0, 0, 2, 2, 0, c_white, abs(sin(siner / 30)));

siner += 1;

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

{

    if (shopcharx > -20)

        shopcharx -= 4;

    if (shopcharx > -40)

        shopcharx -= 4;

    if (shopcharx > -80)

        shopcharx -= 4;

    if (shopcharx <= -80)

        shopcharx = -80;

}

else

{

    if (shopcharx < -50)

        shopcharx += 4;

    if (shopcharx < -30)

        shopcharx += 4;

    if (shopcharx < 0)

        shopcharx += 4;

    if (shopcharx > 0)

        shopcharx = 0;

}

talkanim = 0;

if (instance_exists(obj_writer))

{

    if (obj_writer.pos < obj_writer.length)

    {

        if (talkbuffer < 0)

            talkfacer = 0;

        talkbuffer = 16;

        talkanim = 1;

        idletimer = 0;

        idlefacer = 0;

        talkfacer += 0.2;

    }

}

shopkeepsprite = spr_seam_talk;

if (global.fe == 1)

    shopkeepsprite = spr_seam_oh;

if (global.fe == 2)

    shopkeepsprite = spr_seam_laugh;

if (global.fe == 3)

    shopkeepsprite = spr_seam_impatient;

qualify = 0;

if (global.fe != 0 && talkbuffer < 0)

    talkbuffer = 0;

if (talkbuffer >= 0)

{

    if (talkbuffer < 16)

    {

        if (((talkfacer + 1) % 3) != 0)

            talkfacer += 0.2;

    }

    draw_sprite_ext(shopkeepsprite, talkfacer, shopcharx + 160, 34, 2, 2, 0, c_white, 1);

    qualify = 1;

}

if (qualify == 0)

{

    idletimer += 1;

    if (idletimer >= 60)

        idlefacer += 0.2;

    if (idlefacer >= 5)

    {

        idletimer = 0;

        idlefacer = 0;

    }

    draw_sprite_ext(spr_seam_idle, idlefacer, shopcharx + 160, 34, 2, 2, 0, c_white, 1);

}

talkbuffer -= 1;

draw_set_color(c_black);

draw_rectangle(0, 240, 640, 480, false);

scr_shopmenu
scr_shopmenu

function 
scr_shopmenu(arg0)
{
    if (arg0 == 0)
    {
        if (menu == 1 || menu == 2)
        {
            
scr_darkbox_black(camerax() + 400, cameray() + minimenuy, camerax() + 640, cameray() + 255);
            draw_set_color(c_white);
            
scr_84_set_draw_font("mainbig");
            if (menuc[1] == 0)
                draw_text(camerax() + 440, cameray() + minimenuy + 28, string_hash_to_newline(shopdesc[0]));
            if (menuc[1] == 1)
                draw_text(camerax() + 440, cameray() + minimenuy + 28, string_hash_to_newline(shopdesc[1]));
            if (menuc[1] == 2)
                draw_text(camerax() + 440, cameray() + minimenuy + 28, string_hash_to_newline(shopdesc[2]));
            if (menuc[1] == 3)
                draw_text(camerax() + 440, cameray() + 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, camerax() + 426 + locx, cameray() + 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, camerax() + 470 + locx, cameray() + minimenuy + locy + 135 + (20 * j), 1, 1, 0, dcolor, 1);
                                draw_text(camerax() + 490 + locx, cameray() + 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, camerax() + 470 + locx, cameray() + minimenuy + locy + 135 + (20 * j), 1, 1, 0, dcolor, 1);
                                draw_text(camerax() + 490 + locx, cameray() + 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;

        global.msg[0] = stringsetloc(
Face 0* Take your time...Delay 11
* Ain't like it's
better spent.
"\\E0* Take your time..^1.&* Ain't like it's&better spent.", "obj_shop1_slash_Draw_0_gml_98_0"
);

        if (mainmessage == 0)

            global.msg[0] = stringsetloc(
Face 0* Hee hee...Delay 11
* Welcome, travellers.
"\\E0* Hee hee..^1.&* Welcome, travellers.", "obj_shop1_slash_Draw_0_gml_99_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"
)));

    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)

        {

            if (global.chapter == 1)

                menu = 3;

            if (global.chapter >= 2)

                menu = 4;

            sell = 10;

        }

        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("$~1", string(buyvalue[i]), "obj_shop1_slash_Draw_0_gml_143_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)

                global.msg[0] = stringsetloc(
Face 0What do
you like
to buy?
"\\E0What do&you like&to buy?", "obj_shop1_slash_Draw_0_gml_148_0"
);

            if (sidemessage == 1)

                global.msg[0] = stringsetloc(
Face 2Thanks for
that.
"\\E2Thanks for&that.", "obj_shop1_slash_Draw_0_gml_149_0"
);

            if (sidemessage == 2)

                global.msg[0] = stringsetloc(
Face 0What,
not good
enough?
"\\E0What,&not good&enough?", "obj_shop1_slash_Draw_0_gml_150_0"
);

            if (sidemessage == 3)

                global.msg[0] = stringsetloc(
Face 3Not
enough
money.
"\\E3Not&enough&money.", "obj_shop1_slash_Draw_0_gml_151_0"
);

            if (sidemessage == 4)

                global.msg[0] = stringsetloc(
Face 3You're
carrying
too much.
"\\E3You're&carrying&too much.", "obj_shop1_slash_Draw_0_gml_152_0"
);

            if (sidemessage == 5)

                msgsetloc(0, 
Face 2Thanks, it'll
be in your
STORAGE.
"\\E2Thanks, it'll&be in your&STORAGE.", "obj_shop1_slash_Draw_0_gml_159_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);

        }

        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("$~1 ?", string(buyvalue[menuc[1]]), "obj_shop1_slash_Draw_0_gml_177_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"
)));

        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)
                {
                    debug_message("Placed in pocket :" + string(__j));
                    global.pocketitem[__j] = arg0;
                    _pocketed = 1;
                    noroom = 0;
                    break;
                }
            }
            break;
        }
        __i += 1;
    }
    script_execute(scr_iteminfo_all);
    debug_message("noroom=" + string(noroom));
    debug_message("_pocketed=" + string(_pocketed));
    debug_message("_noroominventory=" + string(_noroominventory));
}
(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, string_hash_to_newline(stringsetloc(
Lightners
"Lightners", "obj_shop1_slash_Draw_0_gml_218_0"
)));

    if (global.flag[241 JEVIL_plot] < 6)

    {

        draw_text(80, 340, string_hash_to_newline(stringsetloc(
Kingdom
"Kingdom", "obj_shop1_slash_Draw_0_gml_220_0"
)));

    }

    else

    {

        draw_set_color(c_yellow);

        draw_text(80, 340, string_hash_to_newline(stringsetloc(
About JEVIL
"About JEVIL", "obj_shop1_slash_Draw_0_gml_224_0"
)));

    }

    if (global.flag[241 JEVIL_plot] == 0)

    {

        draw_text(80, 380, string_hash_to_newline(stringsetloc(
We're legendary
"We're legendary", "obj_shop1_slash_Draw_0_gml_227_0"
)));

    }

    else

    {

        _legendstring = stringsetloc(
Strange Prisoner
"Strange Prisoner", "obj_shop1_slash_Draw_0_gml_241_0"
);

        draw_set_color(c_yellow);

        if (global.flag[115 got_key_a] >= 1)

            draw_set_color(c_white);

        if (global.flag[241 JEVIL_plot] >= 6)

        {

            draw_set_color(c_yellow);

            _legendstring = stringsetloc(
We Won
"We Won", "obj_shop1_slash_Draw_0_gml_244_0"
);

        }

        draw_text(80, 380, string_hash_to_newline(_legendstring));

    }

    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(
Face 0Don't have
anything
better
to do.
"\\E0Don't have&anything&better&to do.", "obj_shop1_slash_Draw_0_gml_255_0"
);

        instance_create(440, 260, obj_writer);

    }

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

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

    if (instance_exists(obj_writer) == false)

    {

        if (sidemessage == 0)

            global.msg[0] = stringsetloc(
Face 0What kind
of junk
you got?
"\\E0What kind&of junk&you got?", "obj_shop1_slash_Draw_0_gml_285_0"
);

        if (sidemessage == 1)

            global.msg[0] = stringsetloc(
Face 0That's it
for that.
"\\E0That's it&for that.", "obj_shop1_slash_Draw_0_gml_286_0"
);

        if (sidemessage == 2)

            global.msg[0] = stringsetloc(
Face 3You don't
have
anything!
"\\E3You don't&have&anything!", "obj_shop1_slash_Draw_0_gml_287_0"
);

        instance_create(460, 260, obj_writer);

    }

    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;
            if (global.chapter == 3)
                healamount = 150;
            if (global.chapter >= 4)
                healamount = 160;
            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;
...
(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 || menu == 14)

{

    if (instance_exists(obj_writer) == false)

    {

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

            global.msg[0] = stringsetloc(
Face 0Alright,
give me
an ITEM.
"\\E0Alright,&give me&an ITEM.", "obj_shop1_slash_Draw_0_gml_347_0"
);

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

            global.msg[0] = stringsetloc(
Face 0What WEAPON
will you
give me?
"\\E0What WEAPON&will you&give me?", "obj_shop1_slash_Draw_0_gml_348_0"
);

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

            global.msg[0] = stringsetloc(
Face 0What ARMOR
will you
give me?
"\\E0What ARMOR&will you&give me?", "obj_shop1_slash_Draw_0_gml_349_0"
);

        if (sidemessage2 == 1)

            global.msg[0] = stringsetloc(
Face 2Thanks for
that.
"\\E2Thanks for&that.", "obj_shop1_slash_Draw_0_gml_350_0"
);

        if (sidemessage2 == 2)

            global.msg[0] = stringsetloc(
Face 0No?
"\\E0No?", "obj_shop1_slash_Draw_0_gml_351_0"
);

        if (sidemessage2 == 3)

            global.msg[0] = stringsetloc(
Face 3Y'think I
WANT that?
"\\E3Y'think I&WANT that?", "obj_shop1_slash_Draw_0_gml_352_0"
);

        if (sidemessage2 == 4)

            global.msg[0] = stringsetloc(
Face 0That's
nothing.
"\\E0That's&nothing.", "obj_shop1_slash_Draw_0_gml_353_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(camerax() + 400, cameray() + minimenuy, camerax() + 640, cameray() + 255);
            draw_set_color(c_white);
            
scr_84_set_draw_font("mainbig");
            if (menuc[1] == 0)
                draw_text(camerax() + 440, cameray() + minimenuy + 28, string_hash_to_newline(shopdesc[0]));
            if (menuc[1] == 1)
                draw_text(camerax() + 440, cameray() + minimenuy + 28, string_hash_to_newline(shopdesc[1]));
            if (menuc[1] == 2)
                draw_text(camerax() + 440, cameray() + minimenuy + 28, string_hash_to_newline(shopdesc[2]));
            if (menuc[1] == 3)
                draw_text(camerax() + 440, cameray() + 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, camerax() + 426 + locx, cameray() + 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, camerax() + 470 + locx, cameray() + minimenuy + locy + 135 + (20 * j), 1, 1, 0, dcolor, 1);
                                draw_text(camerax() + 490 + locx, cameray() + 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, camerax() + 470 + locx, cameray() + minimenuy + locy + 135 + (20 * j), 1, 1, 0, dcolor, 1);
                                draw_text(camerax() + 490 + locx, cameray() + 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 || menu == 18)

{

    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("$~1 ?", string(sellvalue), "obj_shop1_slash_Draw_0_gml_407_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"
)));

    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(camerax() + 400, cameray() + minimenuy, camerax() + 640, cameray() + 255);
            draw_set_color(c_white);
            
scr_84_set_draw_font("mainbig");
            if (menuc[1] == 0)
                draw_text(camerax() + 440, cameray() + minimenuy + 28, string_hash_to_newline(shopdesc[0]));
            if (menuc[1] == 1)
                draw_text(camerax() + 440, cameray() + minimenuy + 28, string_hash_to_newline(shopdesc[1]));
            if (menuc[1] == 2)
                draw_text(camerax() + 440, cameray() + minimenuy + 28, string_hash_to_newline(shopdesc[2]));
            if (menuc[1] == 3)
                draw_text(camerax() + 440, cameray() + 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, camerax() + 426 + locx, cameray() + 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, camerax() + 470 + locx, cameray() + minimenuy + locy + 135 + (20 * j), 1, 1, 0, dcolor, 1);
                                draw_text(camerax() + 490 + locx, cameray() + 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, camerax() + 470 + locx, cameray() + minimenuy + locy + 135 + (20 * j), 1, 1, 0, dcolor, 1);
                                draw_text(camerax() + 490 + locx, cameray() + 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)

    {

        if (sell == 1)

        {

        }

        if (sell == 2)

            global.msg[0] = stringsetloc(
Face 0* See you again...Delay 11
* Or not.Delay 11
* Ha ha ha ha...Wait for inputClose Message
"\\E0* See you again..^1.&* Or not^1.&* Ha ha ha ha.../%", "obj_shop1_slash_Draw_0_gml_395_0"
);

        if (sell == 3)

        {

            global.msg[0] = stringsetloc(
Face 0* The name's Seam.
* Pronounced "Shawm."Wait for input
"\\E0* The name's Seam.&* Pronounced \"Shawm.\"/", "obj_shop1_slash_Draw_0_gml_399_0"
);

            global.msg[1] = stringsetloc(
Face 0* And this is my little Seap.Delay 11
* Ha ha ha ha...Wait for input
"\\E0* And this is my little Seap^1.&* Ha ha ha ha.../", "obj_shop1_slash_Draw_0_gml_400_0"
);

            global.msg[2] = stringsetloc(
Face 0* Over the years, I've collected odds and ends.Wait for input
"\\E0* Over the years, I've collected odds and ends./", "obj_shop1_slash_Draw_0_gml_401_0"
);

            global.msg[3] = stringsetloc(
* 'Course, I've no attachment to any of it.Delay 11
* It's just a hobby of mine.Wait for input
"* 'Course, I've no attachment to any of it^1.&* It's just a hobby of mine./", "obj_shop1_slash_Draw_0_gml_402_0"
);

            global.msg[4] = stringsetloc(
* Around here, you learn to find ways to pass the time...
* ... or go mad like everyone else.Wait for inputClose Message
"* Around here, you learn to find ways to pass the time...&* ... or go mad like everyone else./%", "obj_shop1_slash_Draw_0_gml_403_0"
);

        }

        if (sell == 4)

        {

            global.msg[0] = stringsetloc(
Face 1* Long ago, the Darkners lived in harmony with the Lightners.Wait for input
"\\E1* Long ago, the Darkners lived in harmony with the Lightners./", "obj_shop1_slash_Draw_0_gml_411_0"
);

            global.msg[1] = stringsetloc(
Face 0* They were like Gods to us.
* Our protectors.
* Our creators.
* Those who gave us purpose...Wait for input
"\\E0* They were like Gods to us.&* Our protectors.&* Our creators.&* Those who gave us purpose.../", "obj_shop1_slash_Draw_0_gml_412_0"
);

            global.msg[2] = stringsetloc(
Face 3* Then, one day we were all locked away in this prison...Delay 11
* And the Lightners never returned.Wait for input
"\\E3* Then, one day we were all locked away in this prison..^1.&* And the Lightners never returned./", "obj_shop1_slash_Draw_0_gml_413_0"
);

            global.msg[3] = stringsetloc(
Face 1* Embittered,Delay 11 the King took up arms,Delay 11 and aims to take revenge upon the Lightners that left us behind.Wait for input
"\\E1* Embittered^1, the King took up arms^1, and aims to take revenge upon the Lightners that left us behind./", "obj_shop1_slash_Draw_0_gml_414_0"
);

            global.msg[4] = stringsetloc(
Face 0* 'Course,Delay 11 even among his troops,Delay 11 some still distantly hope the Lightners will return...Wait for inputClose Message
"\\E0* 'Course^1, even among his troops^1, some still distantly hope the Lightners will return.../%", "obj_shop1_slash_Draw_0_gml_415_0"
);

        }

        if (sell == 5)

        {

            global.msg[0] = stringsetloc(
Face 0* Historically,Delay 11 this land was ruled by the Four Kings,Delay 11 from CARD CASTLE to the East.Wait for input
"\\E0* Historically^1, this land was ruled by the Four Kings^1, from \\cYCARD CASTLE\\cW to the East./", "obj_shop1_slash_Draw_0_gml_421_0"
);

            global.msg[1] = stringsetloc(
Face 1* But, recently, a strange knight appeared...Delay 11
* And three of the kings were locked away.Wait for input
"\\E1* But, recently, a \\cRstrange knight\\cW appeared..^1.&* And three of the kings were locked away./", "obj_shop1_slash_Draw_0_gml_422_0"
);

            global.msg[2] = stringsetloc(
Face 0* The remaining king put him and his strange son into power.Wait for input
"\\E0* The remaining king put him and his strange son into power./", "obj_shop1_slash_Draw_0_gml_423_0"
);

            global.msg[3] = stringsetloc(
Face 1* This land hasn't seen THIS much chaos since...Wait for input
"\\E1* This land hasn't seen THIS much chaos since.../", "obj_shop1_slash_Draw_0_gml_424_0"
);

            global.msg[4] = stringsetloc(
Face 2* Ha ha ha...Delay 11
* Well, you don't need to know about THAT.Wait for inputClose Message
"\\E2* Ha ha ha..^1.&* Well, you don't need to know about THAT./%", "obj_shop1_slash_Draw_0_gml_425_0"
);

            if (global.flag[241 JEVIL_plot] >= 6)

            {

                global.msg[0] = stringsetloc(
Face 0* He...Delay 11 was a funny little man.Delay 11 Once,Delay 11 the court jester.Delay 11 I,Delay 11 the court magician.Wait for input
"\\E0* He..^1. was a funny little man^1. Once^1, the court jester^1. I^1, the court magician./", "obj_shop1_slash_Draw_0_gml_429_0"
);

                global.msg[1] = stringsetloc(
Face 1* A friend...?Delay 11 Could I consider him a friend...?Delay 11 Perhaps,Delay 11 perhaps not.Wait for input
"\\E1* A friend...^1? Could I consider him a friend...^1? Perhaps^1, perhaps not./", "obj_shop1_slash_Draw_0_gml_430_0"
);

                global.msg[2] = stringsetloc(
Face 2* But he was the only one who matched me in the games we used to play.Wait for input
"\\E2* But he was the only one who matched me in the games we used to play./", "obj_shop1_slash_Draw_0_gml_431_0"
);

                global.msg[3] = stringsetloc(
Face 3* One day,Delay 11 he met a strange someone...Delay 11 and since then,Delay 11 he began to change.Wait for input
"\\E3* One day^1, he met a strange someone..^1. and since then^1, he began to change./", "obj_shop1_slash_Draw_0_gml_432_0"
);

                global.msg[4] = stringsetloc(
Face 1* He started saying bizarre things that didn't completely make sense -Wait for input
"\\E1* He started saying bizarre things that didn't completely make sense -/", "obj_shop1_slash_Draw_0_gml_433_0"
);

                global.msg[5] = stringsetloc(
Face 3* But didn't completely not make sense,Delay 11 either.Wait for input
"\\E3* But didn't completely not make sense^1, either./", "obj_shop1_slash_Draw_0_gml_434_0"
);

                global.msg[6] = stringsetloc(
* Soon,Delay 11 he began to see the world as a game,Delay 11 and everyone as its participants.Wait for input
"* Soon^1, he began to see the world as a game^1, and everyone as its participants./", "obj_shop1_slash_Draw_0_gml_435_0"
);

                global.msg[7] = stringsetloc(
* As the court mage,Delay 11 and his only companion,Delay 11 I was forced to lock him away...Wait for input
"* As the court mage^1, and his only companion^1, I was forced to lock him away.../", "obj_shop1_slash_Draw_0_gml_436_0"
);

                global.msg[8] = stringsetloc(
Face 2* Or,Delay 11 rather,Delay 11 lock US all away,Delay 11 in his own words.Wait for input
"\\E2* Or^1, rather^1, lock US all away^1, in his own words./", "obj_shop1_slash_Draw_0_gml_437_0"
);

                global.msg[9] = stringsetloc(
Face 1* Since that time,Delay 11 the strange words he's said have stuck inside my cotton...Wait for input
"\\E1* Since that time^1, the strange words he's said have stuck inside my cotton.../", "obj_shop1_slash_Draw_0_gml_438_0"
);

                global.msg[10] = stringsetloc(
Face 3* And my view of this world has become darker,Delay 11 yet darker.Wait for input
"\\E3* And my view of this world has become darker^1, yet darker./", "obj_shop1_slash_Draw_0_gml_439_0"
);

                global.msg[11] = stringsetloc(
Face 2* Reflecting on these old memories,Delay 11 I think,Delay 11 perhaps -Delay 11 I miss playing games with him.Wait for input
"\\E2* Reflecting on these old memories^1, I think^1, perhaps ^1- I miss playing games with him./", "obj_shop1_slash_Draw_0_gml_440_0"
);

                global.msg[12] = stringsetloc(
Face 3* And I wonder,Delay 11 if I hadn't been asked to lock him up...Wait for input
"\\E3* And I wonder^1, if I hadn't been asked to lock him up.../", "obj_shop1_slash_Draw_0_gml_441_0"
);

                global.msg[13] = stringsetloc(
Face 2* Would I have found a little more purpose in my life...?Wait for inputClose Message
"\\E2* Would I have found a little more purpose in my life...?/%", "obj_shop1_slash_Draw_0_gml_442_0"
);

            }

        }

        if (sell == 6)

        {

            global.msg[0] = stringsetloc(
Face 2* Ha ha ha ...Delay 11
* So you are the "heroes" who are going to seal our Fountain?Wait for input
"\\E2* Ha ha ha ..^1.&* So you are the \"heroes\" who are going to seal our Fountain?/", "obj_shop1_slash_Draw_0_gml_448_0"
);

            global.msg[1] = stringsetloc(
Face 0* Ha, good luck.Delay 11
* It makes no difference to me.Wait for input
"\\E0* Ha, good luck^1.&* It makes no difference to me./", "obj_shop1_slash_Draw_0_gml_449_0"
);

            global.msg[2] = stringsetloc(
Face 3* Neither Light nor Dark hold a future for a Darkner in my condition.Wait for inputClose Message
"\\E3* Neither Light nor Dark hold a future for a Darkner in my condition./%", "obj_shop1_slash_Draw_0_gml_450_0"
);

            if (global.flag[241 JEVIL_plot] >= 1 && global.flag[115 got_key_a] == 1)

            {

                global.msg[0] = stringsetloc(
Face 1* Trouble opening the door...?Wait for input
"\\E1* Trouble opening the door...?/", "obj_shop1_slash_Draw_0_gml_459_0"
);

                global.msg[1] = stringsetloc(
Face 0* Ha ha ha,Delay 11 well,Delay 11 whether you can or not,Delay 11 it doesn't matter to me.Wait for input
"\\E0* Ha ha ha^1, well^1, whether you can or not^1, it doesn't matter to me./", "obj_shop1_slash_Draw_0_gml_460_0"
);

                global.msg[2] = stringsetloc(
Face 2* But here's a hint -Delay 11 walk where the stars don't shine.Wait for inputClose Message
"\\E2* But here's a hint ^1- \\cYwalk where the stars don't shine\\cW./%", "obj_shop1_slash_Draw_0_gml_461_0"
);

            }

            if (global.flag[241 JEVIL_plot] >= 1 && global.flag[115 got_key_a] == 0)

            {

                global.msg[0] = stringsetloc(
Face 3* Eh...?Delay 11 What are you talking about...?Delay 11 A prisoner with an odd manner...?Wait for input
"\\E3* Eh...^1? What are you talking about...^1? A prisoner with an odd manner...?/", "obj_shop1_slash_Draw_0_gml_472_0"
);

                global.msg[1] = stringsetloc(
Face 1* ... No,Delay 11 you couldn't possibly be talking about HIM...?Wait for input
"\\E1* ... No^1, you couldn't possibly be talking about HIM...?/", "obj_shop1_slash_Draw_0_gml_473_0"
);

                global.msg[2] = stringsetloc(
Face 3* ... I see.Delay 11
* After all the trouble I went through to lock him up,Delay 11 you want to release him?Wait for input
"\\E3* ... I see^1.&* After all the trouble I went through to lock him up^1, you want to release him?/", "obj_shop1_slash_Draw_0_gml_474_0"
);

                global.msg[3] = stringsetloc(
Face 0* ...Wait for input
"\\E0* .../", "obj_shop1_slash_Draw_0_gml_475_0"
);

                global.msg[4] = stringsetloc(
Face 1* Hmm,Delay 11 now that you mention it,Delay 11 it could be troublesome if he was left alone...Wait for input
"\\E1* Hmm^1, now that you mention it^1, it could be troublesome if he was left alone.../", "obj_shop1_slash_Draw_0_gml_476_0"
);

                global.msg[5] = stringsetloc(
Face 0* Yes,Delay 11 perhaps it's better if you Heroes dealt with him now...?Wait for input
"\\E0* Yes^1, perhaps it's better if you Heroes dealt with him now...?/", "obj_shop1_slash_Draw_0_gml_477_0"
);

                global.msg[6] = stringsetloc(
Face 2* After all,Delay 11 it's not as if whatever happens,Delay 11 will matter in the end.Wait for input
"\\E2* After all^1, it's not as if whatever happens^1, will matter in the end./", "obj_shop1_slash_Draw_0_gml_478_0"
);

                global.msg[7] = stringsetloc(
* Perhaps a little chaos might be fun.Wait for input
"* Perhaps a little chaos might be fun./", "obj_shop1_slash_Draw_0_gml_479_0"
);

                global.msg[8] = stringsetloc(
Face 0* So then, take this.Wait for input
"\\E0* So then, take this./", "obj_shop1_slash_Draw_0_gml_480_0"
);

                global.writersnd[0] = snd_item;

                global.msg[9] = stringsetloc(
\S0* (BROKEN KEY A was added to your KEY ITEMS.)Wait for input
"\\S0* (\\cYBROKEN KEY A\\cW was added to your \\cYKEY ITEMS\\cW.)/", "obj_shop1_slash_Draw_0_gml_482_0"
);

                global.msg[10] = stringsetloc(
* If you're so driven,Delay 11 find the other two pieces,Delay 11 and get someone to fix them.Wait for input
"* If you're so driven^1, find the other \\cYtwo\\cW pieces^1, and get someone to \\cYfix\\cW them./", "obj_shop1_slash_Draw_0_gml_483_0"
);

                global.msg[11] = stringsetloc(
* I'll even give you a hint - Walk where the stars don't shine.Wait for input
"* I'll even give you a hint - \\cYWalk where the stars don't shine\\cW./", "obj_shop1_slash_Draw_0_gml_484_0"
);

                global.msg[12] = stringsetloc(
* Anyhow,Delay 11 if you succeed,Delay 11 come back here and tell me!Delay 11 Good luck!!Wait for input
"* Anyhow^1, if you succeed^1, come back here and tell me^1! Good luck!!/", "obj_shop1_slash_Draw_0_gml_485_0"
);

                global.msg[13] = stringsetloc(
* If you can call THIS luck...Delay 11 No,Delay 11 it's more like a curse...!Wait for inputClose Message
"* If you can call THIS luck..^1. No^1, it's more like a curse...!/%", "obj_shop1_slash_Draw_0_gml_486_0"
);

                
scr_keyitemget
scr_keyitemget

function 
scr_keyitemget(arg0)
{
    i = 0;
    loop = 1;
    noroom = 0;
    global.item[12] = 999;
    while (loop == 1)
    {
        if (global.keyitem[i] == 0)
        {
            global.keyitem[i] = arg0;
            break;
        }
        if (i == 12)
        {
            noroom = 1;
            break;
        }
        i += 1;
    }
    script_execute(scr_keyiteminfo_all);
}
(4);

                global.flag[115 got_key_a] = 1;

            }

            if (global.flag[115 got_key_a] == 1 && global.flag[241 JEVIL_plot] >= 5)

            {

                global.msg[0] = stringsetloc(
Face 1* You already opened the door...?Wait for input
"\\E1* You already opened the door...?/", "obj_shop1_slash_Draw_0_gml_493_0"
);

                global.msg[1] = stringsetloc(
Face 2* Ha ha ha...Delay 11 I almost wish I could watch!Delay 11 Tell me what happens!Wait for input
"\\E2* Ha ha ha..^1. I almost wish I could watch^1! Tell me what happens!/", "obj_shop1_slash_Draw_0_gml_494_0"
);

                global.msg[2] = stringsetloc(
Face 2* Ha ha ha...Delay 11 though,Delay 11 I suppose if you don't come back,Delay 11 I'll understand,Delay 11 too!Wait for inputClose Message
"\\E2* Ha ha ha..^1. though^1, I suppose if you don't come back^1, I'll understand^1, too!/%", "obj_shop1_slash_Draw_0_gml_495_0"
);

            }

            if (global.flag[115 got_key_a] == 1 && global.flag[241 JEVIL_plot] >= 6)

            {

                global.msg[0] = stringsetloc(
Face 1* You defeated him!?Delay 11 You REALLY defeated him!?Wait for input
"\\E1* You defeated him!^1? You REALLY defeated him!?/", "obj_shop1_slash_Draw_0_gml_500_0"
);

                global.msg[1] = stringsetloc(
Face 0* I see...Delay 11 perhaps you three may truly be "Heroes" after all...Wait for input
"\\E0* I see..^1. perhaps you three may truly be \"Heroes\" after all.../", "obj_shop1_slash_Draw_0_gml_501_0"
);

                global.msg[2] = stringsetloc(
Face 1* But JEVIL was just a taste of what you'll face from now on.Wait for input
"\\E1* But JEVIL was just a taste of what you'll face from now on./", "obj_shop1_slash_Draw_0_gml_502_0"
);

                global.msg[3] = stringsetloc(
Face 0* One day soon...Wait for input
"\\E0* One day soon.../", "obj_shop1_slash_Draw_0_gml_503_0"
);

                global.msg[4] = stringsetloc(
Face 1* You too,Delay 11 will begin to realize the futility of your actions.Wait for input
"\\E1* You too^1, will begin to realize the futility of your actions./", "obj_shop1_slash_Draw_0_gml_504_0"
);

                global.msg[5] = stringsetloc(
Face 2* Ha ha ha...Wait for input
"\\E2* Ha ha ha.../", "obj_shop1_slash_Draw_0_gml_505_0"
);

                global.msg[6] = stringsetloc(
Face 0* At that time,Delay 11 feel free to come back here.Delay 11
* I'll make you tea...Wait for input
"\\E0* At that time^1, feel free to come back here^1.&* I'll make you tea.../", "obj_shop1_slash_Draw_0_gml_506_0"
);

                global.msg[7] = stringsetloc(
Face 2* And we can toast...Delay 11 to the end of the world!Wait for inputClose Message
"\\E2* And we can toast..^1. to the end of the world!/%", "obj_shop1_slash_Draw_0_gml_507_0"
);

            }

        }

        if (sell == 10)

        {

            talk_counter++;

            if (talk_counter == 1)

            {

                
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 == "tenna")
    {
        global.typer = 80;
        if (global.fighting == 1)
            global.typer = 81;
    }
    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;
...
("seam");

                msgsetloc(0, 
* There are many fresh faces in town,Delay 11 I see.Wait for input
"* There are many fresh faces in town^1, I see./", "obj_shop1_slash_Draw_0_gml_654_0"
);

                msgnextloc(
Face 2* It warms this old fluff to see such hope.Wait for input
"\\E2* It warms this old fluff to see such hope./", "obj_shop1_slash_Draw_0_gml_655_0"
);

                msgnextloc(
Face 3* I was even surprised to see the Queen again.Wait for input
"\\E3* I was even surprised to see the Queen again./", "obj_shop1_slash_Draw_0_gml_656_0"
);

                msgnextloc(
Face 0* Same as ever...Delay 11 Well,Delay 11 aren't we all.Wait for inputClose Message
"\\E0* Same as ever..^1. Well^1, aren't we all./%", "obj_shop1_slash_Draw_0_gml_657_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 == "tenna")
    {
        global.typer = 80;
        if (global.fighting == 1)
            global.typer = 81;
    }
    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;
...
("seam");

                if (scr_get_total_recruits(2) >= 9)

                {

                    msgsetloc(0, 
* Those young men have made an interesting shop.Wait for input
"* Those young men have made an interesting shop./", "obj_shop1_slash_Draw_0_gml_661_0"
);

                    msgnextloc(
Face 3* They're leaving the bagel business,Delay 11 so I have the rest of their remaining stock.Wait for input
"\\E3* They're leaving the bagel business^1, so I have the rest of their remaining stock./", "obj_shop1_slash_Draw_0_gml_662_0"
);

                }

                else

                {

                    msgsetloc(0, 
* Those three young musical men are thinking about setting up a shop here.Wait for input
"* Those three young musical men are thinking about setting up a shop here./", "obj_shop1_slash_Draw_0_gml_674_0_b"
);

                    msgnextloc(
Face 2* I'm sure you'd appreciate having an option other than me,Delay 11 ha ha.Wait for input
"\\E2* I'm sure you'd appreciate having an option other than me^1, ha ha./", "obj_shop1_slash_Draw_0_gml_675_0_b"
);

                }

                msgnextloc(
Face 3* ...Delay 11 By the by,Delay 11 it's growing late,Delay 11 isn't it?Wait for input
"\\E3* ..^1. By the by^1, it's growing late^1, isn't it?/", "obj_shop1_slash_Draw_0_gml_663_0"
);

                msgnextloc(
Face 0* You should hurry home once you finish your business here.Wait for input
"\\E0* You should hurry home once you finish your business here./", "obj_shop1_slash_Draw_0_gml_664_0"
);

                msgnextloc(
Face 3* You don't want to get caught when the sun goes down...Wait for inputClose Message
"\\E3* You don't want to get caught when the sun goes down.../%", "obj_shop1_slash_Draw_0_gml_665_0"
);

            }

        }

        instance_create(30, 270, obj_writer);

        selling = 1;

    }

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

    {

        if (took_crystal)

        {

            took_crystal = false;

            snd_play(snd_item);

        }

        if (sell == 2)

        {

            selling = 2;

            event_user(1);

        }

        else

        {

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

                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)

            
scr_shop_space_display
scr_shop_space_display

function 
scr_shop_space_display(arg0)
{
    var item_id = item[arg0];
    if (itemtype[arg0] == "item")
    {
        
scr_itemcheck(0);
        var inventory_space = 12 - itemcount;
        var inventory_amount = "00";
        if (inventory_space < 10)
            inventory_amount = "0" + string(inventory_space);
        else
            inventory_amount = string(inventory_space);
        var base_y_pos = (cameray() + 418) - 20;
        var line_height = 12;
        draw_sprite_ext(
scr_84_get_sprite("spr_shop_space_ui"), 0, camerax() + 555, base_y_pos, 1, 1, 0, c_white, 1);
        draw_set_font(fnt_8bit);
        draw_text_ext_transformed(camerax() + 555 + 1, base_y_pos + line_height + 4, inventory_amount + "/12", 1, 999, 0.5, 0.5, 0);
        draw_set_font(fnt_main);
        draw_sprite_ext(
scr_84_get_sprite("spr_shop_space_ui"), 2, camerax() + 555, base_y_pos + (line_height * 2) + 8, 1, 1, 0, c_white, 1);
        
scr_itemcheck_pocket(0);
        var storage_space = global.flag[64 storage_size] - itemcount;
        var storage_amount = "00";
        if (storage_space < 10)
            storage_amount = "0" + string(storage_space);
        else
            storage_amount = string(storage_space);
        draw_set_font(fnt_8bit);
        draw_text_ext_transformed(camerax() + 555 + 1, base_y_pos + (line_height * 3) + 12, storage_amount + "/" + string(global.flag[64 storage_size]), 1, 999, 0.5, 0.5, 0);
        draw_set_font(fnt_main);
    }
    else
    {
        var inventory_space = 0;
        if (itemtype[arg0] == "weapon")
        {
            
scr_weaponcheck_inventory(0);
            inventory_space = 48 - itemcount;
        }
        else
        {
            
scr_armorcheck_inventory(0);
            inventory_space = 48 - itemcount;
        }
        var inventory_amount = "00";
        if (inventory_space < 10)
            inventory_amount = "0" + string(inventory_space);
        else
            inventory_amount = string(inventory_space);
        var base_y_pos = (cameray() + 418) - 8;
        var line_height = 12;
        var header_index = (itemtype[arg0] == "weapon") ? 3 : 4;
        var header_y_pos = langopt(base_y_pos, base_y_pos + line_height);
        draw_sprite_ext(
scr_84_get_sprite("spr_shop_space_ui"), header_index, camerax() + 555, header_y_pos, 1, 1, 0, c_white, 1);
        var inventory_y_pos = langopt(base_y_pos + line_height, base_y_pos);
        var inventory_index = (global.lang == "ja") ? 1 : 0;
        draw_sprite_ext(
scr_84_get_sprite("spr_shop_space_ui"), inventory_index, camerax() + 555, inventory_y_pos, 1, 1, 0, c_white, 1);
        draw_set_font(fnt_8bit);
        draw_text_ext_transformed(camerax() + 555 + 1, base_y_pos + (line_height * 2) + 4, inventory_amount + "/48", 1, 999, 0.5, 0.5, 0);
        draw_set_font(fnt_main);
    }
}
(menuc[1]);

    }

}

onebuffer -= 1;

twobuffer -= 1;