home *** CD-ROM | disk | FTP | other *** search
/ Hope PC Multimedia SuperPack 2 / HOMEPC.iso / TAROT / DOWNLOAD / VT3.ZIP / C1.DXR / 00006.ls < prev    next >
Encoding:
Text File  |  1995-11-02  |  606 b   |  30 lines
  1. on mouseDown
  2.   global Cnt, Opt
  3.   set Cnt to the controlDown
  4.   set Opt to the optionDown
  5.   puppetSound("Ban_Down")
  6.   puppetSprite(21, 1)
  7.   set the castNum of sprite 21 to the number of cast "Banner Click"
  8.   updateStage()
  9. end
  10.  
  11. on mouseUp
  12.   global DemoFrame, retMovie, Opt, state
  13.   set the castNum of sprite 21 to the number of cast "Banner Norm"
  14.   puppetSound("Ban_Up")
  15.   updateStage()
  16.   puppetSprite(21, 0)
  17.   if Opt then
  18.     keySound("VTSCELIN")
  19.   else
  20.     set state to "done"
  21.     cursor(4)
  22.     releaseSprites()
  23.     if the controlDown then
  24.       go("leave")
  25.     else
  26.       go("Bye")
  27.     end if
  28.   end if
  29. end
  30.