hedgewars/uAmmos.pas
changeset 10105 8c5fa1d15bd5
parent 10015 4feced261c68
child 10108 c68cf030eded
equal deleted inserted replaced
10104:cb0b750bd8a3 10105:8c5fa1d15bd5
   396         s:= trammo[Ammoz[AmmoType].NameId];
   396         s:= trammo[Ammoz[AmmoType].NameId];
   397         if (Count <> AMMO_INFINITE) and (not (Hedgehog.Team^.ExtDriven or (Hedgehog.BotLevel > 0))) then
   397         if (Count <> AMMO_INFINITE) and (not (Hedgehog.Team^.ExtDriven or (Hedgehog.BotLevel > 0))) then
   398             s:= s + ' (' + IntToStr(Count) + ')';
   398             s:= s + ' (' + IntToStr(Count) + ')';
   399         if (Propz and ammoprop_Timerable) <> 0 then
   399         if (Propz and ammoprop_Timerable) <> 0 then
   400             s:= s + ', ' + IntToStr(Timer div 1000) + ' ' + trammo[sidSeconds];
   400             s:= s + ', ' + IntToStr(Timer div 1000) + ' ' + trammo[sidSeconds];
   401         AddCaption(s, Team^.Clan^.Color, capgrpAmmoinfo);
   401         AddCaption(Str2PChar(s), Team^.Clan^.Color, capgrpAmmoinfo);
   402         if (Propz and ammoprop_NeedTarget) <> 0 then
   402         if (Propz and ammoprop_NeedTarget) <> 0 then
   403             begin
   403             begin
   404             if Gear <> nil then Gear^.State:= Gear^.State or      gstHHChooseTarget;
   404             if Gear <> nil then Gear^.State:= Gear^.State or      gstHHChooseTarget;
   405             isCursorVisible:= true
   405             isCursorVisible:= true
   406             end
   406             end