-- background: 2777 from stack: in
-- bmap block id: 3476
-- flags: 0000
-- background id: 0
-- name: 


-- part 1 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=21 top=310 right=335 bottom=47
-- title width / last selected line: 0
-- icon id / first selected line: 20689 / 20689
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Home
----- HyperTalk script -----
on mouseUp
  visual effect iris close
  go Home
end mouseUp



-- part 4 (button)
-- low flags: 00
-- high flags: A000
-- rect: left=11 top=39 right=95 bottom=74
-- title width / last selected line: 0
-- icon id / first selected line: 4479 / 4479
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Eject Internal
----- HyperTalk script -----
on mouseUp
  Ejector 1
end mouseUp



-- part 5 (button)
-- low flags: 00
-- high flags: A000
-- rect: left=7 top=114 right=172 bottom=79
-- title width / last selected line: 0
-- icon id / first selected line: 4479 / 4479
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Eject External
----- HyperTalk script -----
on mouseUp
  Ejector 2
end mouseUp



-- part 7 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=368 top=286 right=318 bottom=402
-- 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: right dogear
----- HyperTalk script -----
on mouseUp
  if the optionkey is down then pass mouseup
  -- this script handles a diagonally divided button, intended to be
  --  a right dogear
  put (item 1 of the clickLoc) - (item 1 of the rect of the target) into x
  put (item 4 of the rect of the target) - (item 2 of the clickLoc) into y
  if (x < y) then              -- click is in upper left
    visual scroll left very fast to gray
    visual scroll left very fast
    go next card
  else
    visual scroll right very fast to gray
    visual scroll right very fast
    go previous card
  end if
end mouseUp



-- part 8 (field)
-- low flags: 00
-- high flags: 0000
-- rect: left=235 top=296 right=313 bottom=280
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: pageNumber


-- part 9 (button)
-- low flags: 00
-- high flags: A000
-- rect: left=16 top=181 right=228 bottom=73
-- title width / last selected line: 0
-- icon id / first selected line: 26898 / 26898
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Install
----- HyperTalk script -----
on mouseUp
  put installRes (XCMD, Ejector) into it
  if it is empty then play oops
  else answer it
end mouseUp