Нарисовать паровоз с колёсами в pascal abs с колёсами через line и cirkle

Не очень то и получилось)

uses graphabc;
beginsetwindowsize(900,500);line(200,100,700,100);line(200,100,50,250);line(50,250,700,250);line(700,100,700,250);line(200,100,200,250);line(700,200,100,200);circle(150,250,25);circle(350,250,25);circle(500,250,25);circle(650,250,25);end.