home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Magazin 1997 March / Image.iso / wd.dxr / Wettauswahl_51_WettAuswahlSensor.ls < prev    next >
Encoding:
Text File  |  1996-10-28  |  402 b   |  17 lines
  1. on mouseUp
  2.   KickBetVideo()
  3.   repeat with i = 3 to 6
  4.     set the visible of sprite i to (36 + i) = the clickOn
  5.   end repeat
  6.   playsound(1, "Auswahl")
  7.   updateStage()
  8.   beBusy()
  9.   SetBetVideo(wettnr(the clickOn - 38))
  10.   set the visible of sprite 36 to 1
  11.   set the movieTime of sprite 36 to 5
  12.   updateStage()
  13.   StopBetVideo()
  14.   beFree()
  15.   SpriteCursor([36, 37], ["CursorFinger", "CursorFingerMask"])
  16. end
  17.