Apple-2-SW/a2d
1
0
Fork 0
mirror of https://github.com/mi57730/a2d.git synced 2025-01-22 09:29:52 +00:00
Code Issues Projects Releases Wiki Activity

constants

Browse Source
This commit is contained in:
Joshua Bell 2018-03-05 21:27:41 -08:00
parent c80cef0b30
commit 53dcca3bfc
3 changed files with 22 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
desktop/desktop.s
View File

@ -7416,7 +7416,7 @@ L4F68: .byte $00
L4F69: .byte $00 L4F69: .byte $00
;; access = destroy/rename/write/read ;; access = destroy/rename/write/read
DEFINE_CREATE_PARAMS create_params, path_buffer, %11000011, FT_DIRECTORY,, ST_LINKED_DIRECTORY DEFINE_CREATE_PARAMS create_params, path_buffer, ACCESS_DEFAULT, FT_DIRECTORY,, ST_LINKED_DIRECTORY
path_buffer: path_buffer:
.res 65, 0 ; buffer is used elsewhere too .res 65, 0 ; buffer is used elsewhere too
@ -15487,7 +15487,7 @@ L972E: .res 5, 0
DEFINE_OPEN_PARAMS open_params5, $1FC0, $1100 DEFINE_OPEN_PARAMS open_params5, $1FC0, $1100
DEFINE_READ_PARAMS read_params6, $1500, $AC0 DEFINE_READ_PARAMS read_params6, $1500, $AC0
DEFINE_WRITE_PARAMS write_params, $1500, $AC0 DEFINE_WRITE_PARAMS write_params, $1500, $AC0
DEFINE_CREATE_PARAMS create_params3, $1FC0, %11000011 DEFINE_CREATE_PARAMS create_params3, $1FC0, ACCESS_DEFAULT
DEFINE_CREATE_PARAMS create_params2, $1FC0 DEFINE_CREATE_PARAMS create_params2, $1FC0
.byte $00,$00 .byte $00,$00
@ -15814,7 +15814,7 @@ L9AAA: lda file_info_params2,y
dey dey
cpy #$02 cpy #$02
bne L9AAA bne L9AAA
lda #%11000011 lda #ACCESS_DEFAULT
sta create_params2::access sta create_params2::access
lda LE05B lda LE05B
beq L9B23 beq L9B23
@ -16308,7 +16308,7 @@ L9F62: yax_call JT_MLI_RELAY, GET_FILE_INFO, file_info_params2
lda file_info_params2::access lda file_info_params2::access
and #$80 and #$80
bne L9F8D bne L9F8D
lda #$C3 lda #ACCESS_DEFAULT
sta file_info_params2::access sta file_info_params2::access
lda #7 ; param count for SET_FILE_INFO lda #7 ; param count for SET_FILE_INFO
sta file_info_params2 sta file_info_params2
@ -16366,7 +16366,7 @@ L9FC2: yax_call JT_MLI_RELAY, DESTROY, destroy_params
bne LA001 bne LA001
L9FFE: jmp LA39F L9FFE: jmp LA39F
LA001: lda #$C3 LA001: lda #ACCESS_DEFAULT
sta file_info_params2::access sta file_info_params2::access
lda #7 ; param count for SET_FILE_INFO lda #7 ; param count for SET_FILE_INFO
sta file_info_params2 sta file_info_params2
@ -16531,7 +16531,7 @@ LA18A: lda file_info_params2::storage_type
beq LA1C0 beq LA1C0
bit L918B bit L918B
bpl LA19E bpl LA19E
lda #%11000011 lda #ACCESS_DEFAULT
bne LA1A0 bne LA1A0
LA19E: lda #$21 LA19E: lda #$21
LA1A0: sta file_info_params2::access LA1A0: sta file_info_params2::access
@ -16834,7 +16834,7 @@ LA425: .byte 0
.proc LA426 .proc LA426
jsr LA46D jsr LA46D
lda #$C3 lda #ACCESS_DEFAULT
sta file_info_params3::access sta file_info_params3::access
jsr LA479 jsr LA479
lda file_info_params2::file_type lda file_info_params2::file_type

18
desktop/sys.s
View File

