277 if curHandledGear^.RenderTimer then |
277 if curHandledGear^.RenderTimer then |
278 begin |
278 begin |
279 if (curHandledGear^.Kind in [gtMine, gtSMine, gtAirMine]) then |
279 if (curHandledGear^.Kind in [gtMine, gtSMine, gtAirMine]) then |
280 begin |
280 begin |
281 if curHandledGear^.Tex = nil then |
281 if curHandledGear^.Tex = nil then |
282 begin |
282 if (curHandledGear^.Karma = 1) and (not (GameType in [gmtDemo, gmtRecord])) then |
283 i:= curHandledGear^.Timer; |
283 curHandledGear^.Tex:= RenderStringTex(ansistring(trmsg[sidUnknownGearValue]), $ff808080, fntSmall) |
284 if (i > 0) and (i < 1000) then |
|
285 i:= 1 |
|
286 else |
284 else |
287 i:= curHandledGear^.Timer div 1000; |
285 begin |
288 curHandledGear^.Tex:= RenderStringTex(ansistring(inttostr(i)), $ff808080, fntSmall); |
286 i:= curHandledGear^.Timer; |
289 end; |
287 if (i > 0) and (i < 1000) then |
|
288 i:= 1 |
|
289 else |
|
290 i:= curHandledGear^.Timer div 1000; |
|
291 curHandledGear^.Tex:= RenderStringTex(ansistring(inttostr(i)), $ff808080, fntSmall); |
|
292 end; |
290 end |
293 end |
291 else if ((curHandledGear^.Timer > 500) and ((curHandledGear^.Timer mod 1000) = 0)) then |
294 else if ((curHandledGear^.Timer > 500) and ((curHandledGear^.Timer mod 1000) = 0)) then |
292 begin |
295 begin |
293 FreeAndNilTexture(curHandledGear^.Tex); |
296 FreeAndNilTexture(curHandledGear^.Tex); |
294 curHandledGear^.Tex:= RenderStringTex(ansistring(inttostr(curHandledGear^.Timer div 1000)), cWhiteColor, fntSmall); |
297 curHandledGear^.Tex:= RenderStringTex(ansistring(inttostr(curHandledGear^.Timer div 1000)), cWhiteColor, fntSmall); |