• Miércoles 15 de Mayo de 2024, 05:42

Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Mensajes - tdhde

Páginas: [1]
1
C/C++ / Re: Haciendo Un Programa Ejecutable
« en: Domingo 10 de Julio de 2005, 21:35 »
ahhh ya veo, gracias por la ayuda de todos modos, y si si cuento con el makefile...Ahi estoy tratando de hacerlo ejecutable a ver q me sale

2
C/C++ / Re: Haciendo Un Programa Ejecutable
« en: Domingo 10 de Julio de 2005, 03:32 »
Es que un compañero de trabajo tenia su programa, y en vez de meterse al kwrite a compilarlo...solo le daba doble click q su programa y se corria solo, al principio pense que era algun tipo de acceso directo, pero no quiso decir como lo habia logrado hacer...

3
C/C++ / Re: Modificar Archivo De Texto
« en: Viernes 8 de Julio de 2005, 03:32 »
el fseek funciona asi: fseek(Flujo, Desplasamiento, Posicion)

donde posicion puede ser: SEEK_SET, SEEK_CUR, SEEK_END...Que es posicion inicial, posicion actual, y posicion final, el flujo es tu archivo, y desplasamiento es el tamaño de bytes ya sea de la estructura o del archivo....

4
C/C++ / Haciendo Un Programa Ejecutable
« en: Viernes 8 de Julio de 2005, 03:23 »
Cuando se ocupa C para linux, ocupando el editor de texto kwrite, quisiera saber como puedo hacer mi programa un ejecutable, para no tener que meterme en la consola, y tener que compilar el programa.

5
Inteligencia Artificial / Re: Explicacion De Codigo
« en: Martes 5 de Julio de 2005, 06:28 »
ya no importa, logre decifrar jejeje...no me fijaba en el resto de la lista y por eso me perdia...

6
Inteligencia Artificial / Explicacion De Codigo
« en: Lunes 4 de Julio de 2005, 05:32 »
Bueno sigue siendo relevante al tema de laberintos, sin embargo logre hacer mi programa.  Ahora el reto es que nos dieron un codigo de un laberinto ya hecho, lo que hay que hacer es lograr entender como funciona cada codigo, quisiera saber si me puede dar una mano con 2 funciones del codigo, logre decifrar el funcionamiento de las otras sin embargo me he quedado un poco confundido con las siguientes:

%COMANDO DONDE_PUEDO_IR Y SUS SUB COMANDOS.
donde_puedo_ir([X|Z]):- setof(Y,conectado(X,Y),R), writeln(' '), write('Puede ir a: '),
                        opciones_a_ir®, nl, writeln(' '), comando([X|Z]).

Mi duda en esa porcion de codigo es para que sirve el comando "setof"..trate de buscarlo en la ayuda de prolog pero no logre encontrarlo, talvez lo pase por alto.

%COMANDO IR_AL Y SU SUB COMANDOS
ir_al([X|Z]):- write('¿Adonde desea ir?:'),read®, movimiento_a(R,Y,[X|Z]), juego_terminado(Y,W),
          comando(W).

%Validacion para movimiento que no esta en lista ni conectado.
movimiento_a(R,[X|Z],[X|Z]):- not(is_list®), not(conectado(R,X)), writeln('Movimiento invalido').

movimiento_a(R,[R|[X|Z]],[X|Z]):- not(is_list®), conectado(R,X), writeln('Movimiento realizado').

movimiento_a(R,[X|Z],[X|Z]):- is_list®,not(movimiento_a1(X,R)), writeln('Movimiento invalido').

movimiento_a(R,Y,[X|Z]):- is_list®, movimiento_a1(X,R), movimiento_a2(R,Y,[X|Z]),
                     writeln('Movimiento realizado').

movimiento_a1(X,[X1|Z]):- conectado(X,X1), movimiento_a1(X1,Z).

movimiento_a1(_,[]).   

movimiento_a2([XR|ZR],Y,A):- movimiento_a2(ZR,Y,[XR|A]).

movimiento_a2([],Y,Y).

Y de ahi esta esa funcion que con tanta lista y cabeza y resto que me queda me quede corto, y siempre logro confundirme y pierdo la nocion de como sigue el codigo.  Gracias de antemano.

