home *** CD-ROM | disk | FTP | other *** search
/ Blender Volume 3 #4 / Blender_3_4.iso / BLENDER / FILES / CONTROL.DIR / 00005.ls < prev    next >
Encoding:
Text File  |  1997-01-01  |  423 b   |  21 lines
  1. on exitFrame
  2.   global n
  3.   set n to (n + 1) mod 4
  4.   if rollOver(44) then
  5.     puppetSprite(44, 1)
  6.     set the castNum of sprite 44 to 21 + n
  7.   else
  8.     set the castNum of sprite 44 to 23
  9.     puppetSprite(44, 0)
  10.   end if
  11.   if rollOver(45) then
  12.     puppetSprite(45, 1)
  13.     set the castNum of sprite 45 to 25 + n
  14.   else
  15.     set the castNum of sprite 45 to 28
  16.     puppetSprite(45, 0)
  17.   end if
  18.   updateStage()
  19.   go(the frame)
  20. end
  21.