home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 - Expo 2000 / Image.iso / t-online / show / t_intro.dxr / 00049.ls < prev    next >
Encoding:
Text File  |  1996-11-25  |  443 b   |  18 lines
  1. on exitFrame
  2.   global balkenT1, balkenT2, balkenT3, balkenT4, balkenT5, schalterT4, schalterT5, balkenges, infoline, listeKoordinaten, a
  3.   set balkenT1 to 0
  4.   set balkenT2 to 0
  5.   set balkenT3 to 0
  6.   set balkenT4 to 0
  7.   set balkenT5 to 0
  8.   set schalterT4 to 0
  9.   set schalterT5 to 0
  10.   set infoline to 0
  11.   repeat with a = 24 to 48
  12.     puppetSprite(a, 1)
  13.   end repeat
  14.   repeat with a = 33 to 48
  15.     set the blend of sprite a to 0
  16.   end repeat
  17. end
  18.