home *** CD-ROM | disk | FTP | other *** search
/ Blender Volume 2 #3 / Blender_2_3.iso / BLENDER / FILES / HOCKEY.DIR / 00012.ls < prev    next >
Encoding:
Text File  |  1996-04-01  |  394 b   |  21 lines
  1. on exitFrame
  2.   set flag to 1
  3.   repeat with i = 10 to 13
  4.     if not (the visible of sprite i) then
  5.       set flag to 0
  6.     end if
  7.   end repeat
  8.   if flag then
  9.     CLEANUP()
  10.     go("EXIT")
  11.   end if
  12.   repeat with n = 2 to 5
  13.     if rollOver(n) then
  14.       set the visible of sprite (n + 4) to 1
  15.       next repeat
  16.     end if
  17.     set the visible of sprite (n + 4) to 0
  18.   end repeat
  19.   go(the frame)
  20. end
  21.