home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 February / CHIP_2_98.iso / software / testsoft / muzea / exemusei / shared.cst / 00901_Script_Rfam < prev    next >
Text File  |  1987-04-12  |  331b  |  18 lines
  1. on Rfam R
  2.   cursore
  3.   MovSpr R-6
  4.   MovSpr R-12
  5.   MovSpr R-18
  6.   updatestage
  7.   repeat while rollover(R)
  8.     if the mousedown then
  9.       suonainterruttore
  10.       repeat with k = 10 down to 1
  11.         set the blend of sprite R-18 = k*10
  12.         updatestage
  13.       end repeat
  14.       exit repeat
  15.     end if
  16.   end repeat
  17. end
  18.