hedgewars/uWorld.pas
changeset 3890 e4b7b30232fd
parent 3836 833c0f32e326
child 3952 d6412423da45
child 3961 cf0ca1ff6c1a
equal deleted inserted replaced
3889:f7d6834a54fe 3890:e4b7b30232fd
   666 offsetX:= cScreenHeight - 13;
   666 offsetX:= cScreenHeight - 13;
   667 {$ELSE}
   667 {$ELSE}
   668 offsetX:= 48;
   668 offsetX:= 48;
   669 {$ENDIF}
   669 {$ENDIF}
   670 offsetY:= cOffsetY;
   670 offsetY:= cOffsetY;
   671 if (TurnTimeLeft <> 0) or (ReadyTimeLeft <> 0) then
   671 if ((TurnTimeLeft <> 0) and (TurnTimeLeft < 1000000)) or (ReadyTimeLeft <> 0) then
   672     begin
   672     begin
   673     if ReadyTimeLeft <> 0 then
   673     if ReadyTimeLeft <> 0 then
   674         i:= Succ(Pred(ReadyTimeLeft) div 1000)
   674         i:= Succ(Pred(ReadyTimeLeft) div 1000)
   675     else
   675     else
   676         i:= Succ(Pred(TurnTimeLeft) div 1000);
   676         i:= Succ(Pred(TurnTimeLeft) div 1000);