Pacman

Páginas: 5 (1074 palabras) Publicado: 6 de febrero de 2013
#include #include #include #include void pinta2(int x, int y) { setfillstyle(1,BLUE); setcolor(0); fillellipse(x,y,10,10); } void borra2(int x, int y) { setcolor(BLACK); fillellipse(x,y,10,10); } void pinta(int x,int y) { setfillstyle(1,WHITE); setcolor(0); fillellipse(x,y,15,15); setfillstyle(1,WHITE); setcolor(0); fillellipse(x-5,y-5,5,5); setfillstyle(1,0); setcolor(0);fillellipse(x-5,y-5,1,1); setcolor(0); line(x,y,x+12,y+10); line(x,y,x+12,y-10); } void borra(int x,int y) { setfillstyle(1,BLACK); setcolor(BLACK); fillellipse(x,y,15,15); fillellipse(x-5,y-5,5,5); line(x,y,x+12,y+10); line(x,y,x+12,y-10); } int main() { int c, C,b,B,v; char t; int x=80,y=80,xa,ya,xa2,ya2,x2=630,y2=630,inicio,fin,z=80,z1=630; int midx,midy; initwindow(700,700); midx = getmaxx() / 13; midy = getmaxy()/ 13; void pinta3(int z,int z1); { setfillstyle(1,YELLOW); setcolor(0);

fillellipse(z,z1,3,3); } { setcolor(9); line(midx,midy,midx+600,midy); line(midx,midy,midx,midy+600); line(midx+600,midy+600,midx,midy+600); line(midx+600,midy,midx+600,midy+600); } // lineas horizontales { setcolor(3); line(midx+80,midy+40,midx+240,midy+40); line(midx+280,midy+40,midx+480,midy+40);line(midx+520,midy+40,midx+600,midy+40); line(midx,midy+80,midx+40,midy+80); line(midx+80,midy+120,midx+240,midy+120); line(midx+280,midy+120,midx+480,midy+120); line(midx+520,midy+120,midx+560,midy+120); line(midx,midy+160,midx+40,midy+160); line(midx+120,midy+160,midx+280,midy+160); line(midx+360,midy+160,midx+480,midy+160); line(midx+560,midy+160,midx+600,midy+160); line(midx+40,midy+200,midx+80,midy+200);line(midx+240,midy+200,midx+280,midy+200); line(midx+360,midy+200,midx+480,midy+200); line(midx+520,midy+200,midx+560,midy+200); line(midx+40,midy+240,midx+80,midy+240); line(midx+120,midy+240,midx+240,midy+240); line(midx+280,midy+240,midx+320,midy+240); line(midx+360,midy+240,midx+480,midy+240); line(midx,midy+280,midx+40,midy+280); line(midx+80,midy+280,midx+200,midy+280);line(midx,midy+320,midx+40,midy+320); line(midx+80,midy+320,midx+160,midy+320); line(midx+200,midy+320,midx+240,midy+320); line(midx+400,midy+320,midx+480,midy+320); line(midx+520,midy+320,midx+560,midy+320); line(midx+40,midy+360,midx+120,midy+360); line(midx+200,midy+360,midx+240,midy+360); line(midx+440,midy+360,midx+600,midy+360); line(midx+240,midy+400,midx+280,midy+400); line(midx+360,midy+400,midx+400,midy+400);line(midx+440,midy+400,midx+600,midy+400); line(midx+400,midy+440,midx+560,midy+440); line(midx+40,midy+480,midx+120,midy+480); line(midx+160,midy+480,midx+200,midy+480); line(midx+240,midy+480,midx+320,midy+480); line(midx+400,midy+480,midx+560,midy+480); line(midx,midy+520,midx+80,midy+520); line(midx+120,midy+520,midx+160,midy+520); line(midx+240,midy+520,midx+440,midy+520); line(midx+480,midy+520,midx+560,midy+520); line(midx,midy+560,midx+80,midy+560); line(midx+160,midy+560,midx+200,midy+560); line(midx+240,midy+560,midx+400,midy+560); line(midx+480,midy+560,midx+560,midy+560); } // lineas verticales { setcolor(2); line(midx+40,midy+80,midx+40,midy+160); line(midx+40,midy+200,midx+40,midy+240); line(midx+40,midy+280,midx+40,midy+320); line(midx+40,midy+360,midx+40,midy+480);line(midx+80,midy+40,midx+80,midy+120); line(midx+80,midy+200,midx+80,midy+240); line(midx+80,midy+280,midx+80,midy+320); line(midx+80,midy+520,midx+80,midy+560); line(midx+120,midy+160,midx+120,midy+240); line(midx+120,midy+360,midx+120,midy+480); line(midx+120,midy+520,midx+120,midy+600); line(midx+160,midy+320,midx+160,midy+480); line(midx+160,midy+520,midx+160,midy+560);line(midx+200,midy+280,midx+200,midy+320); line(midx+200,midy+360,midx+200,midy+480); line(midx+200,midy+560,midx+200,midy+600); line(midx+240,midy+40,midx+240,midy+120); line(midx+240,midy+200,midx+240,midy+240); line(midx+240,midy+320,midx+240,midy+360); line(midx+240,midy+400,midx+240,midy+480); line(midx+240,midy+520,midx+240,midy+560); line(midx+280,midy+40,midx+280,midy+120); line(midx+280,midy+160,midx+280,midy+200);...
Leer documento completo

Regístrate para leer el documento completo.

Estos documentos también te pueden resultar útiles

  • pacman
  • Pacman
  • Pacman
  • pacm
  • PROGRMACION PACMAN
  • Practica pacman
  • EXCEL Pacman
  • Algoritmo pacman

Conviértase en miembro formal de Buenas Tareas

INSCRÍBETE - ES GRATIS