finish s1.s; tried to clean up s5-s8; let as7 continue after error

This commit is contained in:
Phil Budne
2016-02-25 20:58:17 -05:00
parent 0b0ea2e637
commit 2cca3d4473
9 changed files with 206 additions and 89 deletions
+8 -8
View File
@@ -3,20 +3,20 @@
pibreak:
dac .ac "** CROSSED OUT....
dpsf
lpsf
jmp 1f
dpcf
dprs
lpcf
dprs "** ??
dac dpstat
sma rad
sma ral
jmp 2f
dprc
dprc "** ??
dac dpchar
-1
dac dpread
lac dpstat
rai
ral
2:
sma
jmp piret
@@ -28,7 +28,7 @@ pibreak:
jmp 1f
lpb
dac pbsfigs
dac pbsflgs
isz s.tim+1
skp
isz s.tim
@@ -251,7 +251,7 @@ ttyrestart: 0
lpb
dac pbsflgs+1
"** 01-s1.pdf page 44
"** 01-s1.pdf page 45
and o2000
sna