AppleScript_finderLib/Quick_Start_File.applescript at master · ianthekirkland/AppleScript_finderLib · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
---- FinderLib Quick Start File -----

-- load library
set _finderLib to load script alias ((path to home folder as text) & "Library:Script Libraries:" & "AppleScript_finderLib.scpt")

-- put the library to work
tell _finderLib

	set _items to getSelection()
	--->  {item, item, item, ...}

	set _files to getOnlyFiles(_items)
	--->  {file, file, file, ...}

	set _folders to getOnlyFolders(_items)
	--->  {folder, folder, folder, ...}

	set _item to getFirstItem(_items)
	--->  item

	set _names to getNames(_items)
	--->  {fullname, fullname, fullname, ...}

	set _basenames to getBasenames(_items)
	--->  {basename, basename, basename, ...}

	set _firstItemBasename to getBasenameOfFirstItem(_items)
	--->  basename

	set _basenamesFiles to getBasenamesOfOnlyFiles(_items)
	--->  {basename, basename, basename, ...}

	set _extensions to getExtensions(_items)
	--->  {extension, extension, [null], ...}

	set _extensionsFiles to getExtensionsOfOnlyFiles(_items)
	--->  {extension, extension, extension, ...}

	set _extensionsToggled to toggleExtensionsHidden(_items)
	--->  (shows/hides extensions)

	set _paths to getPosixPaths(_items)
	--->  {POSIX path, POSIX path, POSIX path, ...}

	set _pathsQ to getPosixPathsQ(_items)
	--->  {'POSIX path', 'POSIX path', 'POSIX path', ...}

	set _pathsShell to getEscapedPosixArray(_items)
	--->  "(EscapedPOSIXpath EscapedPOSIXpath EscapedPOSIXpath ...)"

	set _pathsHFS to getHFSPaths(_items)
	--->  {HFS path, HFS path, HFS path, ...}

	set _pathsHFSQ to getHFSPathsQ(_items)
	--->  {'HFS path', 'HFS path', 'HFS path', ...}

	set _pathsParent to getParentPosix(_items)
	--->  {parent POSIX path, parent POSIX path, parent POSIX path, ...}

	set _pathsParentHFS to getParentHFS(_items)
	--->  {parent HFS path, parent HFS path, parent HFS path, ...}

	set _basename to getBasenameOfItem(_item)
	--->  basename

	set _name_ext to getNameAndExt(_item)
	--->  {name, extension}

	set _comment to getCommentOfItem(_item)
	--->  comment

	set _parent to getContainerOfItem(_item)
	--->  parent folder

	set _properties to getPropertiesOfItem(_item)
	--->  {property:value, property:value, property:value, ...}

	set _parentAlias to getParentAlias(_alias)
	--->  parent alias

	set _conjuredPaths to appendBasenamesToParentPOSIX(_basenames, _pathParent)
	--->  {full POSIX path, full POSIX path, full POSIX path, ...}

end tell