hedgewars/uChat.pas
changeset 4359 83ef50815535
parent 4357 a1fcfc341a52
child 4361 64ea345ab655
equal deleted inserted replaced
4357:a1fcfc341a52 4359:83ef50815535
    32 var UserNick: shortstring = '';
    32 var UserNick: shortstring = '';
    33     ChatReady: boolean;
    33     ChatReady: boolean;
    34     showAll: boolean;
    34     showAll: boolean;
    35 
    35 
    36 implementation
    36 implementation
    37 uses uMisc, uStore, uConsts, SDLh, uConsole, uKeys, uTeams, uTypes;
    37 uses uMisc, uStore, uConsts, SDLh, uConsole, uKeys, uTeams, uTypes, uVariables;
    38 
    38 
    39 const MaxStrIndex = 27;
    39 const MaxStrIndex = 27;
    40 
    40 
    41 type TChatLine = record
    41 type TChatLine = record
    42         Tex: PTexture;
    42         Tex: PTexture;