depth = 5000;
if (!is_interacting)
    exit;
if (global.interact == 0)
    global.interact = 1;
if (is_talking)
{
    if (!d_ex())
        is_talking = false;
    else
        exit;
}
else if (d_ex())
{
    exit;
}
if (menu_display_type == 0)
{
    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;
}
talkbuffer -= 1;
draw_set_color(c_black);
scr_shopmenu(0);
if (menu_display_type == 0)
{
    scr_darkbox_black(camerax(), cameray() + 240, camerax() + 415, cameray() + 480);
    scr_darkbox_black(camerax() + 400, cameray() + 240, camerax() + 640, cameray() + 480);
}
else if (menu_display_type == 1)
{
    scr_darkbox_black(camerax(), cameray() + 240, camerax() + 640, cameray() + 480);
}
if (menu == 0)
{
    sidemessage = 0;
    menuc[1] = 0;
    menuc[2] = 0;
    menuc[3] = 0;
    menuc[4] = 0;
    menu_display_type = 0;
    if (instance_exists(obj_writer) == false)
    {
        global.typer = 6;
        global.msg[0] = default_text;
        instance_create(camerax() + 30, cameray() + 270, obj_writer);
    }
    menumax = array_length(menu_list) - 1;
    draw_set_color(c_white);
    scr_84_set_draw_font("mainbig");
    for (var i = 0; i < array_length(menu_list); i++)
        draw_text(camerax() + 480, cameray() + ((130 + (i * 20)) * 2), string_hash_to_newline(menu_list[i].option_text));
    draw_sprite(spr_heart, 0, camerax() + 450, cameray() + ((135 + (menuc[0] * 20)) * 2));
    if (button1_p() && onebuffer < 0)
    {
        onebuffer = 2;
        mainmessage = 1;
        with (obj_writer)
            instance_destroy();
        menu = menu_list[menuc[0]].menu_type;
        if (menu == 99)
        {
            alarm[10] = 1;
            exit;
        }
        else
        {
            menu_list[menuc[0]].times_selected++;
            menu_display_type = 0;
            if (menu == 4 || menu == 6)
            {
                menu_talk_flag = menu_list[menuc[0]].talk_flag;
                menu_talk_style = menu_list[menuc[0]].talk_style;
                menu_display_type = 1;
                menu_talk_con = 0;
            }
        }
    }
}
if (menu == 1 || menu == 2)
{
    draw_set_color(c_white);
    scr_84_set_draw_font("mainbig");
    var sold_out_text = stringsetloc("SOLD OUT", "obj_shop_vending_slash_Draw_0_gml_153_0");
    for (var i = 0; i < itemtotal; i += 1)
    {
        if (itemtype[i] == "key")
        {
            var sold_value = stringsetsubloc("~1 PTs", string(buyvalue[i]), "obj_shop_vending_slash_Draw_0_gml_122_0");
            var sold_out = false;
            if (scr_keyitemcheck(item[i]))
                sold_out = true;
            if (sold_out)
            {
                draw_set_color(c_gray);
                sold_value = sold_out_text;
            }
            draw_text(camerax() + 60, cameray() + 260 + (i * 40), string_hash_to_newline(shopitemname[i]));
            draw_text(camerax() + 300, cameray() + 260 + (i * 40), string_hash_to_newline(sold_value));
            draw_set_color(c_white);
        }
        else if (itemtype[i] == "event")
        {
            var sold_out = false;
            if (array_length(sold_flag[i]) > 0)
            {
                var _flag = sold_flag[i][0];
                var _min_value = sold_flag[i][1];
                sold_out = scr_flag_get(_flag) >= _min_value;
            }
            if (sold_out)
            {
                draw_set_color(c_gray);
                draw_text(camerax() + 60, cameray() + 260 + (i * 40), sold_out_text);
                draw_set_color(c_white);
            }
            else
            {
                draw_text(camerax() + 60, cameray() + 260 + (i * 40), string_hash_to_newline(shopitemname[i]));
                draw_text(camerax() + 300, cameray() + 260 + (i * 40), string_hash_to_newline(price_label[i]));
            }
        }
        else
        {
            draw_text(camerax() + 60, cameray() + 260 + (i * 40), string_hash_to_newline(shopitemname[i]));
            draw_text(camerax() + 300, cameray() + 260 + (i * 40), string_hash_to_newline(stringsetsubloc("$~1", string(buyvalue[i]), "obj_shop_vending_slash_Draw_0_gml_149_0")));
        }
    }
    draw_text(camerax() + 60, cameray() + 260 + (itemtotal * 40), string_hash_to_newline(stringsetloc("Exit", "obj_shop1_slash_Draw_0_gml_139_0")));
    if (menu == 1)
    {
        menumax = itemtotal;
        if (instance_exists(obj_writer) == false)
        {
            if (gerson_mode)
                scr_speaker("gerson");
            else
                scr_speaker("ralsei");
            msgset(0, sidemessage_list[sidemessage]);
            instance_create(camerax() + 450, cameray() + 260, obj_writer);
        }
        draw_sprite(spr_heart, 0, camerax() + 30, cameray() + 270 + (menuc[1] * 40));
        var can_buy = true;
        if (itemtype[menuc[1]] == "key")
        {
            if (scr_keyitemcheck(item[menuc[1]]))
                can_buy = false;
        }
        else if (itemtype[menuc[1]] == "event")
        {
            if (array_length(sold_flag[menuc[1]]) > 0)
            {
                var _flag = sold_flag[menuc[1]][0];
                var _min_value = sold_flag[menuc[1]][1];
                can_buy = scr_flag_get(_flag) < _min_value;
                if (!can_buy)
                    shopdesc[menuc[1]] = "";
            }
        }
        if (can_buy && button1_p() && onebuffer < 0)
        {
            menu = 2;
            onebuffer = 2;
            with (obj_writer)
                instance_destroy();
            if (menuc[1] == menumax)
            {
                alarm[10] = 1;
                exit;
            }
        }
        if (button2_p() && twobuffer < 0 && onebuffer < 2)
        {
            with (obj_writer)
                instance_destroy();
            alarm[10] = 1;
            exit;
        }
        menuc[2] = 0;
    }
    if (menu == 2)
    {
        menumax = 1;
        draw_set_color(c_white);
        scr_84_set_draw_font("mainbig");
        var y1_off = langopt(260, 290);
        var y2_off = langopt(290, 260);
        draw_text(camerax() + 460, cameray() + y1_off, string_hash_to_newline(stringsetloc("Buy it for", "obj_shop_vending_slash_Draw_0_gml_223_0")));
        draw_text(camerax() + 460, cameray() + y2_off, string_hash_to_newline(stringsetsubloc("$~1 ?", string(buyvalue[menuc[1]]), "obj_shop_vending_slash_Draw_0_gml_196_0")));
        draw_text(camerax() + 480, cameray() + 340, string_hash_to_newline(stringsetloc("Yes", "obj_shop_vending_slash_Draw_0_gml_225_0")));
        draw_text(camerax() + 480, cameray() + 370, string_hash_to_newline(stringsetloc("No", "obj_shop_vending_slash_Draw_0_gml_226_0")));
        draw_sprite(spr_heart, 0, camerax() + 450, cameray() + 350 + (menuc[2] * 30));
        if (button2_p() && twobuffer < 0)
        {
            menu = 1;
            sidemessage = 0;
            twobuffer = 2;
            onebuffer = 2;
        }
        if (button1_p() && onebuffer < 0 && twobuffer < 0)
        {
            if (menuc[2] == 0)
            {
                if (itemtype[menuc[1]] == "event")
                {
                    if (button1_p() && onebuffer < 0)
                    {
                        event_active = true;
                        sidemessage = 0;
                        menu = 1;
                        exit;
                    }
                }
                else
                {
                    afford = 0;
                    if (menu_dollar)
                    {
                        if (global.gold >= buyvalue[menuc[1]])
                            afford = 1;
                    }
                    else if (global.flag[1044] >= buyvalue[menuc[1]])
                    {
                        afford = 1;
                    }
                    if (afford == 1)
                    {
                        _pocketed = 0;
                        if (itemtype[menuc[1]] == "item")
                            scr_itemget(item[menuc[1]]);
                        if (itemtype[menuc[1]] == "weapon")
                            scr_weaponget(item[menuc[1]]);
                        if (itemtype[menuc[1]] == "armor")
                            scr_armorget(item[menuc[1]]);
                        if (itemtype[menuc[1]] == "key")
                            scr_keyitemget(item[menuc[1]]);
                        if (menu_dollar)
                        {
                            if (noroom == 0)
                            {
                                global.gold -= buyvalue[menuc[1]];
                                snd_play(snd_locker);
                                if (_pocketed == 1)
                                    sidemessage = 4;
                                else
                                    sidemessage = 1;
                            }
                        }
                        else if (noroom == 0)
                        {
                            global.flag[1044] -= buyvalue[menuc[1]];
                            snd_play(snd_locker);
                            if (_pocketed == 1)
                                sidemessage = 4;
                            else
                                sidemessage = 1;
                        }
                        if (noroom == 1)
                            sidemessage = 3;
                    }
                    else
                    {
                        sidemessage = 2;
                    }
                }
            }
            if (menuc[2] == 1)
                sidemessage = 0;
            menu = 1;
        }
    }
    if (menuc[1] != itemtotal)
    {
        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;
        if (itemtype[menuc[1]] == "event")
        {
            if (array_length(sold_flag[menuc[1]]) > 0)
            {
                var _flag = sold_flag[menuc[1]][0];
                var _min_value = sold_flag[menuc[1]][1];
                var can_buy = scr_flag_get(_flag) < _min_value;
                if (!can_buy)
                {
                    if (minimenuy < 200)
                        minimenuy += 40;
                    if (minimenuy >= 200)
                        minimenuy = 200;
                }
            }
        }
    }
    else
    {
        if (minimenuy < 200)
            minimenuy += 40;
        if (minimenuy >= 200)
            minimenuy = 200;
    }
}
if (menu == 4 || menu == 6)
{
    if (instance_exists(obj_writer) == false && menu_talk_con == 0)
    {
        talk_counter = menu_list[menuc[0]].times_selected;
        event_user(2);
        if (menu_talk_style == 1)
            d_make();
        else if (menu_talk_style == 2)
            alarm[10] = 1;
        else
            instance_create(camerax() + 30, cameray() + 270, obj_writer);
        is_talking = true;
        menu_talk_con = 1;
    }
    if (menu_talk_con == 1 && instance_exists(obj_writer) == false)
    {
        if (event_active)
        {
            event_active = false;
            event_con = 0;
        }
        if (menu == 4)
        {
            menu = 0;
            menu_talk_con = 0;
        }
        if (menu == 6)
        {
            menu_display_type = 99;
            if (!d_ex())
            {
                menu = 0;
                menu_talk_con = 0;
                alarm[10] = 1;
                exit;
            }
        }
    }
}
scr_shopmenu(4);
scr_shopmenu(5);
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 < itemtotal || menu >= 10)
{
    if (menu >= 10 && menu < 18)
        draw_text(camerax() + 440, cameray() + 420, "$" + string_hash_to_newline(string(global.gold)));
    else
        draw_text(camerax() + 440, cameray() + 420, string_hash_to_newline("$" + string(global.gold)));
    if (itemtype[menuc[1]] != "key" && itemtype[menuc[1]] != "event")
    {
        if (menu == 1 || menu == 2)
        {
            if (menuc[1] < itemtotal)
            {
                var item_index = menuc[1];
                scr_shop_space_display(item_index);
            }
        }
    }
}
onebuffer -= 1;
twobuffer -= 1;