mirror of
https://github.com/PDP-10/its.git
synced 2026-01-27 20:47:38 +00:00
Add ITS machine called KA.
This commit is contained in:
committed by
Eric Swenson
parent
6be8b181ae
commit
e1f80890d4
@@ -45,6 +45,7 @@ TERMIN
|
||||
|
||||
NEWCOD==1 ; Assume a KS unless otherwise informed
|
||||
IFE MCOND MX, NEWCOD==0 ;Use old code on MX KL only (running old ITS)
|
||||
IFE MCOND KA, NEWCOD==0 ;Use old code on KA too
|
||||
|
||||
DEFINE SYSCAL OP,ARGS
|
||||
.CALL [SETZ ? SIXBIT/OP/ ? ARGS ((SETZ))]
|
||||
|
||||
@@ -58,6 +58,7 @@ AIMCHN::SIXBIT/AI/
|
||||
MLMCHN::SIXBIT/ML/
|
||||
DMMCHN::SIXBIT/DM/
|
||||
MCMCHN::SIXBIT/MC/
|
||||
KAMCHN::SIXBIT/KA/
|
||||
LMCHNTB:: OFFSET 0
|
||||
|
||||
GO: MOVE P,[-LPDL-1,,PDL-1]
|
||||
@@ -638,7 +639,7 @@ MGDBIN: 6,,(SIXBIT /DSK/)
|
||||
SIXBIT /MAGDMP/
|
||||
SIXBIT /BIN/
|
||||
|
||||
MDBFN2: IRPS X,,[AI ML DM MC]
|
||||
MDBFN2: IRPS X,,[AI ML DM MC KA]
|
||||
SIXBIT/BIN.!X/
|
||||
TERMIN
|
||||
|
||||
|
||||
Reference in New Issue
Block a user