Posté le 30/01/2016 16:47
Planète Casio v4.3 © créé par Neuronix et Muelsaco 2004 - 2024 | Il y a 147 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 10/03/2016 18:34 | #
Retélécharge-le, il est peut-être corrompu
Citer : Posté le 10/03/2016 18:37 | #
Ok sinon, à part le fait que c'est énervant, ça ne pose pas de problème (ça n’abîme rien) ?
Ajouté le 10/03/2016 à 20:01 :
Pour l'instant, j'ai toujours choisis l'option REBOOT, il vaut mieux faire ça ou INITIALISE.
Citer : Posté le 11/03/2016 11:21 | #
Reboot redémarre la machine, Initialize aussi mais il n'est pas impossible qu'initialize vide la mémoire avant. À la limite autant essayer Reboot.
Citer : Posté le 11/03/2016 19:34 | #
Ok merci
Ajouté le 16/03/2016 à 19:07 :
For 1ãA To 7Ù
For 1ãB To 21Ù
Mat A[A,B]=1×Locate B,A,"#E6A6"Ù
NextÙ
NextÙ
While 1Ù
{7,21ãDim Mat BÙ
For 1ãA To 7Ù
For 1ãB To 21Ù
0ãIÙ
If A<7 And A>1 And B<21 And B>1:Then Ù
Mat A[A-1,B]=1×Isz IÙ
Mat A[A+1,B]=1×Isz IÙ
Mat A[A,B-1]=1×Isz IÙ
Mat A[A,B+1]=1×Isz IÙ
Mat A[A-1,B-1]=1×Isz IÙ
Mat A[A-1,B+1]=1×Isz IÙ
Mat A[A+1,B-1]=1×Isz IÙ
Mat A[A+1,B+1]=1×Isz IÙ
IfEndÙ
I=3 Or (Mat A[A,B]=1 And I=2)⇒1→Mat B[A,B]Ù
NextÙ
NextÙ
ClrTextÙ
For 1ãA To 7Ù
For 1ãB To 21Ù
Mat B[A,B]=1×Locate B,A,"#E6A6"Ù
NextÙ
NextÙ
Ù
{7,21ãDim Mat AÙ
For 1ãA To 7Ù
For 1ãB To 21Ù
0ãIÙ
If A<7 And A>1 And B<21 And B>1:Then Ù
Mat B[A-1,B]=1×Isz IÙ
Mat B[A+1,B]=1×Isz IÙ
Mat B[A,B-1]=1×Isz IÙ
Mat B[A,B+1]=1×Isz IÙ
Mat B[A-1,B-1]=1×Isz IÙ
Mat B[A-1,B+1]=1×Isz IÙ
Mat B[A+1,B-1]=1×Isz IÙ
Mat B[A+1,B+1]=1×Isz IÙ
IfEndÙ
I=3 Or (Mat B[A,B]=1 And I=2)⇒1→Mat A[A,B]Ù
NextÙ
NextÙ
ClrTextÙ
For 1ãA To 7Ù
For 1ãB To 21Ù
Mat A[A,B]=1×Locate B,A,"#E6A6"Ù
NextÙ
NextÙ
WhileEnd
Voici l'ébauche d'un petit jeu de la vie, infiniment lent
Par optimisation je veux dire que ce soit plus rapide mais pas forcément moins lourd.
J'ai remplacé :
Then I=3⇒1→Mat B[A,B]
Else I=2 Or I=3⇒1→Mat B[A,B]
IfEnd
Ajouté le 16/03/2016 à 21:51 :
Voici le code après divers modification :
For 1ãA To 7Ù
For 1ãB To 21Ù
Mat A[A+1,B+1]=1×Locate B,A,"#E6A6"Ù
Next:NextÙ
While 1Ù
{9,23ãDim Mat BÙ
For 2ãA To 8Ù
For 2ãB To 22Ù
0ãIÙ
Mat A[A-1,B]=1×Isz IÙ
Mat A[A+1,B]=1×Isz IÙ
Mat A[A,B-1]=1×Isz IÙ
Mat A[A,B+1]=1×Isz IÙ
Mat A[A-1,B-1]=1×Isz IÙ
Mat A[A-1,B+1]=1×Isz IÙ
Mat A[A+1,B-1]=1×Isz IÙ
Mat A[A+1,B+1]=1×Isz IÙ
I=3 Or (Mat A[A,B]=1 And I=2)×1ãMat B[A,B]Ù
Next:NextÙ
ClrTextÙ
For 1ãA To 7Ù
For 1ãB To 21Ù
Mat B[A+1,B+1]=1×Locate B,A,"#E6A6"Ù
Next:NextÙ
{9,23ãDim Mat AÙ
For 2ãA To 8Ù
For 2ãB To 22Ù
0ãIÙ
Mat B[A-1,B]=1×Isz IÙ
Mat B[A+1,B]=1×Isz IÙ
Mat B[A,B-1]=1×Isz IÙ
Mat B[A,B+1]=1×Isz IÙ
Mat B[A-1,B-1]=1×Isz IÙ
Mat B[A-1,B+1]=1×Isz IÙ
Mat B[A+1,B-1]=1×Isz IÙ
Mat B[A+1,B+1]=1×Isz IÙ
I=3 Or (Mat B[A,B]=1 And I=2)×1ãMat A[A,BÙ
Next:NextÙ
ClrTextÙ
For 1ãA To 7Ù
For 1ãB To 21Ù
Mat A[A+1,B+1]=1×Locate B,A,"#E6A6"Ù
Next:NextÙ
WhileEnd
Citer : Posté le 16/03/2016 23:34 | #
T'as deux fois le gros bloc qui teste les voisins. Tu devrais pouvoir simplifier.
Ensuite, ce même bloc peut être simplifié avec deux boucles supplémentaires : pour X de -1 à 1, pour Y de -1 à 1, si mat[B+Y, A+X] = 1 => Isz I. Penser à bien enlever 1 si y'a une cellule en (A, B) parce qu'on ne la compte pas à ce moment là.
Citer : Posté le 17/03/2016 07:02 | #
En fait, j'utilise deux matrices : je regarde les cellules vivante qu'il y a dans la première, j’initialise la deuxième, j'y rentre les actuelles cellules vivantes, j'affiche les cellules vivantes de la deuxième. Je recommence en changeant simplement première par deuxième et deuxième par première. Et ceci dans une boucle infinie.
En effet mais j'ai peur que cela ralentisse encore mon programme
Citer : Posté le 17/03/2016 07:45 | #
Si tu cherches la rapidité, faudrait tester les deux. Je ne sais pas lequel est le plus rapide.
Citer : Posté le 17/03/2016 17:38 | #
Je ne vois pas comment utiliser une boucle pourrait être plus rapide mais je vais essayer.
Sinon j'utilise Ftune pour accélérer le jeu
Citer : Posté le 17/03/2016 17:43 | #
SI ça peut te rassurer, on m'avait dit de passer au C
Citer : Posté le 17/03/2016 17:54 | #
Je pense que je vais d'abord coder ça en python puis quand je maîtriserai le python, je passerai au C
C'est bon, j'ai posté mon jeu, je m'attelle à la programmation Python ^^.
Y a-t-il une fonction qui permette dans un programme en basic de connaître la valeur la plus courante contenue dans une liste, exemple :
? (Liste 1)◢
Où est la commande demandée ? Ce qui devrait donc m'afficher 2.
Citer : Posté le 13/04/2016 20:40 | #
Si personne n'a répondu, c'est que personne n'en sait rien, donc le mieux ça reste de RTFM.
Citer : Posté le 13/04/2016 20:47 | #
Désolé
Citer : Posté le 13/04/2016 20:48 | #
T'inquiète pas, ça arrive, mais c'est juste que c'est pas forcément bien vu de remonter le topic pour ce genre de questions.
Citer : Posté le 13/04/2016 20:56 | #
Au pif, sans tester sur ma calculatrice :
0->B
Min (List 1->M
Max (List 1->N
For M->M To N
Sum (List 1=M
If Ans>B
Then M->A
Ans->B
IfEnd
Next
"Valeur la plus fréquente :"
A◢
"Nombre d'occurrences :"
B◢
Vitesse des fonctions en Basic Casio | 7 days CPC | Casio Universal Wiki | Tutoriel Basic Casio
>>> Give me a click Brother
>>> Random Youtube Video
Citer : Posté le 04/05/2016 17:22 | #
Hello
Peut-on transformer une image bmp en picture que l'on pourrait donc utiliser dans un programme en basic sur sa calculatrice ?
Citer : Posté le 04/05/2016 17:42 | #
Hey Gab, j'ai fait le ménage sur tes fautes d'orthographe, essaye de faire un effort sur la ponctuation (un '?' pour une question), un seul point, pas plusieurs (sauf le ...), les majuscules seulement en début de phrase et par pitié, outre le rete des fautes que je ne vais pas citer parce que ça va faire un pavé HS énorme, ne mets pas de 's' à 'Bonjour'
Citer : Posté le 04/05/2016 18:24 | #
Désolé
Citer : Posté le 04/05/2016 22:26 | #
Si t'as pas peur du bourrin sur la Picture, tu te fais un bitmap monochrome 128 * 64. Tu récupéres une Picture vide dans un .g1r sur ton PC. Ensuite tu remplaces les 1024 derniers octets du g1r par les 1024 derniers octets du bmp et tu renvoies le g1r dans la machine.
Citer : Posté le 04/05/2016 22:35 | #
Heu comment je fais ça ?
Citer : Posté le 04/05/2016 22:37 | #
Avec un éditeur hexadécimal, comme le très bon HxD.
Citer : Posté le 04/05/2016 22:53 | #
J'ai raté la manip et j'ai eu une erreur qui a supprimé un dossier
Sinon merci