home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 3 / PDCD_3.iso / pocketbk / utilsu / utils2 / DEVBOOK.ZIP / EXAMPLE.OPL < prev   
Text File  |  1994-03-29  |  279b  |  19 lines
  1. PROC Main:
  2.         mINIT
  3.         UtilMenu:
  4.         MENU
  5. ENDP
  6.  
  7. rem * This is a sample of how to develop for Utils3a *
  8.  
  9. PROC UtilMenu:
  10.         mCARD "Hello","Test",%/
  11. ENDP
  12.  
  13. PROC UtilSel:(k%,f$)
  14.         IF k%=%/
  15.                 GIPRINT "Hello"
  16.         ENDIF
  17. ENDP
  18.  
  19.