Apple-2-SW/prog8
1
0
Fork 0
mirror of https://github.com/irmen/prog8.git synced 2024-12-24 16:29:21 +00:00
Code Issues Projects Releases Wiki Activity

fix: don't ignore shape argument to cx16.mouse_config2

Browse Source
This commit is contained in:
Mark J. Reed 2022-10-29 17:10:06 -04:00
parent 5b35232ab4
commit c2f062a391
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
compiler/res/prog8lib/cx16/syslib.p8
View File

@ -393,9 +393,10 @@ asmsub kbdbuf_clear() {
asmsub mouse_config2(ubyte shape @A) clobbers (A, X, Y) { asmsub mouse_config2(ubyte shape @A) clobbers (A, X, Y) {
; -- convenience wrapper function that handles the screen resolution for mouse_config() for you ; -- convenience wrapper function that handles the screen resolution for mouse_config() for you
%asm {{ %asm {{
pha ; save shape
sec sec
jsr cx16.screen_mode ; set current screen mode and res in A, X, Y jsr cx16.screen_mode ; set current screen mode and res in A, X, Y
lda #1 pla ; get shape back
jmp cx16.mouse_config jmp cx16.mouse_config
}} }}
} }