Apple-2-SW/Applecorn
1
0
Fork 0
mirror of https://github.com/bobbimanners/Applecorn.git synced 2024-12-27 23:31:04 +00:00
Code Issues Projects Releases Wiki Activity

SHRLINELO/HI: Shaved another CLC.

Browse Source
This commit is contained in:
Bobbi Webber-Manners 2023-01-04 17:57:44 -05:00
parent 29952901bc
commit 0eb511c1df
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
applecorn.po
View File

Binary file not shown.

4
mainmem.shr.s
View File

@ -532,7 +532,7 @@ SHRLINELO MX %00 ; Tell merlin 16 bit M & X
ADC :YI ADC :YI
STA A2L ; y = y + yi STA A2L ; y = y + yi
BRA :S3 BRA :S3
:S2 CLC :S2 ; CLC ; Already CC
ADC :DY ADC :DY
STA :D ; D = D + 2 * dy STA :D ; D = D + 2 * dy
:S3 INX :S3 INX
@ -608,7 +608,7 @@ SHRLINEHI MX %00 ; Tell Merlin 16 bit M & X
ADC :XI ADC :XI
STA :X ; x = x + xi STA :X ; x = x + xi
BRA :S3 BRA :S3
:S2 CLC :S2 ; CLC ; Already CC
ADC :DX ADC :DX
STA :D ; D = D + 2 * dx STA :D ; D = D + 2 * dx
:S3 INX :S3 INX