home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / TrafficEscape.dxr / 00046_clickon.ls < prev    next >
Encoding:
Text File  |  2002-01-25  |  355 b   |  15 lines
  1. property spriteNum
  2. global gColumn, gGameBoard, gRow, temp
  3.  
  4. on mouseDown me
  5.   temp = spriteNum - 129
  6.   gColumn = temp mod 13
  7.   if gColumn = 0 then
  8.     gColumn = 13
  9.   end if
  10.   gRow = ((temp - gColumn) / 13) + 1
  11.   if (gGameBoard[gRow][gColumn] <> 99) and (gGameBoard[gRow][gColumn] <> 0) then
  12.     sendSprite(gGameBoard[gRow][gColumn], #mouseUp)
  13.   end if
  14. end
  15.