Création d'un IA ( suite de Problème de récupération de texte dans une variable)

Version imprimable

Bonsoir ou bonjour.

Suite a la discussion " Problème de récupération de texte dans une variable ", j'ai voulu continuer mon IA (une sorte de siri, sur iOS) mais, le problème, c'est que le messsage met des plomes a arrivé! Et encore, des fois il ne vien pas.

Voici le code source:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
REM/ TalkToMe est un logiciel POUR LE MOMENT open source. Une fois que le cryptage sera disponible, je crypterai ce logiciel.


:_CREER:

fix/ TXT_USER = 0

ini/ fenetre(
	ini;nom = "TTM"
	ini;texte = "TalkToMe"
	ini;type = "1;M1A1R1F1HS1T1"
	ini;couleur = "000,000,000"
	ini;px = "MX"
	ini;py = "MY"
	ini;tx = "400"
	ini;ty = "300"
	creer/
ini/ fenetre)

ini/ textebox(
	ini;nom = "TEXT"
	ini;fenetre = "TTM"
	ini;type = "1"
	ini;couleurf = "255,255,255"
	ini;couleurp = "000,000,000"
	ini;texte = "Bonjour"
	ini;px = "0"
	ini;py = "0"
	ini;tx = "250"
	ini;ty = "17"
	creer/
	ev/ OS\PROG\TTM_EV.CPC
ini/ textebox)

ini/ textebox(
	ini;nom = "TEXT"
	ini;texte = "#%TXT_USER"
ini/ textebox)

L'EV:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46

PROC/ TEXT(ENTRER)

rem/ ORTHO1

SI/ %TXT_USER% = Bonjour (:
		msgbox/ Bonjour %UTILISATEUR%! :)
SI/ %TXT_USER% = Ca va? (:
		msgbox/ Très bien. :)
SI/ %TXT_USER% = Que fais tu? (:
		msgbox/ Je réponds à tes question! :)
SI/ %TXT_USER% = Qui es tu? (:
		msgbox/ Je suis TalkToMe, l'assistant de OSSeek. :)
SI/ %TXT_USER% = Tu sers à quoi? (:
		msgbox/ Je sers à discuter avec toi, %UTILISATEUR%. :)
SI/ %TXT_USER% = Quand es tu né? (:
		msgbox/ Je suis né le Dimanche 2 novenbre 2014. :)
SI/ %TXT_USER% = Qui t'a crée? (:
		msgbox/ C'est Léo Endor qui m'a crée. :)
SI/ %TXT_USER% = Quel heure est il? (:
		msgbox/ Il est LBL_HEURE* :)

rem/ ORTHO2


SI/ %TXT_USER% = Salut (:
		msgbox/ Bonjour %UTILISATEUR%! :)
SI/ %TXT_USER% = Comment va tu? (:
		msgbox/ Très bien. :)
SI/ %TXT_USER% = Tu fais quoi? (:
		msgbox/ Je réponds à tes question! :)
SI/ %TXT_USER% = Tu es qui? (:
		msgbox/ Je suis TalkToMe, l'assistant de OSSeek. :)
SI/ %TXT_USER% = A quoi sert tu (:
		msgbox/ Je sers à discuter avec toi, %UTILISATEUR%. :)
SI/ %TXT_USER% = Tu es né quand? (:
		msgbox/ Je suis né le Dimanche 2 novenbre 2014. :)
SI/ %TXT_USER% = C'est qui qui t'a crée? (:
		msgbox/ C'est Léo Endor qui m'a crée. :)
SI/ %TXT_USER% = Il est quel heure? (:
		msgbox/ Il est LBL_HEURE* :)
		
FIN/ SI

FIN/ PROC

S'il vous plaît, aidé moi!

Cordialement,
Léo Endor, créateur de OSSeek.

Cor

04/11/2014, 19h47
BlackoOSX

Salut!
As-tu essayer d'exécuter ton programme en BOOT USB car si tu l'exécute sous DOSBOX c'est normale!
Avec DOSBOX on ne connaît que les LAGSSSSSSSSSS!!!!!

Cordialement, le créateur de BlackOSX.
Si tu veux voir la dernière version de BlackOSX, clique ICI!
04/11/2014, 20h16
LeoBeutel

Effectivement je vait regarder. Merci ;)
04/11/2014, 20h24
BlackoOSX

De rien! :D
04/11/2014, 20h31
LeoBeutel

Je vais voir je revien te dire si ca marche!
04/11/2014, 20h43
LeoBeutel

Ca marche mais... Il me met tout le temps le meme message " Bonjour %USER% " Je couprend pas...
04/11/2014, 20h55
BlackoOSX

Quelle est la variable que tu utilise et ou la crée-tu?

J'ai remodelé l'ev

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
PROC/ TEXT(ENTRER)

SI/ TXT_USER = Bonjour (:msgbox/ Bonjour %UTILISATEUR%!:)

SI/ TXT_USER = Ca va? (:msgbox/ Très bien.:)

SI/ TXT_USER = Que fais tu? (:msgbox/ Je réponds à tes question!:)