@ -85,7 +85,7 @@ L23DF: .byte $00,$00,$00
DEFINE_READ_PARAMS read_srcfile_params, copy_buffer, max_copy_count DEFINE_READ_PARAMS read_srcfile_params, copy_buffer, max_copy_count
DEFINE_WRITE_PARAMS write_dstfile_params, copy_buffer, max_copy_count DEFINE_WRITE_PARAMS write_dstfile_params, copy_buffer, max_copy_count
DEFINE_CREATE_PARAMS create_params, path0, %11000011, 0, 0 DEFINE_CREATE_PARAMS create_params, path0, ACCESS_DEFAULT, 0, 0
.byte $07 .byte $07
.addr path0 .addr path0
.byte $00 .byte $00
@ -292,7 +292,7 @@ str_slash_desktop:
.proc file_info_ovl .proc file_info_ovl
.byte $A ; param_count .byte $A ; param_count
.addr 0 ; pathname .addr 0 ; pathname
.byte %11000011 ; access .byte ACCESS_DEFAULT ; access
.byte FT_DIRECTORY ; filetype .byte FT_DIRECTORY ; filetype
.word 0 ; aux_type .word 0 ; aux_type
.byte ST_LINKED_DIRECTORY ; storage_type .byte ST_LINKED_DIRECTORY ; storage_type
@ -1007,7 +1007,7 @@ L30E0: .res 5, 0
DEFINE_READ_PARAMS read_params7, $1100, $0B00 DEFINE_READ_PARAMS read_params7, $1100, $0B00
DEFINE_WRITE_PARAMS write_params3, $1100, $0B00 DEFINE_WRITE_PARAMS write_params3, $1100, $0B00
DEFINE_CREATE_PARAMS create_params3, path1, %11000011 DEFINE_CREATE_PARAMS create_params3, path1, ACCESS_DEFAULT
DEFINE_CREATE_PARAMS create_params2, path1, 0 DEFINE_CREATE_PARAMS create_params2, path1, 0
@ -1240,7 +1240,7 @@ L34EE: sta L353A
dey dey
cpy #3 cpy #3
bne :- bne :-
lda #%11000011 lda #ACCESS_DEFAULT
sta create_params2::access sta create_params2::access
jsr L35A9 jsr L35A9
bcc L350B bcc L350B
@ -1252,9 +1252,9 @@ L350D: lda get_file_info_params2::create_date,x
dex dex
bpl L350D bpl L350D
lda create_params2::storage_type lda create_params2::storage_type
cmp #$0F cmp #ST_VOLUME_DIRECTORY
bne L3522 bne L3522
lda #$0D lda #ST_LINKED_DIRECTORY
sta create_params2::storage_type sta create_params2::storage_type
L3522: MLI_CALL CREATE, create_params2 L3522: MLI_CALL CREATE, create_params2
beq :+ beq :+
@ -1410,7 +1410,7 @@ L36C1: ldx #7
dex dex
cpx #3 cpx #3
bne :- bne :-
lda #$C3 lda #ACCESS_DEFAULT
sta create_params3::access sta create_params3::access
ldx #$03 ldx #$03
L36D5: lda get_file_info_params2::create_date,x L36D5: lda get_file_info_params2::create_date,x
@ -1418,9 +1418,9 @@ L36D5: lda get_file_info_params2::create_date,x
dex dex
bpl L36D5 bpl L36D5
lda create_params3::storage_type lda create_params3::storage_type
cmp #$0F cmp #ST_VOLUME_DIRECTORY
bne L36EA bne L36EA
lda #$0D lda #ST_LINKED_DIRECTORY
sta create_params3::storage_type sta create_params3::storage_type
L36EA: MLI_CALL CREATE, create_params3 L36EA: MLI_CALL CREATE, create_params3
clc clc

6
inc/prodos.inc
View File

@ -89,6 +89,12 @@ FT_S16 := $B3 ; IIgs Application Program
FT_BASIC := $FC FT_BASIC := $FC
FT_SYSTEM := $FF FT_SYSTEM := $FF
;;; ============================================================
;;; Access
;;; ============================================================
ACCESS_DEFAULT := %11000011
;;; ============================================================ ;;; ============================================================
;;; Storage Types ;;; Storage Types
;;; ============================================================ ;;; ============================================================