Deltarune (Chapter 1) script viewer

← back to main script listing
gml_Object_obj_shop1_Draw_0

related scripts: Alarm_3 • Alarm_5 • Create_0 • Draw_0 • Other_11
(view raw script w/o annotations or w/e)
draw_sprite_ext(spr_shopbg1, 0, 0, 0, 2, 2, 0, c_white, 1);
draw_sprite_ext(spr_shopbg1, 2, 0, 0, 2, 2, 0, c_white, abs(sin(siner / 30)));
siner += 1;
if (menu == 1 || menu == 2)
{
    if (shopcharx > -20)
        shopcharx -= 4;
    if (shopcharx > -40)
        shopcharx -= 4;
    if (shopcharx > -80)
        shopcharx -= 4;
    if (shopcharx <= -80)
        shopcharx = -80;
}
else
{
    if (shopcharx < -50)
        shopcharx += 4;
    if (shopcharx < -30)
        shopcharx += 4;
    if (shopcharx < 0)
        shopcharx += 4;
    if (shopcharx > 0)
        shopcharx = 0;
}
talkanim = 0;
if (instance_exists(obj_writer))
{
    if (obj_writer.pos < obj_writer.length)
    {
        if (talkbuffer < 0)
            talkfacer = 0;
        talkbuffer = 16;
        talkanim = 1;
        idletimer = 0;
        idlefacer = 0;
        talkfacer += 0.2;
    }
}
shopkeepsprite = spr_seam_talk;
if (global.fe == 1)
    shopkeepsprite = spr_seam_oh;
if (global.fe == 2)
    shopkeepsprite = spr_seam_laugh;
if (global.fe == 3)
    shopkeepsprite = spr_seam_impatient;
qualify = 0;
if (global.fe != 0 && talkbuffer < 0)
    talkbuffer = 0;
