-- card: 2956 from stack: in
-- bmap block id: 3588
-- flags: 0000
-- background id: 2660
-- name: 


-- part 4 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=3 top=2 right=36 bottom=37
-- title width / last selected line: 0
-- icon id / first selected line: 24613 / 24613
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 
----- HyperTalk script -----
on mouseUp
  if the windows contains "View" then
    close window "View"
  else
    picture "View",resource,rect,false
    set the rect of window "View" to "5,42,168,205"
    set the scroll of window "View" to "5,42"
    show window "View"
  end if
end mouseUp



-- part 5 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=226 top=121 right=203 bottom=308
-- 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: dragger


-- part 6 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=47 top=3 right=27 bottom=63
-- title width / last selected line: 0
-- icon id / first selected line: 8538 / 8538
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseDown
  if the windows contains "View" then
    get the scale of window "View"
    if it is 5 then
      beep
      exit mouseDown
    end if
    set the scale of window "View" to (it + 1)
    adjustWindow
  else
    beep
  end if
end mouseDown


-- part 7 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=67 top=3 right=27 bottom=83
-- title width / last selected line: 0
-- icon id / first selected line: 8539 / 8539
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseDown
  if the windows contains "View" then
    get the scale of window "View"
    if it is -2 then
      beep
      exit mouseDown
    end if
    set the scale of window "View" to (it - 1)
    adjustWindow
  else
    beep
  end if
end mouseDown


-- part 11 (button)
-- low flags: 00
-- high flags: 4002
-- rect: left=105 top=3 right=37 bottom=141
-- title width / last selected line: 0
-- icon id / first selected line: 22031 / 22031
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: BH
----- HyperTalk script -----
on mouseUp
  if the stacks contains "Beyond HyperCard" then doMenu "Close Stack"
  else go to card id 5710 of stack "Beyond HyperCard"
end mouseUp