home *** CD-ROM | disk | FTP | other *** search
/ Shocking The Web CD-ROM / SHOCK_CD.ISO / pc / tutorial / casestdy / ch17_dav / panscan.dcr / 00005.ls < prev    next >
Encoding:
Text File  |  1996-11-12  |  236 b   |  10 lines

  1. global gSpriteWidth, gHalfWay
  2.  
  3. on startMovie
  4.   set gSpriteWidth to the width of sprite 1
  5.   set gHalfWay to gSpriteWidth / 2
  6.   puppetSprite(1, 1)
  7.   puppetSprite(2, 1)
  8.   set the locH of sprite 2 to the locH of sprite 1 + gSpriteWidth
  9. end
  10.