equal
deleted
inserted
replaced
60 |
60 |
61 var skipFlag: boolean; |
61 var skipFlag: boolean; |
62 |
62 |
63 var delay: LongWord; |
63 var delay: LongWord; |
64 delay2: LongWord; |
64 delay2: LongWord; |
65 step: (stInit, stDelay, stChDmg, stSweep, stChWin1, stTurnReact, |
65 step: (stInit, stDelay, stChDmg, stSweep, stTurnStats, stChWin1, |
66 stAfterDelay, stChWin2, stWater, stChWin3, stHealth, |
66 stTurnReact, stAfterDelay, stChWin2, stWater, stChWin3, stHealth, |
67 stSpawn, stNTurn); |
67 stSpawn, stNTurn); |
68 NewTurnTick: LongWord; |
68 NewTurnTick: LongWord; |
69 //SDMusic: shortstring; |
69 //SDMusic: shortstring; |
70 |
70 |
71 function CheckNoDamage: boolean; // returns TRUE in case of no damaged hhs |
71 function CheckNoDamage: boolean; // returns TRUE in case of no damaged hhs |
286 SetAllToActive; |
286 SetAllToActive; |
287 step:= stChDmg |
287 step:= stChDmg |
288 end |
288 end |
289 else |
289 else |
290 inc(step); |
290 inc(step); |
|
291 |
|
292 stTurnStats: |
|
293 begin |
|
294 if (not bBetweenTurns) and (not isInMultiShoot) then |
|
295 uStats.TurnStats; |
|
296 inc(step) |
|
297 end; |
291 |
298 |
292 stChWin1: |
299 stChWin1: |
293 begin |
300 begin |
294 CheckForWin(); |
301 CheckForWin(); |
295 inc(step) |
302 inc(step) |