equal
deleted
inserted
replaced
682 else dec(tmp); |
682 else dec(tmp); |
683 if tmp < round(dX) then tdY:= 1; |
683 if tmp < round(dX) then tdY:= 1; |
684 if tmp > round(dY) then tdY:= -1; |
684 if tmp > round(dY) then tdY:= -1; |
685 if tmp > 255 then tmp := 255; |
685 if tmp > 255 then tmp := 255; |
686 if tmp < 0 then tmp := 0; |
686 if tmp < 0 then tmp := 0; |
687 Gear^.Tint:= (Gear^.Tint and $FFFFFF00) or tmp |
687 Gear^.Tint:= (Gear^.Tint and $FFFFFF00) or Longword(tmp) |
688 end |
688 end |
689 end |
689 end |
690 end; |
690 end; |