im trying to draw a box using gotoxy and fucntions.
this is what i have at the moment, but dont know what to do next to complete it:
Program box;
uses Crt;
procedure draw(x1,y1,x2,y2:integer);
begin
gotoxy(x1,y1);
write('.');
gotoxy(x2,y2);
write('.');
gotoxy(x1,y2);
write('.');
gotoxy(x2,y1);
write('.');
end;
begin
draw(10,10,15,15);
end.