ke tenes en tu control+v ?

[Pyrita]

cofcof

hasta aca llega?

para eso esta outlands/para desvirtuar

[Lendrogh]

Y bueno, como esto es Outlands todo bien

cofcof

[Tenshi]

hasta aca llega?

para eso esta outlands/para desvirtuar

cofcof llega hasta el infinito y más allá!

cofcof

[Lendrogh]

cofcof llega hasta el infinito y más allá!

cofcof

HAHAHAHAHAJAAAJJAJAJAJAJAJ


cofcof

[Skavenger]

tengo:

http://foros.gxzone.com/showthread.php?t=64592

[Pyrita]

PERO QUE PASA PETER!!!

(eso tenia copiado...frase celebre de "Supermatch"

[Haldor]

JAJAJAJAJAJAJAJAJAJAJAJAJAJAJAJAJAJAJAJAJAJAJAJAJA JAJAJAJAJAJAJAJAJAJAJAJAJAJAJAJAJAJAJAJAJAJAJAJAJA JAJAJAJAJAJAJAJAJAJAJAJAJA



(Tenia eso en el control+v)

[TurboMaster]

a ver ctrl+v:

//LIBRERIA DE GRAFICOS Y DEL RATON
#include<graficos.h>
#include<raton.h>
//************************************************** ************************
const int Der=77, Izq=75,Abj=80,Arb=72,Xo=50, y0=10,
Ancho=22,Alto=22, Fila=19, Col=25;
//************************************************** ************************
int N=0;
int Matriz[Fila][Col];
int Matriz1[Fila][Col]={
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
3,1,1,1,1,0,1,1,1,1,0,1,1,1,1,1,0,1,1,1,1,1,1,1,0,
0,1,0,0,0,0,1,0,0,1,0,1,0,1,0,1,1,1,1,0,1,1,1,0,0,
0,1,0,0,1,0,1,0,1,1,0,1,0,1,0,1,0,0,1,1,1,0,1,1,0,
0,1,1,0,1,0,1,0,1,0,0,1,1,1,1,0,1,1,1,0,1,0,0,1,0,
0,1,1,1,1,1,1,0,1,0,0,0,1,0,1,1,1,0,0,0,1,0,1,0,0,
0,1,1,0,1,0,1,0,1,1,1,1,1,0,0,1,0,1,1,0,1,1,1,1,0,
0,1,0,0,1,0,1,0,1,0,0,1,0,1,1,1,0,0,1,0,0,0,0,0,0,
0,1,1,0,1,1,1,1,1,0,1,1,0,0,0,1,0,0,1,0,1,1,0,1,0,
0,1,1,1,1,0,1,1,0,1,1,0,0,1,0,1,0,1,1,0,0,1,0,1,0,
0,1,1,1,0,0,0,1,0,1,0,0,1,1,0,1,1,1,1,1,1,1,0,1,0,
0,1,0,1,1,0,1,1,1,1,1,1,1,0,1,1,0,1,0,1,0,0,1,1,1,
0,1,1,1,1,1,1,0,1,0,1,0,1,0,1,0,1,1,0,1,0,1,1,0,0,
0,0,1,0,0,0,0,1,1,1,1,1,1,0,1,1,0,1,0,0,0,0,1,0,0,
0,1,1,1,1,1,1,1,0,0,0,0,1,0,1,0,0,1,1,1,1,0,1,0,0,
0,1,0,0,0,0,0,1,1,1,0,1,1,0,1,1,0,0,0,0,0,1,1,1,0,
0,1,0,0,1,1,1,0,0,0,1,1,0,1,0,1,1,1,0,1,1,1,0,0,0,
0,1,1,1,1,0,1,0,1,1,1,1,1,1,1,0,0,1,1,1,0,1,1,1,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
};
int Matriz2[Fila][Col]={
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,
0,1,0,0,0,0,1,0,0,0,0,0,0,1,0,0,1,0,0,0,1,0,0,1,0,
0,1,0,1,1,1,0,1,1,1,1,1,1,1,0,1,0,1,1,1,1,1,1,1,0,
0,1,0,1,0,0,0,0,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,
0,1,0,1,1,1,1,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,
0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,
0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,1,1,0,1,0,1,0,1,0,
0,1,0,1,0,1,0,1,0,1,1,1,0,1,0,1,0,1,0,1,0,1,0,1,0,
0,1,0,1,0,1,0,1,0,1,0,1,0,1,1,1,0,1,0,1,0,1,0,1,0,
0,1,0,1,0,1,0,1,0,1,0,1,0,0,1,0,0,1,0,1,0,1,0,1,0,
0,1,0,1,0,1,0,1,0,1,0,1,1,1,1,1,1,0,0,1,0,1,0,1,0,
0,1,0,1,0,1,0,1,0,0,1,0,0,0,0,0,0,0,0,1,0,1,0,1,0,
0,1,0,1,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,1,0,
0,1,0,1,0,1,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,1,0,
1,1,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,
0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,1,0,
3,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
};
int Matriz3[Fila][Col]={
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,1,1,1,1,1,1,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,
0,1,0,1,0,0,0,1,1,0,1,0,0,0,0,1,0,0,0,0,0,1,0,1,0,
0,1,0,0,1,1,0,1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,
0,1,1,1,0,1,0,1,0,0,1,0,0,1,0,0,1,0,1,0,1,0,0,1,0,
0,1,0,1,0,1,0,1,0,0,1,0,0,1,0,1,0,1,0,1,0,0,1,1,0,
0,0,0,1,0,1,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,
0,1,1,1,0,1,0,1,0,1,0,0,0,0,0,0,1,0,0,0,0,1,0,1,0,
0,1,0,1,0,1,0,1,0,1,0,1,1,0,1,1,1,1,1,1,1,1,0,1,0,
0,1,0,1,0,1,0,1,0,1,1,1,0,0,1,0,0,0,0,0,0,0,0,1,0,
0,1,0,0,0,1,0,1,0,1,0,1,0,0,1,0,1,1,1,1,1,1,1,1,0,
1,1,1,1,1,1,0,1,0,1,0,1,0,0,1,0,1,0,0,0,0,0,0,0,0,
0,0,1,0,0,0,0,1,0,1,0,1,1,0,1,0,1,0,1,1,1,0,1,1,0,
0,1,1,0,1,1,0,1,0,1,0,1,0,1,1,0,1,0,1,0,1,0,0,1,0,
0,1,0,0,0,1,0,1,0,1,0,1,0,1,0,1,1,0,1,0,1,1,0,1,0,
0,1,1,1,1,1,0,1,0,1,0,1,0,1,0,1,0,0,1,0,1,1,0,1,0,
0,1,0,0,0,0,0,1,0,0,1,0,0,1,0,1,1,0,1,0,1,1,1,1,0,
0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1,1,0,1,0,0,1,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,3,0
};
int Matriz4[Fila][Col]={
0,0,0,0,0,0,0,0,0,0,0,0,3,0,0,0,0,0,0,0,0,0,0,0,0,
0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,
0,1,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,1,0,
0,1,0,1,1,1,1,1,1,1,1,0,1,0,0,1,1,1,1,1,1,1,0,1,0,
0,1,0,1,0,0,0,0,0,0,0,0,1,0,0,1,0,1,0,0,0,1,0,1,0,
0,1,0,1,0,1,1,1,1,1,1,1,1,0,0,1,0,0,1,1,0,1,0,1,0,
0,1,0,1,0,0,0,0,0,0,0,0,1,0,1,1,1,1,1,0,1,1,0,1,0,
0,1,0,1,1,1,1,1,1,1,1,0,1,1,1,0,0,1,0,1,0,1,0,1,0,
0,1,0,1,0,0,0,0,1,0,1,0,0,0,0,0,1,0,0,1,0,1,0,1,0,
0,1,0,1,0,1,1,1,1,0,1,1,1,1,1,1,1,1,1,0,1,1,0,1,0,
0,1,0,1,0,1,0,0,0,0,0,0,0,0,0,0,0,0,1,0,1,0,0,1,0,
0,1,0,1,1,1,1,1,1,1,1,1,0,1,1,1,1,0,1,0,1,0,0,1,0,
0,1,0,1,0,0,0,0,0,0,0,1,0,1,0,0,1,0,1,0,1,0,0,1,0,
0,1,0,0,1,1,1,1,1,1,0,1,0,1,0,1,1,0,1,1,1,1,0,1,0,
0,1,0,0,0,0,0,0,0,1,0,1,0,1,0,1,0,1,0,0,0,0,0,1,0,
0,1,0,1,1,1,1,1,1,1,0,1,0,1,0,1,0,1,1,1,1,1,1,1,0,
0,1,0,1,0,0,0,0,0,0,0,1,1,1,0,0,1,0,0,0,0,0,0,1,0,
0,1,1,1,1,1,1,1,1,1,1,0,1,0,1,1,1,1,1,1,1,1,1,1,0,
0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0
};
int Matriz5[Fila][Col]={
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,1,1,1,1,1,1,1,1,0,1,1,1,1,1,1,1,1,1,0,1,0,1,0,0,
0,1,0,0,1,0,0,0,1,1,1,0,0,0,0,0,0,0,1,1,1,1,1,1,0,
0,1,1,1,1,1,1,1,0,1,0,1,1,1,1,1,1,0,1,0,0,0,1,0,0,
0,1,0,0,0,0,0,1,0,1,0,1,0,0,0,0,1,1,1,1,1,1,1,0,0,
0,1,0,1,1,1,0,1,0,1,0,1,1,1,1,0,1,0,1,0,0,0,1,1,0,
0,1,0,1,0,1,0,1,1,0,0,0,1,0,1,0,1,0,1,0,1,1,1,0,0,
0,1,0,1,0,1,0,0,1,1,0,0,1,0,1,1,1,0,1,1,1,0,1,0,0,
0,1,1,1,0,1,0,1,0,1,0,1,1,1,0,0,1,0,0,0,1,0,1,0,0,
0,1,0,1,0,1,0,1,0,1,0,0,0,1,0,0,1,0,1,1,1,1,1,1,0,
0,0,1,1,0,1,0,1,0,1,1,1,1,1,0,0,1,0,1,0,0,0,0,1,0,
0,1,0,1,0,1,0,1,0,0,0,0,0,0,0,0,1,0,1,1,1,1,1,1,0,
0,1,0,1,0,1,1,1,1,1,1,0,0,0,0,0,1,0,1,0,0,1,0,1,0,
0,1,1,1,0,0,1,0,1,0,0,1,1,1,1,0,1,1,1,1,1,1,0,1,0,
0,1,0,0,0,0,1,1,0,1,0,1,0,0,1,0,0,0,0,1,0,0,0,0,0,
0,1,1,1,1,1,1,0,1,1,1,1,0,1,1,1,1,1,1,1,1,1,1,1,0,
0,1,0,0,1,0,0,0,1,0,0,1,0,0,1,0,0,0,0,0,0,0,0,1,0,
1,1,1,1,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,3,0
};
int Matriz6[Fila][Col]={
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,1,1,1,1,1,0,1,1,1,0,1,1,1,0,1,1,1,0,1,1,1,0,0,0,
0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,1,1,0,
0,1,1,1,0,1,1,1,0,1,1,1,0,1,1,1,0,1,1,1,0,0,0,1,0,
0,1,0,0,0,0,0,0,0,1,0,0,0,0,0,0,1,0,0,0,0,1,1,1,0,
0,1,1,1,0,1,1,1,1,1,0,0,1,1,1,1,1,1,1,1,0,1,0,0,0,
0,0,0,1,0,1,0,0,0,1,1,1,0,0,0,0,0,0,0,1,0,1,1,1,0,
0,1,1,1,0,1,1,1,1,0,0,1,0,0,1,1,1,1,1,1,1,0,0,1,0,
0,1,0,0,0,0,1,0,1,1,1,1,1,0,1,0,0,0,0,1,0,1,1,1,0,
0,1,1,1,0,0,1,1,1,0,1,0,1,0,1,1,1,0,1,0,0,1,0,0,0,
0,0,0,1,1,1,1,0,1,0,1,1,1,0,0,0,1,0,1,1,1,1,1,1,0,
0,1,1,1,0,0,0,1,0,1,1,0,1,1,1,1,1,0,1,0,0,0,0,1,0,
0,0,1,0,1,1,1,1,1,1,0,0,0,0,0,0,0,0,1,0,1,1,1,1,0,
0,1,0,1,0,0,1,1,1,0,1,0,1,1,1,0,1,1,1,0,0,1,0,0,0,
1,1,1,1,1,1,1,0,0,0,1,1,1,0,1,1,1,0,1,1,1,1,1,1,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,1,0,
0,1,1,1,0,1,1,1,0,1,1,1,0,1,1,1,0,1,1,1,0,1,1,1,0,
3,1,0,1,1,1,0,1,1,1,0,1,1,1,0,1,1,1,0,1,1,1,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
};
//************************************************** ************************
struct Jugadas //ESTUTRUCTURA TIPO JUGADAS PARA ALMACENAR LOS INDICES
{
int IndiceI;
int IndiceJ;
};
Jugadas Camino[500];
int Tope=0,Max=500,c;
void MPila(int a,int b)//FUCION PARA METER EN LA PILA LOS INDICES DE LA MATRIZ
{
if(Tope<Max)
{
Tope++;
Camino[Tope].IndiceI=a;
Camino[Tope].IndiceJ=b;
}
}
void SPila(int &c,int &d)//FUNCION PARA SACAR LOS INDICES
{
if(Tope>0)
{
c=Camino[Tope].IndiceI;
d=Camino[Tope].IndiceJ;
Tope--;
}
}
void OVNI(int X,int Y)//
{
int Radio =7;
Y=23+(Y*Alto);
X=60+(X*Ancho);
setfillstyle( SOLID_FILL, BLUE); fillellipse(X,Y, Radio, Radio-1);
setfillstyle(SOLID_FILL, YELLOW);fillellipse(X,Y+2,6,1);
setcolor(LIGHTRED); line(X+4, Y-2, X+5, Y-6); line(X-4, Y-2, X-5, Y-6);
fillellipse(X+6, Y-8, 3, 4);fillellipse(X-6, Y-8, 3, 4);
fillellipse(X-6, Y-8, 2, 2);fillellipse(X+6, Y-8, 2, 2);
}
void Bloque(int x,int y)//BLOQUE PARA UN 0
{
setfillstyle(SOLID_FILL,8);bar(x,y,x+Ancho,y+Alto) ;
setcolor(7);
line(x,y,x+(Ancho-4),y);line(x,y,x,y+(Alto-4));
line(x+3,y+3,x+Ancho,y+3);line(x+3,y+3,x+3,y+Alto) ;
line(x+6,y+6,x+6,y+(Alto-6));line(x+6,y+6,x+(Ancho-6),y+6);
line(x+(Ancho-3),y+6,x+(Ancho-3),y+(Alto-3));
line(x+6,y+(Alto-3),x+(Ancho-3),y+(Alto-3));
}
void Bloque2(int x,int y)//BLOQUE PARA UN 1
{
setfillstyle(SOLID_FILL, BLACK);
setcolor(DARKGRAY);
bar(Xo+x*Ancho,y0+y*Alto,Xo+x*Ancho+Ancho,y0+y*Alt o+Alto);
}
void TextoColor(char *Cad)
{int clr=1;
while(!kbhit())
{
setcolor(clr);
settextstyle(TRIPLEX_FONT,VERT_DIR,4);
outtextxy(25,220,Cad);
delay(50);
clr++;
if(clr==16)clr=1;
}
setfillstyle(SOLID_FILL,7);
bar(0,0,50,450);
setcolor(WHITE);
settextstyle(DEFAULT_FONT,HORIZ_DIR,1);
}
void BuscarEntrada(int &X,int &Y)//BUSCA LA ENTRADA
{
for(int p=0;p<Fila;p++)
for(int q=0;q<Col;q++)
if(Matriz[p][q]==3)
{
X=p;
Y=q;
}
}
void DibujarLaberinto(int Matri[Fila][Col])
{
int c,f;
for(f=0;f<Fila;f++)
for(c=0;c<Col;c++)
{Matriz[f][c]=Matri[f][c];
if(Matri[f][c]==0)
{
Bloque(Xo+c*Ancho,y0+f*Alto);
}
else
if(Matri[f][c]==1||Matri[f][c]==3)
{
Bloque2(c,f);
}
}
}
void RLab(int i,int j) //FUNCION RECURSIVA PARA RECORRER EL LABERINTO
{
if(Matriz[i][j]!=3)Matriz[i][j]=7;
MPila(i,j);
OVNI(j,i);
delay(200);
Bloque2(j,i);
if(Matriz[i][j]==7&&(i+1>=Fila||i-1<0))
{TextoColor("ENCONTRASTE LA SALIDA");
}
else
{if(Matriz[i][j]==7&&(j+1>=Col||j-1<0))
{TextoColor("ENCONTRASTE LA SALIDA");
}
else
{if(Matriz[i+1][j]==1){RLab(i+1,j);}
else
{if(Matriz[i-1][j]==1){RLab(i-1,j);}
else
{if(Matriz[i][j+1]==1){RLab(i,j+1);}
else
{if(Matriz[i][j-1]==1){RLab(i,j-1);}
else
{c=0;
while(c==0)
{SPila(i,j);
OVNI(j,i);
delay(200);
Bloque2(j,i);
if(Matriz[i+1][j]==1){i++;c=1;}
if(Matriz[i-1][j]==1){i--,c=1;}
if(Matriz[i][j+1]==1){j++;c=1;}
if(Matriz[i][j-1]==1){j--;c=1;}
}
RLab(i,j);
}
}
}
}
}
}
}
//************************************************** ************************
void JugarLab()
{char ca;int x,y;
BuscarEntrada(x,y);
OVNI(y,x);
do{
ca=getch();
switch(ca)
{
case Der:if(Matriz[x][y+1]==1)
{
Bloque2(y,x);
y++;
OVNI(y,x);
}
else
{
if(y+1>=Col)
{
ca=ESC;
TextoColor("ENCONTRASTE LA SALIDA");
}
else
{
sound(800);
delay(200);
nosound();
}
}break;
case Izq:if(Matriz[x][y-1]==1)
{
Bloque2(y,x);
y--;
OVNI(y,x);
}
else
{
if(y-1<0)
{
ca=ESC;
TextoColor("ENCONTRASTE LA SALIDA");
}
else
{
sound(800);
delay(200);
nosound();
}
}
break;
case Abj:if(Matriz[x+1][y]==1)
{
Bloque2(y,x);
x++;
OVNI(y,x);
}
else
{
if(x+1>=Fila)
{
ca=ESC;
TextoColor("ENCONTRASTE LA SALIDA");
}
else
{
sound(800);
delay(200);
nosound();
}
}
break;
case Arb:if(Matriz[x-1][y]==1)
{
Bloque2(y,x);
x--;
OVNI(y,x);
}
else
{
if(x-1<0)
{
ca=ESC;
TextoColor("ENCONTRASTE LA SALIDA");
}
else
{
sound(800);
delay(200);
nosound();
}
}
break;
}
}while(ca!=ESC);
}
//************************************************** ************************
void Presentacion()
{int col;
setfillstyle( SOLID_FILL, BLUE); fillellipse(100,370,100, 100-1);
setfillstyle(SOLID_FILL, YELLOW);fillellipse(100,400,80,10);
setcolor(LIGHTRED); line(25,200,80,300); line(120,300,200,200);
fillellipse(170,200,30,40);
fillellipse(50,200, 30, 40);
col=1;
while(!kbhit())
{
setfillstyle(SOLID_FILL,col);
fillellipse(50,200,20,20);
fillellipse(170,200, 20, 20);
settextstyle(TRIPLEX_FONT,HORIZ_DIR,4);
setcolor(col);
outtextxy(180,50,"L A B E R I N T O");
settextstyle(TRIPLEX_FONT,HORIZ_DIR,1);
col++;
setcolor(col);
outtextxy(90,100,"UNIVERSIDAD NACIONAL JORGE BASADRE GROHMANN");
col++;
setcolor(col);
outtextxy(300,190,"FACULDAD DE CIENCIAS");
col++;
setcolor(col);
outtextxy(250,250,"ESCUALA DE INFORMATICA Y SISTEMAS");
col++;
setcolor(col);
outtextxy(300,310,"EDUARDO GONZALES PUMA");
col++;
setcolor(col);
outtextxy(350,370,"TACNA - PERU");
col++;
setcolor(col);
outtextxy(200,420,"Presione una tecla para continuar");
col++;if(col==16)col=1;
delay(50);
}
settextstyle(DEFAULT_FONT,HORIZ_DIR,1);
}
void SeleccionMap(int Map)
{
switch(Map)
{
case 1ibujarLaberinto(Matriz1);break;
case 2ibujarLaberinto(Matriz2);break;
case 3ibujarLaberinto(Matriz3);break;
case 4ibujarLaberinto(Matriz4);break;
case 5ibujarLaberinto(Matriz5);break;
case 6ibujarLaberinto(Matriz6);break;
}
}
void main()
{
int Salir=0,m,n,Map=1,s,r;
Iniciar();
graton.Rmuestra(FALSO);
Presentacion();
getch();
Marco();
DibujarLaberinto(Matriz1);
Botones(200,440,80,20,1,"Busqueda");
Botones(300,440,80,20,1,"Jugar");
Botones(400,440,80,20,1,"Salir");
Botones(500,440,20,20,1,"<-");
Botones(530,440,20,20,1,"->");
graton.Rmuestra(VERDAD);
Restado Posicion;
if(Result->presente)
{
do{
Posicion=graton.Rpulsado(BotonI);
if(Posicion.contador_boton)
{
if(TPos(Posicion.ejey,440,460))
{
if(TPos(Posicion.ejex,200,280))
{
graton.Rmuestra(FALSO);
Botones(200,440,80,20,2,"Busqueda");
delay(200);
Botones(200,440,80,20,1,"Busqueda");
BuscarEntrada(s,r);
RLab(s,r);
SeleccionMap(Map);
for(m=0;m<Fila;m++)
for(n=0;n<Col;n++)
if(Matriz[m][n]==7)
Matriz[m][n]=1;
graton.Rmuestra(VERDAD);
}
if(TPos(Posicion.ejex,300,380))
{
graton.Rmuestra(FALSO);
Botones(300,440,80,20,2,"Jugar");
delay(200);
Botones(300,440,80,20,1,"Jugar");
JugarLab();
SeleccionMap(Map);
graton.Rmuestra(VERDAD);
}
if(TPos(Posicion.ejex,400,480))
{
graton.Rmuestra(FALSO);
Botones(400,440,80,20,2,"Salir");
delay(200);
Botones(400,440,80,20,1,"Salir");
graton.Rmuestra(VERDAD);
Salir=1;
}
if(TPos(Posicion.ejex,500,520))
{
graton.Rmuestra(FALSO);
Botones(500,440,20,20,2,"<-");
delay(200);
Botones(500,440,20,20,1,"<-");
graton.Rmuestra(VERDAD);
if(Map>1)
{
Map--;
SeleccionMap(Map);
}
}
if(TPos(Posicion.ejex,530,550))
{
graton.Rmuestra(FALSO);
Botones(530,440,20,20,2,"->");
delay(200);
Botones(530,440,20,20,1,"->");
graton.Rmuestra(VERDAD);

if(Map<6)
{
Map++;
SeleccionMap(Map);
}
}
}
}
}while(Salir==0);
}
Finalizar();
}

WTF? pero si hace horas que copie eso....

[Gabriela]

ts.gamersx.com.ar

[Rock&Roll]

bleh no tengo nada ... pocas veces no tengo nada en el ctrl + v me agarraron desprevenido