Function there_cmd_menu

src/cmd.c:4842–4896

offer choice of actions to perform at adjacent location ; a few choices can be farther away */

/* offer choice of actions to perform at adjacent location <x,y>;
   a few choices can be farther away */
staticfn char
there_cmd_menu(coordxy x, coordxy y, int mod)
{
    winid win;
    char ch = '\0';
    int npick = 0, K = 0;
    menu_item *picks = (menu_item *) 0;
    /*int dx = sgn(x - u.ux), dy = sgn(y - u.uy);*/
    coordxy dx = x - u.ux, dy = y - u.uy;
    int act = MCMD_NOTHING;

    win = create_nhwindow(NHW_MENU);
    start_menu(win, MENU_BEHAVE_STANDARD);

    if (u_at(x, y))
        K += there_cmd_menu_self(win, x, y, &act);
    else if (next2u(x, y))
        K += there_cmd_menu_next2u(win, x, y, mod, &act);
    else
        K += there_cmd_menu_far(win, x, y, mod);
    K += there_cmd_menu_common(win, x, y, mod, &act);

    if (!K) {
        /* no menu options, try to move */
        if (next2u(x, y) && test_move(u.ux, u.uy, dx, dy, TEST_MOVE)) {
            int dir = xytodir(dx, dy);

            cmdq_add_ec(CQ_CANNED, move_funcs[dir][MV_WALK]);
        } else if (flags.travelcmd) {
            iflags.travelcc.x = u.tx = x;
            iflags.travelcc.y = u.ty = y;
            cmdq_add_ec(CQ_CANNED, dotravel_target);
        }
        npick = 0;
        ch = '\0';
    } else if (K == 1 && act != MCMD_NOTHING && act != MCMD_TRAVEL) {
        destroy_nhwindow(win);

        act_on_act(act, dx, dy);
        return '\0';
    } else {
        end_menu(win, "What do you want to do?");
        npick = select_menu(win, PICK_ONE, &picks);
        ch = '\033';
    }
    destroy_nhwindow(win);
    if (npick > 0) {
        act = picks->item.a_int;
        free((genericptr_t) picks);

        act_on_act(act, dx, dy);
        return '\0';
    }
    return ch;
}

staticfn char
here_cmd_menu(void)