# 35-tratteggi

Postscript("35-tratteggi.ps",5,5)
lato=c(0,5); par(bg="tan");
Grafica(lato,lato,cornice=T)
abline(h=2.5)
r=Rettangolo(asin=0.2+4.8i,2.1,0.8)
polygon(r,density=10)
r=r+2.5; polygon(r,density=16,angle=0)
r=Rettangolo(bsin=0.2+2.7i,4.6,1)
polygon(r,col="red")
polygon(r,density=12,angle=30)
t=seq(0,2*pi,by=0.01)
e=Ellisse(t,2.3,0.6)+2.5+1.7i;
polygon(e,col="green")
polygon(e,density=12,angle=30)
polygon(e,density=12,angle=150)
r=Rettangolo(bsin=0.2+0.2i,4.6,0.7)
polygon(r,col="yellow")
polygon(r,density=20,angle=0,col="red")
polygon(r,density=20,angle=90,col="red")
dev.off()