home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / enterprs / c128 / util / kds128v2.sfx / readkey.bat < prev    next >
DOS Batch File  |  1990-12-08  |  443b  |  8 lines
  1. FAST:UP$=CHR$(145)+CHR$(145)+CHR$(145):PRINTCHR$(147);
  2. PRINT UP$ "╨RESS ANY KEY TO READ THE NEXT LINE . . .":WAIT208,1:POKE208,0
  3. PRINT UP$ "╘HIS SIMPLE DEMO SHOWS HOW A .┬┴╘ FILE":WAIT208,1:POKE208,0
  4. PRINT UP$ "CAN READ KEYPRESSES FROM THE KEYBOARD.":WAIT208,1:POKE208,0
  5. PRINT UP$ "╨RESS ANY LETTER OR NUMBER KEY . . . ":WAIT208,1:POKE208,0
  6. PRINT UP$ "╘HE KEY YOU PRESSED IS: ";CHR$(PEEK(842))
  7. PRINT UP$:SLOW:POKE153,0:DCLOSE ON U(PEEK(186))
  8. é