Add original unix v6
This commit is contained in:
@@ -0,0 +1,21 @@
|
||||
/ rp03 disk driver
|
||||
|
||||
rpda = 176724
|
||||
mov dska,r1
|
||||
clr r0
|
||||
div $10.,r0
|
||||
mov r1,-(sp)
|
||||
mov r0,r1
|
||||
clr r0
|
||||
div $20.,r0
|
||||
bisb r1,1(sp)
|
||||
mov $rpda,r1
|
||||
mov (sp)+,(r1)
|
||||
mov r0,-(r1)
|
||||
mov ba,-(r1)
|
||||
mov wc,-(r1)
|
||||
mov $iocom,-(r1)
|
||||
1:
|
||||
tstb (r1)
|
||||
bpl 1b
|
||||
rts pc
|
||||
Reference in New Issue
Block a user