home *** CD-ROM | disk | FTP | other *** search
/ Shocking The Web CD-ROM / SHOCK_CD.ISO / pc / tutorial / devglry / elementl / source / main.dir / 00032.ls < prev    next >
Encoding:
Text File  |  1996-11-11  |  429 b   |  23 lines
  1. on enterFrame
  2.   global gQuestionLock
  3.   if rollOver(3) then
  4.     cursor([1, 2])
  5.   else
  6.     cursor(-1)
  7.   end if
  8.   repeat with x = 10 to 13
  9.     if rollOver(x) = 1 then
  10.       set the foreColor of sprite x to 255
  11.       set the backColor of sprite x to 11
  12.       updateStage()
  13.       next repeat
  14.     end if
  15.     set the foreColor of sprite x to 255
  16.     set the backColor of sprite x to 0
  17.   end repeat
  18. end
  19.  
  20. on exitFrame
  21.   go(the frame)
  22. end
  23.