home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Magazin 1997 March / Image.iso / wd.dxr / Wettauswahl_81_NotOKBox.ls < prev    next >
Encoding:
Text File  |  1996-10-28  |  521 b   |  21 lines
  1. on mouseUp
  2.   global gNoPlayers, gWetten, gfirstOkKlick
  3.   if gfirstOkKlick then
  4.     if gNoPlayers = count(gWetten) then
  5.       set gfirstOkKlick to 0
  6.       set the visible of sprite 31 to 1
  7.       updateStage()
  8.       playsound(1, "ok", 1)
  9.       repeat with i = 1 to 48
  10.         set the puppet of sprite i to (i <> 48) and (i <> 36)
  11.       end repeat
  12.       set the visible of sprite 48 to 1
  13.       KickBetVideo()
  14.       unLoad("WettVideo")
  15.       go("WettauswahlOk")
  16.     else
  17.       playsound(2, "Sprech8")
  18.     end if
  19.   end if
  20. end
  21.