Salut a tous, j'aimerai mettre des programme vu que j'ai le cable mais dès fois ce sont des codes alors je veux mettre le code en .83P je vais dans le génrateur du site tape le code en locurrence celui ci :
Code
//petit effet ;)
For(L,1,20
EffEcr
Output(1,1,"CAM COPRIGHT"
End
7->Y
randInt(1,6->B
randInt(1,6->D
randInt(1,6->F
randInt(1,6->H
8->A:6->C:4->E
2->G:B->X:1->S
0->U:-4->I
Lbl 0
If I>0 and I<9
Output(I,J," "
U+1->U:I+1->I
Output(Y,X," "
7->Y:1->S
If I=0
randInt(1,6->J
For(L,1,8
Output(L,8,"I
End
Output(1,9,"STAGE
Output(2,9,U
While 1
If I>0 and I<9
Output(I,J"H
Output(A,B,"--
Output(C,D,"--
Output(E,F,"--
Output(G,H,'--
Output(Y,X,"I
getKey->K
If K!=0
Output(Y,X," "
If K=24:X-1->X
If X=0:7->X
If K=26:X+1->X
If X=8:1->X
If S=1:Then
Output(Y,X," "
Y-1->Y
Output(Y,X,"I
EndIf S=2:Then
Output(Y,X," "
Y+1->YOutput(Y,X,"I
End
If S=1 and Y=5
2->S
If S=2 and Y=7
1->S
If Y=5 and A=6 and X>=B and X<=B+1
Goto 1
If Y=5 and C=6 and X>=D and X<=D+1
Goto 1
If Y=5 and E=6 and X>=F and X<=F+1
Goto 1
If Y=5 and G=6 and X>=H and X<=H+1
Goto 1
If Y=7:Then
If A=8 and X!=B and X!=B+1
Goto 2
If C=8 and X!=D and X!=D+1
Goto 2
If E=8 and X!=F and X!=F+1
Goto 2
If G=8 and X!=H and X!=H+1
Goto 2:End
If Y=I and X=J
Goto 3:End
Lbl 1
A+2->A:C+2->C
E+2->E:G+2->G
If A=10:Then
randInt(1,6->B
2->A:End
If C=10:Then
randInt(1,6->D
2->C:End
If E=10:Then
randInt(1,6->F
2->E:End
If G=10:Then
randInt(1,6->H
2->G:End
ClrHome:Goto 0
Lbl 3
Output(I,J," "
-4->I
For(L,1,40
Output(1,9,"STAGE
Output(1,8,"S
Output(2,8,"H
Output(3,8,"U
Output(4,8,"T
Output(5,8,"T
Output(6,8,"L
Output(7,8,"E
Output(8,8,"!
Output(2,9,U
Output(A,B,"--
Output(C,D,"--
Output(E,F,"--
Output(G,H,"--
Output(Y,X,"I
getKey->K
If K!=0
Output(Y,X-1n" "
If K=24 and X>2
X-1->X
If K=26 and X<6
X+1->X
A+2->A:C+2>c
E+2->E:G+2->G
If A=10:Then
randInt(1,6->B
2->A:End
If C=10:Then
randInt(1,6->D
2->C:End
If E=10:Then
randInt(1,6->F
2->E:End
If G=10:Then
randInt(1,6->H
2->G:End
U+1->U:ClrHome
End:Goto 0
Lbl 2:ClrHome
lDOODLE(1)+1->lDOODLE(1)
U->lDOODLE(lDOODLE(1))
Mais le problème c'est qu'il trouve toujours quelque chose de trop long et donc je ne peux pas avoir la fichier en .83P alors ma question et comment faire pour avoir un fichier .83P avec le code du dessus ? Ti-Graph-Link je n'arrive pas a l'installer sur mon ordi