back to one giant directory

This commit is contained in:
Tom Everett
2019-10-19 09:04:01 -06:00
parent d6cef57b84
commit 34644492a7
33 changed files with 65 additions and 69 deletions
+37
View File
@@ -0,0 +1,37 @@
" dsw
lac djmp
dac .-1
oas cla
cma
tad d1
dac t1
sys open; dd; 0
1:
lac d2
sys read; dir; 8
sna
sys exit
lac dir
sna
jmp 1b
isz t1
jmp 1b
wr:
lac d1
sys write; dir+1; 4
lac d1
sys write; o12; 1
sys save
do:
sys unlink; dir+1
sys exit
d1: 1
d2: 2
o12: 012
t1: 0
djmp: jmp do
dd: 056056;040040;040040;040040
dir: .=.+8