home *** CD-ROM | disk | FTP | other *** search
/ Net Power 2000 February / NetCD2.iso / Demogame / TR4 / TR_Times.exe / data1.cab / Program_Executable_Files / Jigsaw.exe / Jigsaw.dcr / 00029.ls < prev    next >
Encoding:
Text File  |  1999-12-17  |  372 b   |  23 lines
  1. global glist1, ln, s
  2.  
  3. on prepareFrame
  4.   glist1 = []
  5.   ln = 1
  6.   s = 0
  7.   sprite(44).visible = 0
  8.   sprite(45).visible = 0
  9.   sprite(46).visible = 0
  10.   sprite(47).visible = 0
  11. end
  12.  
  13. on exitFrame
  14.   repeat while s < 37
  15.     s = s + 1
  16.     sX = the locH of sprite s
  17.     sY = the locV of sprite s
  18.     addAt(glist1, ln, sX)
  19.     addAt(glist1, ln + 1, sY)
  20.     ln = ln + 2
  21.   end repeat
  22. end
  23.