mirror of
https://github.com/cc65/cc65.git
synced 2024-06-08 15:29:37 +00:00
ae7a38f3de
The functions return the character, or its attributes, that is at the current screen location of conio's cursor. The values can be used directly by the output functions to reproduce that screen character.
23 lines
500 B
ArmAsm
23 lines
500 B
ArmAsm
;
|
|
; 2017-06-08, Greg King
|
|
;
|
|
; unsigned char cpeekrevers (void);
|
|
;
|
|
; Atmos version
|
|
;
|
|
|
|
.export _cpeekrevers
|
|
|
|
.import setscrptr
|
|
.importzp ptr2
|
|
|
|
|
|
_cpeekrevers:
|
|
jsr setscrptr ; Set ptr2 and .Y to the cursor's address
|
|
lda (ptr2),y ; Get char
|
|
and #$80 ; get reverse bit
|
|
asl a
|
|
tax ; ldx #>$0000
|
|
rol a ; return boolean value
|
|
rts
|