1
0
mirror of https://github.com/PDP-10/its.git synced 2026-03-20 08:28:43 +00:00

KS10 console 5.2

Files from ftp.dbit.com: /pub/pdp10/ks10.
This commit is contained in:
Lars Brinkhoff
2018-09-18 07:34:48 +02:00
parent a0fac2e5a7
commit d5a42bc291
3 changed files with 6139 additions and 0 deletions

BIN
bin/kshack/csl52.bin Normal file

Binary file not shown.

5773
src/kshack/csl52.asm Normal file

File diff suppressed because it is too large Load Diff

366
src/kshack/mcs85.inc Normal file
View File

@@ -0,0 +1,366 @@
;+
;
; Macros to assemble MCS-85 instructions.
;
; By John Wilson.
;
; 08/17/93 JMBW Created.
;
;-
_b= 0
_c= 1
_d= 2
_e= 3
_h= 4
_l= 5
_m= 6
_a= 7
_sp= 6
_psw= 6
;
ifdef ??version ;;if TASM...
nowarn res ;;tell it not to freak out about MOV, JMP etc.
endif
;
; Ignore MNEM, it was supposed to be for switching mnemonics sets on the fly.
;
mnem macro cp
;;;ifidn <&cp>,<8085>
endm
;;;
mov macro r1,r2
db 100q+_&r1*10q+_&r2
endm
xchg macro
db 353q
endm
push macro rp
db 305q+_&rp*10q
endm
pop macro rp
db 301q+_&rp*10q
endm
jmp macro dest
db 303q
dw dest
endm
jc macro dest
db 332q
dw dest
endm
jnc macro dest
db 322q
dw dest
endm
jz macro dest
db 312q
dw dest
endm
jnz macro dest
db 302q
dw dest
endm
jp macro dest
db 362q
dw dest
endm
jm macro dest
db 372q
dw dest
endm
jpe macro dest
db 352q
dw dest
endm
jpo macro dest
db 342q
dw dest
endm
call macro dest
db 315q
dw dest
endm
ret macro
db 311q
endm
in macro port
db 333q,&port
endm
out macro port
db 323q,&port
endm
add macro r
db 200q+_&r
endm
adc macro r
db 210q+_&r
endm
sub macro r
db 220q+_&r
endm
sbb macro r
db 230q+_&r
endm
cmp macro r
db 270q+_&r
endm
stc macro
db 067q
endm
cmc macro
db 077q
endm
daa macro
db 047q
endm
di macro
db 363q
endm
nop macro
db 000q
endm
;;;else ;; 8086
;;; purge mov,xchg,push,pop,jmp,jc,jnc,jz,jnz,jp,jm,jpe,jpo,call,ret
;;; purge in,out,add,adc,sub,sbb,cmp,stc,cmc,daa,di,nop,sp
;;;endif
;;; endm
;
halt macro
db 166q
endm
;
mvi macro r,val
db 006q+_&r*10q,val
endm
;
lxi macro rp,val
db 001q+_&rp*10q
dw val
endm
;
stax macro rp
db 002q+_&rp*10q
endm
;
ldax macro rp
db 012q+_&rp*10q
endm
;
sta macro addr
db 062q
dw addr
endm
;
lda macro addr
db 072q
dw addr
endm
;
shld macro addr
db 042q
dw addr
endm
;
lhld macro addr
db 052q
dw addr
endm
;
xthl macro
db 343q
endm
;
sphl macro
db 371q
endm
;
pchl macro
db 351q
endm
;
cc macro dest
db 334q
dw dest
endm
;
cnc macro dest
db 324q
dw dest
endm
;
cz macro dest
db 314q
dw dest
endm
;
cnz macro dest
db 304q
dw dest
endm
;
cp macro dest
db 364q
dw dest
endm
;
cm macro dest
db 374q
dw dest
endm
;
cpe macro dest
db 354q
dw dest
endm
;
cpo macro dest
db 344q
dw dest
endm
;
rc macro
db 330q
endm
;
rnc macro
db 320q
endm
;
rz macro
db 310q
endm
;
rnz macro
db 300q
endm
;
rp macro
db 360q
endm
;
rm macro
db 370q
endm
;
rpe macro
db 350q
endm
;
rpo macro
db 340q
endm
;
rst macro n
db 307q+&n*10q
endm
;
inr macro r
db 004q+_&r*10q
endm
;
dcr macro r
db 005q+_&r*10q
endm
;
inx macro rp
db 003q+_&rp*10q
endm
;
dcx macro rp
db 013q+_&rp*10q
endm
;
adi macro n
db 306q,&n
endm
;
aci macro n
db 316q,&n
endm
;
dad macro rp
db 011q+_&rp*10q
endm
;
sui macro n
db 326q,&n
endm
;
sbi macro n
db 336q,&n
endm
;
ana macro r
db 240q+_&r
endm
;
xra macro r
db 250q+_&r
endm
;
ora macro r
db 260q+_&r
endm
;
ani macro n
db 346q,&n
endm
;
xri macro n
db 356q,&n
endm
;
ori macro n
db 366q,&n
endm
;
cpi macro n
db 376q,&n
endm
;
rlc macro
db 007q
endm
;
rrc macro
db 017q
endm
;
ral macro
db 027q
endm
;
rar macro
db 037q
endm
;
cma macro
db 057q
endm
;
ei macro
db 373q
endm
;
rim macro
db 040q
endm
;
sim macro
db 060q
endm
;
; V-20 8080-mode instructions:
calln macro n
db 355q,355q,&n
endm
;
retem macro
db 355q,375q
endm
;
; This is a V-20 8086-mode instruction:
intem macro n
db 017q,377q,&n
endm
;