equal
deleted
inserted
replaced
69 NewTurnTick: LongWord; |
69 NewTurnTick: LongWord; |
70 //SDMusic: shortstring; |
70 //SDMusic: shortstring; |
71 |
71 |
72 const delaySDStart = 1600; |
72 const delaySDStart = 1600; |
73 delaySDWarning = 1000; |
73 delaySDWarning = 1000; |
74 delayDamageTag = 500; |
74 delayDamageTagFull = 1500; |
75 delayTurnReact = 1500; |
75 delayDamageTagShort = 500; |
|
76 delayTurnReact = 1000; |
76 delayFinal = 100; |
77 delayFinal = 100; |
77 |
78 |
78 function CheckNoDamage: boolean; // returns TRUE in case of no damaged hhs |
79 function CheckNoDamage: boolean; // returns TRUE in case of no damaged hhs |
79 var Gear: PGear; |
80 var Gear: PGear; |
80 dmg: LongInt; |
81 dmg: LongInt; |
318 stChDmg: |
319 stChDmg: |
319 if CheckNoDamage then |
320 if CheckNoDamage then |
320 inc(step) |
321 inc(step) |
321 else |
322 else |
322 begin |
323 begin |
323 delay:= delayDamageTag; |
324 if (not bBetweenTurns) and (not isInMultiShoot) then |
|
325 delay:= delayDamageTagShort |
|
326 else |
|
327 delay:= delayDamageTagFull; |
324 step:= stDelay1; |
328 step:= stDelay1; |
325 end; |
329 end; |
326 |
330 |
327 stSweep: |
331 stSweep: |
328 if SweepDirty then |
332 if SweepDirty then |