hedgewars/uGearsHedgehog.pas
changeset 7339 5984b749ad9b
parent 7337 c224cd2d32f3
child 7347 88685fbb2679
child 7362 53bcfc714cb3
equal deleted inserted replaced
7337:c224cd2d32f3 7339:5984b749ad9b
   603                     if (not (HH^.Hedgehog^.Team^.ExtDriven 
   603                     if (not (HH^.Hedgehog^.Team^.ExtDriven 
   604                     or (HH^.Hedgehog^.BotLevel > 0)))
   604                     or (HH^.Hedgehog^.BotLevel > 0)))
   605                     or (HH^.Hedgehog^.Team^.Clan^.ClanIndex = LocalClan)
   605                     or (HH^.Hedgehog^.Team^.Clan^.ClanIndex = LocalClan)
   606                     or (GameType = gmtDemo)  then
   606                     or (GameType = gmtDemo)  then
   607                         begin
   607                         begin
   608                         s:= trammo[Ammoz[a].NameId] + ' (+' + IntToStr(Ammoz[a].NumberInCase) + ')';
   608                         if Gear^.Power <> 0 then
       
   609                             s:= trammo[Ammoz[a].NameId] + ' (+' + IntToStr(Gear^.Power) + ')'
       
   610                         else
       
   611                             s:= trammo[Ammoz[a].NameId] + ' (+' + IntToStr(Ammoz[a].NumberInCase) + ')';
   609                         AddCaption(s, HH^.Hedgehog^.Team^.Clan^.Color, capgrpAmmoinfo);
   612                         AddCaption(s, HH^.Hedgehog^.Team^.Clan^.Color, capgrpAmmoinfo);
   610 
   613 
   611                         // show ammo icon
   614                         // show ammo icon
   612                         vga:= AddVisualGear(hwRound(Gear^.X), hwRound(Gear^.Y), vgtAmmo);
   615                         vga:= AddVisualGear(hwRound(Gear^.X), hwRound(Gear^.Y), vgtAmmo);
   613                         if vga <> nil then
   616                         if vga <> nil then