home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Today - The Disc! 9 / cdrt09.iso / mac / UTAHDEMO / SHARED.DIR / 00744_Script_744 < prev    next >
Text File  |  1995-01-13  |  465b  |  21 lines
  1. -- done plan nav
  2. on donePlanNav num
  3.   global buttonPressed
  4.   global adNum
  5.   
  6. --put "bp = " & buttonPressed
  7.   set the keyDownScript to "newKeyPressed 0"
  8.   puppetSprite 7, FALSE
  9.   puppetSprite 8, FALSE
  10.   puppetSprite 16, FALSE
  11.   puppetSprite 18, FALSE
  12.   puppetSprite 19, FALSE
  13.   puppetSprite 20, FALSE
  14.   puppetSprite 21, FALSE
  15.   puppetSprite 22, FALSE
  16.   puppetSprite 23, FALSE
  17.   puppetSprite 24, FALSE
  18.  
  19.   if (num > 100) then
  20.     doneNav 1
  21.   end if