hedgewars/uMisc.pas
changeset 564 17fb45c670c1
parent 553 5478386d935f
child 614 0e04504bc140
equal deleted inserted replaced
563:5131c641073f 564:17fb45c670c1
    84 
    84 
    85     flagMakeCapture: boolean = false;
    85     flagMakeCapture: boolean = false;
    86 
    86 
    87     InitStepsFlags: Longword = 0;
    87     InitStepsFlags: Longword = 0;
    88 
    88 
       
    89     RealTicks: Longword = 0;
       
    90     
    89     AttackBar: LongInt = 0; // 0 - none, 1 - just bar at the right-down corner, 2 - like in WWP
    91     AttackBar: LongInt = 0; // 0 - none, 1 - just bar at the right-down corner, 2 - like in WWP
    90 
    92 
    91 function hwSign(r: hwFloat): LongInt;
    93 function hwSign(r: hwFloat): LongInt;
    92 function Min(a, b: LongInt): LongInt; 
    94 function Min(a, b: LongInt): LongInt; 
    93 function Max(a, b: LongInt): LongInt;
    95 function Max(a, b: LongInt): LongInt;