equal
deleted
inserted
replaced
113 case Gear^.Pos of |
113 case Gear^.Pos of |
114 posCaseAmmo: begin |
114 posCaseAmmo: begin |
115 a:= TAmmoType(Gear^.State); |
115 a:= TAmmoType(Gear^.State); |
116 AddAmmo(PHedgehog(HH^.Hedgehog), a); |
116 AddAmmo(PHedgehog(HH^.Hedgehog), a); |
117 s:= trammo[Ammoz[a].NameId] + '(+' + IntToStr(Ammoz[a].NumberInCase) + ')'; |
117 s:= trammo[Ammoz[a].NameId] + '(+' + IntToStr(Ammoz[a].NumberInCase) + ')'; |
118 AddCaption(s, PHedgehog(HH^.Hedgehog)^.Team^.Color, capgrpAmmoinfo); |
118 AddCaption(s, PHedgehog(HH^.Hedgehog)^.Team^.Clan^.Color, capgrpAmmoinfo); |
119 end; |
119 end; |
120 posCaseHealth: begin |
120 posCaseHealth: begin |
121 inc(HH^.Health, Gear^.Health); |
121 inc(HH^.Health, Gear^.Health); |
122 str(Gear^.Health, s); |
122 str(Gear^.Health, s); |
123 s:= '+' + s; |
123 s:= '+' + s; |
124 AddCaption(s, PHedgehog(HH^.Hedgehog)^.Team^.Color, capgrpAmmoinfo); |
124 AddCaption(s, PHedgehog(HH^.Hedgehog)^.Team^.Clan^.Color, capgrpAmmoinfo); |
125 RenderHealth(PHedgehog(HH^.Hedgehog)^); |
125 RenderHealth(PHedgehog(HH^.Hedgehog)^); |
126 RecountTeamHealth(PHedgehog(HH^.Hedgehog)^.Team) |
126 RecountTeamHealth(PHedgehog(HH^.Hedgehog)^.Team) |
127 end; |
127 end; |
128 end |
128 end |
129 end; |
129 end; |