home *** CD-ROM | disk | FTP | other *** search
/ Shocking The Web CD-ROM / SHOCK_CD.ISO / pc / tutorial / casestdy / ch17_dav / panscan.dcr / 00009.ls < prev    next >
Encoding:
Text File  |  1996-11-12  |  269 b   |  10 lines
  1. on mouseUp
  2.   if the castNum of sprite 1 = 3 then
  3.     set the castNum of sprite 1 to 1
  4.     set the castNum of sprite 2 to 1
  5.   else
  6.     set the castNum of sprite 1 to the castNum of sprite 1 + 1
  7.     set the castNum of sprite 2 to the castNum of sprite 2 + 1
  8.   end if
  9. end
  10.