home *** CD-ROM | disk | FTP | other *** search
/ Spawn Figure Collection / spawn collection cd.iso / setup / data1.cab / Program_Executable_Files / Collection.dir / 00048.ls < prev    next >
Encoding:
Text File  |  1998-01-19  |  690 b   |  28 lines

  1. on edganim
  2.   repeat with t = 1 to 5
  3.     set the puppet of sprite (t + 20) to 1
  4.     if rollOver(t + 20) then
  5.       set the blend of sprite (t + 20) to 100
  6.       next repeat
  7.     end if
  8.     set tmp to the blend of sprite (t + 20)
  9.     set tmp to tmp - 25
  10.     if tmp < 0 then
  11.       set tmp to 0
  12.     end if
  13.     set the blend of sprite (t + 20) to tmp
  14.   end repeat
  15.   dispselectedgroup()
  16. end
  17.  
  18. on dispselectedgroup
  19.   global gegroup
  20.   if gegroup <= 5 then
  21.     set tmp to the number of member "LRegular"
  22.     set the puppet of sprite 26 to 1
  23.     set the castNum of sprite 26 to ((gegroup - 1) * 2) + tmp
  24.     set the loc of sprite 26 to point(270, 60)
  25.     set the visible of sprite 26 to 1
  26.   end if
  27. end
  28.