hedgewars/uMisc.pas
changeset 543 465e2ec8f05f
parent 539 6a9bf1852bbc
child 553 5478386d935f
equal deleted inserted replaced
542:ec26095f1bed 543:465e2ec8f05f
    68     cInitVolume   : LongInt = 128;
    68     cInitVolume   : LongInt = 128;
    69     cVolumeDelta  : LongInt = 0;
    69     cVolumeDelta  : LongInt = 0;
    70     cTimerInterval   : Longword = 5;
    70     cTimerInterval   : Longword = 5;
    71     cHasFocus     : boolean = true;
    71     cHasFocus     : boolean = true;
    72 
    72 
       
    73     cAirPlaneSpeed: hwFloat = (isNegative: false; QWordValue:   6012954214); // 1.4
       
    74     cBombsSpeed   : hwFloat = (isNegative: false; QWordValue:    429496729);
       
    75 
    73 var
    76 var
    74     cSendEmptyPacketTime : LongWord = 2000;
    77     cSendEmptyPacketTime : LongWord = 2000;
    75     cSendCursorPosTime   : LongWord = 50;
    78     cSendCursorPosTime   : LongWord = 50;
    76     ShowCrosshair  : boolean;
    79     ShowCrosshair  : boolean;
    77     cDrownSpeed,
    80     cDrownSpeed,