home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 18 REXX
/
18-REXX.zip
/
I265.ZIP
/
leave.cmd
< prev
next >
Wrap
OS/2 REXX Batch file
|
1992-08-05
|
197b
|
10 lines
/* LEAVE.CMD */
rep = ''
do forever
say 'Continue? (Yes/No)'
pull rep .
if abbrev('YES', rep) | abbrev('NO', rep)
then leave
say 'Please enter YES or NO'
end