home *** CD-ROM | disk | FTP | other *** search
/ Computer Buyer 1996 April / BYER_0496.iso / multimed / blender / shared.dir / 00842_Field_842.txt < prev    next >
Text File  |  1995-09-24  |  378b  |  18 lines
  1. on exitFrame
  2. --PAGE NUMBER+HYPERLINKS
  3.   global n
  4.   global s
  5.   repeat with n = 23 down to 21
  6.     set s to the castnum of Sprite n 
  7.     if rollover(n) then
  8.       puppetSprite n, TRUE
  9.       if (s < 824) then
  10.         set the castnum of Sprite n to (s + 7)
  11.       end if
  12.     else
  13.       puppetSprite n, FALSE
  14.     end if
  15.   end repeat
  16.   go to the frame
  17.   updateStage
  18. end