File ERASE.FT (FORTRAN source file)
Directory of image this file is from
This file as a plain text file
SUBROUTINE ERASE
C TO ERASE THE SCREEN OF THE TEKTRONIX 4010
C ALPHA MODE IS SET ON ENTERING
C FORTRAN II
S CLA CLL
S TAD (237 / US
S JMS CHOUT / TO ALPHA MODE
S TAD (233 / ESCAPE
S JMS CHOUT
S TAD (14 / FF,^L,214
S JMS CHOUT
RETURN
SCHOUT, 0 / SEND IT
SX, TSF
S JMP X
S TLS
S CLA
S JMP I CHOUT
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