1
0
mirror of https://github.com/PDP-10/its.git synced 2026-05-22 21:49:27 +00:00
Files
PDP-10.its/src/clib/blt.cmid
2018-10-23 19:37:16 +02:00

21 lines
196 B
Plaintext

;
; BLT
;
; This file is PDP-10 dependent, system-independent.
;
TITLE BLT
.INSRT NC
.INSRT NM
CENTRY BLT,[FROM,TO,NUM]
HRRZ A,TO
HRRZI B,-1(A)
ADD B,NUM
HRL A,FROM
BLT A,(B)
RETURN
END