home *** CD-ROM | disk | FTP | other *** search
/ .net 1998 February / netCD41.iso / pc / DEMO16.DIR / Internal_96.ls < prev    next >
Encoding:
Text File  |  1997-12-08  |  401 b   |  19 lines
  1. on enterFrame
  2.   global pointCursor
  3.   repeat with n = 23 to 32
  4.     if rollOver(n) then
  5.       if not (the puppet of sprite n) then
  6.         puppetSprite(n, 1)
  7.         set the cursor of sprite n to pointCursor
  8.         set the member of sprite n to the number of the member of sprite n + 1
  9.       end if
  10.       next repeat
  11.     end if
  12.     puppetSprite(n, 0)
  13.   end repeat
  14. end
  15.  
  16. on exitFrame
  17.   go(the frame)
  18. end
  19.