home *** CD-ROM | disk | FTP | other *** search
/ Shocking The Web CD-ROM / SHOCK_CD.ISO / pc / tutorial / devglry / ingenius / shockwav / quest.dcr / 00020.ls < prev    next >
Encoding:
Text File  |  1996-05-10  |  103 b   |  8 lines
  1. on mouseUp
  2.   global guyX, guyY
  3.   go("loop")
  4.   set guyX to 3
  5.   set guyY to 0
  6.   placeguy(guyX, guyY)
  7. end
  8.