hedgewars/uConsole.pas
changeset 4357 a1fcfc341a52
parent 4210 caa9b08990eb
child 4359 83ef50815535
equal deleted inserted replaced
4355:4554c4df9f1a 4357:a1fcfc341a52
    36 
    36 
    37 procedure doPut(putX, putY: LongInt; fromAI: boolean);
    37 procedure doPut(putX, putY: LongInt; fromAI: boolean);
    38 
    38 
    39 implementation
    39 implementation
    40 uses uMisc, uStore, Types, uConsts, uGears, uTeams, uIO, uKeys, uWorld, uMobile,
    40 uses uMisc, uStore, Types, uConsts, uGears, uTeams, uIO, uKeys, uWorld, uMobile,
    41      uRandom, uAmmos, uStats, uChat, SDLh, uSound, uVisualGears, uScript;
    41      uRandom, uAmmos, uStats, uChat, SDLh, uSound, uVisualGears, uScript, uTypes;
    42 
    42 
    43 const cLineWidth: LongInt = 0;
    43 const cLineWidth: LongInt = 0;
    44       cLinesCount = 256;
    44       cLinesCount = 256;
    45 
    45 
    46 type  PVariable = ^TVariable;
    46 type  PVariable = ^TVariable;