home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Magazin 1995 May / TYPEMANIA.ISO / systhema.dir / 00143_Script_143 < prev    next >
Text File  |  1995-02-27  |  369b  |  19 lines
  1. on exitFrame
  2.   starttimer
  3.   repeat while the timer <2000
  4.     if the mousedown then
  5.       quit
  6.     end if
  7.     updatestage
  8.     
  9.   end repeat
  10.   
  11.   --  puppetsprite 2,true
  12.   --  repeat with i=400 down to -200
  13.   --    set the locV of sprite 2 to i-50
  14.   --    --put i
  15.   --    updatestage
  16.   --    if the mousedown then exit repeat
  17.   --  end repeat
  18.   quit
  19. end