farm1

# Classe VA Liceo Classico A. Zoli - Atri
# www.atrizoli.net
# (C) 2006 - licenza GNU
# Gruppo formato da:
# Ruggieri Sara - Sannicandro Angela - Scocchia Sonia

#include <allegro.h>

void casa(void) {

rectfill(screen,10,70,110,180,makecol(217,228,38));
line(screen,20,80,20,100,makecol(0,0,0));
line(screen,20,80,30,80,makecol(0,0,0));
line(screen,20,90,25,90,makecol(0,0,0));
line(screen,35,80,35,100,makecol(0,0,0));
line(screen,40,80,40,100,makecol(0,0,0));
line(screen,40,80,50,80,makecol(0,0,0));
line(screen,40,85,45,85,makecol(0,0,0));
line(screen,40,100,50,100,makecol(0,0,0));
line(screen,52,80,52,100,makecol(0,0,0));
line(screen,52,80,60,100,makecol(0,0,0));
line(screen,60,80,60,100,makecol(0,0,0));
line(screen,70,80,70,100,makecol(0,0,0));
line(screen,80,80,80,100,makecol(0,0,0));
line(screen,80,100,90,100,makecol(0,0,0));
line(screen,90,80,90,100,makecol(0,0,0));
line(screen,90,80,100,80,makecol(0,0,0));
line(screen,90,85,100,85,makecol(0,0,0));
line(screen,90,100,100,100,makecol(0,0,0));
rectfill(screen,40,130,80,180,makecol(0,0,0));
}


void carriola(void) {

line(screen,38,190,50,190,makecol(0,0,0));
triangle(screen,50,190,60,210,60,190,makecol(135,136,125));
rectfill(screen,60,190,100,210,makecol(135,136,125));
triangle(screen,100,190,100,210,110,190,makecol(135,136,125));
line(screen,60,210,60,220,makecol(0,0,0));
circlefill(screen,105,215,5,makecol(0,0,0));
arc(screen,60,140,itofix(16),itofix(110),23,makecol(0,0,0));
rectfill(screen,340,440,360,470,makecol(200,0,0));
triangle(screen,350,430,340,440,360,440,makecol(200,0,0));
rectfill(screen,360,450,370,460,makecol(200,0,0));
rectfill(screen,370,440,390,470,makecol(200,0,0));
triangle(screen,380,430,370,440,390,440,makecol(200,0,0));
rectfill(screen,390,450,400,460,makecol(200,0,0));
rectfill(screen,400,440,420,470,makecol(200,0,0));
triangle(screen,410,430,400,440,420,440,makecol(200,0,0));
rectfill(screen,420,450,430,460,makecol(200,0,0));
rectfill(screen,430,440,450,470,makecol(200,0,0));
triangle(screen,440,430,430,440,450,440,makecol(200,0,0));
rectfill(screen,450,450,460,460,makecol(200,0,0));

}

