Les membres ayant 30 points peuvent parler sur les canaux annonces, projets et hs du chat.
Menu
Calculatrices
Graph 35 à 100 (CFX)
Graph 25/25+ (Pro) (fx-7400)
Graph 35+USB/75/85/95 (SD)
Graph 100/100+ (AFX)
ClassPad 300/330
Fx-CG 10/20
Fx-CP 400
Graph 90+E
Liens
¤ Transférer un programme sur
sa calculatrice

¤ Vous cherchez une fonction ?
Jeux >> Graphs 35 à 100 >> Réflexion >> MibiLaby
MibiLaby
Version : v.0.1 Taille : 1256 octets Ajouté le : 2022-03-05 19:09 Modifié le : 2022-03-05 20:23
Auteur et posteur :
Mb88En ligneMembrePoints: 142 Défis: 0 Message
Planète Casio - Jeu Casio de reflexion - MibiLaby - mb88 - Calculatrices
Nombre de visites sur cette page : 218
Score au progrank : 17
Pas encore de note !
Vous devez être connecté(e) pour noter (inscription).
45 téléchargements | Soumettre un test

Ce programme est sous licence GPL 2.0.


Description :

Un petit jeu où la flèche doit aller du point blanc au point noir. Pour l'instant c'est juste un petit jeu codé vite fait. J'ai prévu d'ajouter des monstres et d'autres nivaux pour le rendre moins ennuyeux.

Programmation du jeu :
   55%

Utilisez les flèches pour vous déplacer.
Fichier 1 : Jeu.
Fichier 2 : Archive avec toute les versions.


Commentaires :


Mb88En ligneMembrePoints: 142 Défis: 0 Message
Posté le 05-03-2022 à 19:22 | #
Est-ce que quelqu'un pourrait le changer de catégorie ? J'avais oublié de la changer quand je l'ai publié.
Shadow15510Hors ligneAdministrateurPoints: 5317 Défis: 16 Message
Posté le 05-03-2022 à 20:22 | #
Bien sûr, dans quelle catégorie voudrais-tu qu'on le déplace ?
Mb88En ligneMembrePoints: 142 Défis: 0 Message
Posté le 05-03-2022 à 20:22 | #
Dans réflexion, non ?
Shadow15510Hors ligneAdministrateurPoints: 5317 Défis: 16 Message
Posté le 05-03-2022 à 20:24 | #
Ouaip si tu veux.
C'est bon.
Mb88En ligneMembrePoints: 142 Défis: 0 Message
Posté le 05-03-2022 à 20:25 | #
Parfait ! C'est plus logique comme ça !
Merci !
RedcmdEn ligneMembrePoints: 334 Défis: 7 Message
Posté le 06-03-2022 à 02:41 | #
You can replace all your ifs with jumps
If List L[I] = 0 :Then
    Locate I, L, "▫"
IfEnd

0 = List L[I ⇒ Locate I, L, "▫"


and instead of using Lists, you can use a Matrix
[[2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2][2, 3, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2][2, 2, 2, 2, 0, 2, 2, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2][2, 0, 0, 0, 0, 2, 0, 0, 2, 0, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2][2, 0, 0, 0, 0, 0, 0, 2, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 2][2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2]] → Mat A
Mat A[Y, X] -> T


or maybe use strings
Strings have the added benefit of being very fast
"■■■■■■■■■■■■■■■■■■■■■○▫▫▫▫■▫▫▫▫▫▫▫▫▫▫▫▫■■■■■▫■■▫■▫▫▫▫▫▫▫▫▫▫■■▫▫▫▫■▫▫■▫■■■■■■■■■■■▫▫▫▫▫▫■■▫▫▫▫▫▫▫▫▫●■■■■■■■■■■■■■■■■■■■■■" -> Str1
For 1 -> Y To 6
    Locate 1, Y, StrMid(Str1, 21Y-20, 21
Next
Exp(StrMid(Str1, 21Y+X-21, 1)) -> T


You don't actually need to check for ≠ 0
If List Y[X] != 0 :Then
If List Y[X :Then

If checking for both 0 and 1, can just check if lower than 2
Just make sure it cant equal -1
List Y[X] = 0 Or List Y[X] = 1 ⇒ Locate X, Y, " "
2 < List Y[X ⇒ Locate X, Y, " "

Instead of copy pasting code for all 4 movement directions
you can just save the current players position temporary
Move them, check if they are allowed to move, if so use the old position to clear the space behind them and draw the new position on the screen
LephenixnoirEn ligneAdministrateurPoints: 22261 Défis: 149 Message
Posté le 16-04-2022 à 18:12 | #
Avec la réactivité du Locate, même cet unique niveau est étrangement fun et dynamique. J'imagine bien devoir récolter toutes les pièces en passant une seule fois sur chaque case, aussi vite que possible. S'il y a des mises à jour, je les surveillerai avec attention...

Planète Casio v42 © créé par Neuronix et Muelsaco 2004 - 2022 | Il y a 53 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