home *** CD-ROM | disk | FTP | other *** search
/ 1&1 Multimedia Trend 1996 11 B / MM_TREND.ISO / prog / t_online / t_4ser.dir / 00080.ls < prev    next >
Encoding:
Text File  |  1996-09-16  |  687 b   |  32 lines
  1. on startMovie
  2.   global balkenT1, balkenT2, BalkenT3, balkenT4, balkenT5, schalterT4, schalterT5, balkenges, infoline, listeKoordinaten, a
  3.   sound stop 1
  4.   sound stop 2
  5.   puppetSound(0)
  6.   set balkenT1 to 0
  7.   set balkenT2 to 0
  8.   set BalkenT3 to 0
  9.   set balkenT4 to 0
  10.   set balkenT5 to 0
  11.   set infoline to 0
  12.   repeat with a = 24 to 48
  13.     puppetSprite(a, 1)
  14.   end repeat
  15.   repeat with a = 33 to 48
  16.     set the blend of sprite a to 0
  17.   end repeat
  18.   repeat with a = 32 to 47
  19.     set the locH of sprite a to the locH of sprite a - 600
  20.   end repeat
  21. end
  22.  
  23. on stopMovie
  24.   global ser, schalterT4
  25.   puppetSound(0)
  26.   sound stop 1
  27.   sound stop 2
  28.   if schalterT4 = 1 then
  29.     set ser to 1
  30.   end if
  31. end
  32.