7
Inteligencia Artificial / Re: Laberinto Ocupando Listas
« en: Sábado 25 de Junio de 2005, 01:27 »
Hola de nuevo, les presento aqui la lista de funciones que he podido encontrar, y he modificado para ver si son utiles en la realizacion de este trabajo.  Si creen que algunas son utiles y otras no, desearia que me lo hicieran saber, hasta este punto en  la materia, me ha empezado a dar ciertos problemas el hacer los programas, sin embargo tengo una idea de lo que quiero construir, simplemente no logro visualizar todas las partes importantes a ser construidas, si me pudieran guiar con alguna idea, o alguna implementacion que seria bueno ocupar, les estaria muy agradecido.

(Algunas funciones solo son de prueba para ver cuales me sirven y cuales no)

% ------------------------------------------------------------------------

mostrarArchivo(Ruta):- exists_file(Ruta), open(Ruta, read, F),
get_char(F, Car), mostrar(F, Car).

mostrar(_, end_of_file).
mostrar(F, Car):- Car \=@= 'end_of_file', write(Car), get_char(F, Car1),
mostrar(F, Car1).

% ------------------------------------------------------------------------

archivo_a_lista(Ruta, L):- exist_file(Ruta), open(Ruta, read, F),
get_char(F, C), agregart(F, C, L).

agregar(_, end_of_file, []).
agregar(F, Car, [Car|R]):- Car \=@= 'end_of_file', get_char(F, C),
agregar(F, C, R).

% ------------------------------------------------------------------------

leer(File,[C|R]):-read_line_to_codes(File,C1),
string_to_atom(C1,C), C\=@='end_of_file',leer(File,R).
leer(File,[]):-read_line_to_codes(File,C),
C=@='end_of_file'.

% ------------------------------------------------------------------------

escribir_linea(Ruta):- open(Ruta, append, F), write('Ingrese un atomo'),
read(Linea), write(F, Linea), nl(F), close(F).

% ------------------------------------------------------------------------

escribir_Lista(L, Ruta):- open(Ruta, append, F), write(F, L), nl(F), close(F).

% ------------------------------------------------------------------------

concatenar([], L, L).
concatenar([C|R], L, [C|R1]):- concatenar(R, L, R1).

% ------------------------------------------------------------------------

agregar(E, [], [E]).
agregar(E, [C|R], [C|L1]):- agregar(E, R, L1).
invertir([], []).
invertir([C|R], L):- invertir(R,L1), agregar(C, L1, L).


% ------------------------------------------------------------------------

mov(centro, a).
mov(centro, B).
mov(centro, c).
mov(centro,d).
mov(X, Y):- mov (Y, X).

elimUlt([X|B], [X]).
elimUlt([C|R], [C|R1]):- longitud(R, N), N > 1, elimUlt(R, R1).

% ------------------------------------------------------------------------

ordenar(L, LOrd):- ordenar(L, [], LOrd).
ordenar([], L, L).
ordenar([C|R], L, LOrd):- insertar(C, L, L1), ordenar(R, L1, LOrd).

insertar(E, [], [E]).
insertar(E, [C|R], [E|[C|R]]):- E =< C.
insertar(E, [C|R], [C|L]):- E > C, insertar(E, R, L).

**Adjunto va el planteamiento del trabajo y los siguientes dibujos son el laberinto y un ejemplo de como debe correr.  

1.

2.

8
Inteligencia Artificial / Re: Laberinto Ocupando Listas
« en: Sábado 25 de Junio de 2005, 00:52 »
Si, gracias, estoy tratando de ponerlas en orden ya que ahorita simplemente son funciones aleatorias sin ningun orden.  Lo que pasa es que es un proyecto y se nos ha pedido que se ocupen listas, seria mas facil hacerlo sin listas pero pues es un requisito, eso y dan mas puntos si se leen de un archivo los datos. Tengo la mayoria de funciones hechas, sin embargo no he podido conectarlas, pero tan pronto tenga el planteamiento en la computadora, lo voy a poner aqui.

9
Inteligencia Artificial / Laberinto Ocupando Listas
« en: Viernes 24 de Junio de 2005, 20:22 »
Hola, soy nuevo a esta pagina, y pues la encontre mientras buscaba ayuda sobre como hacer un laberinto en prolog ocupando listas...En estos momentos no tengo el planteamiento del trabajo, pero quisiera saber si hay alguien que podria ayudarme con este problema, no dispongo de mucho tiempo para hacerlo pero tengo ciertas funciones y otra cosas con las que estoy trabajando para su implementacion.

Páginas: [1]