Identify GET_STATE

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

View File

@ -67,8 +67,10 @@ A2D_SET_STATE := $04 ; Set full drawing state
;; .byte tmask AND mask for text, default $7F ;; .byte tmask AND mask for text, default $7F
;; .addr font A2D_DEFAULT_FONT ;; .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) ;; (input length 0 bytes)
;; (output length 2 bytes)
;; .addr state (out)
A2D_SET_BOX := $06 ; Set just the drawing box, subset of full state A2D_SET_BOX := $06 ; Set just the drawing box, subset of full state
;; (input length 16 bytes) ;; (input length 16 bytes)

View File

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

File diff suppressed because it is too large Load Diff