equal
deleted
inserted
replaced
468 begin |
468 begin |
469 cArtillery:= true; |
469 cArtillery:= true; |
470 HHGear:=PHedgehog(Gear^.Hedgehog)^.Gear; |
470 HHGear:=PHedgehog(Gear^.Hedgehog)^.Gear; |
471 HHGear^.State:= HHGear^.State or gstNotKickable; |
471 HHGear^.State:= HHGear^.State or gstNotKickable; |
472 HedgehogChAngle(HHGear); |
472 HedgehogChAngle(HHGear); |
473 if not cLaserSighting then // game doesn't have default laser sight. turn it on and give them a chance to aim |
473 if not cLaserSighting then // game does not have default laser sight. turn it on and give them a chance to aim |
474 begin |
474 begin |
475 cLaserSighting:= true; |
475 cLaserSighting:= true; |
476 HHGear^.Message:= 0; |
476 HHGear^.Message:= 0; |
477 if(HHGear^.Angle - 32 >= 0) then dec(HHGear^.Angle,32) |
477 if(HHGear^.Angle - 32 >= 0) then dec(HHGear^.Angle,32) |
478 end; |
478 end; |