fix a typo in betwen
This commit is contained in:
+15
-15
@@ -208,7 +208,7 @@ proc1:
|
|||||||
jmp proc2
|
jmp proc2
|
||||||
jms bufwr
|
jms bufwr
|
||||||
jms copyz; buf; 64
|
jms copyz; buf; 64
|
||||||
lac lyrand
|
lac lvrand
|
||||||
and o17700
|
and o17700
|
||||||
dac bufadd
|
dac bufadd
|
||||||
dac 1f
|
dac 1f
|
||||||
@@ -220,7 +220,7 @@ proc1:
|
|||||||
sys read; buf; 64
|
sys read; buf; 64
|
||||||
|
|
||||||
proc2:
|
proc2:
|
||||||
lac lyrand
|
lac lvrand
|
||||||
and o77
|
and o77
|
||||||
jms betwen; dm1; maxsto
|
jms betwen; dm1; maxsto
|
||||||
dac maxsto
|
dac maxsto
|
||||||
@@ -256,12 +256,12 @@ bufwr: 0
|
|||||||
sys seek; bufadd: 0; 0
|
sys seek; bufadd: 0; 0
|
||||||
isz maxsto
|
isz maxsto
|
||||||
lac bfo
|
lac bfo
|
||||||
sys write; bufp: buf; maxstp: -1
|
sys write; bufp: buf; maxsto: -1
|
||||||
-1
|
-1
|
||||||
dac maxsto
|
dac maxsto
|
||||||
jmp i bufwr
|
jmp i bufwr
|
||||||
|
|
||||||
Xnumber: 0
|
number: 0
|
||||||
dac 3f
|
dac 3f
|
||||||
lac d1000
|
lac d1000
|
||||||
dac 2f
|
dac 2f
|
||||||
@@ -273,7 +273,7 @@ Xnumber: 0
|
|||||||
lacq
|
lacq
|
||||||
tad o60
|
tad o60
|
||||||
dac i 8
|
dac i 8
|
||||||
iac 2b
|
lac 2b
|
||||||
cll
|
cll
|
||||||
idiv; 10
|
idiv; 10
|
||||||
lacq
|
lacq
|
||||||
@@ -334,7 +334,7 @@ betwen: 0
|
|||||||
cma
|
cma
|
||||||
tad 2f
|
tad 2f
|
||||||
spa
|
spa
|
||||||
jmp 2f
|
jmp 1f
|
||||||
lac i betwen
|
lac i betwen
|
||||||
dac 3f
|
dac 3f
|
||||||
isz betwen
|
isz betwen
|
||||||
@@ -447,7 +447,7 @@ nf1:
|
|||||||
lac fname
|
lac fname
|
||||||
tad d4
|
tad d4
|
||||||
dac fname
|
dac fname
|
||||||
sys open; frame: 0; 0
|
sys open; fname: 0; 0
|
||||||
dac iof
|
dac iof
|
||||||
sma
|
sma
|
||||||
lac passno
|
lac passno
|
||||||
@@ -492,20 +492,20 @@ gchar: 0
|
|||||||
sad o12
|
sad o12
|
||||||
skp
|
skp
|
||||||
jmp 1f
|
jmp 1f
|
||||||
dzm comflc
|
dzm comflg
|
||||||
isz lineno
|
isz lineno
|
||||||
1:
|
1:
|
||||||
sad o42
|
sad o42
|
||||||
dac comflc
|
dac comflg
|
||||||
dac char
|
dac char
|
||||||
lac comflc
|
lac comflg
|
||||||
sza
|
sza
|
||||||
jmp gchar+1
|
jmp gchar+1
|
||||||
lac char
|
lac char
|
||||||
|
|
||||||
gch3:
|
gch3:
|
||||||
dac char
|
dac char
|
||||||
jms betwn; d0; o200
|
jms betwen; d0; o200
|
||||||
cla
|
cla
|
||||||
tad lactab
|
tad lactab
|
||||||
dac .+1
|
dac .+1
|
||||||
@@ -801,12 +801,12 @@ exp2:
|
|||||||
dac srand
|
dac srand
|
||||||
lac r+1
|
lac r+1
|
||||||
dac srand+1
|
dac srand+1
|
||||||
jmp expb
|
jmp exp5
|
||||||
exp3:
|
exp3:
|
||||||
sad d5
|
sad d5
|
||||||
jmp exp4
|
jmp exp4
|
||||||
jms error; x>
|
jms error; x>
|
||||||
smp skip
|
jmp skip
|
||||||
exp4:
|
exp4:
|
||||||
jms pickup
|
jms pickup
|
||||||
jmp i expr
|
jmp i expr
|
||||||
@@ -924,7 +924,7 @@ o74: 074
|
|||||||
o76: 076
|
o76: 076
|
||||||
|
|
||||||
namsiz: -2
|
namsiz: -2
|
||||||
namistp: namlst
|
namlstp: namlst
|
||||||
fnamep: fakename
|
fnamep: fakename
|
||||||
lactab: lac .+1
|
lactab: lac .+1
|
||||||
8;8;8;8;8;8;8;8
|
8;8;8;8;8;8;8;8
|
||||||
@@ -977,4 +977,4 @@ namlst:
|
|||||||
.=.+4
|
.=.+4
|
||||||
dot:
|
dot:
|
||||||
.=.+6
|
.=.+6
|
||||||
cmflx:
|
cmflx:
|
||||||
|
|||||||
Reference in New Issue
Block a user