home *** CD-ROM | disk | FTP | other *** search
/ Shocking The Web CD-ROM / SHOCK_CD.ISO / pc / tutorial / ch06_med / scaleabl / scaleabl.dcr / 00028.ls < prev    next >
Encoding:
Text File  |  1996-12-03  |  196 b   |  13 lines
  1. on mouseDown
  2.   repeat with n = 10 to 22
  3.     set the height of sprite n to 12
  4.     set the width of sprite n to 6
  5.     updateStage()
  6.     waitfor(0.05)
  7.   end repeat
  8. end
  9.  
  10. on mouseUp
  11.   waitfor(1.5)
  12. end
  13.