183 CurWeapon:= GetCurAmmoEntry(Gear^.Hedgehog^); |
183 CurWeapon:= GetCurAmmoEntry(Gear^.Hedgehog^); |
184 with Gear^.Hedgehog^ do |
184 with Gear^.Hedgehog^ do |
185 if ((Gear^.Message and gmPrecise) <> 0) and ((CurWeapon^.Propz and ammoprop_SetBounce) <> 0) then |
185 if ((Gear^.Message and gmPrecise) <> 0) and ((CurWeapon^.Propz and ammoprop_SetBounce) <> 0) then |
186 begin |
186 begin |
187 color:= Gear^.Hedgehog^.Team^.Clan^.Color; |
187 color:= Gear^.Hedgehog^.Team^.Clan^.Color; |
|
188 |
188 case Gear^.MsgParam of |
189 case Gear^.MsgParam of |
189 1: begin |
190 1: begin |
190 AddCaption(FormatA(trmsg[sidBounce], trmsg[sidBounce1]), color, capgrpAmmostate); |
191 AddCaption(FormatA(trmsg[sidBounce], trmsg[sidBounce1]), color, capgrpAmmostate); |
191 CurWeapon^.Bounciness:= 350; |
|
192 end; |
192 end; |
193 2: begin |
193 2: begin |
194 AddCaption(FormatA(trmsg[sidBounce], trmsg[sidBounce2]), color, capgrpAmmostate); |
194 AddCaption(FormatA(trmsg[sidBounce], trmsg[sidBounce2]), color, capgrpAmmostate); |
195 CurWeapon^.Bounciness:= 700; |
|
196 end; |
195 end; |
197 3: begin |
196 3: begin |
198 AddCaption(FormatA(trmsg[sidBounce], trmsg[sidBounce3]), color, capgrpAmmostate); |
197 AddCaption(FormatA(trmsg[sidBounce], trmsg[sidBounce3]), color, capgrpAmmostate); |
199 CurWeapon^.Bounciness:= 1000; |
|
200 end; |
198 end; |
201 4: begin |
199 4: begin |
202 AddCaption(FormatA(trmsg[sidBounce], trmsg[sidBounce4]), color, capgrpAmmostate); |
200 AddCaption(FormatA(trmsg[sidBounce], trmsg[sidBounce4]), color, capgrpAmmostate); |
203 CurWeapon^.Bounciness:= 2000; |
|
204 end; |
201 end; |
205 5: begin |
202 5: begin |
206 AddCaption(FormatA(trmsg[sidBounce], trmsg[sidBounce5]), color, capgrpAmmostate); |
203 AddCaption(FormatA(trmsg[sidBounce], trmsg[sidBounce5]), color, capgrpAmmostate); |
207 CurWeapon^.Bounciness:= 4000; |
|
208 end |
204 end |
209 end |
205 end; |
|
206 CurWeapon^.Bounciness:= bouncinessLevels[Gear^.MsgParam - 1]; |
210 end |
207 end |
211 else if (CurWeapon^.Propz and ammoprop_Timerable) <> 0 then |
208 else if (CurWeapon^.Propz and ammoprop_Timerable) <> 0 then |
212 begin |
209 begin |
213 CurWeapon^.Timer:= 1000 * Gear^.MsgParam; |
210 CurWeapon^.Timer:= 1000 * Gear^.MsgParam; |
214 with CurrentTeam^ do |
211 with CurrentTeam^ do |