Poster un nouveau sujet Poster une réponse
Générateur de phrases aleatoires (facile)
Auteur Message
Paolo972



Autorisation : Membre
Nb de messages : 14
Inscrit le : Dim 11 Jan 2015, 17:13
Posté le : Mer 14 Jan 2015, 1:25   Citer 

je vous propose un generateur de phrase aleatoire :

Le principe :
- une liste de sujet
- une liste de verbe
- une liste de COD
- une liste de COI(comme les sujets)
- une liste de CCL ( complément circonstancielle de lieu )

Le prgm va tirée un mot aux hasard dans chaque liste pour en former une phrase concrète.



Code

:While 1
:entALeat(0,1->A     #LES SUJETS
:entALeat(0,1->B     #LES VERBES
:entALeat(0,1->C     #LES COD
:entALeat(0,1->D     #LES COI(SUJET)
:entALeat(0,1->E     #LES CCL
:
:if A=0
:"SUJET1->Chaine1
:if A=1
:"SUJET2->Chaine1

:if B=0
:"Verbe1->Chaine2
:if B=1
:"Verbe2->Chaine2

:if C=0
:"Cod1->Chaine3
:if C=1
:"Cod2->Chaine3

:if D=0
:"Coi1->Chaine4
:if D=1
:"Coi2->Chaine4

:if E=0
:"CCL1->Chaine5
:if E=1
:"CCL1->Chaine5

:EffEcr
:Disp Chaine1
:Disp Chaine2
:Disp Chaine3
:Disp Chaine4
:Disp Chaine5
:Pause
:End



Exemple de phrase : Jean-Michel a caressé la chatte de Marie dans la cuisine


Le nombre de possibilité monte tres vite ! Ex : avec 10 noms, 7 verbes,
6 cod, 10 coi et 4 ccl
Il y a 16800 possibilité de phrases.

Voila un programme simple mais qui peut etre marrant a faire si vous avez de l'imagination.

 Adresse email Haut de page Bas de page 
 
linkakro



Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Mer 14 Jan 2015, 11:04   Citer 

Simple et pratique.
Le code peut être amélioré avec la variable dernière réponse et aucun stockage des chaînes.

Code
:While 1
:entALeat(0,1->A     #LES SUJETS
:entALeat(0,1->B     #LES VERBES
:entALeat(0,1->C     #LES COD
:entALeat(0,1->D     #LES COI(SUJET)
:entALeat(0,1->E     #LES CCL

:EffEcr

:If A=0
:"SUJET1
:If A=1
:"SUJET2

:Disp Rép
:If B=0
:"Verbe1
:If B=1
:"Verbe2

:Disp Rép
:If C=0
:"Cod1
:If C=1
:"Cod2

:Disp Rép
:If D=0
:"Coi1
:If D=1
:"Coi2

:Disp Rép
:If E=0
:"CCL1
:If E=1
:"CCL1

:Disp Rép
:End



----------------------
ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)

Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store
 Adresse email Haut de page Bas de page 
 
Google_AdSense



Publicité    



 
Paolo972



Autorisation : Membre
Nb de messages : 14
Inscrit le : Dim 11 Jan 2015, 17:13
Posté le : Mer 14 Jan 2015, 19:36   Citer 

Non, cela ne fonctionne pas ! Il faut que la ligne soit la dernière du programme pour qu'elle soit affiché automatiquement.

 Adresse email Haut de page Bas de page 
 
m@thieu41



Autorisation : Membre
Nb de messages : 856
Inscrit le : Mer 18 Juil 2012, 18:44
Posté le : Jeu 15 Jan 2015, 14:44   Citer 

En fait la chaine est stockée dans la variable ans/rep quand tu fais ça, le "Disp Rep" permet de l'afficher winkle.gif

----------------------
Pour vous aidez dans vos débuts (et même ensuite ^^) :
*Tuto Algo->Ti Basic (par Linkakro) : Traduisez vos algo (de type algobox) en prgm pour votre TI!
*Catalogue des emplacements et traductions (anglais/français) des fonctions sur la TI.
*Faites vos propres programmes de maths (par ash)

Et au fait: la politesse n'a jamais tué personne winkle.gif
 Adresse email Haut de page Bas de page 
 
linkakro



Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Jeu 15 Jan 2015, 20:19   Citer 

La variable dernière réponse est affectée par tous les calculs et la fonction Pause. Elle est indépendante de l'affichage automatique de la dernière ligne.

----------------------
ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)

Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store
 Adresse email Haut de page Bas de page 
 
katvador



Autorisation : Membre
Nb de messages : 30
Inscrit le : Lun 13 Oct 2014, 23:07
Posté le : Dim 18 Jan 2015, 18:50   Citer 


Citer : Paolo972

Exemple de phrase : Jean-Michel a caressé la chatte de Marie dans la cuisine


C'es moi où cette phrase comporte une petite allusion ? clown.gif

----------------------
Casio FX-92-Ti 30-Ti-82 stats.fr- Ti-82 plus- Ti-83 plus-Ti nspire cx cas
@katvador
 Adresse email Haut de page Bas de page 
 
Google_AdSense



Publicité    



 
Paolo972



Autorisation : Membre
Nb de messages : 14
Inscrit le : Dim 11 Jan 2015, 17:13
Posté le : Dim 18 Jan 2015, 20:28   Citer 


Citer : katvador

Citer : Paolo972

Exemple de phrase : Jean-Michel a caressé la chatte de Marie dans la cuisine


C'es moi où cette phrase comporte une petite allusion ? clown.gif



Non pas du tout :-P

 Adresse email Haut de page Bas de page 
 
Poster un nouveau sujet Poster une réponse





  Powered by Fire-Soft-Board v1.0.10 © 2004 - 2024 Groupe FSB
Page générée en 9 requêtes
BlackOne par Grimmlink