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