1
0
mirror of https://github.com/PDP-10/its.git synced 2026-01-13 15:27:28 +00:00

Fix ARDS short vector bugs in SSV 22.

This commit is contained in:
Lars Brinkhoff 2020-05-07 14:59:33 +02:00
parent f6408e16cb
commit 4f21a27479

View File

@ -7,6 +7,7 @@ TITLE SCROLL SAVER
; from Purdue University, by taking the ML file IMLAC; SSV 52 dated
; 1973-01-07 and editing it to match.
; 22.2 (05/07/2020) fixes for ARDS short vectors.
; 22 (06/07/74) minor fixes to PXMIT and SPXMIT.
%VERSIO==22.
@ -976,9 +977,10 @@ LNGVCT: 0
; short vectors -- no one uses them ever
SHTVCT: 0
LAC [40000]
LAC [20000] ; visible, solid line
DAC LONG1
JMS GRFIN
AND [77] ; ignore all but 6 bits
RAR 1
DAC XPOS
CLA
@ -987,6 +989,7 @@ SHTVCT: 0
LAC [40000]
SHTY: DAC LONG2
JMS GRFIN
AND [77]
RAR 1
DAC YPOS
LSN