SI/ TXT_USER = Qui es tu? (:msgbox/ Je suis TalkToMe, l'assistant de OSSeek.:)

SI/ TXT_USER = Tu sers à quoi? (:msgbox/ Je sers à discuter avec toi, %UTILISATEUR%.:)		

SI/ TXT_USER = Quand es tu né? (:msgbox/ Je suis né le Dimanche 2 novenbre 2014.:)

SI/ TXT_USER = Qui t'a crée? (:msgbox/ C'est Léo Endor qui m'a crée.:)

FIN/ SI

FIN/ PROC

Et aussi, sur mon deuxième pc, il n'affiche rien non plus :(

04/11/2014, 21h13
LeoBeutel

J'utilise la variable TXT_USER et elle se trouve au début
04/11/2014, 21h36
BlackoOSX

Oui mais ta variable %UTILISATEUR% d'où la sort-tu?

J'ai regarder ton code plus attentivement, et je vais faire un code qui pourrais bien t'aider:

Dans TaulkToMe.cpc

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
:_CREER:

rem/ ***************
rem/  *** Variables *** 
rem/ ***************
fix/ Utilisateur = Léo Endor
fix/ TXT_USER = 0

rem/ **************************
rem/  *** Fenetre de l'application ***
rem/ **************************
ini/ fenetre(
	ini;nom = "TTM"
	ini;texte = "TalkToMe"
	ini;type = "1;M1A1R1F1HS1T1"
	ini;couleur = "000,000,000"
	ini;px = "MX"
	ini;py = "MY"
	ini;tx = "400"
	ini;ty = "300"
	creer/
ini/ fenetre)

rem/ **************************
rem/  *** Textebox de l'aplication ***
rem/ **************************
ini/ textebox(
	ini;nom = "TEXT"
	ini;fenetre = "TTM"
	ini;type = "1"
	ini;couleurf = "255,255,255"
	ini;couleurp = "000,000,000"
	ini;texte = "Bonjour"
	ini;px = "0"
	ini;py = "0"
	ini;tx = "250"
	ini;ty = "17"
	creer/
	ev/ OS\PROG\TTM_EV.CPC
ini/ textebox)

rem/ *************************
rem/  *** Récupération du texte ***
rem/ *************************
txt/ #%TXTUSER

Dans TTM.CPC

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
PROC/ TEXT(ENTRER)

SI/ TXT_USER = Bonjour (:msgbox/ Bonjour %UTILISATEUR%!:)

SI/ TXT_USER = Ca va? (:msgbox/ Très bien.:)

SI/ TXT_USER = Que fais tu? (:msgbox/ Je réponds à tes question!:)

SI/ TXT_USER = Qui es tu? (:msgbox/ Je suis TalkToMe, l'assistant de OSSeek.:)

SI/ TXT_USER = Tu sers à quoi? (:msgbox/ Je sers à discuter avec toi, %UTILISATEUR%.:)		

SI/ TXT_USER = Quand es tu né? (:msgbox/ Je suis né le Dimanche 2 novenbre 2014.:)

SI/ TXT_USER = Qui t'a crée? (:msgbox/ C'est Léo Endor qui m'a crée.:)

FIN/ SI

FIN/ PROC

Voilà, moi perso je ferais comme ça.

Salut, ton programme est intéressant ;)

Pour commencer, tu as fais deux fautes

Une variable à afficher ou comparer est toujours entre %%
Les conditions multi-lignes se finissent pas par " :) " mais par la commande à la ligne " FIN/ SI "

Puis j'ai optimisé ton code avec des STOP/ fin d'arrêter la lecture du fichier dés que tu as finis ce qui faut

et petit cadeau, si tu ne veux pas avoir de problèmes avec les majuscules/minuscules dans la phrase, il y a une fonction qui met TOUT en majuscules
Voici ton événement :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 PROC/ TEXT(ENTRER) Rem/ Recuperer le contenu du textebox apres pression sur ENTRER Rem/ Et placer le texte dans TXT_USER INI/ TEXTEBOX( INI;NOM = "TEXT" INI;TEXTE = "#%TXT_USER" INI/ TEXTEBOX) Rem/ Tout mettre en majuscules pour pas avoir de sensibilitees fix/ TXT_USER = /C MAJ>%TXT_USER% SI/ %TXT_USER% = BONJOUR (: msgbox/ Bonjour %UTILISATEUR%! STOP/ FIN/ SI SI/ %TXT_USER% = CA VA? (: msgbox/ Très bien. STOP/ FIN/ SI SI/ %TXT_USER% = QUE FAIS TU? (: msgbox/ Je réponds à tes question! STOP/ FIN/ SI SI/ %TXT_USER% = QUI ES TU? (: msgbox/ Je suis TalkToMe, l'assistant de OSSeek. STOP/ FIN/ SI SI/ %TXT_USER% = TU SERT A QUOI? (: msgbox/ Je sers à discuter avec toi, %UTILISATEUR%. STOP/ FIN/ SI SI/ %TXT_USER% = QUAND ES TU NE? (: msgbox/ Je suis né le Dimanche 2 novenbre 2014. STOP/ FIN/ SI SI/ %TXT_USER% = QUI T'A CREE? (: msgbox/ C'est Léo Endor qui m'a crée. STOP/ FIN/ SI FIN/ PROC
Cordialement

05/11/2014, 14h16
LeoBeutel

Ca marche!!!! Je vous remercie tout les deux!!!
05/11/2014, 15h36
BlackoOSX

De rien! :D