alexvire le 19/05/2010 à 15:46
DEVINE
Image manquante
(Je sais que plusieurs programmes de ce genre ont déjà été posté, mais celui-ci est différent car il n'affiche pas si le nombre à trouver est plus petit ou plus grand mais il vous donne l'intervalle dans lequel il est.)
• Taille: 400 octets
• Le jeu le plus simple à programmer en TI-BASIC, en effet, vous devez trouver un nombre entre 0 et 99 en un minimum de coups. Mais contrairement à la plupart que vous trouverez celui affiche non pas si le nombre est inférieur ou pas mais l'intervalle dans lequel se trouve le nombre.
• Fonctionne sur:
- TI-82 Stats(.fr)
- TI-83
- TI-83+(.fr)
- TI-84+
• Télécharger:
-
83p
-
8xp
• Taper à la main: (Français)
Code
1{->}dim({L}DE
Lbl 0
EffEcr
Menu(">>>> DEVINE <<<<","JOUER",1,"RECORD",2,"QUITTER",3
Lbl 1
0{->}A
entAléat(0,99{->}B
0{->}C
99{->}D
Repeat E=B
EffEcr
Disp "COUPS:","
Output(1,8,A
Output(8,2,"ENTRE ET
Output(8,8,C
Output(8,14,D
Input "NOMBRE: ",E
A+1{->}A
If E<B
Then
If E>C
ent(E{->}C
Else
If E<D
ent(E{->}D
End
End
EffEcr
If 0={L}DE(1) ou A<{L}DE(1
Then
Output(8,2,"RECORD VAINCU!
A{->}{L}DE(1
End
Output(1,6,"DEVINE
Disp "","","SCORE:",A,"RECORD:
Pause {L}DE(1
Goto 0
Lbl 2
Output(1,6,"DEVINE
Disp "","","","RECORD:
Pause {L}DE(1
Goto 0
Lbl 3
Output(4,6,"ALEXIS
EffVar AEffVar BEffVar CEffVar DEffVar E
Output(1,1,"
• Taper à la main: (Anglais)
Code
1{->}dim({L}DE
Lbl 0
ClrHome
Menu(">>>> DEVINE <<<<","JOUER",1,"RECORD",2,"QUITTER",3
Lbl 1
0{->}A
randInt(0,99{->}B
0{->}C
99{->}D
Repeat E=B
ClrHome
Disp "COUPS:","
Output(1,8,A
Output(8,2,"ENTRE ET
Output(8,8,C
Output(8,14,D
Input "NOMBRE: ",E
A+1{->}A
If E<B
Then
If E>C
iPart(E{->}C
Else
If E<D
iPart(E{->}D
End
End
ClrHome
If 0={L}DE(1) or A<{L}DE(1
Then
Output(8,2,"RECORD VAINCU!
A{->}{L}DE(1
End
Output(1,6,"DEVINE
Disp "","","SCORE:",A,"RECORD:
Pause {L}DE(1
Goto 0
Lbl 2
Output(1,6,"DEVINE
Disp "","","","RECORD:
Pause {L}DE(1
Goto 0
Lbl 3
Output(4,6,"ALEXIS
DelVar ADelVar BDelVar CDelVar DDelVar E
Output(1,1,"
• Caractères spéciaux:
{L} = [2nde] + [0] + [)]
{->} = [sto->]
alexvire le 10/06/2010 à 17:22
Oui, c'est pour ça que je l'ai mis entre { }.
Si vous voulez une meilleur visibilité du code avec des caractère unicodes, rendez-vous
ici.
