home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware Overload
/
ShartewareOverload.cdr
/
comm
/
qmscr41.zip
/
ULYORN.MOD
< prev
next >
Wrap
Text File
|
1989-04-01
|
221b
|
14 lines
;LANS 10-18-88 06:40 ULYORN.MOD
;
IF '$YorN' = 'Y' Y_answer
IF '$YorN' = 'N' N_answer
Y_answer:
ATWRITE 36 7 14 'Y'
ATWRITE 41 7 13 'N'
RETURN
N_answer:
ATWRITE 36 7 13 'Y'
ATWRITE 41 7 14 'N'
RETURN
;