hedgewars/uMisc.pas
changeset 988 cdff3f6f9b38
parent 949 866729775535
child 1054 80225c6af656
equal deleted inserted replaced
987:0fcd3fadda41 988:cdff3f6f9b38
    35     TurnTimeLeft  : Longword = 0;
    35     TurnTimeLeft  : Longword = 0;
    36     cHedgehogTurnTime: Longword = 45000;
    36     cHedgehogTurnTime: Longword = 45000;
    37     cMaxAIThinkTime  : Longword = 9000;
    37     cMaxAIThinkTime  : Longword = 9000;
    38 
    38 
    39     cCloudsNumber    : LongInt = 9;
    39     cCloudsNumber    : LongInt = 9;
    40     cConsoleHeight   : LongInt = 320;
       
    41     cConsoleYAdd     : LongInt = 0;
       
    42     cScreenWidth     : LongInt = 1024;
    40     cScreenWidth     : LongInt = 1024;
    43     cScreenHeight    : LongInt = 768;
    41     cScreenHeight    : LongInt = 768;
    44     cBits            : LongInt = 16;
    42     cBits            : LongInt = 16;
    45     cBitsStr         : string[2] = '16';
    43     cBitsStr         : string[2] = '16';
    46     cTagsMask        : byte = 7;
    44     cTagsMask        : byte = 7;
    54 
    52 
    55     GameTicks     : LongWord = 0;
    53     GameTicks     : LongWord = 0;
    56 
    54 
    57     cSkyColor     : Longword = 0;
    55     cSkyColor     : Longword = 0;
    58     cWhiteColor   : Longword = $FFFFFFFF;
    56     cWhiteColor   : Longword = $FFFFFFFF;
    59     cConsoleSplitterColor : Longword = $FFFF0000;
       
    60     cColorNearBlack       : Longword = $FF000010;
    57     cColorNearBlack       : Longword = $FF000010;
    61     cExplosionBorderColor : LongWord = $808080;
    58     cExplosionBorderColor : LongWord = $808080;
    62 
    59 
    63     cShowFPS      : boolean = true;
    60     cShowFPS      : boolean = true;
    64     cCaseFactor   : Longword = 5;  {0..9}
    61     cCaseFactor   : Longword = 5;  {0..9}