Apple-2-SW/a2d
1
0
Fork 0
mirror of https://github.com/mi57730/a2d.git synced 2024-11-25 10:30:50 +00:00
Code Issues Projects Releases Wiki Activity

Identify GET_STATE

Browse Source
This commit is contained in:
Joshua Bell 2017-10-12 08:04:27 -07:00
parent 40e32f8ea7
commit 4497a5eae4
3 changed files with 15851 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
a2d.inc
View File

@ -67,8 +67,10 @@ A2D_SET_STATE := $04 ; Set full drawing state
;; .byte tmask AND mask for text, default $7F
;; .addr font A2D_DEFAULT_FONT
;; $05 used in DeskTop but not DAs - icon click
A2D_GET_STATE := $05 ; Get pointer to active drawing state
;; (input length 0 bytes)
;; (output length 2 bytes)
;; .addr state (out)
A2D_SET_BOX := $06 ; Set just the drawing box, subset of full state
;; (input length 16 bytes)

9
desktop/s123_aux.s
View File

@ -282,7 +282,7 @@ a2d_jump_table:
.addr CFG_DISPLAY_IMPL ; $02 CFG_DISPLAY
.addr QUERY_SCREEN_IMPL ; $03 QUERY_SCREEN
.addr SET_STATE_IMPL ; $04 SET_STATE
.addr L5EB4 ; $05
.addr GET_STATE_IMPL ; $05 GET_STATE
.addr SET_BOX_IMPL ; $06 SET_BOX
.addr SET_FILL_MODE_IMPL ; $07 SET_FILL_MODE
.addr SET_PATTERN_IMPL ; $08 SET_PATTERN
@ -370,7 +370,7 @@ param_lengths:
PARAM_DEFN 1, $82, 0 ; $02
PARAM_DEFN 0, $00, 0 ; $03 QUERY_SCREEN
PARAM_DEFN 36, state, 0 ; $04 SET_STATE
PARAM_DEFN 0, $00, 0 ; $05
PARAM_DEFN 0, $00, 0 ; $05 GET_STATE
PARAM_DEFN 16, state_box, 0 ; $06 SET_BOX
PARAM_DEFN 1, state_fill, 0 ; $07 SET_FILL_MODE
PARAM_DEFN 8, state_pattern, 0 ; $08 SET_PATTERN
@ -3437,13 +3437,12 @@ prepare_state:
;;; ==================================================
;;; $05 IMPL
L5EB4:
.proc GET_STATE_IMPL
jsr apply_state_to_active_state
lda active_state
ldx active_state+1
;; fall through
.endproc
;; Store result (X,A) at params
store_xa_at_params:

15844
desktop/s4_main1.s
View File

File diff suppressed because it is too large Load Diff