sys7.1-doc-wip/Interfaces/AIncludes/Finder.a

75 lines
2.3 KiB
Plaintext
Raw Normal View History

2019-07-27 14:37:48 +00:00
;
; File: Finder.a
;
; Contains: File types of alias files and other Finder/system things.
;
;
; Copyright © 1990-1991 by Apple Computer, Inc.
; All rights reserved
;
; This file is used in these builds: BigBang
;
; Change History (most recent first):
;
; <2> 11/27/91 JL Added Finder Flag definitions.
; <3> 1/30/91 gbm sab, #38: Change the already including this file variable to
; all uppercase (for security reasons)
; <2> 1/23/91 PP (FJS) Define kCustomIconResource constant.
; <1> 1/19/91 PP first checked in
; <0> 1/18/91 PP (ngk) Created from Internal:Asm:FinderPriv.a
;
; To Do:
;
IF &TYPE('__INCLUDINGFINDER__') = 'UNDEFINED' THEN
__INCLUDINGFINDER__ SET 1
kCustomIconResource EQU -16455 ; Custom icon family resource ID
kContainerFolderAliasType EQU 'fdrp' ; type for folder aliases
kContainerTrashAliasType EQU 'trsh' ; type for trash folder aliases
kContainerHardDiskAliasType EQU 'hdsk' ; type for hard disk aliases
kContainerFloppyAliasType EQU 'flpy' ; type for floppy aliases
kContainerServerAliasType EQU 'srvr' ; type for server aliases
kApplicationAliasType EQU 'adrp' ; type for application aliases
kContainerAliasType EQU 'drop' ; type for all other containers
; type for Special folder aliases
kSystemFolderAliasType EQU 'fasy'
kAppleMenuFolderAliasType EQU 'faam'
kStartupFolderAliasType EQU 'fast'
kPrintMonitorDocsFolderAliasType EQU 'fapn'
kPreferencesFolderAliasType EQU 'fapf'
kControlPanelFolderAliasType EQU 'fact'
kExtensionFolderAliasType EQU 'faex'
; type for AppleShare folder aliases
kExportedFolderAliasType EQU 'faet'
kDropFolderAliasType EQU 'fadr'
kSharedFolderAliasType EQU 'fash'
kMountedFolderAliasType EQU 'famn'
;Finder Flags
kIsOnDesk EQU $1
kColor EQU $E
;kColorReserved = $10
;kRequiresSwitchLaunch = $20
kIsShared EQU $40
;kHasNoINITs = $80
kHasBeenInited EQU $100
;kReserved = $200
kHasCustomIcon EQU $400
kIsStationary EQU $800
kNameLocked EQU $1000
kHasBundle EQU $2000
kIsInvisible EQU $4000
kIsAlias EQU $8000
ENDIF ; ...already included