hedgewars/uWorld.pas
changeset 10331 cb6c33839d2a
parent 10330 3ec09243cb55
child 10332 194f003b41a4
equal deleted inserted replaced
10330:3ec09243cb55 10331:cb6c33839d2a
    64 {$IFDEF USE_VIDEO_RECORDING}
    64 {$IFDEF USE_VIDEO_RECORDING}
    65     , uVideoRec
    65     , uVideoRec
    66 {$ENDIF}
    66 {$ENDIF}
    67     ;
    67     ;
    68 
    68 
    69 var cWaveWidth: LongInt;
    69 var AMShiftTargetX, AMShiftTargetY, AMShiftX, AMShiftY, SlotsNum: LongInt;
    70     AMShiftTargetX, AMShiftTargetY, AMShiftX, AMShiftY, SlotsNum: LongInt;
       
    71     AMAnimStartTime, AMState : LongInt;
    70     AMAnimStartTime, AMState : LongInt;
    72     AMAnimState: Single;
    71     AMAnimState: Single;
    73     tmpSurface: PSDL_Surface;
    72     tmpSurface: PSDL_Surface;
    74     fpsTexture: PTexture;
    73     fpsTexture: PTexture;
    75     timeTexture: PTexture;
    74     timeTexture: PTexture;
   217 
   216 
   218 // if the string has been set, show it for (default timeframe) seconds
   217 // if the string has been set, show it for (default timeframe) seconds
   219 if length(g) > 0 then
   218 if length(g) > 0 then
   220     ShowMission(trgoal[gidCaption], trgoal[gidSubCaption], g, 1, 0);
   219     ShowMission(trgoal[gidCaption], trgoal[gidSubCaption], g, 1, 0);
   221 
   220 
   222 cWaveWidth:= SpritesData[sprWater].Width;
   221 //cWaveWidth:= SpritesData[sprWater].Width;
   223 //cWaveHeight:= SpritesData[sprWater].Height;
   222 //cWaveHeight:= SpritesData[sprWater].Height;
   224 cWaveHeight:= 32;
   223 cWaveHeight:= 32;
   225 
   224 
   226 InitCameraBorders();
   225 InitCameraBorders();
   227 uCursor.init();
   226 uCursor.init();