equal
deleted
inserted
replaced
67 stTurnReact, stDelay2, stChWin2, stWater, stChWin3, |
67 stTurnReact, stDelay2, stChWin2, stWater, stChWin3, |
68 stChKing, stSuddenDeath, stDelay3, stHealth, stSpawn, stDelay4, |
68 stChKing, stSuddenDeath, stDelay3, stHealth, stSpawn, stDelay4, |
69 stNTurn); |
69 stNTurn); |
70 NewTurnTick: LongWord; |
70 NewTurnTick: LongWord; |
71 |
71 |
72 const delaySDStart = 1600; |
72 const delayInit = 50; |
|
73 delaySDStart = 1600; |
73 delaySDWarning = 1000; |
74 delaySDWarning = 1000; |
74 delayDamageTagFull = 1500; |
75 delayDamageTagFull = 1500; |
75 delayDamageTagShort = 500; |
76 delayDamageTagShort = 500; |
76 delayTurnReact = 800; |
77 delayTurnReact = 800; |
77 delayFinal = 100; |
78 delayFinal = 100; |
330 case step of |
331 case step of |
331 stInit: |
332 stInit: |
332 begin |
333 begin |
333 if (not bBetweenTurns) and (not isInMultiShoot) then |
334 if (not bBetweenTurns) and (not isInMultiShoot) then |
334 ScriptCall('onEndTurn'); |
335 ScriptCall('onEndTurn'); |
|
336 delay:= delayInit; |
335 inc(step) |
337 inc(step) |
336 end; |
338 end; |
337 stDelay1: |
339 stDelay1: |
|
340 begin |
338 if DoDelay() then |
341 if DoDelay() then |
339 inc(step); |
342 inc(step); |
|
343 end; |
340 stChDmg: |
344 stChDmg: |
341 if CheckNoDamage then |
345 if CheckNoDamage then |
342 inc(step) |
346 inc(step) |
343 else |
347 else |
344 begin |
348 begin |