new files: sop.s maksys.s trysys.s (last in 01-s1.pdf)

2026-05-01 14:06:00 +00:00 · 2016-02-26 16:25:03 -05:00
parent 5ae326c444
commit fc0d2c2b31
5 changed files with 194 additions and 2 deletions
--- a/scans/trysys.s
+++ b/scans/trysys.s
@@ -0,0 +1,40 @@
+"** 01-s1.pdf page 65
+" trysys
+
+   sys open; a.out; 0
+   spa
+   jmp error
+   sys read; buf; 3072
+   sad .-1
+   jmp error
+   iof
+   caf
+   cdf
+   clof
+   law buf
+   dac t1
+   dzm t2
+   -3072
+   dac c1
+1:
+   lac t1 i
+   dac r2 i
+   isz t1
+   isz r2
+   isz c1
+   jmp 1b
+   jmp 0100
+
+error:
+   lac d1
+   sys write; 1f; 1
+   sys exit
+1: 077012
+
+a.out:
+   <a.>;<ou><t 040; 040040
+t1: 0
+t2: 0
+c1: 0
+d1: 1
+buf: