Deltarune (Chapter 2) script viewer

← back to main script listing
gml_GlobalScript_scr_shopmenu

(view raw script w/o annotations or w/e)
function scr_shopmenuscr_shopmenufunction 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)
        {
...(arg0)
{
    if (arg0 == 0)
    {
        if (menu == 1 || menu == 2)
        {
            scr_darkbox_blackscr_darkbox_blackfunction 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, minimenuy, 640, 255);
            draw_set_color(c_white);
            scr_84_set_draw_fontscr_84_set_draw_fontfunction scr_84_set_draw_font(arg0)
{
    global.chemg_font = arg0;
    draw_set_font(scr_84_get_font(arg0));
}("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_fontscr_84_set_draw_fontfunction scr_84_set_draw_font(arg0)
{
    global.chemg_font = arg0;
    draw_set_font(scr_84_get_font(arg0));
}("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)
        {
            draw_set_color(c_white);
            scr_84_set_draw_fontscr_84_set_draw_fontfunction scr_84_set_draw_font(arg0)
{
    global.chemg_font = arg0;
    draw_set_font(scr_84_get_font(arg0));
}("mainbig");
            scr_itemcheckscr_itemcheckfunction 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);
            menumax = selltotal - nothingcount - 1;
            if (menumax < 0)
                menumax = 0;
            if (menu == 11)
            {
                _up_pressed = 0;
                _down_pressed = 0;
                if (down_h())
                {
                    hold_up = 0;
                    if (down_p())
                        _down_pressed = 1;
                    hold_down += 1;
                    if (hold_down >= 8)
                    {
                        _down_pressed = 1;
                        hold_down = 6;
                    }
                    if (_down_pressed == 1)
                    {
                        if (menuc[menu] < menumax)
                        {
                            menuc[menu] += 1;
                            if (menuc[menu] > (pagemax + 4))
                                pagemax += 1;
                        }
                    }
                }
                else
                {
                    hold_down = 0;
                }
                if (up_h())
                {
                    hold_down = 0;
                    if (up_p())
                        _up_pressed = 1;
                    hold_up += 1;
                    if (hold_up >= 8)
                    {
                        _up_pressed = 1;
                        hold_up = 6;
                    }
                    if (_up_pressed == 1)
                    {
                        if (menuc[menu] > 0)
                        {
                            menuc[menu] -= 1;
                            if (menuc[menu] < pagemax)
                                pagemax -= 1;
                        }
                    }
                }
                else
                {
                    hold_up = 0;
                }
            }
            j = 0;
            for (i = pagemax; i < (5 + pagemax); i += 1)
            {
                draw_sprite(spr_heart, 0, 30, 270 + ((menuc[11] - pagemax) * 40));
                g = 0;
                draw_set_color(c_white);
                _itempname = itemsellname[i];
                if (_itempname == " ")
                {
                    _itempname = "--------";
                    draw_set_color(c_dkgray);
                }
                draw_text(60, 260 + (j * 40), string_hash_to_newline(_itempname));
                if (itemsellvalue[i] > 1)
                    draw_text(300, 260 + (j * 40), string_hash_to_newline(stringsetsubloc("$~1", string(ceil(itemsellvalue[i] / 2)), "scr_shopmenu_slash_scr_shopmenu_gml_158_0")));
                j += 1;
            }
            draw_set_color(c_white);
            if (menu == 11)
            {
                if (button1_p() && onebuffer < 0)
                {
                    sellvalue = ceil(itemsellvalue[menuc[menu]] / 2);
                    if (itemsellvalue[menuc[menu]] > 1)
                        menu = 15;
                    else if (itemsellname[menuc[menu]] == " ")
                        sidemessage2 = 4;
                    else
                        sidemessage2 = 3;
                    tempmenu = 11;
                    onebuffer = 2;
                    with (obj_writer)
                        instance_destroy();
                }
                if (button2_p() && twobuffer < 0 && onebuffer < 2)
                {
                    sidemessage = 0;
                    menu = 10;
                    twobuffer = 2;
                    with (obj_writer)
                        instance_destroy();
                }
            }
            if (menu != 15)
                scr_shopmorearrowscr_shopmorearrowfunction scr_shopmorearrow(arg0)
{
    if (pagemax > 0)
        draw_sprite_ext(spr_morearrow, 0, 370, 280 - (sin(cur_jewel / 12) * 3), 1, -1, 0, c_white, 1);
    if ((5 + pagemax) < arg0)
    {
        if (menu == 11)
        {
            if (itemsellname[5 + pagemax] != " ")
                draw_sprite_ext(spr_morearrow, 0, 370, 440 + (sin(cur_jewel / 12) * 3), 1, 1, 0, c_white, 1);
        }
        else
        {
            draw_sprite_ext(spr_morearrow, 0, 370, 440 + (sin(cur_jewel / 12) * 3), 1, 1, 0, c_white, 1);
        }
    }
}(menumax);
            if (menumax > 4)
            {
                for (i = 0; i <= menumax; i += 1)
                {
                    buff = 0;
                    if (menuc[menu] == i)
                        buff = 3;
                    draw_rectangle(375 - buff, (295 + (i * (130 / menumax))) - buff, 377 + buff, 297 + (i * (130 / menumax)) + buff, false);
                }
            }
        }
        if (menu == 12 || menu == 16)
        {
            draw_set_color(c_white);
            scr_84_set_draw_fontscr_84_set_draw_fontfunction scr_84_set_draw_font(arg0)
{
    global.chemg_font = arg0;
    draw_set_font(scr_84_get_font(arg0));
}("mainbig");
            menumax = 47;
            if (menu == 12)
            {
                _up_pressed = 0;
                _down_pressed = 0;
                if (down_h())
                {
                    hold_up = 0;
                    if (down_p())
                        _down_pressed = 1;
                    hold_down += 1;
                    if (hold_down >= 8)
                    {
                        _down_pressed = 1;
                        hold_down = 6;
                    }
                    if (_down_pressed == 1)
                    {
                        if (menuc[menu] < menumax)
                        {
                            menuc[menu] += 1;
                            if (menuc[menu] > (pagemax + 4))
                                pagemax += 1;
                        }
                    }
                }
                else
                {
                    hold_down = 0;
                }
                if (up_h())
                {
                    hold_down = 0;
                    if (up_p())
                        _up_pressed = 1;
                    hold_up += 1;
                    if (hold_up >= 8)
                    {
                        _up_pressed = 1;
                        hold_up = 6;
                    }
                    if (_up_pressed == 1)
                    {
                        if (menuc[menu] > 0)
                        {
                            menuc[menu] -= 1;
                            if (menuc[menu] < pagemax)
                                pagemax -= 1;
                        }
                    }
                }
                else
                {
                    hold_up = 0;
                }
            }
            j = 0;
            for (i = pagemax; i < (5 + pagemax); i += 1)
            {
                draw_sprite(spr_heart, 0, 30, 270 + ((menuc[12] - pagemax) * 40));
                g = 0;
                draw_set_color(c_white);
                _itempname = weaponname[i];
                if (_itempname == " ")
                {
                    _itempname = "--------";
                    draw_set_color(c_dkgray);
                }
                draw_text(60, 260 + (j * 40), string_hash_to_newline(_itempname));
                if (weaponvalue[i] > 1)
                    draw_text(300, 260 + (j * 40), string_hash_to_newline(stringsetsubloc("$~1", string(ceil(weaponvalue[i] / 2)), "scr_shopmenu_slash_scr_shopmenu_gml_270_0")));
                j += 1;
            }
            draw_set_color(c_white);
            if (menu == 12)
            {
                if (button1_p() && onebuffer < 0)
                {
                    if (weaponvalue[menuc[12]] > 1)
                        menu = 16;
                    else if (weaponname[menuc[12]] != " ")
                        sidemessage2 = 3;
                    else
                        sidemessage2 = 4;
                    sellvalue = ceil(weaponvalue[menuc[12]] / 2);
                    tempmenu = 12;
                    onebuffer = 2;
                    with (obj_writer)
                        instance_destroy();
                }
                if (button2_p() && twobuffer < 0 && onebuffer < 2)
                {
                    sidemessage = 0;
                    menu = 10;
                    twobuffer = 2;
                    with (obj_writer)
                        instance_destroy();
                }
            }
            scr_shopmorearrowscr_shopmorearrowfunction scr_shopmorearrow(arg0)
{
    if (pagemax > 0)
        draw_sprite_ext(spr_morearrow, 0, 370, 280 - (sin(cur_jewel / 12) * 3), 1, -1, 0, c_white, 1);
    if ((5 + pagemax) < arg0)
    {
        if (menu == 11)
        {
            if (itemsellname[5 + pagemax] != " ")
                draw_sprite_ext(spr_morearrow, 0, 370, 440 + (sin(cur_jewel / 12) * 3), 1, 1, 0, c_white, 1);
        }
        else
        {
            draw_sprite_ext(spr_morearrow, 0, 370, 440 + (sin(cur_jewel / 12) * 3), 1, 1, 0, c_white, 1);
        }
    }
}(menumax);
            buff = 3;
            draw_rectangle(375 - buff, (295 + (pagemax * (130 / menumax))) - buff, 377 + buff, 297 + (pagemax * (130 / menumax)) + buff, false);
        }
        if (menu == 13 || menu == 17)
        {
            draw_set_color(c_white);
            scr_84_set_draw_fontscr_84_set_draw_fontfunction scr_84_set_draw_font(arg0)
{
    global.chemg_font = arg0;
    draw_set_font(scr_84_get_font(arg0));
}("mainbig");
            menumax = 47;
            if (menu == 13)
            {
                _up_pressed = 0;
                _down_pressed = 0;
                if (down_h())
                {
                    hold_up = 0;
                    if (down_p())
                        _down_pressed = 1;
                    hold_down += 1;
                    if (hold_down >= 8)
                    {
                        _down_pressed = 1;
                        hold_down = 6;
                    }
                    if (_down_pressed == 1)
                    {
                        if (menuc[menu] < menumax)
                        {
                            menuc[menu] += 1;
                            if (menuc[menu] > (pagemax + 4))
                                pagemax += 1;
                        }
                    }
                }
                else
                {
                    hold_down = 0;
                }
                if (up_h())
                {
                    hold_down = 0;
                    if (up_p())
                        _up_pressed = 1;
                    hold_up += 1;
                    if (hold_up >= 8)
                    {
                        _up_pressed = 1;
                        hold_up = 6;
                    }
                    if (_up_pressed == 1)
                    {
                        if (menuc[menu] > 0)
                        {
                            menuc[menu] -= 1;
                            if (menuc[menu] < pagemax)
                                pagemax -= 1;
                        }
                    }
                }
                else
                {
                    hold_up = 0;
                }
            }
            j = 0;
            for (i = pagemax; i < (5 + pagemax); i += 1)
            {
                draw_sprite(spr_heart, 0, 30, 270 + ((menuc[13] - pagemax) * 40));
                g = 0;
                draw_set_color(c_white);
                _itempname = armorname[i];
                if (_itempname == " ")
                {
                    _itempname = "--------";
                    draw_set_color(c_dkgray);
                }
                draw_text(60, 260 + (j * 40), string_hash_to_newline(_itempname));
                if (armorvalue[i] > 1)
                    draw_text(300, 260 + (j * 40), string_hash_to_newline(stringsetsubloc("$~1", string(ceil(armorvalue[i] / 2)), "scr_shopmenu_slash_scr_shopmenu_gml_389_0")));
                j += 1;
            }
            draw_set_color(c_white);
            if (menu == 13)
            {
                if (button1_p() && onebuffer < 0)
                {
                    if (armorvalue[menuc[13]] > 1)
                        menu = 17;
                    else if (armorname[menuc[13]] != " ")
                        sidemessage2 = 3;
                    else
                        sidemessage2 = 4;
                    sellvalue = ceil(armorvalue[menuc[13]] / 2);
                    tempmenu = 13;
                    onebuffer = 2;
                    with (obj_writer)
                        instance_destroy();
                }
                if (button2_p() && twobuffer < 0 && onebuffer < 2)
                {
                    sidemessage = 0;
                    menu = 10;
                    twobuffer = 2;
                    with (obj_writer)
                        instance_destroy();
                }
            }
            scr_shopmorearrowscr_shopmorearrowfunction scr_shopmorearrow(arg0)
{
    if (pagemax > 0)
        draw_sprite_ext(spr_morearrow, 0, 370, 280 - (sin(cur_jewel / 12) * 3), 1, -1, 0, c_white, 1);
    if ((5 + pagemax) < arg0)
    {
        if (menu == 11)
        {
            if (itemsellname[5 + pagemax] != " ")
                draw_sprite_ext(spr_morearrow, 0, 370, 440 + (sin(cur_jewel / 12) * 3), 1, 1, 0, c_white, 1);
        }
        else
        {
            draw_sprite_ext(spr_morearrow, 0, 370, 440 + (sin(cur_jewel / 12) * 3), 1, 1, 0, c_white, 1);
        }
    }
}(47);
            buff = 3;
            draw_rectangle(375 - buff, (295 + (pagemax * (130 / menumax))) - buff, 377 + buff, 297 + (pagemax * (130 / menumax)) + buff, false);
        }
    }
    if (arg0 == 5)
    {
        if (menu == 15)
        {
            if (button2_p() && twobuffer < 0)
            {
                menu = tempmenu;
                sidemessage2 = 2;
                twobuffer = 2;
                onebuffer = 2;
            }
            if (button1_p() && onebuffer < 0 && twobuffer < 0)
            {
                if (menuc[15] == 0)
                {
                    snd_play(snd_locker);
                    global.gold += sellvalue;
                    var noneleft = 0;
                    if (selltype == "item")
                    {
                        scr_itemshiftscr_itemshiftfunction scr_itemshift(arg0, arg1)
{
    global.item[12] = arg1;
    for (i = arg0; i < 12; i += 1)
        global.item[i] = global.item[i + 1];
    scr_iteminfo_all();
    scr_itemname();
}(menuc[11], 0);
                        scr_iteminfo_allscr_iteminfo_allfunction 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;
    }
}();
                        scr_itemcheckscr_itemcheckfunction 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)
                            noneleft = 1;
                        nothingcount = itemcount;
                        for (i = 0; i < selltotal; i++)
                        {
                            itemsellvalue[i] = global.itemvalue[i];
                            itemsellname[i] = global.itemnameb[i];
                        }
                        if (global.item[menuc[11]] == 0)
                        {
                            menuc[11] -= 1;
                            if (pagemax > 0)
                                pagemax -= 1;
                        }
                    }
                    if (selltype == "pocket")
                    {
                        global.pocketitem[menuc[11]] = 0;
                        scr_itemcheck_pocketscr_itemcheck_pocketfunction 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])
                            noneleft = 1;
                        nothingcount = 0;
                        for (i = 0; i < global.flag[64 storage_size]; i++)
                        {
                            scr_iteminfoscr_iteminfofunction scr_iteminfo(arg0)
{
    usable = 0;
    replaceable = 0;
    value = 0;
    itemtarget = 0;
    itemnameb = " ";
    itemdescb = " ";
    switch (arg0)
    {
        case 0:
            itemnameb = " ";
            itemdescb = "---";
            break;
        case 1:
            itemnameb = stringsetloc(Dark Candy"Dark Candy", "scr_iteminfo_slash_scr_iteminfo_gml_15_0");
            itemdescb = stringsetloc(Heals#40HP"Heals#40HP", "scr_iteminfo_slash_scr_iteminfo_gml_16_0");
            itemtarget = 1;
            value = 25;
            usable = 1;
            break;
        case 2:
            itemnameb = stringsetloc(ReviveMint"ReviveMint", "scr_iteminfo_slash_scr_iteminfo_gml_22_0");
            itemdescb = stringsetloc(Heal#Downed#Ally"Heal#Downed#Ally", "scr_iteminfo_slash_scr_iteminfo_gml_23_0");
            itemtarget = 1;
            value = 400;
            usable = 1;
            break;
        case 3:
            itemnameb = stringsetloc(Glowshard"Glowshard", "scr_iteminfo_slash_scr_iteminfo_gml_29_0");
            itemdescb = stringsetloc(Sell#at#shops"Sell#at#shops", "scr_iteminfo_slash_scr_iteminfo_gml_30_0");
            itemtarget = 0;
            value = 200 + (global.chapter * 100);
            usable = 0;
            break;
        case 4:
            itemnameb = stringsetloc(Manual"Manual", "scr_iteminfo_slash_scr_iteminfo_gml_36_0");
            itemdescb = stringsetloc(Read#out of#battle"Read#out of#battle", "scr_iteminfo_slash_scr_iteminfo_gml_37_0");
            itemtarget = 2;
            value = 1;
            usable = 0;
            break;
        case 5:
            itemnameb = stringsetloc(BrokenCake"BrokenCake", "scr_iteminfo_slash_scr_iteminfo_gml_43_0");
            itemdescb = stringsetloc(Heals#20HP"Heals#20HP", "scr_iteminfo_slash_scr_iteminfo_gml_44_0");
            itemtarget = 1;
            value = 5;
            usable = 1;
            break;
        case 6:
            itemnameb = stringsetloc(Top Cake"Top Cake", "scr_iteminfo_slash_scr_iteminfo_gml_50_0");
            itemdescb = stringsetloc(Heals#team#160HP"Heals#team#160HP", "scr_iteminfo_slash_scr_iteminfo_gml_51_0");
            itemtarget = 2;
            value = 150;
            usable = 1;
            break;
        case 7:
            var healamount = (global.chapter == 1) ? 80 : 140;
            itemnameb = stringsetloc(Spincake"Spincake", "scr_iteminfo_slash_scr_iteminfo_gml_58_0");
            itemdescb = stringsetsubloc("Heals#team#~1HP", string(healamount), "scr_iteminfo_slash_scr_iteminfo_gml_59_0");
            itemtarget = 2;
            value = 5;
            usable = 1;
            break;
        case 8:
            itemnameb = stringsetloc(Darkburger"Darkburger", "scr_iteminfo_slash_scr_iteminfo_gml_65_0");
            itemdescb = stringsetloc(Heals#70HP"Heals#70HP", "scr_iteminfo_slash_scr_iteminfo_gml_66_0");
            itemtarget = 1;
            value = 70;
            usable = 1;
            break;
        case 9:
            itemnameb = stringsetloc(LancerCookie"LancerCookie", "scr_iteminfo_slash_scr_iteminfo_gml_72_0");
            itemdescb = stringsetloc(Heals#50HP"Heals#50HP", "scr_iteminfo_slash_scr_iteminfo_gml_73_0");
            itemtarget = 1;
            value = 10;
            usable = 1;
            break;
        case 10:
            itemnameb = stringsetloc(GigaSalad"GigaSalad", "scr_iteminfo_slash_scr_iteminfo_gml_79_0");
            itemdescb = stringsetloc(Heals#4HP"Heals#4HP", "scr_iteminfo_slash_scr_iteminfo_gml_80_0");
            itemtarget = 1;
            value = 10;
            usable = 1;
            break;
        case 11:
            itemnameb = stringsetloc(ClubsSandwich"ClubsSandwich", "scr_iteminfo_slash_scr_iteminfo_gml_86_0");
            itemdescb = stringsetloc(Heals#team#70HP"Heals#team#70HP", "scr_iteminfo_slash_scr_iteminfo_gml_87_0");
            itemtarget = 2;
            value = 70;
            usable = 1;
            break;
        case 12:
            itemnameb = stringsetloc(HeartsDonut"HeartsDonut", "scr_iteminfo_slash_scr_iteminfo_gml_93_0");
            itemdescb = stringsetloc(Healing#varies"Healing#varies", "scr_iteminfo_slash_scr_iteminfo_gml_94_0");
            itemtarget = 1;
            value = 40;
            usable = 1;
            break;
        case 13:
            itemnameb = stringsetloc(ChocDiamond"ChocDiamond", "scr_iteminfo_slash_scr_iteminfo_gml_100_0");
...(global.pocketitem[i]);
                            itemsellvalue[i] = value;
                            itemsellname[i] = itemnameb;
                        }
                    }
                    if (noneleft == 1)
                    {
                        menu = 10;
                        sidemessage = 1;
                    }
                    else
                    {
                        menu = 11;
                        sidemessage2 = 1;
                    }
                }
                if (menuc[15] == 1)
                {
                    sidemessage2 = 2;
                    menu = 11;
                }
            }
        }
        if (menu == 16)
        {
            if (button2_p() && twobuffer < 0)
            {
                menu = tempmenu;
                sidemessage2 = 2;
                twobuffer = 2;
                onebuffer = 2;
            }
            if (button1_p() && onebuffer < 0 && twobuffer < 0)
            {
                if (menuc[16] == 0)
                {
                    snd_play(snd_locker);
                    global.gold += sellvalue;
                    global.weapon[menuc[12]] = 0;
                    scr_weaponinfo_allscr_weaponinfo_allfunction 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;
    }
}();
                    scr_weaponcheck_inventoryscr_weaponcheck_inventoryfunction 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)
                    {
                        menu = 10;
                        sidemessage = 1;
                    }
                    else
                    {
                        menu = 12;
                        sidemessage2 = 1;
                    }
                }
                if (menuc[16] == 1)
                {
                    sidemessage2 = 2;
                    menu = 12;
                }
            }
        }
        if (menu == 17)
        {
            if (button2_p() && twobuffer < 0)
            {
                menu = tempmenu;
                sidemessage2 = 2;
                twobuffer = 2;
                onebuffer = 2;
            }
            if (button1_p() && onebuffer < 0 && twobuffer < 0)
            {
                if (menuc[17] == 0)
                {
                    snd_play(snd_locker);
                    global.gold += sellvalue;
                    global.armor[menuc[13]] = 0;
                    scr_armorinfo_allscr_armorinfo_allfunction 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;
    }
}();
                    scr_armorcheck_inventoryscr_armorcheck_inventoryfunction 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)
                    {
                        menu = 10;
                        sidemessage = 1;
                    }
                    else
                    {
                        menu = 13;
                        sidemessage2 = 1;
                    }
                }
                if (menuc[17] == 1)
                {
                    sidemessage2 = 2;
                    menu = 13;
                }
            }
        }
    }
}
1	function scr_shopmenuscr_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) { ... (arg0)
2	`{`
3	`if (arg0 == 0)`
4	`{`
5	`if (menu == 1 \|\| menu == 2)`
6	`{`
7	`scr_darkbox_blackscr_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, minimenuy, 640, 255);`
8	`draw_set_color(c_white);`
9	`scr_84_set_draw_fontscr_84_set_draw_font function scr_84_set_draw_font(arg0) { global.chemg_font = arg0; draw_set_font( scr_84_get_font(arg0)); } ("mainbig");`
10	`if (menuc[1] == 0)`
11	`draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[0]));`
12	`if (menuc[1] == 1)`
13	`draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[1]));`
14	`if (menuc[1] == 2)`
15	`draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[2]));`
16	`if (menuc[1] == 3)`
17	`draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[3]));`
18	`scr_84_set_draw_fontscr_84_set_draw_font function scr_84_set_draw_font(arg0) { global.chemg_font = arg0; draw_set_font( scr_84_get_font(arg0)); } ("dotumche");`
19	`if (itemtype[menuc[1]] == "weapon" \|\| itemtype[menuc[1]] == "armor")`
20	`{`
21	`for (i = 0; i < 3; i += 1)`
22	`{`
23	`can_index = 0;`
24	`facetype = spr_headkris;`
25	`which = global.char[i];`
26	`if (global.char[i] == 1)`
27	`facetype = spr_headkris;`
28	`if (global.char[i] == 2)`
29	`facetype = spr_headsusie;`
30	`if (global.char[i] == 3)`
31	`facetype = spr_headralsei;`
32	`if (which != 0)`
33	`{`
34	`if (i == 0)`
35	`{`
36	`locx = 0;`
37	`locy = 0;`
38	`}`
39	`if (i == 1)`
40	`{`