#include<time.h>
#include<stdio.h>
#include<conio.h>
#include<stdlib.h>
int i[250],Y[25],X[10]={20};int main()
{textmode(C40);
_setcursortype(_NOCURSOR);
clock_t T;
srand(time(NULL));
printf("%c[3;28f Nivel=1",27);char far*q=1967+(char far*)0xB8000000;
char E,C[7][4][4],far*Q[250];
char B[4][4][7][4]={"0000","0000","0000","0000","0000","0000","0000", "1111","0100","0010","0110","0110","0100","0110",
"0000","0111","1110","0011","1100","1110","0110",
"0000","0000","0000","0000","0000","0000","0000"};
int e[256],f[250],J[250],G[]={1,2,3,0};int a,g,n,x,y,b=256,c=249,p=6,L=48,M=9;
while(b--) e[b]=10;
e[72]=0;
e[75]=-1;
e[77]=1;
for(y=25;y--;q-=60)
for(x=10;x--;q-=2,f[c--]=y)
if(*(q-1)=*(q+X[x]-1)=219)
*(Q[c]=q)=*(q+X[x])=J[c]=y%24<1||!x?8:0;
for(g=4;g--;L=0)
for(a=7;a--;)
for(n=y=4;y--;)
for(x=4;x--;) if(B[g][y][a][x]=B[G[g]][x][a][3-y]-L)
C[a][g][--n]=x+10*y;
Inicio:
for(g=n=0;n<4;n++,i[b]++)
if(J[b=C[a=p][0][n]+4]) break;
else if(*Q[b]=a+1)
*(Q[b]+502)=0;
while (n<4) if(getch()==27)
return 0;
p=rand()%7;
while(n--) if(*(q=Q[C[p][0][n]]+510)=p+1)
*(--q)=219;
c=4;
T=clock();
do{ while(E=kbhit()) getch();
do if(kbhit()) E=getch();
while(!E&&clock()-T<M);
if(E==27&&getch()==E) return 0;
if(E=='-') printf("%c[3;35f%u",27,10-(M+=M<10)); if(E=='+') printf("%c[3;35f%u",27,10-(M-=M>1)); x=c+e[E];
y=e[E]?g:G[g];
for(n=0;n<4;n++)
if(J[C[a][y][n]+x]) break;
if(n>3){ while(n--) if(++i[b=C[a][y][n]+x]<2)
*Q[b]=a+1;
for(n=4;n--;) if(--i[b=C[a][g][n]+c]<1)
*Q[b]=0;
c=x;
g=y;
T=clock();
}
}while(n<0||e[E]<10);
for(n=0;n<4;n++,J[b]=a+1,i[b]--)
Y[y=f[b=C[a][g][n]+c]]++;
do while(Y[x=y]>8)
do{ if(x==y) printf("%c[5;28fLineas=%u",27,++L); b=10*x+1;
c=b-10;
Y[--x]-=Y[x+1]=Y[x];
for(n=9;n--;J[c++]-=J[b++]=g)
*Q[c]-=*Q[b]=g=x?J[c]:0;
}while(Y[x+1]);
while(Y[--y]);
goto Inicio;
}
Crear cuenta
Comentarios sobre la versión: 1.0 (0)
No hay comentarios