home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 February / CHIP_2_98.iso / software / testsoft / muzea / exemusei / shared.cst / 00933_Script_Rnob < prev    next >
Text File  |  1987-04-12  |  356b  |  16 lines
  1. on Rnob R, H, V
  2.   cursore
  3.   put R-10 into A
  4.   put R-20 into B
  5.   set the locH of sprite A = the locH of sprite A + H
  6.   set the locV of sprite A = the locV of sprite A + V
  7.   set the locH of sprite B = the locH of sprite B-9000
  8.   updatestage  
  9.   repeat while rollover(R)
  10.     if the mousedown then
  11.       exit repeat
  12.     end if
  13.   end repeat
  14. end
  15.  
  16.