mirror of
https://github.com/mi57730/a2d.git
synced 2024-11-29 22:49:28 +00:00
labels
This commit is contained in:
Joshua Bell
parent
dd94e57b61
commit
1b2738a48b
@ -41,8 +41,8 @@ INVOKER_FILENAME := $280 ; File to invoke (PREFIX must be set)
|
|||||||
.addr $85E9
|
.addr $85E9
|
||||||
|
|
||||||
L8522: php
|
L8522: php
|
||||||
lda $E904,x ; winfo7::mapbits ???
|
lda winfo7+MGTK::winfo_offset_port+5,x
|
||||||
sta $09
|
sta $08+1
|
||||||
ldy #$14
|
ldy #$14
|
||||||
ldx #$00
|
ldx #$00
|
||||||
L852C: lda ($08),y
|
L852C: lda ($08),y
|
||||||
@ -4640,7 +4640,8 @@ watch_cursor:
|
|||||||
|
|
||||||
LD343: .res 18, 0
|
LD343: .res 18, 0
|
||||||
LD355: .res 88, 0
|
LD355: .res 88, 0
|
||||||
LD3AD: .res 65, 0
|
LD3AD: .res 19, 0
|
||||||
|
LD3C0: .res 46, 0
|
||||||
|
|
||||||
LD3EE: .res 17, 0
|
LD3EE: .res 17, 0
|
||||||
LD3FF: .byte 0
|
LD3FF: .byte 0
|
||||||
@ -5130,7 +5131,9 @@ menu_id:.byte 0
|
|||||||
item_num:.byte 0
|
item_num:.byte 0
|
||||||
.endproc
|
.endproc
|
||||||
|
|
||||||
.byte $00,$00,$00,$00,$00,$00
|
LE25C: .byte 0
|
||||||
|
LE25D: .byte 0
|
||||||
|
.byte $00,$00,$00,$00
|
||||||
.byte $00,$04,$00,$00,$00
|
.byte $00,$04,$00,$00,$00
|
||||||
|
|
||||||
.proc checkitem_params
|
.proc checkitem_params
|
||||||
@ -5150,7 +5153,11 @@ menu_item: .byte 0
|
|||||||
disable: .byte 0
|
disable: .byte 0
|
||||||
.endproc
|
.endproc
|
||||||
|
|
||||||
.byte $00,$04,$00
|
.byte $00
|
||||||
|
|
||||||
|
LE270: .byte $04 ; number of items in startup menu?
|
||||||
|
|
||||||
|
.byte $00
|
||||||
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
||||||
|
|
||||||
.addr str_all
|
.addr str_all
|
||||||
@ -5309,9 +5316,13 @@ pos_col_date: DEFINE_POINT 231, 0, pos_col_date
|
|||||||
.proc text_buffer2
|
.proc text_buffer2
|
||||||
.addr data
|
.addr data
|
||||||
length: .byte 0
|
length: .byte 0
|
||||||
data: .res 55, 0
|
data: .res 49, 0
|
||||||
.endproc
|
.endproc
|
||||||
|
|
||||||
|
LE71D: .word 0
|
||||||
|
LE71F: .byte 0
|
||||||
|
.byte 0,0,0
|
||||||
|
|
||||||
;;; ==================================================
|
;;; ==================================================
|
||||||
|
|
||||||
.macro WINFO_DEFN id, label, buflabel
|
.macro WINFO_DEFN id, label, buflabel
|
||||||
@ -6296,11 +6307,11 @@ handle_keydown:
|
|||||||
|
|
||||||
menu_accelerators:
|
menu_accelerators:
|
||||||
lda event_params+1
|
lda event_params+1
|
||||||
sta $E25C
|
sta LE25C
|
||||||
lda event_params+2
|
lda event_params+2
|
||||||
beq L43A1
|
beq L43A1
|
||||||
lda #$01
|
lda #1
|
||||||
L43A1: sta $E25D
|
L43A1: sta LE25D
|
||||||
MGTK_RELAY_CALL MGTK::MenuKey, menu_click_params
|
MGTK_RELAY_CALL MGTK::MenuKey, menu_click_params
|
||||||
|
|
||||||
menu_dispatch2:
|
menu_dispatch2:
|
||||||
@ -8427,11 +8438,11 @@ L5464: lda active_window_id
|
|||||||
lda active_window_id
|
lda active_window_id
|
||||||
jsr window_lookup
|
jsr window_lookup
|
||||||
stax $06
|
stax $06
|
||||||
ldy #$1C
|
ldy #MGTK::winfo_offset_port+MGTK::grafport_offset_maprect
|
||||||
L5479: lda ($06),y
|
L5479: lda ($06),y
|
||||||
sta $E214,y
|
sta rect_E230-(MGTK::winfo_offset_port+MGTK::grafport_offset_maprect),y
|
||||||
iny
|
iny
|
||||||
cpy #$24
|
cpy #MGTK::winfo_offset_port+MGTK::grafport_offset_maprect+8
|
||||||
bne L5479
|
bne L5479
|
||||||
ldx #$00
|
ldx #$00
|
||||||
L5485: cpx cached_window_icon_count
|
L5485: cpx cached_window_icon_count
|
||||||
@ -11000,10 +11011,10 @@ L6C5F: txa
|
|||||||
asl a
|
asl a
|
||||||
tax
|
tax
|
||||||
lda LE202,x
|
lda LE202,x
|
||||||
sta $E71D
|
sta LE71D
|
||||||
sta $06
|
sta $06
|
||||||
lda LE202+1,x
|
lda LE202+1,x
|
||||||
sta $E71E
|
sta LE71D+1
|
||||||
sta $06+1
|
sta $06+1
|
||||||
lda LCBANK2
|
lda LCBANK2
|
||||||
lda LCBANK2
|
lda LCBANK2
|
||||||
@ -11013,10 +11024,10 @@ L6C5F: txa
|
|||||||
lda LCBANK1
|
lda LCBANK1
|
||||||
lda LCBANK1
|
lda LCBANK1
|
||||||
tya
|
tya
|
||||||
sta $E71F
|
sta LE71F
|
||||||
inc $E71D
|
inc LE71D
|
||||||
bne L6C8F
|
bne L6C8F
|
||||||
inc $E71E
|
inc LE71D+1
|
||||||
|
|
||||||
;; First row
|
;; First row
|
||||||
.proc L6C8F
|
.proc L6C8F
|
||||||
@ -11785,7 +11796,7 @@ L734A: lda LE1F1+1,x
|
|||||||
: stx L7446
|
: stx L7446
|
||||||
dex
|
dex
|
||||||
: inx
|
: inx
|
||||||
lda $E1F3,x
|
lda LE1F1+2,x
|
||||||
sta LE1F1+1,x
|
sta LE1F1+1,x
|
||||||
cpx LE1F1
|
cpx LE1F1
|
||||||
bne :-
|
bne :-
|
||||||
@ -11964,8 +11975,8 @@ L7512: lda ($06),y
|
|||||||
sta LE1B0,y
|
sta LE1B0,y
|
||||||
dey
|
dey
|
||||||
bpl L7512
|
bpl L7512
|
||||||
lda #$2F
|
lda #'/'
|
||||||
sta $E1B1
|
sta LE1B0+1
|
||||||
inc LE1B0
|
inc LE1B0
|
||||||
ldx LE1B0
|
ldx LE1B0
|
||||||
sta LE1B0,x
|
sta LE1B0,x
|
||||||
@ -13273,9 +13284,9 @@ start: ldy #$00
|
|||||||
asl a
|
asl a
|
||||||
rol L813C
|
rol L813C
|
||||||
clc
|
clc
|
||||||
adc $E71D
|
adc LE71D
|
||||||
sta $06
|
sta $06
|
||||||
lda $E71E
|
lda LE71D+1
|
||||||
adc L813C
|
adc L813C
|
||||||
sta $06+1
|
sta $06+1
|
||||||
lda LCBANK2
|
lda LCBANK2
|
||||||
@ -19707,32 +19718,32 @@ LBA7C: dey
|
|||||||
|
|
||||||
.proc LBABF
|
.proc LBABF
|
||||||
inc $08
|
inc $08
|
||||||
ldy #$00
|
ldy #0
|
||||||
ldx $08
|
ldx $08
|
||||||
LBAC5: cpx path_buf1
|
LBAC5: cpx path_buf1
|
||||||
beq LBAD5
|
beq LBAD5
|
||||||
inx
|
inx
|
||||||
iny
|
iny
|
||||||
lda path_buf1,x
|
lda path_buf1,x
|
||||||
sta $D3C2,y
|
sta LD3C0+2,y
|
||||||
jmp LBAC5
|
jmp LBAC5
|
||||||
|
|
||||||
LBAD5: iny
|
LBAD5: iny
|
||||||
sty $D3C1
|
sty LD3C0+1
|
||||||
ldx #$01
|
ldx #1
|
||||||
ldy $D3C1
|
ldy LD3C0+1
|
||||||
LBADE: cpx path_buf2
|
LBADE: cpx path_buf2
|
||||||
beq LBAEE
|
beq LBAEE
|
||||||
inx
|
inx
|
||||||
iny
|
iny
|
||||||
lda path_buf2,x
|
lda path_buf2,x
|
||||||
sta $D3C1,y
|
sta LD3C0+1,y
|
||||||
jmp LBADE
|
jmp LBADE
|
||||||
|
|
||||||
LBAEE: sty $D3C1
|
LBAEE: sty LD3C0+1
|
||||||
lda LD8EF
|
lda LD8EF
|
||||||
sta $D3C2
|
sta LD3C0+2
|
||||||
LBAF7: lda $D3C1,y
|
LBAF7: lda LD3C0+1,y
|
||||||
sta path_buf2,y
|
sta path_buf2,y
|
||||||
dey
|
dey
|
||||||
bpl LBAF7
|
bpl LBAF7
|
||||||
@ -19871,13 +19882,13 @@ LBC64: ldx path_buf2
|
|||||||
cpx #$01
|
cpx #$01
|
||||||
beq LBC79
|
beq LBC79
|
||||||
LBC6B: lda path_buf2,x
|
LBC6B: lda path_buf2,x
|
||||||
sta $D3C0,x
|
sta LD3C0,x
|
||||||
dex
|
dex
|
||||||
cpx #$01
|
cpx #$01
|
||||||
bne LBC6B
|
bne LBC6B
|
||||||
ldx path_buf2
|
ldx path_buf2
|
||||||
LBC79: dex
|
LBC79: dex
|
||||||
stx $D3C1
|
stx LD3C0+1
|
||||||
ldx path_buf1
|
ldx path_buf1
|
||||||
LBC80: lda path_buf1,x
|
LBC80: lda path_buf1,x
|
||||||
sta $D485,x
|
sta $D485,x
|
||||||
@ -19890,12 +19901,12 @@ LBC80: lda path_buf1,x
|
|||||||
sta path_buf2
|
sta path_buf2
|
||||||
lda path_buf1
|
lda path_buf1
|
||||||
clc
|
clc
|
||||||
adc $D3C1
|
adc LD3C0+1
|
||||||
tay
|
tay
|
||||||
pha
|
pha
|
||||||
ldx $D3C1
|
ldx LD3C0+1
|
||||||
beq LBCB3
|
beq LBCB3
|
||||||
LBCA6: lda $D3C1,x
|
LBCA6: lda LD3C0+1,x
|
||||||
sta path_buf2,y
|
sta path_buf2,y
|
||||||
dex
|
dex
|
||||||
dey
|
dey
|
||||||
@ -21027,7 +21038,7 @@ L0E36: inx
|
|||||||
lda DEVCNT
|
lda DEVCNT
|
||||||
clc
|
clc
|
||||||
adc #3
|
adc #3
|
||||||
sta $E270
|
sta LE270
|
||||||
|
|
||||||
lda #0
|
lda #0
|
||||||
sta slot
|
sta slot
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user