home *** CD-ROM | disk | FTP | other *** search
/ Digital Design Material S…es 2: Stone Material Raw / 石素材王.iso / pc / showpict / 00002.ls < prev    next >
Encoding:
Text File  |  1996-12-24  |  1.0 KB  |  41 lines
  1. on exitFrame
  2.   global showsize
  3.   if the commandDown then
  4.     if the optionDown then
  5.       if showsize = "1:2" then
  6.         cursor([the number of member "zoomNo", the number of member "zoomMask"])
  7.       else
  8.         cursor([the number of member "zoomDown", the number of member "zoomMask"])
  9.       end if
  10.     else
  11.       if showsize = "2:1" then
  12.         cursor([the number of member "zoomNo", the number of member "zoomMask"])
  13.       else
  14.         cursor([the number of member "zoomUp", the number of member "zoomMask"])
  15.       end if
  16.     end if
  17.   else
  18.     if rollOver(1) or rollOver(2) or rollOver(3) then
  19.       cursor([the number of member "hand", the number of member "handMask"])
  20.     else
  21.       cursor(-1)
  22.     end if
  23.   end if
  24.   if the mouseDown then
  25.     cursor([the number of member "handg", the number of member "handgMask"])
  26.   end if
  27.   go(the frame)
  28. end
  29.  
  30. on mouseDown
  31.   if the commandDown then
  32.     zoom()
  33.   else
  34.     if clickOn() = 0 then
  35.       repeat with i = 1 to 3
  36.         set the loc of sprite i to point(0, 0)
  37.       end repeat
  38.     end if
  39.   end if
  40. end
  41.