Transcribed all of 07-13-19.pdf
First draft
This commit is contained in:
@@ -0,0 +1,78 @@
|
||||
" dskio
|
||||
|
||||
dskrd0: 0
|
||||
dzm side
|
||||
jms dskio; 02000
|
||||
jmp i dskrd0
|
||||
|
||||
dskwr0: 0
|
||||
dzm side
|
||||
jms dskio; 03000
|
||||
jmp i dskwr0
|
||||
|
||||
dskrd1: 0
|
||||
lmq
|
||||
lac o200000
|
||||
dac side
|
||||
lacq
|
||||
jms dskio; 02000
|
||||
jmp i dskrd1
|
||||
|
||||
dskwr1: 0
|
||||
lmq
|
||||
lac o200000
|
||||
dac side
|
||||
lacq
|
||||
jms dskio; 03000
|
||||
jmp i dskwr1
|
||||
|
||||
|
||||
iskio: 0
|
||||
cll; idiv; 80
|
||||
dac 2f
|
||||
lacq
|
||||
idiv; 10
|
||||
dac 3f
|
||||
lls 22
|
||||
xor 3f
|
||||
als 8
|
||||
dac 3f
|
||||
lac 2f
|
||||
idiv; 10
|
||||
dac 2f
|
||||
lls 22
|
||||
xor 2f
|
||||
xor 3f
|
||||
xor side
|
||||
dac 2f
|
||||
-10
|
||||
dac 3f
|
||||
1:
|
||||
dscs
|
||||
-640
|
||||
dslw
|
||||
lac dskbufp
|
||||
dslm
|
||||
lac 2f
|
||||
dsld
|
||||
lac dskio i
|
||||
dsls
|
||||
dssf
|
||||
jmp .-1
|
||||
dsrs
|
||||
sma
|
||||
jmp 1f
|
||||
isz 3f
|
||||
jmp 1b
|
||||
hlt
|
||||
1:
|
||||
isz dskio
|
||||
jmp i dskio
|
||||
2: 0
|
||||
3: 0
|
||||
|
||||
o200000: 0200000
|
||||
dskbufp: dskbuf
|
||||
|
||||
side: .=.+1
|
||||
dskbuf: .=.+640
|
||||
Reference in New Issue
Block a user