mirror of
https://github.com/PDP-10/its.git
synced 2026-05-22 21:49:27 +00:00
21 lines
196 B
Plaintext
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
|