home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 June / Image.iso / aol / software / aolshow.dxr / 00002_Standardframescript.ls < prev    next >
Encoding:
Text File  |  1996-12-03  |  753 b   |  39 lines
  1. global myRO, lastRO
  2.  
  3. on idle
  4.   if not (the mouseDown) then
  5.     repeat with i = 40 to 47
  6.       set the visible of sprite i to 0
  7.     end repeat
  8.   end if
  9.   if rollOver() < 10 then
  10.     set the visible of sprite (lastRO + 20) to 0
  11.     set lastRO to 0
  12.     set myRO to 0
  13.   end if
  14.   repeat with i = 10 to 18
  15.     if rollOver(i) then
  16.       set myRO to i
  17.     end if
  18.   end repeat
  19.   if myRO = lastRO then
  20.     nothing()
  21.   else
  22.     set the visible of sprite (lastRO + 20) to 0
  23.     set the visible of sprite (myRO + 20) to 1
  24.     set lastRO to myRO
  25.   end if
  26. end
  27.  
  28. on exitFrame
  29.   go(the frame)
  30. end
  31.  
  32. on mouseDown
  33.   if (myRO > 9) and (myRO < 18) then
  34.     set the visible of sprite (myRO + 20) to 0
  35.     set the visible of sprite (myRO + 30) to 1
  36.   end if
  37.   updateStage()
  38. end
  39.