Les membres ayant 30 points peuvent parler sur les canaux annonces, projets et hs du chat.
La shoutbox n'est pas chargée par défaut pour des raisons de performances. Cliquez pour charger.

Forum Casio - Autres questions


Index du Forum » Autres questions » [résolu] Problème Drawstat
Wejden Hors ligne Membre Points: 10 Défis: 0 Message

[résolu] Problème Drawstat

Posté le 08/06/2013 22:42

Bonsoir

J'ai créé mon premier jeu casio sur ma graph 35+ il y a un moment, et récemment j'ai découvert le Drawstat, et j'ai voulu l'utiliser dans mon prog, seulement je n'y parvient pas

Si vous voulez m'aider voilà le code ;
(PS : j'ai aussi un problème avec la liste qui gère le score, elle commence toujours à 32 et elle ne se réinitialise pas à chaque partie )

[brown]ViewWindow[/brown] [maroon]1[/maroon],[maroon]127[/maroon],[maroon]0[/maroon],[maroon]1[/maroon],[maroon]63[/maroon],[maroon]0[/maroon]
[brown]CoordOff[/brown]
[brown]GridOff[/brown]
[brown]AxesOff[/brown]
[brown]LabelOff[/brown]
[red]Lbl[/red] [maroon]0[/maroon]
[brown]Cls[/brown]
0[b]->[/b]Y
{[maroon]0[/maroon],[maroon]0[/maroon]}[b]->[/b]List [maroon]5[/maroon]
0[b]->[/b]D
48[b]->[/b]A
2[b]->[/b]B
53[b]->[/b]C
[brown]ClrText[/brown]
[b][blue]For[/blue][/b] [maroon]1[/maroon][b]->[/b]G [b][blue]To[/blue][/b] [maroon]115[/maroon]
[b][brown]PxlOn[/brown][/b] RanBin#(1,[maroon]63[/maroon]),RanBin#(1,[maroon]127[/maroon])
[b][blue]Next[/blue][/b]
[b][brown]Text[/brown][/b] [maroon]31[/maroon],[maroon]36[/maroon],[gray]"#E69A#E6A0#E6A0GRAVIUM#E6A0#E6A0#E69B"[/gray]
[b][brown]Circle[/brown][/b] [maroon]53[/maroon],[maroon]32[/maroon],[maroon]30[/maroon]
[b][brown]Circle[/brown][/b] [maroon]73[/maroon],[maroon]32[/maroon],[maroon]30[/maroon]Ý
[b][brown]Text[/brown][/b] [maroon]58[/maroon],[maroon]1[/maroon],[gray]"V [maroon]2[/maroon].1.1"[/gray]
[b][brown]Text[/brown][/b] [maroon]58[/maroon],[maroon]100[/maroon],[gray]"GD[b]->[/b]DEV"[/gray]Ý
[red]Lbl[/red] [maroon]2[/maroon]
0[b]->[/b]List [maroon]5[/maroon][1]
[brown]Cls[/brown]
[b][brown]Horizontal[/brown][/b] [maroon]1[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]2[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]3[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]4[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]5[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]6[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]7[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]8[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]9[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]10[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]11[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]53[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]54[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]55[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]56[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]57[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]58[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]59[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]60[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]61[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]62[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]63[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]64[/maroon]
[b][brown]Text[/brown][/b] [maroon]21[/maroon],[maroon]5[/maroon],[gray]"[F1] PLAY"[/gray]
[b][brown]Text[/brown][/b] [maroon]21[/maroon],[maroon]72[/maroon],[gray]"[F2] SCORES"[/gray]
[b][brown]Text[/brown][/b] [maroon]31[/maroon],[maroon]5[/maroon],[gray]"[F3] CREDITS"[/gray]
[b][brown]Text[/brown][/b] [maroon]41[/maroon],[maroon]72[/maroon],[gray]"[EXIT] QUIT"[/gray]
[b][brown]Text[/brown][/b] [maroon]31[/maroon],[maroon]72[/maroon],[gray]"[F4] CONTROLS"[/gray]
[b][brown]Text[/brown][/b] [maroon]41[/maroon],[maroon]5[/maroon],[gray]"[F5] ABOUT"[/gray]
[b][blue]Do[/blue][/b]:Getkey:[b][blue]LpWhile[/blue][/b] Ansá79 And Ansá69 And Ansá59 And Ansá47 And Ansá49 And Ansá39
Ans=[maroon]79[/maroon][b]->[/b][red]Goto[/red] A
Ans=[maroon]69[/maroon][b]->[/b][red]Goto[/red] S
Ans=[maroon]59[/maroon][b]->[/b][red]Goto[/red] [maroon]3[/maroon]
Ans=[maroon]47[/maroon][b]->[/b][red]Goto[/red] F
Ans=[maroon]49[/maroon][b]->[/b][red]Goto[/red] H
Ans=[maroon]39[/maroon][b]->[/b][red]Goto[/red] I
[red]Lbl[/red] A
ClrList
{[maroon]0[/maroon],[maroon]0[/maroon]}[b]->[/b]List [maroon]5[/maroon]
[brown]Cls[/brown]
[b][brown]Horizontal[/brown][/b] [maroon]8[/maroon]
[b][brown]Text[/brown][/b] [maroon]31[/maroon],[maroon]35[/maroon],[gray]"CHOOSE LEVEL"[/gray]
[b][brown]Text[/brown][/b] [maroon]58[/maroon],[maroon]2[/maroon],[gray]"1"[/gray]
[b][brown]Text[/brown][/b] [maroon]58[/maroon],[maroon]25[/maroon],[gray]"2"[/gray]
[b][brown]Text[/brown][/b] [maroon]58[/maroon],[maroon]50[/maroon],[gray]"3"[/gray]
[b][brown]Text[/brown][/b] [maroon]58[/maroon],[maroon]75[/maroon],[gray]"4"[/gray]
[b][brown]Text[/brown][/b] [maroon]58[/maroon],[maroon]100[/maroon],[gray]"5"[/gray]
[b][blue]Do[/blue][/b]:Getkey:[b][blue]LpWhile[/blue][/b] Ansá79 And Ansá69 And Ansá59 And Ansá49 And Ansá39
Ans=[maroon]79[/maroon][b]->[/b]1[b]->[/b]N
Ans=[maroon]69[/maroon][b]->[/b]2[b]->[/b]N
Ans=[maroon]59[/maroon][b]->[/b]3[b]->[/b]N
Ans=[maroon]49[/maroon][b]->[/b]4[b]->[/b]N
Ans=[maroon]39[/maroon][b]->[/b]5[b]->[/b]N
1[b]->[/b]Í
3[b]->[/b]V
[red]Lbl[/red] G
[brown]Cls[/brown]
N<1[b]->[/b]1[b]->[/b]N
N>5[b]->[/b]5[b]->[/b]N
Í[b]->[/b]List [maroon]5[/maroon][3]
[b][brown]Text[/brown][/b] [maroon]20[/maroon],[maroon]104[/maroon],[gray]"WAVE"[/gray]
[b][brown]Text[/brown][/b] [maroon]28[/maroon],[maroon]106[/maroon],List [maroon]5[/maroon][3]
[b][brown]Text[/brown][/b] [maroon]2[/maroon],[maroon]104[/maroon],[gray]"LVL"[/gray]
N=[maroon]1[/maroon][b]->[/b][b][brown]Text[/brown][/b] [maroon]10[/maroon],[maroon]106[/maroon],[gray]"1"[/gray]
N=[maroon]2[/maroon][b]->[/b][b][brown]Text[/brown][/b] [maroon]10[/maroon],[maroon]106[/maroon],[gray]"2"[/gray]
N=[maroon]3[/maroon][b]->[/b][b][brown]Text[/brown][/b] [maroon]10[/maroon],[maroon]106[/maroon],[gray]"3"[/gray]
N=[maroon]4[/maroon][b]->[/b][b][brown]Text[/brown][/b] [maroon]10[/maroon],[maroon]106[/maroon],[gray]"4"[/gray]
N=[maroon]5[/maroon][b]->[/b][b][brown]Text[/brown][/b] [maroon]10[/maroon],[maroon]106[/maroon],[gray]"5"[/gray]
[b][brown]Vertical[/brown][/b] [maroon]7[/maroon]
[b][brown]Vertical[/brown][/b] [maroon]100[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]1[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]2[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]3[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]4[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]5[/maroon]
[b][brown]Horizontal[/brown][/b] [maroon]6[/maroon]
[red]Lbl[/red] [maroon]1[/maroon]
Fill(0,List [maroon]5[/maroon])
[b][blue]Do[/blue][/b]
Í[b]->[/b]List [maroon]5[/maroon][3]
[b][brown]Text[/brown][/b] [maroon]20[/maroon],[maroon]104[/maroon],[gray]"WAVE"[/gray]
[b][brown]Text[/brown][/b] [maroon]28[/maroon],[maroon]106[/maroon],List [maroon]5[/maroon][3]
[b][brown]Text[/brown][/b] [maroon]42[/maroon],[maroon]104[/maroon],[gray]"SCORE"[/gray]
Y[b]->[/b]List [maroon]5[/maroon][1]
[b][brown]Text[/brown][/b] [maroon]50[/maroon],[maroon]107[/maroon],List [maroon]5[/maroon][1]
V[b]->[/b]List [maroon]5[/maroon][2]
[b][brown]Text[/brown][/b] [maroon]2[/maroon],[maroon]3[/maroon],List [maroon]5[/maroon][2]
[b][brown]Text[/brown][/b] [maroon]52[/maroon],A,[gray]"__"[/gray]
[b][blue]If[/blue][/b] C<52
[b][blue]Then[/blue][/b] [b][brown]Text[/brown][/b] Int C,B,[gray]"O"[/gray]
[b][blue]If[/blue][/b] Getkey=[maroon]29[/maroon]
[b][blue]Then[/blue][/b] N+1[b]->[/b]N
[red]Goto[/red] G
[b][blue]IfEnd[/blue][/b]
[b][blue]If[/blue][/b] Getkey=[maroon]79[/maroon]
[b][blue]Then[/blue][/b] N-1[b]->[/b]N
[red]Goto[/red] G
[b][blue]IfEnd[/blue][/b]
N=[maroon]1[/maroon][b]->[/b]5[b]->[/b]R
N=[maroon]2[/maroon][b]->[/b]7[b]->[/b]R
N=[maroon]3[/maroon][b]->[/b]9[b]->[/b]R
N=[maroon]4[/maroon][b]->[/b]11[b]->[/b]R
N=[maroon]5[/maroon][b]->[/b]13[b]->[/b]R
[b][blue]IfEnd[/blue][/b]
[b][blue]If[/blue][/b] Getkey=[maroon]47[/maroon]
[b][blue]Then[/blue][/b] [red]Goto[/red] P
[b][blue]IfEnd[/blue][/b]
[b][blue]If[/blue][/b] Getkey=[maroon]27[/maroon]
[b][blue]Then[/blue][/b] [b][brown]Text[/brown][/b] [maroon]52[/maroon],A,[gray]"   "[/gray]
A+7[b]->[/b]A
[b][blue]IfEnd[/blue][/b]
[b][blue]If[/blue][/b] Getkey=[maroon]38[/maroon]
[b][blue]Then[/blue][/b] [b][brown]Text[/brown][/b] [maroon]52[/maroon],A,[gray]"   "[/gray]
A-7[b]->[/b]A
[b][blue]IfEnd[/blue][/b]
[b][blue]If[/blue][/b] C=[maroon]53[/maroon]
[b][blue]Then[/blue][/b] [maroon]1[/maroon][b]->[/b]C
RanBin#(8,[maroon]95[/maroon])[b]->[/b]B
[b][brown]Text[/brown][/b] Int C,B,[gray]" "[/gray]
0[b]->[/b]D
[b][blue]IfEnd[/blue][/b]
C>51[b]->[/b]51[b]->[/b]C
[b][blue]If[/blue][/b] Dâ1
[b][blue]Then[/blue][/b] [b][brown]Text[/brown][/b] Int C,B,[gray]" "[/gray]
C+R[b]->[/b]C
[b][blue]IfEnd[/blue][/b]
D+1[b]->[/b]D
A<9[b]->[/b]88[b]->[/b]A
A>88[b]->[/b]9[b]->[/b]A
[b][blue]If[/blue][/b] Câ51
[b][blue]Then[/blue][/b] A+9[b]->[/b]Z
A-1[b]->[/b]L
[b][blue]If[/blue][/b] BâL And BàZ
[b][blue]Then[/blue][/b] Y+R[b]->[/b]Y
Í+1[b]->[/b]Í
53[b]->[/b]C
0[b]->[/b]D
[b][blue]Else[/blue][/b]
Í+1[b]->[/b]Í
V-1[b]->[/b]V
53[b]->[/b]C
0[b]->[/b]D
[b][blue]IfEnd[/blue][/b]
[b][blue]IfEnd[/blue][/b]
[b][blue]LpWhile[/blue][/b] V>0
52[b]->[/b]A
D>6[b]->[/b]6[b]->[/b]D
[b][blue]If[/blue][/b] Y>Mat A[1,[maroon]1[/maroon]]
[b][blue]Then[/blue][/b] Y[b]->[/b]Mat A[1,[maroon]1[/maroon]]
[b][blue]IfEnd[/blue][/b]
[brown]Cls[/brown]
[b][brown]Horizontal[/brown][/b] [maroon]8[/maroon]
[b][brown]Text[/brown][/b] [maroon]16[/maroon],[maroon]35[/maroon],[gray]"+ GAME OVER +"[/gray]
[b][brown]Text[/brown][/b] [maroon]29[/maroon],[maroon]25[/maroon],[gray]"SCORE="[/gray]
[b][brown]Text[/brown][/b] [maroon]29[/maroon],[maroon]55[/maroon],List [maroon]5[/maroon][1]
[b][brown]Text[/brown][/b] [maroon]43[/maroon],[maroon]25[/maroon],[gray]"BEST="[/gray]
[b][brown]Text[/brown][/b] [maroon]43[/maroon],[maroon]55[/maroon],Mat A[1,[maroon]1[/maroon]]
List [maroon]5[/maroon][1]=Mat A[1,[maroon]1[/maroon]][b]->[/b][b][brown]Text[/brown][/b] [maroon]30[/maroon],[maroon]80[/maroon],[gray]"NEW BEST¯«¯"[/gray]
Fill(0,List [maroon]5[/maroon])
[b][brown]Text[/brown][/b] [maroon]58[/maroon],[maroon]5[/maroon],[gray]"[F1] RETRY"[/gray]
[b][brown]Text[/brown][/b] [maroon]58[/maroon],[maroon]72[/maroon],[gray]"[F2] MENU"[/gray]
[b][blue]Do[/blue][/b]:Getkey:[b][blue]LpWhile[/blue][/b] Ansá79 And Ansá69
Ans=[maroon]79[/maroon][b]->[/b][red]Goto[/red] A
Ans=[maroon]69[/maroon][b]->[/b][red]Goto[/red] [maroon]2[/maroon]
[red]Lbl[/red] S
[brown]Cls[/brown]
[b][brown]Horizontal[/brown][/b] [maroon]8[/maroon]
[b][brown]Text[/brown][/b] [maroon]33[/maroon],[maroon]35[/maroon],[gray]"BEST SCORE="[/gray]
[b][brown]Text[/brown][/b] [maroon]43[/maroon],[maroon]35[/maroon],Mat A[1,[maroon]1[/maroon]]
[b][brown]Text[/brown][/b] [maroon]58[/maroon],[maroon]5[/maroon],[gray]"[F1] BACK"[/gray]
[b][blue]Do[/blue][/b]:Getkey:[b][blue]LpWhile[/blue][/b] Ansá79
Ans=[maroon]79[/maroon][b]->[/b][red]Goto[/red] [maroon]2[/maroon]
[red]Lbl[/red] [maroon]3[/maroon]
[brown]Cls[/brown]
[b][brown]Text[/brown][/b] [maroon]5[/maroon],[maroon]41[/maroon],[gray]"CREDITS"[/gray]
[b][brown]Text[/brown][/b] [maroon]12[/maroon],[maroon]11[/maroon],[gray]"CREATED BY GABRIEL DELAUNAY"[/gray]
[b][brown]Text[/brown][/b] [maroon]20[/maroon],[maroon]11[/maroon],[gray]"EDITED BY GD[b]->[/b]DEV"[/gray]
[b][brown]Text[/brown][/b] [maroon]30[/maroon],[maroon]37[/maroon],[gray]"THANKS [b][blue]TO[/blue][/b]"[/gray]
[b][brown]Text[/brown][/b] [maroon]38[/maroon],[maroon]10[/maroon],[gray]"SHAD_, ISRAK, ANTOINE"[/gray]
[b][brown]Text[/brown][/b] [maroon]46[/maroon],[maroon]10[/maroon],[gray]"GAUTRET, TOTOYO AND DELTOD"[/gray]
[b][brown]Horizontal[/brown][/b] [maroon]8[/maroon]
[b][brown]Text[/brown][/b] [maroon]58[/maroon],[maroon]5[/maroon],[gray]"[F1] BACK"[/gray]
[b][blue]Do[/blue][/b]:Getkey:[b][blue]LpWhile[/blue][/b] Ansá79
Ans=[maroon]79[/maroon][b]->[/b][red]Goto[/red] [maroon]2[/maroon]
[red]Lbl[/red] P
[brown]Cls[/brown]
[b][brown]Horizontal[/brown][/b] [maroon]8[/maroon]
[b][brown]Text[/brown][/b] [maroon]40[/maroon],[maroon]45[/maroon],[gray]"[EXE] BACK"[/gray]
[b][brown]Text[/brown][/b] [maroon]58[/maroon],[maroon]5[/maroon],[gray]"[F1] QUIT"[/gray]
[b][brown]Text[/brown][/b] [maroon]25[/maroon],[maroon]52[/maroon],[gray]"PAUSE"[/gray]
[b][blue]Do[/blue][/b]:Getkey:[b][blue]LpWhile[/blue][/b] Ansá31 And Ansá79
Ans=[maroon]31[/maroon][b]->[/b][red]Goto[/red] G
Ans=[maroon]79[/maroon][b]->[/b][red]Goto[/red] F
[red]Lbl[/red] H
[brown]Cls[/brown]
[b][brown]Horizontal[/brown][/b] [maroon]8[/maroon]
[b][brown]Text[/brown][/b] [maroon]2[/maroon],[maroon]50[/maroon],[gray]"CONTROLS"[/gray]
[b][brown]Text[/brown][/b] [maroon]10[/maroon],[maroon]5[/maroon],[gray]"LEFTPAD = LEFT"[/gray]
[b][brown]Text[/brown][/b] [maroon]18[/maroon],[maroon]5[/maroon],[gray]"RIGHTPAD = RIGHT"[/gray]
[b][brown]Text[/brown][/b] [maroon]26[/maroon],[maroon]5[/maroon],[gray]"F1 = PREVIOUS LEVEL"[/gray]
[b][brown]Text[/brown][/b] [maroon]34[/maroon],[maroon]5[/maroon],[gray]"F2 = [b][blue]NEXT[/blue][/b] LEVEL"[/gray]
[b][brown]Text[/brown][/b] [maroon]42[/maroon],[maroon]5[/maroon],"EXIT = PAUSE GAME
[b][brown]Text[/brown][/b] [maroon]58[/maroon],[maroon]5[/maroon],[gray]"[F1] MENU"[/gray]
[b][blue]Do[/blue][/b]:Getkey:[b][blue]LpWhile[/blue][/b] Ansá79
Ans=[maroon]79[/maroon][b]->[/b][red]Goto[/red] [maroon]2[/maroon]
[red]Lbl[/red] I
[brown]Cls[/brown]
[b][brown]Text[/brown][/b] [maroon]13[/maroon],[maroon]8[/maroon],[gray]"THE GOAL IS [b][blue]TO[/blue][/b] CATCH AS MUCH"[/gray]
[b][brown]Text[/brown][/b] [maroon]21[/maroon],[maroon]8[/maroon],[gray]"COMETS AS YOU CAN"[/gray]
[b][brown]Text[/brown][/b] [maroon]29[/maroon],[maroon]15[/maroon],[gray]"YOU HAVE THREE LIVES"[/gray]
[b][brown]Text[/brown][/b] [maroon]37[/maroon],[maroon]15[/maroon],[gray]"THE FALLING SPEED"[/gray]
[b][brown]Text[/brown][/b] [maroon]44[/maroon],[maroon]15[/maroon],[gray]"DEPENDS OF THE LEVEL"[/gray]
[b][brown]Horizontal[/brown][/b] [maroon]8[/maroon]
[b][brown]Text[/brown][/b] [maroon]58[/maroon],[maroon]2[/maroon],[gray]"[F1] BACK"[/gray]
[b][blue]Do[/blue][/b]:Getkey:[b][blue]LpWhile[/blue][/b] Ansá79
Ans=[maroon]79[/maroon][b]->[/b][red]Goto[/red] [maroon]2[/maroon]
[red]Lbl[/red] F
[brown]Cls[/brown]
[brown]CoordOn[/brown]
[brown]GridOn[/brown]
[brown]AxesOn[/brown]
[brown]LabelOn[/brown]
[b][blue]Stop[/blue][/b]


edit BTL: la couleur a été rajoutée


Totoyo Hors ligne Membre d'honneur Points: 16093 Défis: 102 Message

Citer : Posté le 13/06/2013 19:50 | #


Je suis d'accord avec toi, on peut toujours le rendre plus réactif, mais je sais les débutants ont tendance à tout mettre dans une seule et unique boucle
Wejden Hors ligne Membre Points: 10 Défis: 0 Message

Citer : Posté le 13/06/2013 22:01 | # | Fichier joint


OMG

Ninestars ta technique est laborieuse et met beaucoups de bazar dans le prog mais ça marche enfin

Par contre ( la résolution d'un problème en engendre un autre ) la vitesse de chute du "météore" et énormément ralentit lorsque l'on bouge la plateforme ><

je remet le .g1r
Ninestars Hors ligne Membre Points: 2461 Défis: 24 Message

Citer : Posté le 13/06/2013 22:48 | # | Fichier joint


OUhlalala, tu n'as pas du tout compris ce que je t'ai montré, il ne faut pas recopier 10 fois le même code.
Je te refais une version du programme comme il faut

Edit :
Voilà je t'ai fait une version du programme beaucoup plus propre, légère (-1600 octets) et fluide.
J'ai commencé les modifications à partir de Lbl G jusqu'à la fin de la boucle.
Ton problème c'est que tu affichais tout le texte autour à chaque fois(c'est très lent), donc j'ai affiché tout le texte au début et je l'ai enregistré dans une image, puis j'ai placé cette image en fond d'écran.
De plus, tu utilisais la fonction Text pour afficher la barre du joueur, or cette fonction est très lente, j'ai utilisé F-Line qui permet de dessiner des lignes et qui est plus rapide.
J'ai aussi optimisé les conditions et évitant les répétitions et j'ai supprimé la partie avec D.
Si tu as des questions hésite pas
Le fichier est en pi