Click above to get retro games delivered to your door ever month!

Syntax

PULL_OPEN( menu_ra[, tr[, tc[, p_choice ;
           [, legal_ra[, udf_ra[, box_no ;
           [, _xhandler[, _colour ]]]]]]] )

Purpose

Dynamically create and pull down a sub-menu from THE_USUAL().

Arguments

     menu_ra -- array of menu selections

     tr -- top row of sub-menu

     tc -- column at which to begin sub-menu

     p_choice -- default starting position of menu

     legal_ra -- if passed, array of permissions

     udf_ra -- if passed, array of udfs to execute - results in a loop.

     box_no -- box border to use (see DRAW_BOX() for available boxes)

     _xhandler -- if passed, overrides the default exception handler.

     _colour -- if passed, colour to use, else 5

Setup

All parameters are assumed valid if passed.

Example

     PULL_OPEN( { "Order               ", ;
                  "Items in this Order " }, ;
                  M->graf_row + 1, ;
                  cols[ ASCAN( choices, " Add " ) ], ;
                  1, .T., ;
                  { {|| GET_STD2()}, {|| ITM_EDIT()}} )

Returns

The number of the choice selected.

Side Effects

Crash on bad array elements.

Artful Calls

LONGEST, DRAW_BOX, IS_DATA, SYSCOLOR, GET/SET_KEYS

Source File

AA_POPEN.PRG