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

**LeoBeutel** · 04/11/2014, 19h17

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

**BlackoOSX** · 04/11/2014, 19h47

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!

**LeoBeutel** · 04/11/2014, 20h16

Effectivement je vait regarder. Merci

**BlackoOSX** · 04/11/2014, 20h24

De rien!

**LeoBeutel** · 04/11/2014, 20h31

Je vais voir je revien te dire si ca marche!

**LeoBeutel** · 04/11/2014, 20h43

Ca marche mais... Il me met tout le temps le meme message " Bonjour %USER% " Je couprend pas...

**BlackoOSX** · 04/11/2014, 20h55

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

**LeoBeutel** · 04/11/2014, 21h01

J'ai remodelé l'ev

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

**LeoBeutel** · 04/11/2014, 21h13

J'utilise la variable TXT_USER et elle se trouve au début

**BlackoOSX** · 04/11/2014, 21h36

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

**BlackoOSX** · 04/11/2014, 21h46

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

Dans TaulkToMe.cpc

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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.

**cpcdos** · 05/11/2014, 11h15

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

**LeoBeutel** · 05/11/2014, 14h16

Ca marche!!!! Je vous remercie tout les deux!!!

**BlackoOSX** · 05/11/2014, 15h36

De rien!

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

Cpcdos

Discussions similaires

Partager

Partager