equal
deleted
inserted
replaced
914 if (Gear^.Message and (gmLeft or gmRight) <> 0) and (Gear^.State and gstMoving = 0) and |
914 if (Gear^.Message and (gmLeft or gmRight) <> 0) and (Gear^.State and gstMoving = 0) and |
915 (CheckGearNear(Gear, gtPortal, 26, 26) = nil) then |
915 (CheckGearNear(Gear, gtPortal, 26, 26) = nil) then |
916 Gear^.PortalCounter:= 0; |
916 Gear^.PortalCounter:= 0; |
917 PrevdX:= hwSign(Gear^.dX); |
917 PrevdX:= hwSign(Gear^.dX); |
918 if (Gear^.Message and gmLeft )<>0 then |
918 if (Gear^.Message and gmLeft )<>0 then |
919 Gear^.dX:= -cLittle else |
919 Gear^.dX:= -_0 else |
920 if (Gear^.Message and gmRight )<>0 then |
920 if (Gear^.Message and gmRight )<>0 then |
921 Gear^.dX:= cLittle |
921 Gear^.dX:= _0 |
922 else exit; |
922 else exit; |
923 |
923 |
924 StepSoundTimer:= cHHStepTicks; |
924 StepSoundTimer:= cHHStepTicks; |
925 |
925 |
926 GHStepTicks:= cHHStepTicks; |
926 GHStepTicks:= cHHStepTicks; |
927 if PrevdX <> hwSign(Gear^.dX) then |
927 if PrevdX <> hwSign(Gear^.dX) then |