Minor change to bresenham helpers
This commit is contained in:
parent
d64600e711
commit
dd0ba4f191
|
@ -112,8 +112,8 @@ JMP2r
|
||||||
JMP2r
|
JMP2r
|
||||||
|
|
||||||
@abs2 DUP2 #0f SFT2 EQU #05 JCN #0000 SWP2 SUB2 JMP2r
|
@abs2 DUP2 #0f SFT2 EQU #05 JCN #0000 SWP2 SUB2 JMP2r
|
||||||
@lts2 #8000 ADD2 SWP2 #8000 ADD2 GTH2 JMP2r
|
@lts2 #8000 STH2k ADD2 SWP2 STH2r ADD2 GTH2 JMP2r
|
||||||
@gts2 #8000 ADD2 SWP2 #8000 ADD2 LTH2 JMP2r
|
@gts2 #8000 STH2k ADD2 SWP2 STH2r ADD2 LTH2 JMP2r
|
||||||
|
|
||||||
@table ( 256 xy )
|
@table ( 256 xy )
|
||||||
f7f8 f9fa fbfc fcfd fefe ffff ffff ffff
|
f7f8 f9fa fbfc fcfd fefe ffff ffff ffff
|
||||||
|
|
|
@ -98,7 +98,7 @@ BRK
|
||||||
JMP2r
|
JMP2r
|
||||||
|
|
||||||
@abs2 DUP2 #0f SFT2 EQU #05 JCN #0000 SWP2 SUB2 JMP2r
|
@abs2 DUP2 #0f SFT2 EQU #05 JCN #0000 SWP2 SUB2 JMP2r
|
||||||
@lts2 #8000 ADD2 SWP2 #8000 ADD2 GTH2 JMP2r
|
@lts2 #8000 STH2k ADD2 SWP2 STH2r ADD2 GTH2 JMP2r
|
||||||
@gts2 #8000 ADD2 SWP2 #8000 ADD2 LTH2 JMP2r
|
@gts2 #8000 STH2k ADD2 SWP2 STH2r ADD2 LTH2 JMP2r
|
||||||
|
|
||||||
@pointer-icn 80c0 e0f0 f8e0 1000
|
@pointer-icn 80c0 e0f0 f8e0 1000
|
||||||
|
|
|
@ -221,8 +221,8 @@ JMP2r
|
||||||
|
|
||||||
@mod DUP2 DIV MUL SUB JMP2r
|
@mod DUP2 DIV MUL SUB JMP2r
|
||||||
@abs2 DUP2 #0f SFT2 EQU #05 JCN #0000 SWP2 SUB2 JMP2r
|
@abs2 DUP2 #0f SFT2 EQU #05 JCN #0000 SWP2 SUB2 JMP2r
|
||||||
@lts2 #8000 ADD2 SWP2 #8000 ADD2 GTH2 JMP2r
|
@lts2 #8000 STH2k ADD2 SWP2 STH2r ADD2 GTH2 JMP2r
|
||||||
@gts2 #8000 ADD2 SWP2 #8000 ADD2 LTH2 JMP2r
|
@gts2 #8000 STH2k ADD2 SWP2 STH2r ADD2 LTH2 JMP2r
|
||||||
@is-uc DUP #40 GTH SWP #5b LTH AND JMP2r
|
@is-uc DUP #40 GTH SWP #5b LTH AND JMP2r
|
||||||
@is-lc DUP #60 GTH SWP #7b LTH AND JMP2r
|
@is-lc DUP #60 GTH SWP #7b LTH AND JMP2r
|
||||||
@is-num DUP #2f GTH SWP #3a LTH AND JMP2r
|
@is-num DUP #2f GTH SWP #3a LTH AND JMP2r
|
||||||
|
|
Loading…
Reference in New Issue