2012-06-10 21:05:51 +00:00
|
|
|
;
|
|
|
|
; Oliver Schmidt, 2012-06-10
|
|
|
|
;
|
2018-03-07 22:04:33 +00:00
|
|
|
; This module supplies an AppleSingle version 2 file header + entry with
|
|
|
|
; ID 11 according to https://tools.ietf.org/rfc/rfc1740.txt Appendix A.
|
2012-06-10 21:05:51 +00:00
|
|
|
;
|
|
|
|
|
2013-05-09 11:56:54 +00:00
|
|
|
.export __EXEHDR__ : absolute = 1 ; Linker referenced
|
2018-03-07 22:04:33 +00:00
|
|
|
.import __FILETYPE__ ; Linker generated
|
2016-03-17 20:07:19 +00:00
|
|
|
.import __MAIN_START__, __MAIN_LAST__ ; Linker generated
|
2012-06-10 21:05:51 +00:00
|
|
|
|
2018-03-07 22:04:33 +00:00
|
|
|
; ------------------------------------------------------------------------
|
|
|
|
|
|
|
|
; Data Fork
|
|
|
|
ID01_LENGTH = __MAIN_LAST__ - __MAIN_START__
|
|
|
|
ID01_OFFSET = ID01 - START
|
|
|
|
|
|
|
|
; ProDOS File Info
|
|
|
|
ID11_LENGTH = ID01 - ID11
|
|
|
|
ID11_OFFSET = ID11 - START
|
|
|
|
|
2012-06-10 21:05:51 +00:00
|
|
|
; ------------------------------------------------------------------------
|
|
|
|
|
|
|
|
.segment "EXEHDR"
|
|
|
|
|
2018-03-07 22:04:33 +00:00
|
|
|
START: .byte $00, $05, $16, $00 ; Magic number
|
|
|
|
.byte $00, $02, $00, $00 ; Version number
|
|
|
|
.res 16 ; Filler
|
|
|
|
.byte 0, 2 ; Number of entries
|
|
|
|
.byte 0, 0, 0, 1 ; Entry ID 1 - Data Fork
|
|
|
|
.byte 0, 0, >ID01_OFFSET, <ID01_OFFSET ; Offset
|
|
|
|
.byte 0, 0, >ID01_LENGTH, <ID01_LENGTH ; Length
|
|
|
|
.byte 0, 0, 0, 11 ; Entry ID 11 - ProDOS File Info
|
|
|
|
.byte 0, 0, >ID11_OFFSET, <ID11_OFFSET ; Offset
|
|
|
|
.byte 0, 0, >ID11_LENGTH, <ID11_LENGTH ; Length
|
|
|
|
ID11: .byte 0, %11000011 ; Access - Destroy, Rename, Write, Read
|
|
|
|
.byte >__FILETYPE__, <__FILETYPE__ ; File Type
|
|
|
|
.byte 0, 0 ; Auxiliary Type high
|
|
|
|
.byte >__MAIN_START__, <__MAIN_START__ ; Auxiliary Type low
|
|
|
|
ID01:
|