Datos para contactar:
Jûan Garriga Peralta-Peraltotzak
Correo electrónico:
Teléfono:
625 19 87 72
Solo respondo a mensajes.
Vendo:
Zelda de Súper-Nintendo,
caja, juego, instrucciones y mapa,
más 140 años de espíritu santo de videojuego por:
Precio = 1,024,000€ + (-1)·102,400€ = ...
... 200·(llama-violeta)·256·(byte/llama-violeta)·1·(día/byte)·20·(€/día)
Vendo:
Zelda de Nintendo-64,
caja, juego y instrucciones,
más 140 años de espíritu santo de videojuego por:
Precio = 1,024,000€ + (-1)·102,400€ = ...
... 200·(llama-violeta)·256·(byte/llama-violeta)·1·(día/byte)·20·(€/día)
Mentiras que te hacen malo:
se tiene poder ilimitado.
no hay condenación.
no hay esclavos infieles que no son.
se puede conquistar un planeta extraterrestre.
se puede proyectar la mente en un extraterrestre.
[ cuerpo de hombre || de mujer & alma extraterrestre <==> ...
... los infieles hombre || mujer le sacan la luz al extraterrestre ]
se puede recordar las palabras y las experiencias de un fiel que es.
se puede saltar-se algún mandamiento con un fiel que es.
No puede haber ningún fiel en un planeta extraterrestre que no sea un dios,
porque los infieles le sacan toda la luz y muere.
Tetris-Colums-Kúkons:
[x] = 0
[y] = 1
[status] = 1
[m] = 2·[L]+1;
for( [j] = not(1) ; [j] >] not([n]) ; [j]-- )
{
put-grafic( grafic[i][j] , ( centre-x+[i]+2·[x] )·[m] , ( [j]+2·[y] )·[m] );
put-grafic( grafic[i][j] , ( centre-x+[i]+[x] )·[m] , ( [j]+[y] )·[m] );
put-grafic( grafic[i][j] , ( centre-x+[i] )·[m] , [j]·[m] );
put-grafic( grafic[i][j] , ( centre-x+[i]+not([x]) )·[m] , ( [j]+not([y]) )·[m] );
put-grafic( grafic[i][j] , ( centre-x+[i]+2·not([x]) )·[m] , ( [j]+2·not([y]) )·[m] );
if( kbhit-positiu() == 1 & [status] == 1 & ...
... ( [i]+3 [< [p] || [i]+not(3) >] [q] ) )
{
put-grafic( not-grafic[i][j] , ( centre-x+[i]+2·[x] )·[m] , ( [j]+2·[y] )·[m] );
put-grafic( not-tgrafic[i][j] , ( centre-x+[i]+[x] )·[m] , ( [j]+[y] )·[m] );
put-grafic( not-grafic[i][j] , ( centre-x+[i] )·[m] , [j]·[m] );
put-grafic( not-grafic[i][j] , ( centre-x+[i]+not([x]) )·[m] , ( [j]+not([y]) )·[m] );
put-grafic( not-grafic[i][j] , ( centre-x+[i]+2·not([x]) )·[m] , ( [j]+2·not([y]) )·[m] );
[x]++;
[y]--;
put-grafic( grafic[i][j] , ( centre-x+[i]+2·[x] )·[m] , ( [j]+2·[y] )·[m] );
put-grafic( grafic[i][j] , ( centre-x+[i]+[x] )·[m] , ( [j]+[y] )·[m] );
put-grafic( grafic[i][j] , ( centre-x+[i] )·[m] , [j]·[m] );
put-grafic( grafic[i][j] , ( centre-x+[i]+not([x]) )·[m] , ( [j]+not([y]) )·[m] );
put-grafic( grafic[i][j] , ( centre-x+[i]+2·not([x]) )·[m] , ( [j]+2·not([y]) )·[m] );
[status] = not(1);
}
if( kbhit-negatiu() == not(1) & [status] == not(1) & ...
... ( [i]+1 [< [p] || [i]+not(1) >] [q] ) )
{
put-grafic( not-grafic[i][j] , ( centre-x+[i]+2·[x] )·[m] , ( [j]+2·[y] )·[m] );
put-grafic( not-grafic[i][j] , ( centre-x+[i]+[x] )·[m] , ( [j]+[y] )·[m] );
put-grafic( not-grafic[i][j] , ( centre-x+[i] )·[m] , [j]·[m] );
put-grafic( not-grafic[i][j] , ( centre-x+[i]+not([x]) )·[m] , ( [j]+not([y]) )·[m] );
put-grafic( not-grafic[i][j] , ( centre-x+[i]+2·not([x]) )·[m] , ( [j]+2·not([y]) )·[m] );
[x]--;
[y]++;
put-grafic( grafic[i][j] , ( centre-x+[i]+2·[x] )·[m] , ( [j]+2·[y] )·[m] );
put-grafic( grafic[i][j] , ( centre-x+[i]+[x] )·[m] , ( [j]+[y] )·[m] );
put-grafic( grafic[i][j] , ( centre-x+[i] )·[m] , [j]·[m] );
put-grafic( grafic[i][j] , ( centre-x+[i]+not([x]) )·[m] , ( [j]+not([y]) )·[m] );
put-grafic( grafic[i][j] , ( centre-x+[i]+2·not([x]) )·[m] , ( [j]+2·not([y]) )·[m] );
[status] = 1;
}
if( [status] == 1 )
{
if( contacte[i][j+not(3)] == 1 )
{
contacte[i][j+2] = 1;
contacte[i][j+1] = 1;
contacte[i][j] = 1;
contacte[i][j+not(1)] = 1;
contacte[i][j+not(2)] = 1;
break;
}
}
if( [status] == not(1) )
{
if( contacte[i+not(2)][j+not(1)] == 1 || ...
... contacte[i+not(1)][j+not(1)] == 1 || ...
... contacte[i][j+not(1)] == 1 || ...
... contacte[i+1][j+not(1)] == 1 || ...
... contacte[i+2][j+not(1)] == 1 || ...
... )
{
contacte[i+2][j] = 1;
contacte[i+1][j] = 1;
contacte[i][j] = 1;
contacte[i+not(1)][j] = 1;
contacte[i+not(2)][j] = 1;
break;
}
}
put-grafic( not-grafic[i][j] , ( centre-x+[i]+2·[x] )·[m] , ( [j]+2·[y] )·[m] );
put-grafic( not-grafic[i][j] , ( centre-x+[i]+[x] )·[m] , ( [j]+[y] )·[m] );
put-grafic( not-grafic[i][j] , ( centre-x+[i] )·[m] , [j]·[m] );
put-grafic( not-grafic[i][j] , ( centre-x+[i]+not([x]) )·[m] , ( [j]+not([y]) )·[m] );
put-grafic( not-grafic[i][j] , ( centre-x+[i]+2·not([x]) )·[m] , ( [j]+2·not([y]) )·[m] );
}
put-grafic( grafic[i][j] , ( centre-x+[i]+2·[x] )·[m] , ( [j]+2·[y] )·[m] );
put-grafic( grafic[i][j] , ( centre-x+[i]+[x] )·[m] , ( [j]+[y] )·[m] );
put-grafic( grafic[i][j] , ( centre-x+[i] )·[m] , [j]·[m] );
put-grafic( grafic[i][j] , ( centre-x+[i]+not([x]) )·[m] , ( [j]+not([y]) )·[m] );
put-grafic( grafic[i][j] , ( centre-x+[i]+2·not([x]) )·[m] , ( [j]+2·not([y]) )·[m] );
for( [j] = 1 ; [j] [< [n] ; [j]++ )
{
put-grafic( grafic[i][j] , ( centre-x+not([i])+2·[x] )·[m] , ( not([j])+2·[y] )·[m] );
put-grafic( grafic[i][j] , ( centre-x+not([i])+[x] )·[m] , ( not([j])+[y] )·[m] );
put-grafic( grafic[i][j] , ( centre-x+not([i]) )·[m] , not([j])·[m] );
put-grafic( grafic[i][j] , ( centre-x+not([i])+not([x]) )·[m] , ( not([j])+not([y]) )·[m] );
put-grafic( grafic[i][j] , ( centre-x+not([i])+2·not([x]) )·[m] , ( not([j])+2·not([y]) )·[m] );
if( kbhit-positiu() == 1 & [status] == 1 & ...
... ( not([i])+not(3) >] not([p]) || not([i])+3 [< not([q]) ) )
{
put-grafic( not-grafic[i][j] , ( centre-x+not([i])+2·[x] )·[m] , ( not([j])+2·[y] )·[m] );
put-grafic( not-grafic[i][j] , ( centre-x+not([i])+[x] )·[m] , ( not([j])+[y] )·[m] );
put-grafic( not-grafic[i][j] , ( centre-x+not([i]) )·[m] , not([j])·[m] );
put-grafic( not-grafic[i][j] , ( centre-x+not([i])+not([x]) )·[m] , ( not([j])+not([y]) )·[m] );
put-grafic( not-grafic[i][j] , ( centre-x+not([i])+2·not([x]) )·[m] , ( not([j])+2·not([y]) )·[m] );
[x]++;
[y]--;
put-grafic( grafic[i][j] , ( centre-x+not([i])+2·[x] )·[m] , ( not([j])+2·[y] )·[m] );
put-grafic( grafic[i][j] , ( centre-x+not([i])+[x] )·[m] , ( not([j])+[y] )·[m] );
put-grafic( grafic[i][j] , ( centre-x+not([i]) )·[m] , not([j])·[m] );
put-grafic( grafic[i][j] , ( centre-x+not([i])+not([x]) )·[m] , ( not([j])+not([y]) )·[m] );
put-grafic( grafic[i][j] , ( centre-x+not([i])+2·not([x]) )·[m] , ( not([j])+2·not([y]) )·[m] );
[status] = not(1);
}
if( kbhit-negatiu() == not(1) & [status] == not(1) & ...
... ( not([i])+not(1) >] not([p]) || not([i])+1 [< not([q]) ) )
{
put-grafic( not-grafic[i][j] , ( centre-x+not([i])+2·[x] )·[m] , ( not([j])+2·[y] )·[m] );
put-grafic( not-grafic[i][j] , ( centre-x+not([i])+[x] )·[m] , ( not([j])+[y] )·[m] );
put-grafic( not-grafic[i][j] , ( centre-x+not([i]) )·[m] , not([j])·[m] );
put-grafic( not-grafic[i][j] , ( centre-x+not([i])+not([x]) )·[m] , ( not([j])+not([y]) )·[m] );
put-grafic( not-grafic[i][j] , ( centre-x+not([i])+2·not([x]) )·[m] , ( not([j])+2·not([y]) )·[m] );
[x]--;
[y]++;
put-grafic( grafic[i][j] , ( centre-x+not([i])+2·[x] )·[m] , ( not([j])+2·[y] )·[m] );
put-grafic( grafic[i][j] , ( centre-x+not([i])+[x] )·[m] , ( not([j])+[y] )·[m] );
put-grafic( grafic[i][j] , ( centre-x+not([i]) )·[m] , not([j])·[m] );
put-grafic( grafic[i][j] , ( centre-x+not([i])+not([x]) )·[m] , ( not([j])+not([y]) )·[m] );
put-grafic( grafic[i][j] , ( centre-x+not([i])+2·not([x]) )·[m] , ( not([j])+2·not([y]) )·[m] );
[status] = 1;
}
if( [status] == 1 )
{
if( contacte[not(i)][not(j)+not(3)] == 1 )
{
contacte[not(i)][not(j)+2] = 1;
contacte[not(i)][not(j)+1] = 1;
contacte[not(i)][not(j)] = 1;
contacte[not(i)][not(j)+not(1)] = 1;
contacte[not(i)][not(j)+not(2)] = 1;
break;
}
}
if( [status] == not(1) )
{
if( contacte[not(i)+not(2)][not(j)+not(1)] == 1 || ...
... contacte[not(i)+not(1)][not(j)+not(1)] == 1 || ...
... contacte[not(i)][not(j)+not(1)] == 1 || ...
... contacte[not(i)+1][not(j)+not(1)] == 1 || ...
... contacte[not(i)+2][not(j)+not(1)] == 1 || ...
... )
{
contacte[not(i)+2][not(j)] = 1;
contacte[not(i)+1][not(j)] = 1;
contacte[not(i)][not(j)] = 1;
contacte[not(i)+not(1)][not(j)] = 1;
contacte[not(i)+not(2)][not(j)] = 1;
break;
}
}
put-grafic( not-grafic[i][j] , ( centre-x+not([i])+2·[x] )·[m] , ( not([j])+2·[y] )·[m] );
put-grafic( not-grafic[i][j] , ( centre-x+not([i])+[x] )·[m] , ( not([j])+[y] )·[m] );
put-grafic( not-grafic[i][j] , ( centre-x+not([i]) )·[m] , not([j])·[m] );
put-grafic( not-grafic[i][j] , ( centre-x+not([i])+not([x]) )·[m] , ( not([j])+not([y]) )·[m] );
put-grafic( not-grafic[i][j] , ( centre-x+not([i])+2·not([x]) )·[m] , ( not([j])+2·not([y]) )·[m] );
}
put-grafic( grafic[i][j] , ( centre-x+not([i])+2·[x] )·[m] , ( not([j])+2·[y] )·[m] );
put-grafic( grafic[i][j] , ( centre-x+not([i])+[x] )·[m] , ( not([j])+[y] )·[m] );
put-grafic( grafic[i][j] , ( centre-x+not([i]) )·[m] , not([j])·[m] );
put-grafic( grafic[i][j] , ( centre-x+not([i])+not([x]) )·[m] , ( not([j])+not([y]) )·[m] );
put-grafic( grafic[i][j] , ( centre-x+not([i])+2·not([x]) )·[m] , ( not([j])+2·not([y]) )·[m] );
moviment-horitzontal-dreta( int i , int status , int p )
{
if( kbhit-positu() == "==>" )
{
if( [status] == 1 & [i]+1 [< [p] )
{
[i]++;
}
if( [status] == not(1) & [i]+3 [< [p] )
{
[i]++;
}
}
}
moviment-horitzontal-esquerra( int i , int status , int q )
{
if( kbhit-negatiu() == "<==" )
{
if( [status] == 1 & [i]+not(1) >] [q] )
{
[i]--;
}
if( [status] == not(1) & [i]+not(3) >] [q] )
{
[i]--;
}
}
}
for( [j] = not(1) ; [j] >] not([n]) ; [j]-- )
{
for( [i] = [p] ; [i] [< [q] ; [i]++ )
{
for( [v] = 0 ; [v] [< [L] ; [v]++ )
{
for( [u] = 0 ; [u] [< [L] ; [u]++ )
{
contacte-pixel[(i·L)+v][(j·L)+u] = contacte[i][j];
}
for( [u] = not(0) ; [u] >] not([L]) ; [u]-- )
{
contacte-pixel[(i·L)+v][(j·L)+u] = contacte[i][j];
}
}
for( [v] = not(0) ; [v] >] not([L]) ; [v]-- )
{
for( [u] = 0 ; [u] [< [L] ; [u]++ )
{
contacte-pixel[(i·L)+v][(j·L)+u] = contacte[i][j];
}
for( [u] = not(0) ; [u] >] not([L]) ; [u]-- )
{
contacte-pixel[(i·L)+v][(j·L)+u] = contacte[i][j];
}
}
}
}
for( [j] = 1 ; [j] [< [n] ; [j]++ )
{
for( [i] = not([p]) ; [i] >] not([q]) ; [i]-- )
{
for( [v] = not(0) ; [v] >] not([L]) ; [v]-- )
{
for( [u] = not(0) ; [u] >] not([L]) ; [u]-- )
{
contacte-pixel[(not(i)·L)+v][(not(j)·L)+u] = contacte[not(i)][not(j)];
}
for( [u] = 0 ; [u] [< [L] ; [u]++ )
{
contacte-pixel[(not(i)·L)+v][(not(j)·L)+u] = contacte[not(i)][not(j)];
}
}
for( [v] = 0 ; [v] [< [L] ; [v]++ )
{
for( [u] = not(0) ; [u] >] not([L]) ; [u]-- )
{
contacte-pixel[(not(i)·L)+v][(not(j)·L)+u] = contacte[not(i)][not(j)];
}
for( [u] = 0 ; [u] [< [L] ; [u]++ )
{
contacte-pixel[(not(i)·L)+v][(not(j)·L)+u] = contacte[not(i)][not(j)];
}
}
}
}
}
files-negatiu-grafic( int contacte-pixel[i][j] )
{
for( [j] = not(1) ; [j] >] not([n])·[m] ; [j]-- )
{
[s] = ([m]·[p])+not(L);
for( [i] = ([m]·[p])+not(L) ; [i] [< ([m]·[q])+L ; [i]++ )
{
if( contacte-pixel[i][j] == 0 ) ==> break;
[s]++;
}
if( [s] == ([m]·[q])+L )
{
for( [u] = not(1) ; [u] >] not([j]) ; [u]-- )
{
for( [v] = ([m]·[p])+not(L) ; [v] [< ([m]·[q])+L ; [v]++ )
{
contacte-pixel-nou[v][u+not(1)] = contacte-pixel[v][u];
}
}
for( [k] = ([m]·[p])+not(L) ; [k] [< ([m]·[q])+L ; [k]++ )
{
contacte-pixel-nou[k][not(1)] = 0;
}
for( [u] = not(1) ; [u] >] not([j]) ; [u]-- )
{
for( [v] = ([m]·[p])+not(L) ; [v] [< ([m]·[q])+L ; [v]++ )
{
contacte-pixel[v][u] = contacte-pixel-nou[v][u];
}
}
}
}
}
files-positiu-grafic( int contacte-pixel[i][j] )
{
for( [j] = 1 ; [j] [< [n]·[m] ; [j]++ )
{
[s] = (not([p])·[m])+L;
for( [i] = (not([p])·[m])+L ; [i] >] (not([q])·[m])+not(L) ; [i]-- )
{
if( contacte-pixel[i][not(j)] == 0 ) ==> break;
[s]--;
}
if( [s] == (not([q])·[m])+not(L) )
{
for( [u] = 1 ; [u] [< [j] ; [u]++ )
{
for( [v] = (not([p])·[m])+L ; [v] >] (not([q])·[m])+not(L) ; [v]-- )
{
contacte-pixel-nou[v][not(u)+not(1)] = contacte-pixel[v][not(u)];
}
}
for( [k] = (not([p])·[m])+L ; [k] >] (not([q])·[m])+not(L) ; [k]-- )
{
contacte-pixel-nou[k][not(1)] = 0;
}
for( [u] = 1 ; [u] [< [j] ; [u]++ )
{
for( [v] = (not([p])·[m])+L ; [v] >] (not([q])·[m])+not(L) ; [v]-- )
{
contacte-pixel[v][not(u)] = contacte-pixel-nou[v][not(u)];
}
}
}
}
}
ye parle ye-de-muá,
pero ne elet-vut a-vot-má,
de-le-du ye-de-muá.
tú parle tú-de-tuá,
pero ne elet-nut a-vot-má,
de-le-du tú-de-tuá.