[sC+].Spam Community

¿Considera usted que este hilo debe ser cerrado y borrado de LANeros.com?

  • Si

  • No

  • Meh!

  • Sólo vine por los comentarios...


Los resultados solo son visibles tras votar.
me va a dar frío con este traje
 

Archivos adjuntos

  • 131005-163630.jpg
    131005-163630.jpg
    52.4 KB · Visitas: 28
Código:
# include "stdio.h"
# include "graphics.h"
# include "conio.h"

int X,Y,TAM=1;
void avion(int x,int y, int color, int TAM);
int mov();

void main()
{
    int controladorg=DETECT, modog;
    unsigned char m;
    initgraph(&controladorg,&modog,"C:\\tc\\bgi");
          rectangle(0,0,639,479);
    rectangle(50,50,589,429);

    do
    {
    TAM++;
        avion(X,Y,WHITE,TAM);
    m=mov();

    switch(m)
    {
        case 72:

            if(Y<240)
            {
                avion(X,Y,BLACK,TAM);
                Y=Y+10;
            }

            break;
        case 77:
            if(X<260)
            {
            avion(X,Y,BLACK,TAM);
            X=X+10;}
            break;
        case 75:
            if(X>-230)
            {
            avion(X,Y,BLACK,TAM);
            X=X-10;}
            break;
        case 80:
            if(Y>-80)
            {
            avion(X,Y,BLACK,TAM);
            Y=Y-10;}
            break;
        case 31:
            break;
        default:
            break;
    }
    }while(m!=31);


}
void avion(int x, int y, int color, int TAM)
{
    setcolor(color);
      rectangle(300+x-TAM,310-y+TAM,310+x-TAM,320-y+TAM);
      rectangle(300+x-TAM,320-y+TAM,310+x-TAM,330-y+TAM);
      rectangle(290+x-TAM,310-y+TAM,300+x-TAM,320-y+TAM);
      rectangle(310+x-TAM,310-y+TAM,320+x-TAM,320-y+TAM);
      rectangle(300+x-TAM,300-y+TAM,310+x-TAM,310-y+TAM);
      rectangle(290+x-TAM,330-y+TAM,300+x-TAM,340-y+TAM);
      rectangle(310+x-TAM,330-y+TAM,320+x-TAM,340-y+TAM);

  }
int mov()
{
  unsigned char va,vR;
    asm{
        mov ah,0x00
        int 0x16
        mov va,al
        mov vR,ah

    }
return(vR);
}
 

Los últimos mensajes

Los últimos temas