void staccionata(void) {







rectfill(screen,400,350,420,380,makecol(200,0,0));
triangle(screen,410,340,400,350,420,350,makecol(200,0,0));
rectfill(screen,420,360,430,370,makecol(200,0,0));
rectfill(screen,430,350,450,380,makecol(200,0,0));
triangle(screen,440,340,430,350,450,350,makecol(200,0,0));
rectfill(screen,450,360,460,370,makecol(200,0,0));
rectfill(screen,460,350,480,380,makecol(200,0,0));
triangle(screen,470,340,460,350,480,350,makecol(200,0,0));
rectfill(screen,480,360,490,370,makecol(200,0,0));
rectfill(screen,490,350,510,380,makecol(200,0,0));
triangle(screen,490,350,510,350,500,340,makecol(200,0,0));
rectfill(screen,510,360,520,370,makecol(200,0,0));
rectfill(screen,520,350,540,380,makecol(200,0,0));
triangle(screen,520,350,530,340,540,350,makecol(200,0,0));
rectfill(screen,540,360,550,370,makecol(200,0,0));
rectfill(screen,550,350,570,380,makecol(200,0,0));
triangle(screen,550,350,560,340,560,350,makecol(200,0,0));
rectfill(screen,570,360,580,370,makecol(200,0,0));
rectfill(screen,580,350,600,380,makecol(200,0,0));
triangle(screen,580,350,590,340,600,350,makecol(200,0,0));
rectfill(screen,600,360,610,370,makecol(200,0,0));
rectfill(screen,610,350,630,380,makecol(200,0,0));
triangle(screen,610,350,620,340,630,350,makecol(200,0,0));
rectfill(screen,380,370,400,400,makecol(200,0,0));
triangle(screen,390,360,380,370,400,370,makecol(200,0,0));
rectfill(screen,360,380,380,410,makecol(200,0,0));
triangle(screen,370,370,360,380,390,380,makecol(200,0,0));
rectfill(screen,360,380,380,410,makecol(200,0,0));

rectfill(screen,340,390,360,420,makecol(200,0,0));
triangle(screen,350,380,340,390,360,390,makecol(200,0,0));
rectfill(screen,320,400,340,430,makecol(200,0,0));
triangle(screen,330,390,320,400,340,400,makecol(200,0,0));
rectfill(screen,310,440,330,470,makecol(200,0,0));
triangle(screen,320,430,310,440,330,440,makecol(200,0,0));
triangle(screen,320,430,310,440,330,440,makecol(200,0,0));
rectfill(screen,330,450,340,460,makecol(200,0,0));
triangle(screen,560,340,560,350,570,350,makecol(200,0,0));
}

void apetta(void) {
triangle(screen,170,320,170,390,200,390,makecol(55,137,55));
rectfill(screen,130,320,170,390,makecol(55,137,55));
rectfill(screen,30,370,130,390,makecol(55,137,55));
triangle(screen,60,340,30,370,60,370,makecol(111,120,111));
rectfill(screen,60,340,130,370,makecol(111,120,111));
circlefill(screen,70,405,15,makecol(0,0,0));
circlefill(screen,170,405,15,makecol(0,0,0));
rectfill(screen,140,340,170,360,makecol(125,204,230));
line(screen,110,350,110,410,makecol(187,130,32));
line(screen,100,410,100,430,makecol(0,0,0));
line(screen,100,410,110,410,makecol(0,0,0));
line(screen,110,410,110,425,makecol(0,0,0));
line(screen,110,410,120,410,makecol(0,0,0));
line(screen,120,410,120,430,makecol(0,0,0));
}
void culetto (void){
ellipsefill(screen,480,400,40,20,makecol(245,158,215));
rectfill(screen,450,410,460,430,makecol(245,158,215));
rectfill(screen,490,410,500,430,makecol(245,158,215));
ellipsefill(screen,480,370,23,15,makecol(245,158,215));
triangle(screen,470,350,465,360,475,360,makecol(245,158,215));
triangle(screen,490,350,485,360,495,360,makecol(245,158,215));
}

