home *** CD-ROM | disk | FTP | other *** search
/ No Fragments Archive 10: Diskmags / nf_archive_10.iso / MAGS / STFORMAT / STF29.MSA / JOYSTICK_JOYTEST.LST < prev    next >
File List  |  1987-04-21  |  229b  |  13 lines
  1. Hidem
  2. T%=Xbios(34)
  3. Print At(1,1);"Keyboard Vector Table Address = ";Hex$(T%)
  4. '
  5. While Inkey$=""                ! Any key to exit
  6.   Print At(1,3);
  7.   For A%=T% To T%+109
  8.     P%=Peek(A%)
  9.     Print P%,
  10.   Next A%
  11. Wend
  12. Edit
  13.