changeset 1106 | f868b7307003 |
parent 1103 | 1ff3db3c12af |
child 1108 | c77267d982ee |
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 |