equal
deleted
inserted
replaced
421 ((Ammoz[CurAmmoType].Ammo.Propz and ammoprop_Power) <> 0) then SendIPC('a'); |
421 ((Ammoz[CurAmmoType].Ammo.Propz and ammoprop_Power) <> 0) then SendIPC('a'); |
422 AfterAttack; |
422 AfterAttack; |
423 end |
423 end |
424 end else Message:= Message and not gmAttack; |
424 end else Message:= Message and not gmAttack; |
425 end; |
425 end; |
426 TargetPoint.X := NoPointX |
426 TargetPoint.X := NoPointX; |
|
427 ScriptCall('onHogAttack'); |
427 end; |
428 end; |
428 |
429 |
429 procedure AfterAttack; |
430 procedure AfterAttack; |
430 var s: shortstring; |
431 var s: shortstring; |
431 a: TAmmoType; |
432 a: TAmmoType; |