diff --git a/checksum/checksum.tal b/checksum/checksum.tal index 67826d2..cf7bc03 100644 --- a/checksum/checksum.tal +++ b/checksum/checksum.tal @@ -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