uses GraphABC;

const
  clRed=GraphABC.clRed;
  clRedMy=GraphABC.clRed;
begin
  PutPixel(100,10,clRedMy);
  PutPixel(10,10,clRed);
end.