Deltarune (Chapter 2) script viewer

siner += 1;

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

draw_sprite_ext(spr_shop_rurussparkle, 0, 148 + (sin(siner / 6) * 4), 52 + (cos(siner / 6) * 4), 2, (sin(siner / 8) * 3) - 1, 0, c_white, (sin(siner / 8) * 2) - 1);

draw_sprite_ext(spr_shop_rurussparkle, 0, 48 + (sin(siner / 6) * 4), 42 + (cos(siner / 6) * 4), 2, (cos(siner / 8) * 3) - 1, 0, c_white, (cos(siner / 8) * 2) - 1);

draw_sprite_ext(spr_shop_rurusface, global.fe, 72, 62, 2, 2, 0, c_white, 1);

draw_sprite_ext(spr_shop_rurushand, siner / 3.73, 200, 56, 2, 2, 0, c_white, 1);

draw_sprite_ext(spr_shop_rurusfoot, siner / 3.73, 340, 150, 2, 2, 0, c_white, 1);

draw_sprite_ext(spr_shop_rurussteam, siner / 20, 422, 168 + (sin(siner / 8) * 2), 2, 2, 0, c_white, 1);

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

{

    worm_image[i] += 0.2;

    if (worm_image[i] >= 3)

        worm_siner[i] += worm_image[i] / 3;

    if (worm_image[i] >= 6)

        worm_image[i] -= 6;

    complexwormx = (sin(worm_siner[i] / 50) * 20) + (sin(worm_siner[i] / 3) * 2);

    complexwormy = cos(worm_siner[i] / 8);

    draw_sprite_ext(spr_shop_rurusworm, worm_image[i], 530 + complexwormx, 204 + complexwormy + worm_y[i], 2, 2, 0, c_white, 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(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;

        global.msg[0] = stringsetloc(
Face 0* Anything else?
"\\E0* Anything else?", "obj_shop2_slash_Draw_0_gml_70_0"
);

        if (mainmessage == 0)

        {

            global.msg[0] = stringsetloc(
Face 0* Welcome to my
shop,Delay 11 you
ungrateful worms.
"\\E0* Welcome to my&shop^1, you&ungrateful worms.", "obj_shop2_slash_Draw_0_gml_73_0"
);

            if (friendly == 1)

                global.msg[0] = stringsetloc(
Face 0* Welcome,Delay 11 welcome,Delay 11
my Heroick Comrades!
"\\E0* Welcome^1, welcome^1,&my Heroick Comrades!", "obj_shop2_slash_Draw_0_gml_74_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_shop2_slash_Draw_0_gml_82_0"
)));

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

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

    draw_text(480, 380, string_hash_to_newline(stringsetloc(
Exit
"Exit", "obj_shop2_slash_Draw_0_gml_85_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_shop2_slash_Draw_0_gml_113_0"
)));

    }

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

    if (menu == 1)

    {

        menumax = 4;

        if (instance_exists(obj_writer) == false)

        {

            if (sidemessage == 0)

                global.msg[0] = stringsetloc(
Face 0What
shalt
thou buy?
"\\E0What&shalt&thou buy?", "obj_shop2_slash_Draw_0_gml_124_0"
);

            if (sidemessage == 1)

            {

                global.msg[0] = stringsetloc(
Face 2Thanks,
worm.
"\\E2Thanks,&worm.", "obj_shop2_slash_Draw_0_gml_125_0"
);

                if (friendly == 1)

                    global.msg[0] = stringsetloc(
Face 2Thanks,
hero!
"\\E2Thanks,&hero!", "obj_shop2_slash_Draw_0_gml_126_0"
);

            }

            if (sidemessage == 2)

                global.msg[0] = stringsetloc(
Face 3Perhaps
another
ware?
"\\E3Perhaps&another&ware?", "obj_shop2_slash_Draw_0_gml_127_0"
);

            if (sidemessage == 3)

                global.msg[0] = stringsetloc(
Face 6Your
funds are
lacking.
"\\E6Your&funds are&lacking.", "obj_shop2_slash_Draw_0_gml_128_0"
);

            if (sidemessage == 4)

                global.msg[0] = stringsetloc(
Face 3Thou doth
carry
too much!
"\\E3Thou doth&carry&too much!", "obj_shop2_slash_Draw_0_gml_129_0"
);

            if (murder == 1)

                global.msg[0] = stringsetloc(
Wait for input*
"/*", "obj_shop2_slash_Draw_0_gml_130_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(
Buyeth for
"Buyeth for", "obj_shop2_slash_Draw_0_gml_144_0"
)));

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

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

        draw_text(480, 370, string_hash_to_newline(stringsetloc(
No
"No", "obj_shop2_slash_Draw_0_gml_147_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)

                {

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

                        sidemessage = 1;

                        snd_play(snd_locker);

                    }

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

    draw_text(80, 300, string_hash_to_newline(stringsetloc(
Why sell to us
"Why sell to us", "obj_shop2_slash_Draw_0_gml_195_0"
)));

    draw_text(80, 340, string_hash_to_newline(stringsetloc(
The King
"The King", "obj_shop2_slash_Draw_0_gml_196_0"
)));

    draw_text(80, 380, string_hash_to_newline(stringsetloc(
The King's Son
"The King's Son", "obj_shop2_slash_Draw_0_gml_197_0"
)));

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

    if (instance_exists(obj_writer) == false)

    {

        global.msg[0] = stringsetloc(
Face 5Ah,Delay 11 what is
thine
Intereste?
"\\E5Ah^1, what is&thine&Intereste?", "obj_shop2_slash_Draw_0_gml_202_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 = 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(80, 260, string_hash_to_newline(stringsetloc(
Selleth Items
"Selleth Items", "obj_shop2_slash_Draw_0_gml_236_0"
)));

    draw_text(80, 300, string_hash_to_newline(stringsetloc(
Selleth Weapons
"Selleth Weapons", "obj_shop2_slash_Draw_0_gml_237_0"
)));

    draw_text(80, 340, string_hash_to_newline(stringsetloc(
Selleth Armor
"Selleth Armor", "obj_shop2_slash_Draw_0_gml_238_0"
)));

    draw_text(80, 380, string_hash_to_newline(stringsetloc(
Returnst
"Returnst", "obj_shop2_slash_Draw_0_gml_239_0"
)));

    if (instance_exists(obj_writer) == false)

    {

        if (sidemessage == 0)

            global.msg[0] = stringsetloc(
Face 0Showeth
me your
treasure!
"\\E0Showeth&me your&treasure!", "obj_shop2_slash_Draw_0_gml_243_0"
);

        if (sidemessage == 1)

            global.msg[0] = stringsetloc(
Face 2That seems
to be all,
no?
"\\E2That seems&to be all,&no?", "obj_shop2_slash_Draw_0_gml_244_0"
);

        if (sidemessage == 2)

            global.msg[0] = stringsetloc(
Face 6You have
none!
"\\E6You have&none!", "obj_shop2_slash_Draw_0_gml_245_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;

            }

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

        }

        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 == 12)

            {

                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 == 12)

            {

                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 (menuc[10] < menumax)

        {

            if (can == 1)

                menu = menuc[10] + 11;

            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)

            global.msg[0] = stringsetloc(
Face 0What ITEM
shalt thou
proffer?
"\\E0What ITEM&shalt thou&proffer?", "obj_shop2_slash_Draw_0_gml_305_0"
);

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

            global.msg[0] = stringsetloc(
Face 0What WEAPON
shalt thou
proffer?
"\\E0What WEAPON&shalt thou&proffer?", "obj_shop2_slash_Draw_0_gml_306_0"
);

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

            global.msg[0] = stringsetloc(
Face 0What ARMOR
shalt thou
proffer?
"\\E0What ARMOR&shalt thou&proffer?", "obj_shop2_slash_Draw_0_gml_307_0"
);

        if (sidemessage2 == 1)

            global.msg[0] = stringsetloc(
Face 5I shall
make use
of this!
"\\E5I shall&make use&of this!", "obj_shop2_slash_Draw_0_gml_308_0"
);

        if (sidemessage2 == 2)

            global.msg[0] = stringsetloc(
Face 6What?
"\\E6What?", "obj_shop2_slash_Draw_0_gml_309_0"
);

        if (sidemessage2 == 3)

            global.msg[0] = stringsetloc(
Face 6Er, NO
thank you.
"\\E6Er, NO&thank you.", "obj_shop2_slash_Draw_0_gml_310_0"
);

        if (sidemessage2 == 4)

            global.msg[0] = stringsetloc(
Face 6What?
"\\E6What?", "obj_shop2_slash_Draw_0_gml_311_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_shop2_slash_Draw_0_gml_323_0"
)));

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

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

    draw_text(480, 370, string_hash_to_newline(stringsetloc(
No
"No", "obj_shop2_slash_Draw_0_gml_326_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)

    {

        if (sell == 1)

        {

        }

        if (sell == 2)

        {

            global.msg[0] = stringsetloc(
Face 5* See thou in the Dungeon,Delay 11 Worms!Wait for inputClose Message
"\\E5* See thou in the Dungeon^1, Worms!/%", "obj_shop2_slash_Draw_0_gml_353_0"
);

            if (friendly == 1)

                global.msg[0] = stringsetloc(
Face 5* Come by any time,Delay 11 my good Worms!Wait for inputClose Message
"\\E5* Come by any time^1, my good Worms!/%", "obj_shop2_slash_Draw_0_gml_354_0"
);

        }

        if (sell == 3)

        {

            global.msg[0] = stringsetloc(
Face 0* I amst the Duke of Puzzles,Delay 11 Rouxls Kaard.Wait for input
"\\E0* I amst the Duke of Puzzles^1, Rouxls Kaard./", "obj_shop2_slash_Draw_0_gml_358_0"
);

            global.msg[1] = stringsetloc(
Face 4* My hobbies includest calligraphy,Delay 11 lawkeeping,Delay 11 bugkeeping,Delay 11 cages...Wait for input
"\\E4* My hobbies includest calligraphy^1, lawkeeping^1, bugkeeping^1, cages.../", "obj_shop2_slash_Draw_0_gml_359_0"
);

            global.msg[2] = stringsetloc(
Face 1* ... and long walks in the dungeon.Wait for input
"\\E1* ... and long walks in the dungeon./", "obj_shop2_slash_Draw_0_gml_360_0"
);

            global.msg[3] = stringsetloc(
Face 5* Artest thou one of my admirers,Delay 11 worm?Wait for inputClose Message
"\\E5* Artest thou one of my admirers^1, worm?/%", "obj_shop2_slash_Draw_0_gml_361_0"
);

            if (friendly == 1)

                global.msg[3] = stringsetloc(
Face 5* By the way,Delay 11 no hard feelingst about earlier,Delay 11 right?Wait for inputClose Message
"\\E5* By the way^1, no hard feelingst about earlier^1, right?/%", "obj_shop2_slash_Draw_0_gml_364_0"
);

        }

        if (sell == 4)

        {

            global.msg[0] = stringsetloc(
Face 4* Hahaha!!Delay 11 So I might amasseth funds,Delay 11 Worms!Delay 11 An army of funds...Wait for input
"\\E4* Hahaha!^1! So I might amasseth funds^1, Worms^1! An army of funds.../", "obj_shop2_slash_Draw_0_gml_371_0"
);

            global.msg[1] = stringsetloc(
Face 1* So that I may crushest thou like Fermented Grapes,Delay 11 into a most delicious and adult beverage -Wait for input
"\\E1* So that I may crushest thou like Fermented Grapes^1, into a most delicious and adult beverage -/", "obj_shop2_slash_Draw_0_gml_372_0"
);

            global.msg[2] = stringsetloc(
Face 6* Vengeance!!Delay 11 Ahahaha!!!Wait for input
"\\E6* Vengeance!^1! Ahahaha!!!/", "obj_shop2_slash_Draw_0_gml_373_0"
);

            global.msg[3] = stringsetloc(
Face 5* Oh,Delay 11 how I amuse myself!!!Wait for inputClose Message
"\\E5* Oh^1, how I amuse myself!!!/%", "obj_shop2_slash_Draw_0_gml_374_0"
);

            if (friendly == 1)

            {

                global.msg[0] = stringsetloc(
Face 2* Haha,Delay 11 why of course I wouldst sell to my compatriarts,Delay 11 the Heroes Of Legend!Wait for input
"\\E2* Haha^1, why of course I wouldst sell to my compatriarts^1, the Heroes Of Legend!/", "obj_shop2_slash_Draw_0_gml_378_0"
);

                global.msg[1] = stringsetloc(
Face 5* Earlier art but a Test of your Heroick Resolve!Wait for input
"\\E5* Earlier art but a Test of your Heroick Resolve!/", "obj_shop2_slash_Draw_0_gml_379_0"
);

                global.msg[2] = stringsetloc(
Face 6* Rouxls is ALWAYS on the winning side!!Delay 11 Thou can bet on that!!!Wait for inputClose Message
"\\E6* Rouxls is ALWAYS on the winning side!^1! Thou can bet on that!!!/%", "obj_shop2_slash_Draw_0_gml_380_0"
);

            }

        }

        if (sell == 5)

        {

            global.msg[0] = stringsetloc(
Face 6* Our Lorde King art a cruel and terrifying Monarcke!Wait for input
"\\E6* Our Lorde King art a cruel and terrifying Monarcke!/", "obj_shop2_slash_Draw_0_gml_386_0"
);

            global.msg[1] = stringsetloc(
Face 2* However,Delay 11 he is also Brilliant,Delay 11 for he decidedesteth to appoinst ME,Delay 11 as Duke of Puzzles,Wait for input
"\\E2* However^1, he is also Brilliant^1, for he decidedesteth to appoinst ME^1, as Duke of Puzzles,/", "obj_shop2_slash_Draw_0_gml_387_0"
);

            global.msg[2] = stringsetloc(
Face 6* After pretty mucheth everyone else was firedst or placed inside a cage.Wait for input
"\\E6* After pretty mucheth everyone else was firedst or placed inside a cage./", "obj_shop2_slash_Draw_0_gml_388_0"
);

            global.msg[3] = stringsetloc(
Face 4* Truly, a benevolent ruler!Wait for inputClose Message
"\\E4* Truly, a benevolent ruler!/%", "obj_shop2_slash_Draw_0_gml_389_0"
);

            if (friendly == 1)

            {

                global.msg[0] = stringsetloc(
Face 6* Yes, the King!Delay 11 A terrible Man!Delay 11 An awful Monarcke!Delay 11Wait for input
"\\E6* Yes, the King^1! A terrible Man^1! An awful Monarcke^1!/", "obj_shop2_slash_Draw_0_gml_392_0"
);

                global.msg[1] = stringsetloc(
Face 2* Never likedeth that Guye,Delay 11 really!Wait for input
"\\E2* Never likedeth that Guye^1, really!/", "obj_shop2_slash_Draw_0_gml_393_0"
);

                global.msg[2] = stringsetloc(
Face 3* I just envisionethed,Delay 11 perhaps...Delay 11 If I acceptedst this High Ranking Positione...Wait for input
"\\E3* I just envisionethed^1, perhaps..^1. If I acceptedst this High Ranking Positione.../", "obj_shop2_slash_Draw_0_gml_394_0"
);

                global.msg[3] = stringsetloc(
Face 5* I could assist to overthroweth him from the Inside!Wait for input
"\\E5* I could assist to overthroweth him from the Inside!/", "obj_shop2_slash_Draw_0_gml_395_0"
);

                global.msg[4] = stringsetloc(
Face 6* ... What!?Delay 11 Cannot thou conceiveth of my plan?!?Wait for inputClose Message
"\\E6* ... What!^1? Cannot thou conceiveth of my plan?!?/%", "obj_shop2_slash_Draw_0_gml_396_0"
);

            }

        }

        if (sell == 6)

        {

            global.msg[0] = stringsetloc(
Face 0* His Son,Delay 11 on the other hand,Delay 11 is more troublesome than a fistful of fleas!Wait for input
"\\E0* His Son^1, on the other hand^1, is more troublesome than a fistful of fleas!/", "obj_shop2_slash_Draw_0_gml_402_0"
);

            global.msg[1] = stringsetloc(
Face 1* He alwayst asks me the Worste Queries,Wait for input
"\\E1* He alwayst asks me the Worste Queries,/", "obj_shop2_slash_Draw_0_gml_403_0"
);

            global.msg[2] = stringsetloc(
Face 3* And calleth me his "Lesser Dad."Wait for input
"\\E3* And calleth me his \"Lesser Dad.\"/", "obj_shop2_slash_Draw_0_gml_404_0"
);

            global.msg[3] = stringsetloc(
Face 6* Our relation is NONE,Delay 11 you little water-beetle!Delay 11 I placate you for your Father's sake!Wait for input
"\\E6* Our relation is NONE^1, you little water-beetle^1! I placate you for your Father's sake!/", "obj_shop2_slash_Draw_0_gml_405_0"
);

            global.msg[4] = stringsetloc(
Face 6* I do not Wisheth to hear your MP3's!Delay 11 I would rather listen to the sweet song of Death!Wait for input
"\\E6* I do not Wisheth to hear your MP3's^1! I would rather listen to the sweet song of Death!/", "obj_shop2_slash_Draw_0_gml_406_0"
);

            global.msg[5] = stringsetloc(
Face 3* ...Wait for input
"\\E3* .../", "obj_shop2_slash_Draw_0_gml_407_0"
);

            global.msg[6] = stringsetloc(
Face 2* How is he,Delay 11 anyhow?Wait for inputClose Message
"\\E2* How is he^1, anyhow?/%", "obj_shop2_slash_Draw_0_gml_408_0"
);

            if (friendly == 1)

            {

                global.msg[0] = stringsetloc(
Face 3* Perhaps my wording art a bit Harshe earlier... The King's offspring is a Darling!Wait for input
"\\E3* Perhaps my wording art a bit Harshe earlier... The King's offspring is a Darling!/", "obj_shop2_slash_Draw_0_gml_413_0"
);

                global.msg[1] = stringsetloc(
Face 6* A strange and irritating darling!Wait for input
"\\E6* A strange and irritating darling!/", "obj_shop2_slash_Draw_0_gml_414_0"
);

                global.msg[2] = stringsetloc(
Face 3* When his Father does not cook,Delay 11 his Son yells like a baby bird,Delay 11 until I feed him worms!Wait for input
"\\E3* When his Father does not cook^1, his Son yells like a baby bird^1, until I feed him worms!/", "obj_shop2_slash_Draw_0_gml_415_0"
);

                global.msg[3] = stringsetloc(
Face 6* Is this what it means to be High Ranking!?Wait for inputClose Message
"\\E6* Is this what it means to be High Ranking!?/%", "obj_shop2_slash_Draw_0_gml_416_0"
);

            }

        }

        instance_create(30, 270, obj_writer);

        selling = 1;

    }

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

            if (itemcount == 0)

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

        }

    }

}

onebuffer -= 1;

twobuffer -= 1;