bslathi19/cc65
1
0
Fork 0
Code Issues Pull Requests Actions 1 Packages Projects Releases Wiki Activity

Split files

Browse Source
This commit is contained in:
Karri Kaksonen
2022-04-16 21:13:51 +03:00
parent cdc6e1c61f
commit 422d245cab
4 changed files with 85 additions and 92 deletions
Download Patch File Download Diff File Expand all files Collapse all files

27
libsrc/atari7800/setcursor.s
View File

@@ -32,6 +32,7 @@
.import _zones
.import cursor
.import pusha, incsp1, pusha0, pushax, popa
.import umula0
.include "atari7800.inc"
.include "extzp.inc"
@@ -51,32 +52,6 @@ blink_time:
.code
;---------------------------------------------------------------------------
; 8x16 routine
umula0:
ldy #8 ; Number of bits
lda #0
lsr ptr7800 ; Get first bit into carry
@L0: bcc @L1
clc
adc ptrtmp
tax
lda ptrtmp+1 ; hi byte of left op
adc ptr7800+1
sta ptr7800+1
txa
@L1: ror ptr7800+1
ror a
ror ptr7800
dey
bne @L0
tax
lda ptr7800 ; Load the result
rts
;-----------------------------------------------------------------------------
; Calculate cursorzone address
; You also need to set the cursorzone to point to the correct cursor Header