home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Magazin 1997 March / Image.iso / wd.dxr / Wettauswahl_66_WettAuswahlLoop.ls < prev    next >
Encoding:
Text File  |  1996-10-28  |  1.6 KB  |  55 lines
  1. on exitFrame
  2.   global gBlinkCount, gLastMovieTime, gActiveBets, gLastTime
  3.   repeat with i = 1 to 4
  4.     if getOne(gActiveBets, wettnr(i)) > 0 then
  5.       SpriteCursor(17 + i - 1, "Finger")
  6.       set the visible of sprite (17 + i - 1) to 1
  7.       next repeat
  8.     end if
  9.     SpriteCursor(17 + i - 1, 0)
  10.     set the visible of sprite (17 + i - 1) to 0
  11.   end repeat
  12.   repeat with i = 34 to 35
  13.     set the visible of sprite i to 0
  14.   end repeat
  15.   if the movieRate of sprite 36 = 0 then
  16.     if rollOver(36) then
  17.       if the movieTime of sprite 36 <> 4 then
  18.         set the movieTime of sprite 36 to 5
  19.       end if
  20.     else
  21.       if the movieTime of sprite 36 <> 0 then
  22.         set the movieTime of sprite 36 to 1
  23.       end if
  24.     end if
  25.   end if
  26.   if (the movieRate of sprite 36 = 0) and the visible of sprite 36 then
  27.     set gBlinkCount to gBlinkCount + 1
  28.     if gBlinkCount > (the frameTempo / 3) then
  29.       set gBlinkCount to 0
  30.       set the visible of sprite 25 to not (the visible of sprite 25)
  31.     end if
  32.   end if
  33.   if the movieRate of sprite 36 = 1 then
  34.     if gLastMovieTime = the movieTime of sprite 36 then
  35.       if the timer > (gLastTime + 60) then
  36.         KickBetVideo()
  37.         updateStage()
  38.         SetBetVideo()
  39.         updateStage()
  40.         StopBetVideo()
  41.         updateStage()
  42.         set the visible of sprite 36 to 1
  43.       end if
  44.     else
  45.       set gLastMovieTime to the movieTime of sprite 36
  46.       set gLastTime to the timer
  47.     end if
  48.   end if
  49.   set the visible of sprite 44 to 1
  50.   set the visible of sprite 45 to 1
  51.   set the visible of sprite 48 to 1
  52.   set the visible of sprite 32 to 0
  53.   go(the frame)
  54. end
  55.