BBS in a Box 10

home *** CD-ROM | disk | FTP | other *** search

/ BBS in a Box 10 / BBS In A Box Volume X (AMUG) (January 1994).bin / Files / System7 tools / AppleScript / Script Tools.cpt / Script Tools / Examples / Choose Folder Example < prev next >

MacBinary | 1993-06-17 | 1.3 KB | [TEXT/ToyS]

open in:

MacOS 8.1 extracted |

Win98 extracted |

DOS extracted

view JSON data |

view as text

This file was processed as: MacBinary (archive/macBinary).

You can browse this item here: Choose Folder Example

Confidence	Program	Detection	Match Type	Support
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, inited, Thu Jun 17 09:52:30 1993, modified Thu Jun 17 09:52:30 1993, creator 'ToyS', type ASCII, 368 bytes "Choose Folder Example" , at 0x1f0 670 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default

id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[ToyS]`

hex view

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 15 43 68 6f 6f 73 65 | 20 46 6f 6c 64 65 72 20 |..Choose| Folder |
|00000010| 45 78 61 6d 70 6c 65 00 | 00 00 00 00 00 00 00 00 |Example.|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 54 6f 79 | 53 01 00 00 00 00 00 00 |.TEXTToy|S.......|
|00000050| 00 00 00 00 00 01 70 00 | 00 02 9e a8 46 27 9e a8 |......p.|....F'..|
|00000060| 46 27 9e 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |F'......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 22 3d 00 00 |........|...."=..|
|00000080| 73 65 74 20 66 6f 6c 64 | 65 72 4f 4b 20 74 6f 20 |set fold|erOK to |
|00000090| 74 72 75 65 0d 74 72 79 | 0d 09 73 65 74 20 61 72 |true.try|..set ar|
|000000a0| 63 68 69 76 65 46 6f 6c | 64 65 72 20 74 6f 20 63 |chiveFol|der to c|
|000000b0| 68 6f 6f 73 65 20 66 6f | 6c 64 65 72 20 77 69 74 |hoose fo|lder wit|
|000000c0| 68 20 70 72 6f 6d 70 74 | 20 22 50 6c 65 61 73 65 |h prompt| "Please|
|000000d0| 20 73 65 6c 65 63 74 20 | 61 6e 20 41 72 63 68 69 | select |an Archi|
|000000e0| 76 65 20 66 6f 6c 64 65 | 72 3a 22 0d 6f 6e 20 65 |ve folde|r:".on e|
|000000f0| 72 72 6f 72 20 65 72 72 | 54 65 78 74 20 6e 75 6d |rror err|Text num|
|00000100| 62 65 72 20 65 72 72 4e | 75 6d 0d 09 64 69 73 70 |ber errN|um..disp|
|00000110| 6c 61 79 20 64 69 61 6c | 6f 67 20 22 43 68 6f 6f |lay dial|og "Choo|
|00000120| 73 65 20 66 6f 6c 64 65 | 72 20 63 61 6e 63 65 6c |se folde|r cancel|
|00000130| 65 64 22 20 62 75 74 74 | 6f 6e 73 20 7b 22 4f 4b |ed" butt|ons {"OK|
|00000140| 22 7d 20 64 65 66 61 75 | 6c 74 20 62 75 74 74 6f |"} defau|lt butto|
|00000150| 6e 20 7b 22 4f 4b 22 7d | 0d 09 73 65 74 20 66 6f |n {"OK"}|..set fo|
|00000160| 6c 64 65 72 4f 4b 20 74 | 6f 20 66 61 6c 73 65 0d |lderOK t|o false.|
|00000170| 65 6e 64 20 74 72 79 0d | 0d 69 66 20 66 6f 6c 64 |end try.|.if fold|
|00000180| 65 72 4f 4b 20 74 68 65 | 6e 0d 09 64 69 73 70 6c |erOK the|n..displ|
|00000190| 61 79 20 64 69 61 6c 6f | 67 20 22 53 65 6c 65 63 |ay dialo|g "Selec|
|000001a0| 74 65 64 20 66 6f 6c 64 | 65 72 3a 20 d2 22 20 26 |ted fold|er: ." &|
|000001b0| 20 61 72 63 68 69 76 65 | 46 6f 6c 64 65 72 20 26 | archive|Folder &|
|000001c0| 20 22 d3 22 20 62 75 74 | 74 6f 6e 73 20 7b 22 4f | "." but|tons {"O|
|000001d0| 4b 22 7d 20 64 65 66 61 | 75 6c 74 20 62 75 74 74 |K"} defa|ult butt|
|000001e0| 6f 6e 20 7b 22 4f 4b 22 | 7d 0d 65 6e 64 20 69 66 |on {"OK"|}.end if|
|000001f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 00 00 01 00 00 00 02 44 | 00 00 01 44 00 00 00 5a |.......D|...D...Z|
|00000210| 00 00 89 0a 07 66 6c 6f | 61 74 2e 68 02 00 00 00 |.....flo|at.h....|
|00000220| 54 45 58 54 4b 41 48 4c | 01 00 00 34 00 00 00 00 |TEXTKAHL|...4....|
|00000230| 15 43 68 6f 6f 73 65 20 | 46 6f 6c 64 65 72 20 45 |.Choose |Folder E|
|00000240| 78 61 6d 70 6c 65 02 00 | 00 00 50 61 72 74 53 49 |xample..|..PartSI|
|00000250| 00 00 50 61 72 74 53 49 | 54 21 00 00 00 00 00 00 |..PartSI|T!......|
|00000260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000270| 00 00 a8 b3 c5 ac 00 00 | 00 00 00 00 02 9e 00 00 |........|........|
|00000280| 00 00 0e 00 00 00 89 0a | 08 6c 69 6d 69 74 73 2e |........|.limits.|
|00000290| 68 00 02 00 00 00 54 45 | 58 54 4b 41 48 4c 01 00 |h.....TE|XTKAHL..|
|000002a0| 00 34 00 40 00 00 00 00 | 89 12 00 00 00 00 03 23 |.4.@....|.......#|
|000002b0| 00 00 0a 00 00 00 00 00 | 00 00 00 00 00 00 a7 fa |........|........|
|000002c0| e0 52 a7 e8 c0 42 00 00 | 00 00 00 00 00 00 00 00 |.R...B..|........|
|000002d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 ac b1 00 01 |........|........|
|000002e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002f0| 00 00 00 00 00 00 00 00 | 0e 00 00 00 89 0a 08 6c |........|.......l|
|00000300| 00 00 00 e8 43 68 6f 6f | 73 65 20 46 6f 6c 64 65 |....Choo|se Folde|
|00000310| 72 20 41 64 64 69 74 69 | 6f 6e 20 45 78 61 6d 70 |r Additi|on Examp|
|00000320| 6c 65 0d 43 6f 70 79 72 | 69 67 68 74 20 a9 20 31 |le.Copyr|ight . 1|
|00000330| 39 39 33 20 4d 61 72 6b | 20 41 6c 6c 64 72 69 74 |993 Mark| Alldrit|
|00000340| 74 0d 41 6c 6c 20 52 69 | 67 68 74 73 20 52 65 73 |t.All Ri|ghts Res|
|00000350| 65 72 76 65 64 0d 0d 54 | 68 69 73 20 73 63 72 69 |erved..T|his scri|
|00000360| 70 74 20 69 6c 6c 75 73 | 74 72 61 74 65 73 20 68 |pt illus|trates h|
|00000370| 6f 77 20 74 6f 20 75 73 | 65 20 74 68 65 20 53 63 |ow to us|e the Sc|
|00000380| 72 69 70 74 20 54 6f 6f | 6c 73 20 43 68 6f 6f 73 |ript Too|ls Choos|
|00000390| 65 20 46 6f 6c 64 65 72 | 20 63 6f 6d 6d 61 6e 64 |e Folder| command|
|000003a0| 2e 20 20 54 68 65 20 73 | 63 72 69 70 74 20 61 6c |.  The s|cript al|
|000003b0| 73 6f 20 73 68 6f 77 73 | 20 68 6f 77 20 74 6f 20 |so shows| how to |
|000003c0| 63 68 65 63 6b 20 69 66 | 20 74 68 65 20 75 73 65 |check if| the use|
|000003d0| 72 20 70 72 65 73 73 65 | 64 20 74 68 65 20 43 61 |r presse|d the Ca|
|000003e0| 6e 63 65 6c 20 62 75 74 | 74 6f 6e 2e 00 00 00 3e |ncel but|ton....>|
|000003f0| 00 03 00 00 00 00 00 0c | 00 09 00 10 00 00 00 0a |........|........|
|00000400| 00 00 00 00 00 00 00 00 | 00 51 00 0e 00 0a 00 10 |........|.Q......|
|00000410| 00 00 00 0c 00 00 00 00 | 00 00 00 00 00 53 00 0c |........|.....S..|
|00000420| 00 09 00 16 00 00 00 0a | 00 00 00 00 00 00 00 00 |........|........|
|00000430| 00 12 00 2b 00 04 01 55 | 02 0b 00 2b 00 04 01 7e |...+...U|...+...~|
|00000440| 02 6a 00 00 00 00 01 00 | 00 00 02 44 00 00 01 44 |.j......|...D...D|
|00000450| 00 00 00 5a 00 54 2c fc | 0b 06 00 00 00 1c 00 5a |...Z.T,.|.......Z|
|00000460| 00 02 54 45 58 54 00 00 | 00 1a 73 74 79 6c 00 00 |..TEXT..|..styl..|
|00000470| 00 26 57 50 6f 73 00 00 | 00 32 04 68 ff ff 00 00 |.&WPos..|.2.h....|
|00000480| 00 00 00 54 2a fc 04 68 | ff ff 00 00 00 ec 00 54 |...T*..h|.......T|
|00000490| 2a f4 00 80 ff ff 00 00 | 01 2e 00 54 2a f8 00 00 |*.......|...T*...|
|000004a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+