Apple-2-SW/prog8
1
0
Fork 0
mirror of https://github.com/irmen/prog8.git synced 2024-08-13 20:29:04 +00:00
Code Issues Projects Releases Wiki Activity

save a cycle

Browse Source
This commit is contained in:
Irmen de Jong 2023-09-01 00:50:24 +02:00
parent 28bf0b61ce
commit cfea8b3745
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
compiler/res/prog8lib/math.p8
View File

@ -100,8 +100,8 @@ _sinecosR8 .char trunc(127.0 * sin(range(180+45) * rad(360.0/180.0)))
asmsub log2(ubyte value @A) -> ubyte @Y { asmsub log2(ubyte value @A) -> ubyte @Y {
%asm {{ %asm {{
ldy #$80 sta P8ZP_SCRATCH_B1
sty P8ZP_SCRATCH_B1 lda #$80
ldy #7 ldy #7
- bit P8ZP_SCRATCH_B1 - bit P8ZP_SCRATCH_B1
beq + beq +
@ -109,7 +109,7 @@ _sinecosR8 .char trunc(127.0 * sin(range(180+45) * rad(360.0/180.0)))
+ dey + dey
bne + bne +
rts rts
+ lsr P8ZP_SCRATCH_B1 + lsr a
bne - bne -
}} }}
} }