Forum TI-Planet.org

Bonjour/Bonsoir

je souhaitais savoir comment je pourrais mettre en pause un programme, à un certain moment puis le reprendre par la suite (dans l'exemple d'un jeu, ici snake)

Merci d'avance

Si ce n'est pas programmé dans le jeu, il faudra le faire si le jeu n'est pas écrit en langage machine (ASM/C...)

En fait, j'ai le jeu snake, codé par moi (re-codé de quelqu'un plus exactement) et j'aimerai y intégrer une fonction DD pause mais je ne sais pas comment faire sachant que c'est en draw mode et non en output(

tu as dû utiliser la commande getkey, tu peux faire en sorte que quand tu appuies sur enter ou annul, ça le met en Pause

Mais j'ai un problème avec le fait que le jeu ne se reprend pas, il s'arrête !

Partage ton code pour que les personnes qui te lisent puissent t'aider

Code: Tout sélectionner

ClrHome
ClrDraw
{30,30→dim([A]
Fill(0,[A]
For(A,0,1
For(B,0,29
Pxl-On(29*A,B
Pxl-On(B,29*A
1→[A](1+A*29,B+1
1→[A](B+1,1+A*29
End
End

2→Z
1→L

15→E:15→F
26→U
14→G:15→H
U→V
randInt(1,28→I
randInt(1,28→J
Pxl-On(J,I

0→S
Text(5,35,"SCORE:"
Text(12,35,S
Text(19,35,"ULTIMATE:"
Text(26,35,100-S
0→θ

While θ=0
getKey→K
If K
Then
K→U
End
U→[A](F+1,E+1)
If (E=I) and (F=J)
Then
randInt(1,28→I
randInt(1,28→J

While [A](J+1,I+1)
randInt(1,28→I
randInt(1,28,J
End
Pxl-On(J,I
Z+1→Z
S+1→S
Text(12,35,S
Text(26,35,"                           "
Text(26,35,100-S
End
E+(U=26)-(U=24)→E
F+(U=34)-(U=25)→F

If Z
Then
Z-1→Z
Else
0→[A](H+1,G+1)
G+(V=26)-(V=24)→G
H+(V=34)-(V=25)→H
[A](H+1,G+1)→V
Pxl-Off(H,G
End
Pxl-On(F,E
[A](F+1,E+1)→θ
Pxl-Off(H,G
End
Disp S

Voilà

Tu pourras mettre une pause sans pouvoir quitter le programme. Si jamais c'est ce que tu cherchais.
Tu peux rajouter par exemple

Code: Tout sélectionner

If K=45 or K=23
Pause

Il y a un espace après Pause si jamais tu tapes manuel