equal
deleted
inserted
replaced
111 begin |
111 begin |
112 Gear^.Message:= gm_Destroy; |
112 Gear^.Message:= gm_Destroy; |
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^.Clan^.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); |