void biondi (void) {
rectfill(screen,250,460,270,470,makecol(0,0,0));
rectfill(screen,280,460,300,470,makecol(0,0,0));
rectfill(screen,260,420,270,460,makecol(237,20,20));
rectfill(screen,280,420,290,460,makecol(237,20,20));
rectfill(screen,260,380,290,420,makecol(237,20,20));
rectfill(screen,230,385,260,395,makecol(237,20,20));
rectfill(screen,290,385,320,395,makecol(237,20,20));
circlefill(screen,275,365,15,makecol(245,158,215));
circlefill(screen,270,360,2,makecol(59,188,231));
circlefill(screen,280,360,2,makecol(59,188,231));
arc(screen,275,365,5,itofix(133),itofix(232),makecol(237,20,20));
line(screen,270,370,280,370,makecol(237,20,20));
ellipsefill(screen,225,390,5,3,makecol(245,158,215));
ellipsefill(screen,325,390,5,3,makecol(245,158,215));
line(screen,225,370,225,450,makecol(137,10,10));
triangle(screen,210,450,240,450,225,470,makecol(117,109,109));
rectfill(screen,255,350,295,353,makecol(231,220,39));
rectfill(screen,260,335,288,350,makecol(231,220,39));
}
void farfalle (void) {
line(screen,245,245,245,255,makecol(0,0,0));
line(screen,245,255,255,255,makecol(0,0,0));
line(screen,230,270,245,255,makecol(0,0,0));
triangle(screen,235,250,220,265,235,265,makecol(19,253,90));
triangle(screen,235,265,235,280,250,265,makecol(19,253,90));
line(screen,435,140,435,180,makecol(11,88,20));
rectfill(screen,440,130,430,140,makecol(245,227,25));
rectfill(screen,430,120,420,130,makecol(223,23,230));
rectfill(screen,430,140,420,150,makecol(223,23,230));
rectfill(screen,450,120,440,130,makecol(223,23,230));
rectfill(screen,450,140,440,150,makecol(223,23,230));
triangle(screen,445,160,435,170,445,170,makecol(11,88,20));
line(screen,495,140,495,180,makecol(11,88,20));
rectfill(screen,500,130,490,140,makecol(245,227,25));
rectfill(screen,490,120,480,130,makecol(14,231,182));
rectfill(screen,490,140,480,150,makecol(14,231,182));
rectfill(screen,510,120,500,130,makecol(14,231,182));
rectfill(screen,510,140,500,150,makecol(14,231,182));
triangle(screen,505,160,495,170,505,170,makecol(11,88,20));
line(screen,565,140,565,180,makecol(11,88,20));
triangle(screen,565,170,575,170,575,160,makecol(11,88,20));
rectfill(screen,560,130,570,140,makecol(245,227,25));
rectfill(screen,550,120,560,130,makecol(14,60,231));
rectfill(screen,570,120,580,130,makecol(14,60,231));
rectfill(screen,550,140,560,150,makecol(14,60,231));
rectfill(screen,570,140,580,150,makecol(14,60,231));
}
int main() {
allegro_init();
install_keyboard();
install_mouse();
set_gfx_mode(GFX_AUTODETECT_WINDOWED,640,480,0,0);
clear_to_color(screen, makecol(255,255,255));
putpixel(screen,200,200,makecol(255,0,0));
rectfill(screen,0,0,640,120,makecol(27,181,238));
rectfill(screen,0,121,640,480,makecol(68,179,65));
triangle(screen,60,20,10,70,110,70,makecol(179,135,65));

casa();
carriola();
staccionata();
apetta();
culetto();
biondi();
farfalle();

rectfill(screen,460,440,480,470,makecol(200,0,0));
triangle(screen,470,430,460,440,480,440,makecol(200,0,0));
rectfill(screen,480,450,490,460,makecol(200,0,0));
rectfill(screen,490,440,510,470,makecol(200,0,0));
triangle(screen,500,430,490,440,510,440,makecol(200,0,0));
rectfill(screen,510,450,520,460,makecol(200,0,0));
rectfill(screen,520,440,540,470,makecol(200,0,0));
triangle(screen,530,430,520,440,540,440,makecol(200,0,0));
rectfill(screen,540,430,560,460,makecol(200,0,0));

triangle(screen,550,420,540,430,560,430,makecol(200,0,0));
rectfill(screen,560,420,580,450,makecol(200,0,0));
triangle(screen,570,410,560,420,580,420,makecol(200,0,0));
rectfill(screen,580,410,600,440,makecol(200,0,0));
triangle(screen,590,400,580,410,600,410,makecol(200,0,0));
rectfill(screen,600,400,620,430,makecol(200,0,0));
triangle(screen,610,390,600,400,620,400,makecol(200,0,0));
rectfill(screen,620,390,640,420,makecol(200,0,0));
triangle(screen,630,380,620,390,640,390,makecol(200,0,0));
while(!key[KEY_ESC]);


return 0;
}
END_OF_MAIN();