home *** CD-ROM | disk | FTP | other *** search
/ Media Share 9 / MEDIASHARE_09.ISO / clarion / pulldn1.zip / PULLDN1.CLA < prev    next >
Text File  |  1989-02-27  |  385b  |  17 lines
  1. PullDown     PROGRAM
  2.  
  3.          MAP
  4.            MODULE('OneMenu')
  5.          PROC(OneMenu)           !* A typical menu.
  6.            END
  7.          END      !** MAP **
  8.  
  9.               !***************************** Program Vars *****
  10. Esc_Key         EQUATE(256)
  11. Enter_Key    EQUATE(257)
  12. Left_Key     EQUATE(265)
  13. Right_Key    EQUATE(266)
  14.  
  15.            CODE      !***************************** Program Code *****
  16.   OneMenu
  17.