Al meter una secuencia de comandos el pc te responde con otra...Como?

[BenRu]

Ya, tengo hecho eso, varias formas de saludos, y cada una te responde una cosa distinta...
Pero se que se puede hacer lo que yo dije...no se si sera con un else o algo asi, pero a mi no me funciono

[Slasher-K]

Podrías usar un número para representar a cada respuesta y luego generar un nº aleatorio utilizando la función Rnd para obtener una de las respuestas.

Saludos.

[BenRu]

Amm...pues seria buena idea...lo que pasa esque seria una programacion algo reliosa...

Código [Seleccionar] Expandir

Private Sub Command1_Click()
Dim Num As Byte
    Num = Int(6 - 1) * Rnd + 0
    Text1.Text = Num
End Sub

Aqui tendria ya 5 numeros posibles, ahora lo dificil seria representa cada respuesta a un numero

[Slasher-K]

Podrían ser por ejemplo los índices de registros en una base de datos, o identificadores de recursos.

Saludos.

[Crack_X]

Lo mas dificil de I.A. es representar emociones. Deberias tener una variable representando su nivel de emocion (triste-alegre-guap@).

Puedes poner que dependiendo de que esten hablando y de como va el trato (palabras groseras , etc.) vaya subiendo o disminuyendo el nivel.

Es mucha creatividad , mientra mas pues mejor 

[Pseudoroot]

Pues la idea mia era justamente lo que luego dijo Dunklerstern.

Escoger un saludo aleatorio...con respecto a los else .que dices..podria servir en el caso que la entrada no fuera hola. .si no buenos dias. o algo por el estilo....
con lo cual ,tambien ,tendriamos una rutina aleatoria para seleccionar la respuesta.. y dentro de esta podriamos volver a hacer comprobaciones haciendola aun un poco mas compleja , haciendo que el robot responda mas o menos de una forma inteligente, haciendo una serie de comprobaciones dentro de las frases que son entradas...y como decia Crack_X ir . ir detectando el nivel de la conversacion...dependiendo de las frases que son entradas por el usuario.. con la que el robot podrian decidir por comenzar a responder con tal o cual tema..

Por cierto un a vez , vi en uno de estos programas, que si le deciamos groserias. o cosas por el estilo.. respondia ,diciendo

si vuelves a insultarme. me voy..

si la respuesta que le daba el usuario en este caso yo..era otra groseria..el programa .se cerraba. lo que me parecia ingenioso..esto msimo estaba programado en visual basic.

[Crack_X]

Y si te repite algo 2 o 3 veces le respondes: "No estoy cieg@ , se leer." 

[BenRu]

Jajajaja yo tengo muchisiiiiisima imaginacion, todo lo que hablan se me habia ya ocurrido...lo malo es la programacion...que es bastante dificil...y me gustaria mas bien ir paso a paso, haciendo primero lo que dijo slasher keeper...a traves de numeros aleatorios...lo que pasa esque no se el como hacerlo

[Pseudoroot]

yo podria darte una especie de pseudocodigo a la rutina aleatoria..

Código [Seleccionar] Expandir

int Num
a$="hola que tal"
b$="hola como estas"
c$="que tal .,...como te llamas"

input "hola"; h$
if Instr("hola",h$);
Num = Int(3 - 1) * Rnd + 0
if Num=1 print a$
if Num=2 print b$
if Num=3 print c$
esto no esta bien elaborado pero creo que halgo se te ocurrira.,.,o por lo menos se te creara una idea mas o menos de como programar lo que te decia..puesto que el pseudocodigo que cree ,es bien pàrecido al visual basic

[Crack_X]

Utiliza "Select Case" y por que le sumas 0 si eso no cambiara el resultado ? :S