with (vendingmachine)
{
    if (myinteract == 3 && global.interact == 0 && !d_ex())
    {
        myinteract = 4;
        global.interact = 1;
        global.msc = -99;
        global.choice = -1;
        global.choicemsg[0] = stringsetloc("#Buy", "obj_dw_fcastle_cafe_slash_Other_12_gml_15_0");
        global.choicemsg[1] = stringsetloc("#Do not", "obj_dw_fcastle_cafe_slash_Other_12_gml_16_0");
        global.choicemsg[2] = stringset("");
        global.choicemsg[3] = stringset("");
        scr_speaker("no_name");
        msgsetloc(0, "* (Drink dispenser^1. It only accepts tickets and Flowery Dollars.)/", "obj_dw_fcastle_cafe_slash_Other_12_gml_21_0");
        msgnext("\\C2 ");
        d = d_make();
    }
    if (myinteract == 4 && global.choice != -1)
    {
        k_d();
        if (global.choice == 0)
            myinteract = 5;
        else
            myinteract = 99;
    }
    if (myinteract == 5 && !d_ex())
    {
        myinteract = 99;
        with (instance_create(0, 0, obj_shop_vending))
        {
            default_text = stringsetloc("* (It's a soda machine.\nThat you insert\nmoney into.\nSomewhere.)", "obj_dw_fcastle_cafe_slash_Other_12_gml_45_0");
            menu_list = [new vending_menu_option(stringsetloc("Buy", "obj_dw_fcastle_cafe_slash_Other_12_gml_48_0"), 1), new vending_menu_option(stringsetloc("Dispense", "obj_dw_fcastle_cafe_slash_Other_12_gml_49_0"), 10), new vending_menu_option(stringsetloc("Talk", "obj_dw_fcastle_cafe_slash_Other_12_gml_50_0"), 4, "talk", 1), new vending_menu_option(stringsetloc("Exit", "obj_dw_fcastle_cafe_slash_Other_12_gml_51_0"), 99)];
            if (scr_flag_get(1850) > 0 && scr_flag_get(1879) == 0)
            {
                other.myinteract = 98;
                menu_list[2] = new vending_menu_option(stringsetloc("FreeDrink", "obj_dw_fcastle_cafe_slash_Other_12_gml_57_0"), 4, "drink", 2);
            }
            reset_list();
            item_list = scr_shop_fcastle_items();
            fillBuyList();
            array_push(customMenuTalkFlags, ["talk", function()
            {
                if (scr_flag_get(1776) == 0)
                {
                    scr_flag_set(1776, 1);
                    scr_speaker("ralsei");
                    msgsetloc(0, "\\EK* So far^1, talking to machines doesn't do anything.../", "obj_dw_fcastle_cafe_slash_Other_12_gml_75_0");
                    scr_anyface_next("flowery", "2");
                    msgnextloc("\\E2\\V0* That's because you don't believe in yourself./", "obj_dw_fcastle_cafe_slash_Other_12_gml_77_0");
                    scr_anyface_next("ralsei", "E");
                    msgnextloc("\\EE* Huh^1? Flowery!^1? Wh-where are you?/", "obj_dw_fcastle_cafe_slash_Other_12_gml_79_0");
                    scr_anyface_next("flowery", "3");
                    msgnextloc("\\E3\\VM* I'm not here^1. I'm just a voice-activated recording./", "obj_dw_fcastle_cafe_slash_Other_12_gml_81_0");
                    msgnextloc("\\E2\\Vv* Also^1, I predicted what you were going to say./", "obj_dw_fcastle_cafe_slash_Other_12_gml_82_0");
                    scr_anyface_next("ralsei", "n");
                    msgnextloc("\\En* .../", "obj_dw_fcastle_cafe_slash_Other_12_gml_84_0");
                    scr_anyface_next("flowery", "3");
                    msgnextloc("\\E3\\VY* W-wait^1. You really mean it^1? You..^1. like my style?/", "obj_dw_fcastle_cafe_slash_Other_12_gml_86_0");
                    scr_anyface_next("ralsei", "p");
                    msgnextloc("\\Ep* WHEN WOULD I SAY THAT!?/%", "obj_dw_fcastle_cafe_slash_Other_12_gml_88_0");
                }
                else
                {
                    var small_text = stringsetloc("End recording...", "obj_dw_fcastle_cafe_slash_Other_12_gml_91_0");
                    scr_smallface(0, "flowery", 0, "right", "bottom", small_text);
                    scr_speaker("flowery");
                    msgsetloc(0, "\\E7\\VV* Heh^1. You really know how to make someone.../", "obj_dw_fcastle_cafe_slash_Other_12_gml_95_0");
                    msgnextloc("\\E3\\VN* ..^1. feel special^1, don't you^1, Raly?/", "obj_dw_fcastle_cafe_slash_Other_12_gml_96_0");
                    scr_anyface_next("ralsei", "p");
                    msgnextloc("\\Ep* I'M JUST STANDING HERE!!!\\f0/%", "obj_dw_fcastle_cafe_slash_Other_12_gml_98_0");
                }
            }]);
        }
    }
    if (myinteract == 99 && !i_ex(obj_shop_vending) && !d_ex())
    {
        myinteract = 0;
        global.interact = 0;
    }
}