Bonjour à tous,j'ai créé un programme pour jouer à ploum ploum sans triche
je vous poste le code.
Code |
Effecr
Menu("PLOUM PLOUM","JOUER",J,"QUITTER",Q
lbl J
Effecr
2->C
entAléat(1,C->N
lbl 1
if N=1
Output(5,1,"VOTRE PRENOM"
lbl 2
if N=2
Output(1,1,"VOTRE PRENOM"
lbl Q
Stop
|
|