d6
/
uxn-utils
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Run through at least one char

This commit is contained in:
Devine Lu Linvega 2023-02-06 15:59:17 -08:00
parent 140529c35e
commit f198e5d8aa
1 changed files with 1 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
checksum/checksum.tal
View File

@ -36,12 +36,10 @@ BRK
#2443 ,&a STR2 #118d ,&b STR2 #2443 ,&a STR2 #118d ,&b STR2
&w &w
;&c .File/read DEO2 ;&c .File/read DEO2
.File/success DEI2 #0000 EQU2 ?&end
[ LIT &c $1 ] DUP DUP2 [ LIT &c $1 ] DUP DUP2
[ LIT2 &x $2 ] [ LIT2 &a $2 ] MUL2 ADD2 ,&x STR2 [ LIT2 &x $2 ] [ LIT2 &a $2 ] MUL2 ADD2 ,&x STR2
[ LIT2 &y $2 ] [ LIT2 &b $2 ] MUL2 ADD2 ,&y STR2 [ LIT2 &y $2 ] [ LIT2 &b $2 ] MUL2 ADD2 ,&y STR2
!&w .File/success DEI2 ORA ?&w
&end
,&x LDR2 ,&y LDR2 ,&x LDR2 ,&y LDR2
JMP2r JMP2r