home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / CheckersSparse.dxr / 00008.ls < prev    next >
Encoding:
Text File  |  2002-01-25  |  453 b   |  24 lines
  1. on exitFrame me
  2.   global CPUdelay, pathIndex, mustGiveUp, attackSoundRegistered
  3.   CPUdelay = CPUdelay + 1
  4.   if CPUdelay = 1 then
  5.     pathIndex = []
  6.   else
  7.     if CPUdelay = 10 then
  8.       calculateAllMoves(1)
  9.       drawPathArrows()
  10.     end if
  11.   end if
  12.   if CPUdelay >= 30 then
  13.     playSound("Comp Move SFX")
  14.     pathIndex = []
  15.     attackSoundRegistered = 0
  16.     go(10)
  17.   else
  18.     go(the frame)
  19.   end if
  20.   calcScore()
  21.   if mustGiveUp = 1 then
  22.   end if
  23. end
  24.