mirror of
https://github.com/mi57730/a2d.git
synced 2024-09-30 22:58:13 +00:00
27 lines
718 B
PHP
27 lines
718 B
PHP
;;; ------------------------------
|
|
;;; A2Desktop
|
|
;;; ------------------------------
|
|
|
|
;;; Entry Points
|
|
A2D := $4000
|
|
UNKNOWN_CALL := $8E00
|
|
|
|
A2D_TEXT := $19 ; { .addr data, .byte len }
|
|
A2D_GET_BUTTON := $2A ; { .byte state (0=up, 1=down?, 2=released?) }
|
|
A2D_GET_MOUSE := $40 ; { .word x, .word y, ????...}
|
|
A2D_CLOSE_BTN := $43 ; { .byte closed, .byte ??, byte ?? } - enter loop
|
|
|
|
;;; Macros
|
|
.macro A2D_CALL op, addr
|
|
jsr A2D
|
|
.byte op
|
|
.addr addr
|
|
.endmacro
|
|
|
|
.macro A2D_DEFSTRING str ; String definition, for use with A2D_TEXT
|
|
.local data
|
|
.addr data
|
|
.byte .strlen(str)
|
|
data: .byte str
|
|
.endmacro
|