home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 February / CHIP_2_98.iso / software / testsoft / muzea / exemusei / shared.cst / 00926_Script_RoSpr < prev    next >
Text File  |  1987-04-12  |  354b  |  16 lines
  1. on RoSpr NS, MW, FN, ND
  2.   put 0 into flag
  3.   set the regPoint of cast FN to point(0,0)
  4.   set the castNum of sprite NS to the number of cast FN
  5.   updatestage
  6.   repeat while the mouseWord=MW
  7.     if the mousedown and ND <> "" then
  8.       put 1 into flag
  9.       exit repeat
  10.     end if
  11.   end repeat
  12.   if flag=1 then
  13.     play movie ND
  14.   end if
  15. end
  16.