LE GROS POULET VERSION TI-83 Plus !!!!

Comme tous les prépas, je pense, j'ai un côté GEEK !
Et pour vous le prouver, j'ai réalisé ce qui sera sans nul doute mon TIPE de 5/2 : LE GROS POULET VERSION TI-83 Plus !!!!

Le programme est en 3 parties, et n'est pas réduit à son minimum...
Donc la Gachet si tu nous regarde ou toi gros GEEK de la nation, tes améliorations m'interessent !

LE GROS POULET VERSION TI-83 Plus

GROS POULET

:randInt(1,6)->A

:randInt(1,6)->B

:Disp "Dé 1":Disp A

:Pause:Disp "Dé 2"

:Disp B

:Pause

:If A=1 and B=2 or A=2 and B=1

:Disp "GRO POULET!!"

:If A+B=7

:Disp"7 PRECEDENT"

:If A+B=8

:Disp"8 TU BOIS"

:If A+B=9

:Disp "9 SUIVANT"

:If A+B=10

:Disp "NEW REGLE"

:If A=2 and B=4 or A=4 and B=2

:Disp "DUEL!!"

:If A=2 and B=4 or A=4 and B=2

:prgm DUEL:If A=B=11

:Disp "TOUT LE MONDE BOIT"

:If A=3 or B=3

:Disp "3 GROS POULET BOIT"

:If A=1 and B=1

:Disp "DISTRIBU 1 GORGEE"

:If A=2 and B=2

:Disp "DISTRIBU 2 GORGEE"

:If A=3 and B=3

:Disp "DISTRIBU 3 GORGEE"

:If A=4 and B=4

:Disp "DISTRIBU 4 GORGEE"

:If A=5 and B=5

:Disp "DISTRIBU 5 GORGEE"

:If A=6 and B=6

:Disp "DISTRIBU 6 GORGEE"

DUEL

:Disp "2ET4 DUEL"

:Pause

:randInt (1,6)->D

:Disp "JOUEUR 1"

:Disp D

:Pause

:randInt (1,6)->C

:Disp "JOUEUR 2"

:Pause

:Disp"C"

:Pause

:If D>C

:2->X

:If D>C

:D->Y

:If D<>

:1->X

:IfD<>

:C->Y

:If D=C

:progmDUEL2

:Disp"JOUEUR"

:Disp X

:Disp "boit"

:Disp Y

:Disp "GORGEE"

:Return

DUEL2

:Disp "CA DOUBLE"

:Pause

:randInt (1,6)->E

:Disp "JOUEUR 1"

:Disp D

:Pause

:randInt (1,6)->F

:Disp "JOUEUR 2"

:Pause

:Disp"F"

:Pause

:If E>F

:2->T

:IfE>F

:D->G

:If E<>

:1->T

:IfE<>

:F->G

:If E=F

:progmDUEL2

:Disp"JOUEUR"

:Disp T

:Disp "boit"

:Disp 2*G

:Disp "GORGEE"

:Return

Je tiens a remercier tout particulièrement un certain "Narnou" GEEK professionnel dont l'aide me fût très très précieuse ! MERCI.

Enjoy with the BIG CHICKEN program !!