hedgewars/GSHandlers.inc
changeset 1106 f868b7307003
parent 1103 1ff3db3c12af
child 1108 c77267d982ee
equal deleted inserted replaced
1105:037494752cc4 1106:f868b7307003
  1587 
  1587 
  1588 HHGear:= PHedgehog(Gear^.Hedgehog)^.Gear;
  1588 HHGear:= PHedgehog(Gear^.Hedgehog)^.Gear;
  1589 HHGear^.Message:= HHGear^.Message and (not gm_Attack);
  1589 HHGear^.Message:= HHGear^.Message and (not gm_Attack);
  1590 DeleteCI(HHGear);
  1590 DeleteCI(HHGear);
  1591 
  1591 
       
  1592 FollowGear:= Gear;
       
  1593 
  1592 Gear^.doStep:= @doStepCakeFall
  1594 Gear^.doStep:= @doStepCakeFall
  1593 end;
  1595 end;
  1594 
  1596