Run through at least one char
This commit is contained in:
parent
140529c35e
commit
f198e5d8aa
|
@ -36,12 +36,10 @@ BRK
|
|||
#2443 ,&a STR2 #118d ,&b STR2
|
||||
&w
|
||||
;&c .File/read DEO2
|
||||
.File/success DEI2 #0000 EQU2 ?&end
|
||||
[ LIT &c $1 ] DUP DUP2
|
||||
[ LIT2 &x $2 ] [ LIT2 &a $2 ] MUL2 ADD2 ,&x STR2
|
||||
[ LIT2 &y $2 ] [ LIT2 &b $2 ] MUL2 ADD2 ,&y STR2
|
||||
!&w
|
||||
&end
|
||||
.File/success DEI2 ORA ?&w
|
||||
,&x LDR2 ,&y LDR2
|
||||
|
||||
JMP2r
|
||||
|
|
Loading…
Reference in New Issue