File RKB.FT (FORTRAN source file)
Directory of image this file is from
This file as a plain text file
SUBROUTINE RKB(ICH)
C LIEST EIN ASCII-ZEICHEN ICH VOM KEYBOARD
C FORTRAN II
S 6030 / CLEAR KEYBOARD FLAG
SIN, KSF / SKIP ON KEYBOARD FLAG
S JMP IN / NOT SET CHECK AGAIN
S KRB / READ KEYBOARD BUFFER CLEAR FLAG
S AND (077 / SIX HIGHEST BIT ONLY
S 7002 / BYTE SWAP
S TAD (040 / TO CHANGE IN ASCII
S DCA I \ICH / SAVE IT
RETURN
END
Feel free to contact me, David Gesswein djg@pdp8online.com
with any questions, comments on the web site, or if you have related equipment,
documentation, software etc. you are willing to part with. I am
interested in anything PDP-8
related, computers, peripherals used with them, DEC or third party, or
documentation.
PDP-8 Home Page
 PDP-8 Site Map
 PDP-8 Site Search