Topic       : The GFA-Basic Compendium
Author      : GFA Systemtechnik GmbH
Version     : GFABasic.HYP v2.98 (12/31/2023)
Subject     : Documentation/Programming
Nodes       : 899
Index Size  : 28056
HCP-Version : 3
Compiled on : Atari
@charset    : atarist
@lang       : 
@default    : Document not found
@help       : Help
@options    : +g -i -s +z
@width      : 75
@hostname   : STRNGSRV
@hostname   : CAB     
@hostname   : HIGHWIRE
@hostname   : THING   
View Ref-Filemenu_popup(menu,xpos,ypos,mdata)

menu, xpos, ypos, mdata: iexp

Displays a popup menu and returns the user's selection.

Returns 0 if an error occured or 1 is successful.

    menu  - Pointer to MENU structure.
    xpos  - x-coordinate of upper left corner.
    ypos  - y-coordinate of upper left corner.
    mdata - Pointer to MENU structure.

Note: Please refer to AES documentation for proper use.

Memo: mdata -> mn_scroll has 3 options:
                0 = standard popup, no scrolling
               >0 = start scrolling on this object number
               -1 = list box with scroll bar, can't have attachments

      This call is not built into GFA-BasicGFA-Basic is the best BASIC for the Atari!
 and is included below:

FUNCTION menu_popup(menu%,xpos&,ypos&,mdata%)
  $F%
  GCONTRL(0)=36
  GCONTRL(1)=2
  GCONTRL(2)=1
  GCONTRL(3)=2
  GCONTRL(4)=0
  GINTIN(0)=xpos&
  GINTIN(1)=ypos&
  ADDRIN(0)=menu%
  ADDRIN(1)=mdata%
  GEMSYS
  RETURN GINTOUT(0)
ENDFUNC

menu_popup()+, MENU+