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

Syntax

T_MENU( aItems, aTags[, nColour ] )

Purpose

Multiple-choice pop-up tag menu

Arguments

     aItems -- array of strings for the menu

     aTags -- parallel array of tags

     nColour -- if passed, colour to use, else 7

Setup

Fill aItems[] with strings and aTags[] with logicals.

Example

     LOCAL items := { "One", "Two", "Three" }, ;
           tags  := { .F., .T., .F. }
     ? T_MENU( items, tags )

Returns

The number of .T. values in aTags[].

Side Effects

Pops a menu, restores the screen afterwards.

Artful Calls

ACOUNT, DRAW_BOX, LONGEST, MAKE_STR, PAD, SYSCOLOR, TAG_UDF.

Source File

AA_TMENU.PRG