Apple-2gs-SW
/
65816-crypto
mirror of https://github.com/sheumann/65816-crypto.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

Use shifts when called for, rather than more expensive rotates.

This commit is contained in:
Stephen Heumann 2017-07-03 16:36:34 -05:00
parent 011628d3ce
commit d2bf9a782e
1 changed files with 22 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

35
sha256.macros
View File

@ -280,13 +280,21 @@
lda_w &i-15
sta temp2+2
ROTR4CONT temp2,2
ROTR4MOVE_w temp3,&i-15,3
lda_w &i-15,2
lsr a
sta temp3+2
lda_w &i-15
ror a
sta temp3
lsr temp3+2
ror temp3
lsr temp3+2
lda temp3
ror a
eor temp2
eor temp1
sta temp1
lda temp3+2
and #$1FFF
eor temp2+2
eor temp1+2
sta temp1+2
@ -297,21 +305,22 @@
sta temp2+2
ROTR4CONT temp2,1
ROTR4MOVE temp3,temp2,2
lda temp2-1
and #$FF00
sta temp4
lda temp2+3
lda_w &i-2,3
and #$00FF
ora temp4
sta temp4
lda temp2+1
sta temp4+2
ROTR4CONT temp4,1
lda temp4
lsr a
tay
lda_w &i-2,1
ror a
tax
tya
lsr a
tay
txa
ror a
eor temp3
eor temp2
sta temp2
lda temp4+2
tya
and #$003F
eor temp3+2
eor temp2+2