hedgewars/uWorld.pas
changeset 4359 83ef50815535
parent 4357 a1fcfc341a52
child 4367 f4a0ec067601
equal deleted inserted replaced
4357:a1fcfc341a52 4359:83ef50815535
    49 procedure HideMission;
    49 procedure HideMission;
    50 procedure ShakeCamera(amount: LongWord);
    50 procedure ShakeCamera(amount: LongWord);
    51 procedure MoveCamera;
    51 procedure MoveCamera;
    52 
    52 
    53 implementation
    53 implementation
    54 uses    uStore, uMisc, uTeams, uIO, uKeys, uLocale, uSound, uAmmos, uVisualGears, uChat, uLandTexture, uLand, GLunit;
    54 uses
       
    55     uStore,
       
    56     uMisc,
       
    57     uTeams,
       
    58     uIO,
       
    59     uKeys,
       
    60     uLocale,
       
    61     uSound,
       
    62     uAmmos,
       
    63     uVisualGears,
       
    64     uChat,
       
    65     uLandTexture,
       
    66     uLand,
       
    67     GLunit,
       
    68     uVariables
       
    69     ;
    55 
    70 
    56 type TCaptionStr = record
    71 type TCaptionStr = record
    57                    Tex: PTexture;
    72                    Tex: PTexture;
    58                    EndTime: LongWord;
    73                    EndTime: LongWord;
    59                    end;
    74                    end;