home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CP/M
/
CPM_CDROM.iso
/
mbug
/
mbug104.arc
/
MENU.LBR
/
COPY.CMD
< prev
next >
Wrap
OS/2 REXX Batch file
|
1979-12-31
|
512b
|
44 lines
quit to 'copy b:=a:','dbase redo'
us on the screen
*
* It uses the menu data base
*
use menu index menu
set talk off
set intensity off
store 'MAIN ' to cur:name
*
* The following loop is executed once for each menu screen
*
do while 1=1
erase
store cur:name+'00' to search:key
find &search:key
store trim (desc) to tdescr
store len (tdescr) to x
store x/2 to x
store 40-x to x
@ 2,x say desc
*
* the following loop is execut