Posté le 21/04/2014 14:31
Planète Casio v4.3 © créé par Neuronix et Muelsaco 2004 - 2024 | Il y a 123 connectés | Nous contacter | Qui sommes-nous ? | Licences et remerciements
Planète Casio est un site communautaire non affilié à Casio. Toute reproduction de Planète Casio, même partielle, est interdite.
Les programmes et autres publications présentes sur Planète Casio restent la propriété de leurs auteurs et peuvent être soumis à des licences ou copyrights.
CASIO est une marque déposée par CASIO Computer Co., Ltd
Citer : Posté le 21/04/2014 14:35 | #
Tu pourrais mieux expliquer s'il te plait ? J'ai du mal a comprendre
Citer : Posté le 21/04/2014 14:39 | #
Ah oui, ça va être facile de t'aider avec des explications aussi claires que :
mais une boucle qui s'exécute et qui exécute en même temps le reste du code
Tu cherches à faire quoi exactement ? Exécuter du code qui se trouve à l'extérieur de la boucle pendant cette boucle ?
Des précisions ou un morceau de ton code qui exposerait le problème auraient été les bienvenus
Citer : Posté le 21/04/2014 14:39 | #
Je suis désolé, mais c'est impossible.
Le Basic n'est pas multi-tâches.
moi4012 Invité
Citer : Posté le 21/04/2014 14:49 | #
En fait, dans mon jeu,
il y aurait une boucle qui détecterait les touche et ferait avancer le personnage et
une boucle qui génèrerais des objet a attraper mais plus lente ( un objet tout les 5 sec)
comment obtenir ce resultat ?
Citer : Posté le 21/04/2014 14:51 | #
Ce qui est sûr, c'est que tu ne peux pas faire tourner dexu boucles en même temps.
Citer : Posté le 21/04/2014 14:59 | #
Je vois ce que tu veux faire.
En fait tu as deux boucles, mais elles ne tournent pas à la même vitesse.
Ajouté le 21/04/2014 à 15:01 :
Tu peux essayer ça.
While ...
' Detection des touches et autres
If Not T
Then
' Les objets aleatoires
IfEnd
MOD(T+1,100)->T
WhilEnd
Tu peux changer la valeur de 100 pour modifier le rythme.
Citer : Posté le 21/04/2014 15:14 | #
C'est quoi MOD (T+1,100)->T ?
Citer : Posté le 21/04/2014 15:14 | #
Tu pourrais nous mettre directement le code ?
On n'a pas forcément une calculatrice sous la main.
@ElToredo
Ça augmente T de 1, et si T atteint la valeur de 100, ça ramène à 0.
moi4012 Invité
Citer : Posté le 21/04/2014 15:16 | #
RclPict [maroon]1[/maroon]Ø
[brown]Cls[/brown]
Menu [gray]"Menu","Jouer",[maroon]1[/maroon],"QUITTER"[/gray],[maroon]9[/maroon]
[red]Lbl[/red] [maroon]9[/maroon]
BG-None
[brown]Cls[/brown]
[gray]"Appuyer sur EXE"[/gray]
[b][blue]Stop[/blue][/b]
[red]Lbl[/red] [maroon]1[/maroon]
44ãA
10ãB
RclPict [maroon]9[/maroon]
BG-Pict [maroon]9[/maroon]
10ãC
[red]Lbl[/red] [maroon]2[/maroon]
[brown]Cls[/brown]
[b][brown]Text[/brown][/b] A,B,[gray]"8"[/gray]
GetkeyãG
[b][blue]If[/blue][/b] G=[maroon]27[/maroon]
[b][blue]Then[/blue][/b] B+1ãB
[b][blue]IfEnd[/blue][/b]
[b][blue]If[/blue][/b] G=[maroon]38[/maroon]
[b][blue]Then[/blue][/b] B-1ãB
[b][blue]IfEnd[/blue][/b]
[b][blue]If[/blue][/b] C=B
[b][blue]Then[/blue][/b]
[brown]Cls[/brown]
Int ((B-A+1)ÀRan#+A)ãC
Int ((100-50+1)ÀRan#+50)ãC
Int (21ÀRan#+50)ãC
[b][brown]Text[/brown][/b] [maroon]43[/maroon],C,[gray]"A"[/gray]
[b][blue]IfEnd[/blue][/b]
[b][blue]If[/blue][/b] B>125
[b][blue]Then[/blue][/b] [red]Goto[/red] [maroon]9[/maroon]
[b][blue]IfEnd[/blue][/b]
[red]Goto[/red] [maroon]2[/maroon]
Citer : Posté le 21/04/2014 15:18 | #
Citer : Posté le 21/04/2014 15:19 | #
Et c'est quoi comme type d'erreur ?
Je veux dire, quel message s'affiche à l'écran lors de l'exécution ?
moi4012 Invité
Citer : Posté le 21/04/2014 15:20 | #
c'est une erreur de syntaxe
Citer : Posté le 21/04/2014 15:20 | #
J'ai modifié ton message pour inclure la balise "code" et la coloration syntaxique, qui améliore la lisibilité du code
moi4012 Invité
Citer : Posté le 21/04/2014 15:23 | #
merci Dark storm
Citer : Posté le 21/04/2014 15:32 | #
remplace lbl 2 et goto 2 par une boucle while...whileend ou Do...lpwhile
moi4012 Invité
Citer : Posté le 21/04/2014 15:37 | #
remplace lbl 2 et goto 2 par une boucle while...whileend ou Do...lpwhile
L'erreur ne vient pas de là, merci quant même
Citer : Posté le 21/04/2014 15:38 | #
Simple erreur de copie colle ?
Ajouté le 21/04/2014 à 15:40 :
100-50+1 ⇒ 51
Ajouté le 21/04/2014 à 15:41 :
Then Goto 9
IfEnd
peut se remplacer par:
Citer : Posté le 21/04/2014 15:43 | #
Où est le curseur lorsque l'exécution s'arrête et que tu appuies sur [EXIT] ?
Citer : Posté le 21/04/2014 15:46 | #
Suivant la signification du "À" :
Int ((100-50+1)ÀRan#+50)->C
Int (21ÀRan#+50)->C
Se remplace par:
Vu que tu repetes la modification de C
Et pour:
Then B+1->B
IfEnd
If G=38
Then B-1->B
IfEnd
Ca se remplace aussi par:
G=38⇒B-1->B
moi4012 Invité
Citer : Posté le 21/04/2014 16:45 | #
Pardon, j'ai trouver la solution et j'ai terminer le programme (c'est pour ca que j'ai mis du temps a répondre)
Le probleme était qu'il n'y avait pas d'espace après le "Then"
Merci pour votre aide et toute vos reponses