equal
deleted
inserted
replaced
402 HHJump(AltGear, jmpLJump, GoInfo); // try ljump instead of fall |
402 HHJump(AltGear, jmpLJump, GoInfo); // try ljump instead of fall |
403 exit(bRes) |
403 exit(bRes) |
404 end; |
404 end; |
405 continue |
405 continue |
406 end; |
406 end; |
407 if (Gear^.Message and gm_Left )<>0 then Gear^.dX:= -cLittle else |
407 if (Gear^.Message and gmLeft )<>0 then Gear^.dX:= -cLittle else |
408 if (Gear^.Message and gm_Right )<>0 then Gear^.dX:= cLittle else exit(bRes); |
408 if (Gear^.Message and gmRight )<>0 then Gear^.dX:= cLittle else exit(bRes); |
409 if TestCollisionXwithGear(Gear, hwSign(Gear^.dX)) then |
409 if TestCollisionXwithGear(Gear, hwSign(Gear^.dX)) then |
410 begin |
410 begin |
411 if not (TestCollisionXwithXYShift(Gear, _0, -6, hwSign(Gear^.dX)) |
411 if not (TestCollisionXwithXYShift(Gear, _0, -6, hwSign(Gear^.dX)) |
412 or TestCollisionYwithGear(Gear, -1)) then Gear^.Y:= Gear^.Y - _1; |
412 or TestCollisionYwithGear(Gear, -1)) then Gear^.Y:= Gear^.Y - _1; |
413 if not (TestCollisionXwithXYShift(Gear, _0, -5, hwSign(Gear^.dX)) |
413 if not (TestCollisionXwithXYShift(Gear, _0, -5, hwSign(Gear^.dX)) |