\startMPinclusions

color gold	;
gold := (255/255,215/255,0/255) ;


picture grid ;
grid :=
	image (
		width := 10 ;
		height := 10 ;
		draw vlingrid (0, 10, 1, width, height) withcolor .6white ;
		draw hlingrid (0, 10, 1, height, width ) withcolor .6white ;
		linecap := squared ;
	) ;


\stopMPinclusions


\startMPpage
draw grid withpen pencircle scaled 1/20;



% Draw a circle with diameter of 4
draw fullcircle scaled 4 withpen pencircle scaled 0.2 withcolor red;




currentpicture := currentpicture xsized 10cm ;



setbounds currentpicture to boundingbox currentpicture enlarged 1/2cm ;



		



\stopMPpage
