equal
deleted
inserted
replaced
3266 HHGear := Gear^.Hedgehog^.Gear; |
3266 HHGear := Gear^.Hedgehog^.Gear; |
3267 OnUsedAmmo(HHGear^.Hedgehog^); |
3267 OnUsedAmmo(HHGear^.Hedgehog^); |
3268 with HHGear^ do |
3268 with HHGear^ do |
3269 begin |
3269 begin |
3270 State := State and (not gstAttacking); |
3270 State := State and (not gstAttacking); |
3271 Message := Message and (not gmAttack) |
3271 Message := Message and (not (gmAttack or gmSwitch)) |
3272 end |
3272 end |
3273 end; |
3273 end; |
3274 |
3274 |
3275 //////////////////////////////////////////////////////////////////////////////// |
3275 //////////////////////////////////////////////////////////////////////////////// |
3276 procedure doStepMortar(Gear: PGear); |
3276 procedure doStepMortar(Gear: PGear); |
5476 // push the shooting Hedgehog back |
5476 // push the shooting Hedgehog back |
5477 Gear^.dX.isNegative := not Gear^.dX.isNegative; |
5477 Gear^.dX.isNegative := not Gear^.dX.isNegative; |
5478 Gear^.dY.isNegative := not Gear^.dY.isNegative; |
5478 Gear^.dY.isNegative := not Gear^.dY.isNegative; |
5479 HHGear^.dX := Gear^.dX; |
5479 HHGear^.dX := Gear^.dX; |
5480 HHGear^.dY := Gear^.dY; |
5480 HHGear^.dY := Gear^.dY; |
5481 AmmoShove(Gear, 0, 80); |
5481 AmmoShove(Gear, 0, 79); |
5482 Gear^.dX.isNegative := not Gear^.dX.isNegative; |
5482 Gear^.dX.isNegative := not Gear^.dX.isNegative; |
5483 Gear^.dY.isNegative := not Gear^.dY.isNegative; |
5483 Gear^.dY.isNegative := not Gear^.dY.isNegative; |
5484 end; |
5484 end; |
5485 |
5485 |
5486 Gear^.doStep := @doStepSineGunShotWork; |
5486 Gear^.doStep := @doStepSineGunShotWork; |