hedgewars/uWorld.pas
changeset 4197 dad127904958
parent 4159 64e677349124
child 4198 55814f1ef60a
equal deleted inserted replaced
4196:78c45314f123 4197:dad127904958
   147 ScreenFade:= sfFromBlack;
   147 ScreenFade:= sfFromBlack;
   148 ScreenFadeValue:= sfMax;
   148 ScreenFadeValue:= sfMax;
   149 ScreenFadeSpeed:= 1;
   149 ScreenFadeSpeed:= 1;
   150 
   150 
   151 // modified mine timers?
   151 // modified mine timers?
   152 if cMinesTime <> 3000 then
   152 if cMinesTime <> 3 then
   153     begin
   153     begin
   154     if cMinesTime = 0 then
   154     if cMinesTime = 0 then
   155         g:= AddGoal(g, gfAny, gidNoMineTimer)
   155         g:= AddGoal(g, gfAny, gidNoMineTimer)
   156     else if cMinesTime < 0 then
   156     else if cMinesTime < 0 then
   157         g:= AddGoal(g, gfAny, gidRandomMineTimer)
   157         g:= AddGoal(g, gfAny, gidRandomMineTimer)
   158     else
   158     else
   159         g:= AddGoal(g, gfAny, gidMineTimer, cMinesTime div 1000);
   159         g:= AddGoal(g, gfAny, gidMineTimer, cMinesTime);
   160     end;
   160     end;
   161 
   161 
   162 // if the string has been set, show it for (default timeframe) seconds
   162 // if the string has been set, show it for (default timeframe) seconds
   163 if g <> '' then ShowMission(trgoal[gidCaption], trgoal[gidSubCaption], g, 1, 0);
   163 if g <> '' then ShowMission(trgoal[gidCaption], trgoal[gidSubCaption], g, 1, 0);
   164 
   164