-- card: 3004 from stack: in
-- bmap block id: 3791
-- flags: 0000
-- background id: 2686
-- name: 


-- part 6 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=45 top=138 right=180 bottom=106
-- title width / last selected line: 0
-- icon id / first selected line: 1020 / 1020
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 
----- HyperTalk script -----
on mouseUp
  show card field 1
end mouseUp



-- part 3 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=198 top=199 right=226 bottom=309
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Open Stack
----- HyperTalk script -----
on mouseUp
  SetDirectory ":Stacks"
  if the Result is empty then
    go to "the stack that you want"
  else
    put the Result
  end if
end mouseUp



-- part 4 (button)
-- low flags: 00
-- high flags: 8004
-- rect: left=204 top=251 right=285 bottom=307
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Edit Script
----- HyperTalk script -----
on mouseUp
  Edit script of card button "Open Stack"
end mouseUp



-- part 5 (field)
-- low flags: 81
-- high flags: 0004
-- rect: left=25 top=104 right=313 bottom=186
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: 
----- HyperTalk script -----
on mouseUp
  hide the target
end mouseUp


-- part contents for background part 6
----- text -----
SetDirectory XCMD

-- part contents for card part 5
----- text -----
This XCMD will set the Standard File dialog box to a folder whose pathname that you provide.  It is intended so that you can use a script similar to the one here and SFGetFile will open up into the directory containing all of your miscellaneous stacks.

This will not set SFGetFile to another disk, so it is best used on a hard disk.

Jon Pugh
pugh@nmfecc.arpa
(415) 423-4239