Помогите нарисовать машину в паскале из разных фигур

Так что бы изменять координаты и она двигалась

uses crt, graphABC;

begin

circle (180,330,30) ;

circle (180,330,40) ;

Line (180,330,165,315) ;

Line (180,330,195,315) ;

Line (180,330,195,330) ;

Line (180,330,165,330) ;

Line (180,330,165,345) ;

Line (180,330,195,345) ;

Line (180,345,180,315) ;

circle (450,330,30) ;

circle (450,330,40) ;

Line (435,330,465,330) ;

Line (450,315,450,345) ;

Line (465,315,435,345) ;

Line (435,315,465,345) ;

Line (143,315,120,315) ;

Line (120,315,110,330) ;

Line (110,330,60,330) ;

Line (60,330,55,320) ;

Line (55,320,55,280) ;

Line (55,280,64,280) ;

Line (63,280,90,240) ;

Line (90,240,180,225) ;

Line (180,225,210,160) ;

Line (210,160,510,160) ;

Line (510,160,480,210) ;

Line (489,195,540,300) ;

Line (540,300,491,330) ;

Line (491,330,540,330) ;

Line (540,330,510,355) ;

Line (510,355,481,355) ;

Line (540,330,540,300) ;

Line (418,355,212,355) ;

Line (147,355,60,355) ;

Line (60,355,60,330) ;

Line (105,240,86,280) ;

Line (86,280,60,280) ;

Line (220,330,410,330) ;

Line (480,210,450,210) ;

Line (450,210,440,160) ;

Line (165,270,300,270) ;

Line (165,270,165,292) ;

Line (165,270,213,165) ;

Line (213,165,420,165) ;

Line (420,165,420,240) ;

end.

Если все равно какие фигуры, то рисуем красный квадрат1. Меняем его размер2. Меняем цвет3. Меняем форму (например прямоугольник) !