changeset 7426 | 55b49cc1f33a |
parent 7416 | 2f2f78fc65a3 |
child 7437 | a46ce1812419 |
7423:ec8f690f3e0f | 7426:55b49cc1f33a |
---|---|
413 if not StopThinking then |
413 if not StopThinking then |
414 SDL_Delay(100) |
414 SDL_Delay(100) |
415 end |
415 end |
416 end; |
416 end; |
417 |
417 |
418 PGear(Me)^.State:= PGear(Me)^.State and not gstHHThinking; |
418 PGear(Me)^.State:= PGear(Me)^.State and (not gstHHThinking); |
419 Think:= 0; |
419 Think:= 0; |
420 InterlockedDecrement(hasThread) |
420 InterlockedDecrement(hasThread) |
421 end; |
421 end; |
422 |
422 |
423 procedure StartThink(Me: PGear); |
423 procedure StartThink(Me: PGear); |