if (talkbuffer >= 0)
{
    if (talkbuffer < 16)
    {
        if (((talkfacer + 1) % 3) != 0)
            talkfacer += 0.2;
    }
    draw_sprite_ext(shopkeepsprite, talkfacer, shopcharx + 160, 34, 2, 2, 0, c_white, 1);
    qualify = 1;
}
if (qualify == 0)
{
    idletimer += 1;
    if (idletimer >= 60)
        idlefacer += 0.2;
    if (idlefacer >= 5)
    {
        idletimer = 0;
        idlefacer = 0;
    }
    draw_sprite_ext(spr_seam_idle, idlefacer, shopcharx + 160, 34, 2, 2, 0, c_white, 1);
}
talkbuffer -= 1;
draw_set_color(c_black);
draw_rectangle(0, 240, 640, 480, false);
scr_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)
        {
...(0);
if (menu <= 3 || menu >= 10)
{
    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);
}(0, 240, 415, 480);
    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, 240, 640, 480);
}
if (menu == 4)
    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);
}(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] = Face 0* Take your time...Delay 11&* Ain't like it's&better spent.scr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_98_0");
        if (mainmessage == 0)
            global.msg[0] = Face 0* Hee hee...Delay 11&* Welcome, travellers.scr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_99_0");
        instance_create(30, 270, obj_writer);
    }
    menumax = 3;
    draw_set_color(c_white);
    scr_84_set_draw_fontscr_84_set_draw_fontfunction 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(Buyscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_106_0")));
    draw_text(480, 300, string_hash_to_newline(Sellscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_107_0")));
    draw_text(480, 340, string_hash_to_newline(Talkscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_108_0")));
    draw_text(480, 380, string_hash_to_newline(Exitscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_109_0")));
    menuc[menu] = min(menuc[menu], menumax);
    draw_sprite(spr_heart, 0, 450, (135 + (menuc[0] * 20)) * 2);
    if (button1_p())
    {
        onebuffer = 2;
        mainmessage = 1;
        with (obj_writer)
            instance_destroy();
        if (menuc[0] == 0)
            menu = 1;
        if (menuc[0] == 1)
        {
            menu = 10;
            sidemessage = 0;
        }
        if (menuc[0] == 2)
            menu = 3;
        if (menuc[0] == 3)
        {
            sell = 2;
            menu = 4;
        }
    }
}
if (menu == 1 || menu == 2)
{
    draw_set_color(c_white);
    scr_84_set_draw_fontscr_84_set_draw_fontfunction 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("$" + string(buyvalue[i])));
    }
    draw_text(60, 260 + (itemtotal * 40), string_hash_to_newline(Exitscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_139_0")));
    if (menu == 1)
    {
        menumax = 4;
        if (instance_exists(obj_writer) == false)
        {
            if (sidemessage == 0)
                global.msg[0] = Face 0What do&you like&to buy?scr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_148_0");
            if (sidemessage == 1)
                global.msg[0] = Face 2Thanks for&that.scr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_149_0");
            if (sidemessage == 2)
                global.msg[0] = Face 0What,¬ good&enough?scr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_150_0");
            if (sidemessage == 3)
                global.msg[0] = Face 3Not&enough&money.scr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_151_0");
            if (sidemessage == 4)
                global.msg[0] = Face 3You're&carrying&too much.scr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_152_0");
            if (murder == 1)
                global.msg[0] = Wait for input*scr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_153_0");
            instance_create(450, 260, obj_writer);
        }
        menuc[menu] = min(menuc[menu], menumax);
        draw_sprite(spr_heart, 0, 30, 270 + (menuc[1] * 40));
        if (button1_p() && onebuffer < 0)
        {
            menu = 2;
            onebuffer = 2;
            with (obj_writer)
                instance_destroy();
            if (menuc[1] == menumax)
                menu = 0;
        }
        if (button2_p() && twobuffer < 0 && onebuffer < 2)
        {
            menu = 0;
            twobuffer = 2;
            minimenuy = 220;
            with (obj_writer)
                instance_destroy();
        }
        menuc[2] = 0;
    }
    if (menu == 2)
    {
        menumax = 1;
        draw_set_color(c_white);
        scr_84_set_draw_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 (global.lang == "ja")
        {
            draw_text(460, 290, string_hash_to_newline(Buy it forscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_167_0")));
            draw_text(460, 260, "$" + string_hash_to_newline(string(buyvalue[menuc[1]]) +  ?scr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_168_0")));
        }
        else
        {
            draw_text(460, 260, string_hash_to_newline(Buy it forscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_167_0")));
            draw_text(460, 290, "$" + string_hash_to_newline(string(buyvalue[menuc[1]]) +  ?scr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_168_0")));
        }
        draw_text(480, 340, string_hash_to_newline(Yesscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_169_0")));
        draw_text(480, 370, string_hash_to_newline(Noscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_170_0")));
        menuc[menu] = min(menuc[menu], menumax);
        draw_sprite(spr_heart, 0, 450, 350 + (menuc[2] * 30));
        if (button2_p() && twobuffer < 0)
        {
            menu = 1;
            sidemessage = 2;
            twobuffer = 2;
            onebuffer = 2;
        }
        if (button1_p() && onebuffer < 0 && twobuffer < 0)
        {
            if (menuc[2] == 0)
            {
                afford = 0;
                if (global.gold >= buyvalue[menuc[1]])
                    afford = 1;
                if (afford == 1)
                {
                    if (itemtype[menuc[1]] == "item")
                        scr_itemgetscr_itemgetfunction scr_itemget(arg0)
{
    i = 0;
    loop = 1;
    noroom = 0;
    global.item[12] = 999;
    while (loop == 1)
    {
        if (global.item[i] == 0)
        {
            global.item[i] = arg0;
            break;
        }
        if (i == 12)
        {
            noroom = 1;
            break;
        }
        i += 1;
    }
    script_execute(scr_iteminfo_all);
}(item[menuc[1]]);
                    if (itemtype[menuc[1]] == "weapon")
                        scr_weapongetscr_weapongetfunction scr_weaponget(arg0)
{
    i = 0;
    loop = 1;
    noroom = 0;
    global.weapon[12] = 999;
    while (loop == 1)
    {
        if (global.weapon[i] == 0)
        {
            global.weapon[i] = arg0;
            break;
        }
        if (i == 12)
        {
            noroom = 1;
            break;
        }
        i += 1;
    }
    script_execute(scr_weaponinfo_all);
}(item[menuc[1]]);
                    if (itemtype[menuc[1]] == "armor")
                        scr_armorgetscr_armorgetfunction scr_armorget(arg0)
{
    i = 0;
    loop = 1;
    noroom = 0;
    global.armor[12] = 999;
    while (loop == 1)
    {
        if (global.armor[i] == 0)
        {
            global.armor[i] = arg0;
            break;
        }
        if (i == 12)
        {
            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_fontscr_84_set_draw_fontfunction 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(About yourselfscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_217_0")));
    draw_text(80, 300, string_hash_to_newline(Lightnersscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_218_0")));
    if (global.flag[241 JEVIL_plot] < 6)
    {
        draw_text(80, 340, string_hash_to_newline(Kingdomscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_220_0")));
    }
    else
    {
        draw_set_color(c_yellow);
        draw_text(80, 340, string_hash_to_newline(About JEVILscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_224_0")));
    }
    if (global.flag[241 JEVIL_plot] == 0)
    {
        draw_text(80, 380, string_hash_to_newline(We're legendaryscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_227_0")));
    }
    else
    {
        _legendstring = Strange Prisonerscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_230_0");
        draw_set_color(c_yellow);
        if (global.flag[115 got_key_a] >= 1)
            draw_set_color(c_white);
        if (global.flag[241 JEVIL_plot] >= 6)
        {
            draw_set_color(c_yellow);
            _legendstring = We Wonscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_233_0");
        }
        draw_text(80, 380, string_hash_to_newline(_legendstring));
    }
    draw_set_color(c_white);
    draw_text(80, 420, string_hash_to_newline(Exitscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_240_0")));
    if (instance_exists(obj_writer) == false)
    {
        global.msg[0] = Face 0Don't have&anything&better&to do.scr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_244_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_fontscr_84_set_draw_fontfunction 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(Sell Itemsscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_278_0")));
    draw_text(80, 300, string_hash_to_newline(Sell Weaponsscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_279_0")));
    draw_text(80, 340, string_hash_to_newline(Sell Armorscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_280_0")));
    draw_text(80, 380, string_hash_to_newline(Returnscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_281_0")));
    if (instance_exists(obj_writer) == false)
    {
        if (sidemessage == 0)
            global.msg[0] = Face 0What kind&of junk&you got?scr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_285_0");
        if (sidemessage == 1)
            global.msg[0] = Face 0That's it&for that.scr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_286_0");
        if (sidemessage == 2)
            global.msg[0] = Face 3You don't&have&anything!scr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_287_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_itemcheckscr_itemcheckfunction scr_itemcheck(arg0)
{
    haveit = 0;
    itemcount = 0;
    for (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_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;
    }
}();
        }
        if (idealmenu == 12)
        {
            scr_weaponcheck_inventoryscr_weaponcheck_inventoryfunction scr_weaponcheck_inventory(arg0)
{
    haveit = 0;
    itemcount = 0;
    for (i = 0; i < 12; 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_allscr_weaponinfo_allfunction scr_weaponinfo_all()
{
    for (i = 0; i < 12; i += 1)
    {
        scr_weaponinfo(global.weapon[i]);
        weaponname[i] = weaponnametemp;
        weapondesc[i] = weapondesctemp;
        wmessage2[i] = wmessage2temp;
        wmessage3[i] = wmessage3temp;
        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;
        weaponvalue[i] = value;
        weaponability[i] = weaponabilitytemp;
        weaponabilityicon[i] = weaponabilityicontemp;
        weaponicon[i] = weaponicontemp;
    }
}();
        }
        if (idealmenu == 13)
        {
            scr_armorcheck_inventoryscr_armorcheck_inventoryfunction scr_armorcheck_inventory(arg0)
{
    haveit = 0;
    itemcount = 0;
    for (i = 0; i < 12; 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_allscr_armorinfo_allfunction scr_armorinfo_all()
{
    for (i = 0; i < 12; i += 1)
    {
        scr_armorinfo(global.armor[i]);
        armorname[i] = armornametemp;
        armordesc[i] = armordesctemp;
        amessage2[i] = amessage2temp;
        amessage3[i] = amessage3temp;
        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;
        armorvalue[i] = value;
        armorability[i] = armorabilitytemp;
        armorabilityicon[i] = armorabilityicontemp;
        armoricon[i] = armoricontemp;
    }
}();
        }
        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] = Face 0Alright,&give me&an ITEM.scr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_347_0");
        if (sidemessage2 == 0 && menu == 12)
            global.msg[0] = Face 0What WEAPON&will you&give me?scr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_348_0");
        if (sidemessage2 == 0 && menu == 13)
            global.msg[0] = Face 0What ARMOR&will you&give me?scr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_349_0");
        if (sidemessage2 == 1)
            global.msg[0] = Face 2Thanks for&that.scr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_350_0");
        if (sidemessage2 == 2)
            global.msg[0] = Face 0No?scr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_351_0");
        if (sidemessage2 == 3)
            global.msg[0] = Face 3Y'think I&WANT that?scr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_352_0");
        if (sidemessage2 == 4)
            global.msg[0] = Face 0That's¬hing.scr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_353_0");
        instance_create(450, 260, obj_writer);
    }
}
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)
        {
...(4);
if (menu == 15 || menu == 16 || menu == 17)
{
    menumax = 1;
    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 (global.lang == "ja")
    {
        draw_text(460, 290, string_hash_to_newline(Sell it forscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_365_0")));
        draw_text(460, 260, "$" + string_hash_to_newline(string(sellvalue) +  ?scr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_366_0")));
    }
    else
    {
        draw_text(460, 260, string_hash_to_newline(Sell it forscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_365_0")));
        draw_text(460, 290, "$" + string_hash_to_newline(string(sellvalue) +  ?scr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_366_0")));
    }
    draw_text(480, 340, string_hash_to_newline(Yesscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_367_0")));
    draw_text(480, 370, string_hash_to_newline(Noscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_368_0")));
    menuc[menu] = min(menuc[menu], menumax);
    draw_sprite(spr_heart, 0, 450, 350 + (menuc[menu] * 30));
}
scr_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)
        {
...(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] = Face 0* See you again...Delay 11&* Or not.Delay 11&* Ha ha ha ha...Wait for inputClose Messagescr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_395_0");
        if (sell == 3)
        {
            global.msg[0] = Face 0* The name's Seam.&* Pronounced "Shawm."Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_399_0") + "/";
            global.msg[1] = Face 0* And this is my little Seap.Delay 11&* Ha ha ha ha...Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_400_0");
            global.msg[2] = Face 0* Over the years, I've collected odds and ends.Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_401_0");
            global.msg[3] = * 'Course, I've no attachment to any of it.Delay 11&* It's just a hobby of mine.Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_402_0");
            global.msg[4] = * Around here, you learn to find ways to pass the time...&* ... or go mad like everyone else.Wait for inputClose Messagescr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_403_0");
        }
        if (sell == 4)
        {
            global.msg[0] = Face 1* Long ago, the Darkners lived in harmony with the Lightners.Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_411_0");
            global.msg[1] = Face 0* They were like Gods to us.&* Our protectors.&* Our creators.&* Those who gave us purpose...Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_412_0");
            global.msg[2] = Face 3* Then, one day we were all locked away in this prison...Delay 11&* And the Lightners never returned.Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_413_0");
            global.msg[3] = Face 1* Embittered,Delay 11 the King took up arms,Delay 11 and aims to take revenge upon the Lightners that left us behind.Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_414_0");
            global.msg[4] = Face 0* 'Course,Delay 11 even among his troops,Delay 11 some still distantly hope the Lightners will return...Wait for inputClose Messagescr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_415_0");
        }
        if (sell == 5)
        {
            global.msg[0] = Face 0* Historically,Delay 11 this land was ruled by the Four Kings,Delay 11 from CARD CASTLE to the East.Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_421_0");
            global.msg[1] = Face 1* But, recently, a strange knight appeared...Delay 11&* And three of the kings were locked away.Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_422_0");
            global.msg[2] = Face 0* The remaining king put him and his strange son into power.Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_423_0");
            global.msg[3] = Face 1* This land hasn't seen THIS much chaos since...Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_424_0");
            global.msg[4] = Face 2* Ha ha ha...Delay 11&* Well, you don't need to know about THAT.Wait for inputClose Messagescr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_425_0");
            if (global.flag[241 JEVIL_plot] >= 6)
            {
                global.msg[0] = Face 0* He...Delay 11 was a funny little man.Delay 11 Once,Delay 11 the court jester.Delay 11 I,Delay 11 the court magician.Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_429_0");
                global.msg[1] = Face 1* A friend...?Delay 11 Could I consider him a friend...?Delay 11 Perhaps,Delay 11 perhaps not.Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_430_0");
                global.msg[2] = Face 2* But he was the only one who matched me in the games we used to play.Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_431_0");
                global.msg[3] = Face 3* One day,Delay 11 he met a strange someone...Delay 11 and since then,Delay 11 he began to change.Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_432_0");
                global.msg[4] = Face 1* He started saying bizarre things that didn't completely make sense -Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_433_0");
                global.msg[5] = Face 3* But didn't completely not make sense,Delay 11 either.Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_434_0");
                global.msg[6] = * Soon,Delay 11 he began to see the world as a game,Delay 11 and everyone as its participants.Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_435_0");
                global.msg[7] = * As the court mage,Delay 11 and his only companion,Delay 11 I was forced to lock him away...Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_436_0");
                global.msg[8] = Face 2* Or,Delay 11 rather,Delay 11 lock US all away,Delay 11 in his own words.Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_437_0");
                global.msg[9] = Face 1* Since that time,Delay 11 the strange words he's said have stuck inside my cotton...Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_438_0");
                global.msg[10] = Face 3* And my view of this world has become darker,Delay 11 yet darker.Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_439_0");
                global.msg[11] = Face 2* Reflecting on these old memories,Delay 11 I think,Delay 11 perhaps -Delay 11 I miss playing games with him.Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_440_0");
                global.msg[12] = Face 3* And I wonder,Delay 11 if I hadn't been asked to lock him up...Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_441_0");
                global.msg[13] = Face 2* Would I have found a little more purpose in my life...?Wait for inputClose Messagescr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_442_0");
            }
        }
        if (sell == 6)
        {
            global.msg[0] = Face 2* Ha ha ha ...Delay 11&* So you are the "heroes" who are going to seal our Fountain?Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_448_0");
            global.msg[1] = Face 0* Ha, good luck.Delay 11&* It makes no difference to me.Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_449_0");
            global.msg[2] = Face 3* Neither Light nor Dark hold a future for a Darkner in my condition.Wait for inputClose Messagescr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_450_0");
            if (global.flag[241 JEVIL_plot] >= 1 && global.flag[115 got_key_a] == 1)
            {
                global.msg[0] = Face 1* Trouble opening the door...?Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_459_0");
                global.msg[1] = Face 0* Ha ha ha,Delay 11 well,Delay 11 whether you can or not,Delay 11 it doesn't matter to me.Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_460_0");
                global.msg[2] = Face 2* But here's a hint -Delay 11 walk where the stars don't shine.Wait for inputClose Messagescr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_461_0");
            }
            if (global.flag[241 JEVIL_plot] >= 1 && global.flag[115 got_key_a] == 0)
            {
                global.msg[0] = Face 3* Eh...?Delay 11 What are you talking about...?Delay 11 A prisoner with an odd manner...?Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_472_0");
                global.msg[1] = Face 1* ... No,Delay 11 you couldn't possibly be talking about HIM...?Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_473_0");
                global.msg[2] = Face 3* ... I see.Delay 11&* After all the trouble I went through to lock him up,Delay 11 you want to release him?Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_474_0");
                global.msg[3] = Face 0* ...Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_475_0");
                global.msg[4] = Face 1* Hmm,Delay 11 now that you mention it,Delay 11 it could be troublesome if he was left alone...Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_476_0");
                global.msg[5] = Face 0* Yes,Delay 11 perhaps it's better if you Heroes dealt with him now...?Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_477_0");
                global.msg[6] = Face 2* After all,Delay 11 it's not as if whatever happens,Delay 11 will matter in the end.Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_478_0");
                global.msg[7] = * Perhaps a little chaos might be fun.Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_479_0");
                global.msg[8] = Face 0* So then, take this.Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_480_0");
                global.writersnd[0] = snd_item;
                global.msg[9] = \S0* (BROKEN KEY A was added to your KEY ITEMS.)Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_482_0");
                global.msg[10] = * If you're so driven,Delay 11 find the other two pieces,Delay 11 and get someone to fix them.Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_483_0");
                global.msg[11] = * I'll even give you a hint - Walk where the stars don't shine.Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_484_0");
                global.msg[12] = * Anyhow,Delay 11 if you succeed,Delay 11 come back here and tell me!Delay 11 Good luck!!Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_485_0");
                global.msg[13] = * If you can call THIS luck...Delay 11 No,Delay 11 it's more like a curse...!Wait for inputClose Messagescr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_486_0");
                scr_keyitemgetscr_keyitemgetfunction scr_keyitemget(arg0)
{
    i = 0;
    loop = 1;
    noroom = 0;
    global.item[12] = 999;
    while (loop == 1)
    {
        if (global.keyitem[i] == 0)
        {
            global.keyitem[i] = arg0;
            break;
        }
        if (i == 12)
        {
            noroom = 1;
            break;
        }
        i += 1;
    }
    script_execute(scr_keyiteminfo_all);
}(4);
                global.flag[115 got_key_a] = 1;
            }
            if (global.flag[115 got_key_a] == 1 && global.flag[241 JEVIL_plot] >= 5)
            {
                global.msg[0] = Face 1* You already opened the door...?Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_493_0");
                global.msg[1] = Face 2* Ha ha ha...Delay 11 I almost wish I could watch!Delay 11 Tell me what happens!Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_494_0");
                global.msg[2] = Face 2* Ha ha ha...Delay 11 though,Delay 11 I suppose if you don't come back,Delay 11 I'll understand,Delay 11 too!Wait for inputClose Messagescr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_495_0");
            }
            if (global.flag[115 got_key_a] == 1 && global.flag[241 JEVIL_plot] >= 6)
            {
                global.msg[0] = Face 1* You defeated him!?Delay 11 You REALLY defeated him!?Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_500_0");
                global.msg[1] = Face 0* I see...Delay 11 perhaps you three may truly be "Heroes" after all...Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_501_0");
                global.msg[2] = Face 1* But JEVIL was just a taste of what you'll face from now on.Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_502_0");
                global.msg[3] = Face 0* One day soon...Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_503_0");
                global.msg[4] = Face 1* You too,Delay 11 will begin to realize the futility of your actions.Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_504_0");
                global.msg[5] = Face 2* Ha ha ha...Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_505_0");
                global.msg[6] = Face 0* At that time,Delay 11 feel free to come back here.Delay 11&* I'll make you tea...Wait for inputscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_506_0");
                global.msg[7] = Face 2* And we can toast...Delay 11 to the end of the world!Wait for inputClose Messagescr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_507_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_itemcheckscr_itemcheckfunction scr_itemcheck(arg0)
{
    haveit = 0;
    itemcount = 0;
    for (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_inventoryscr_armorcheck_inventoryfunction scr_armorcheck_inventory(arg0)
{
    haveit = 0;
    itemcount = 0;
    for (i = 0; i < 12; 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_inventoryscr_weaponcheck_inventoryfunction scr_weaponcheck_inventory(arg0)
{
    haveit = 0;
    itemcount = 0;
    for (i = 0; i < 12; i += 1)
    {
        if (global.weapon[i] == arg0)
            haveit = 1;
        if (global.weapon[i] == arg0)
            itemcount += 1;
    }
    return haveit;
}(0);
            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 (itemcount < 10)
                roomstring = "0" + string(itemcount);
            else
                roomstring = string(itemcount);
            if (itemcount > 0)
                draw_text(520, 430, string_hash_to_newline(Space:scr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_568_0") + roomstring));
            if (itemcount == 0)
                draw_text(520, 430, string_hash_to_newline(NO SPACEscr_84_get_lang_stringscr_84_get_lang_stringfunction scr_84_get_lang_string(arg0)
{
    return ds_map_find_value(global.lang_map, arg0);
}("obj_shop1_slash_Draw_0_gml_571_0")));
        }
    }
}
onebuffer -= 1;
twobuffer -= 1;