Planète Casio
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.
Menu
Calculatrices
Graph 35 à 100
Graph 25+Pro/25+E/25+E II
Graph 35+USB/75(+E)/85/95 SD
Graph 100(+)
Classpad 300/330(+)
fx-CG 10/20 (Prizm)
Classpad 400(+E)
Graph 90+E
fx-92+ SC
Liens
¤ Transférer un programme sur
sa calculatrice
¤ Vous cherchez une fonction ?
Jeux >> Graph 35+USB/75(+E)/85/95 SD >> Action/Sport >> Guitar hero
Guitar hero
Version : 1.2.5 Taille : 5860 octets Ajouté le : 2014-09-27 15:14 Modifié le : 2017-02-06 19:03
Auteur et posteur :
Matt36230Hors ligneMembrePoints: 1888 Défis: 0 Message
 Planète Casio - Jeu Casio action ou sport - Guitar hero - matt36230 - Calculatrices
Nombre de visites sur cette page : 8929
Score au progrank : 33
Pas encore de note !
Vous devez être connecté(e) pour noter (inscription).
947 téléchargements | Soumettre un test

Votre calculatrice doit posséder les chaines de caractères (Str) et Menu pour utiliser ce programme. Si vous avez une Graph 85 (SD), mettez-la à jour.
Description :

Salut tout le monde ! Vous connaissez le super jeu Guitar Hero ? Et bien le voici maintenant adapté sur Casio !!

Le but est super simple des notes descende les cordes de votre guitare et vous devez gratter la bonne corde (F2 F3 F4 F5) au bon moment. (tout est exliqué dans le tuto disponible sur le menu du jeu ). Vous avez le choix entre plusieurs difficultés et vos meilleurs scores sont enregistrés !

Attention ce jeu utilise la liste 3

Sur ce BON CONCERT !

Mis à jour !
Fermer les MAJ
MAJ 1.1 : Suppression du programme ~SCORE~ et correction de bugs.
MAJ 1.2 : Correction de l'ENORME faute de ma part qui resetait les scores quand on allumait le programme. Désolé à tous ceux que cela a gêné
MAJ 1.2.5 : Amélioration du menu du début en avance par rapport à la MAJ 1.3 qui améliorera tous les menus (et fera économiser quelques octets)



Prochainement dans les MAJ
Clique pour cacher
Menu plus classe comme ceux de mon autre jeu INVASION mais remis au gout du jour 8) avec un enlèvement d'au moins 1000 octet de programme.
Avancement des menus
   90%

Un mode tournée mondiale ou vous devrez devenir l'artiste le plus riche du monde !
Avancement du projet
   1%
Commentaires :

Pages: Précédente | 1, 2, 3 | Suivante

Matt36230Hors ligneMembrePoints: 1888 Défis: 0 Message
Posté le 27-09-2014 à 18:21 | #
Oui oui pardon je te donne tout ça
En faite les scores ne s'affichent pas (cela me met 0)et ne se sauvegarde pas j'ai essayé sur un programme test et c'est pareil :/
33ãZÙ
"BTL"ãList 3[0]Ù
{0,0,0}ãList 3Ù
Locate 1,1,List 3[1]Ù
If Z>List 3[1]Ù
Then ZãList 3[1]Ù
Locate 1,2,List 3[1]

Ensuite relance le programme en changeant 33 par 28 par exemple et bien cela va mettre 28 dans la liste psk le 33 ne s'était pas enregistré ou que la liste s'est reset :/
LephenixnoirHors ligneAdministrateurPoints: 24700 Défis: 170 Message
Posté le 27-09-2014 à 18:41 | #
Je pourrais avoir le code au moins jusqu'au IfEnd s'il te plaît ?
Matt36230Hors ligneMembrePoints: 1888 Défis: 0 Message
Posté le 27-09-2014 à 18:45 | #
Ok je te donne ce qu'il y a sur le jeu pas mon test.
If Y<1Ù
Then ClrTextÙ
Locate 6,3,"Pas mal !"Ù
Locate 4,5,"Ton score :"Ù
Locate 15,5,ZÙ
Locate 2,6,"Meilleur score :"Ù
Locate 19,6,List 3[1]Ù
If List 3[1]<ZÙ
Then ZãList 3[1]Ù
ClrTextÙ
Locate 4,4,"NEW BEST SCORE ·!·"Ù
Locate 11,5,ZÙ
IfEndØ
Ù
" "Ù
"1×On remet ca !"Ù
" "Ù
"2×Une autre musique"Ù
" "Ù
"3×Arreter le concert"Ù
While 0<62Ù
If Getkey=72Ù
Then Goto 3Ù
IfEndÙ
If Getkey=62Ù
Then Prog "GUITHERO"Ù
IfEndÙ
If Getkey=47 Or Getkey=52Ù
Then ClrTextÙ
Locate 4,4,"Fin du concert"Ù
StopÙ
IfEndÙ
WhileEndÙ
IfEndÙ

La variable Y est le nombre de vie
LephenixnoirHors ligneAdministrateurPoints: 24700 Défis: 170 Message
Posté le 27-09-2014 à 18:53 | #
Pour une boucle infinie, tu peux mettre While 1 c'est tellement plus élégant...
Et est-ce que ce morceau de code vient du prog "GUITHERO" ?
Matt36230Hors ligneMembrePoints: 1888 Défis: 0 Message
Posté le 27-09-2014 à 18:54 | #
Oki pour le While et oui ca vient de ce programme.
LephenixnoirHors ligneAdministrateurPoints: 24700 Défis: 170 Message
Posté le 27-09-2014 à 18:57 | #
Alors tu ne peux pas utiliser Prog "GUITHERO" car cette commande ne fait pas juste un saut : lorsque le programme secondaire se termine sur la commande Return, on revient au niveau du Prog.
La problème, c'est que le nombre de sous-appels de programmes est limité, et tu pourras constater que si tu fais cela trop de fois le programme plantera.
Dans ce cas, il vaut encore mieux utiliser un label avec un goto, ce sera quand même plus propre.
Matt36230Hors ligneMembrePoints: 1888 Défis: 0 Message
Posté le 27-09-2014 à 18:59 | #
Et c'est ça qui empêche aux scores de s'enregistrer O.o ?
LephenixnoirHors ligneAdministrateurPoints: 24700 Défis: 170 Message
Posté le 27-09-2014 à 19:01 | #
C'est possible.
Mais à mon avis, le problème vient d'ailleurs... si ça ne fonctionne toujours pas, tu pourrais me donner le morceau de code qui suit ce que tu m'as donné en premier ?
Matt36230Hors ligneMembrePoints: 1888 Défis: 0 Message
Posté le 27-09-2014 à 19:03 | #
Oui je te donne toute la boucle comme ça
Lbl 3Ù
0ãPÙ
0ãZÙ
6ãYÙ
Lbl 6Ù
ClrTextÙ
1ãBÙ
1ãCÙ
1ãDÙ
1ãEÙ
1ãFÙ
1ãGÙ
1ãHÙ
1ãIÙ
RanBin#(1,4)ãAÙ
A=1×4ãFÙ
A=2×8ãGÙ
A=3×12ãHÙ
A=4×16ãIÙ
Locate 1,7,"#E69B-------------------#E69A"Ù
Locate 4,1,"@7C   @7C   @7C   @7C"Ù
Locate 4,2,"@7C   @7C   @7C   @7C"Ù
Locate 4,3,"@7C   @7C   @7C   @7C"Ù
Locate 4,4,"@7C   @7C   @7C   @7C"Ù
Locate 4,5,"@7C   @7C   @7C   @7C"Ù
Locate 4,6,"@7C   @7C   @7C   @7C"Ù
Locate 1,2,"Vies"Ù
Locate 1,3,YÙ
Locate 1,4,"Pts"Ù
Locate 1,5,ZÙ
DoÙ
If Y<1Ù
Then ClrTextÙ
Locate 6,3,"Pas mal !"Ù
Locate 4,5,"Ton score :"Ù
Locate 15,5,ZÙ
Locate 2,6,"Meilleur score :"Ù
Locate 19,6,List 3[1]Ù
If List 3[1]<ZÙ
Then ZãList 3[1]Ù
ClrTextÙ
Locate 4,4,"NEW BEST SCORE ·!·"Ù
Locate 11,5,ZÙ
IfEndØ
Ù
" "Ù
"1×On remet ca !"Ù
" "Ù
"2×Une autre musique"Ù
" "Ù
"3×Arreter le concert"Ù
While 0<62Ù
If Getkey=72Ù
Then Goto 3Ù
IfEndÙ
If Getkey=62Ù
Then Prog "GUITHERO"Ù
IfEndÙ
If Getkey=47 Or Getkey=52Ù
Then ClrTextÙ
Locate 4,4,"Fin du concert"Ù
StopÙ
IfEndÙ
WhileEndÙ
IfEndÙ
F>2×Locate F,B,"@7C"Ù
G>2×Locate G,C,"@7C"Ù
H>2×Locate H,D,"@7C"Ù
I>2×Locate I,E,"@7C"Ù
B+1ãBÙ
C+1ãCÙ
D+1ãDÙ
E+1ãEÙ
F>2×Locate F,B,"#E6A6"Ù
G>2×Locate G,C,"#E6A6"Ù
H>2×Locate H,D,"#E6A6"Ù
I>2×Locate I,E,"#E6A6"Ù
If Getkey=69Ù
Then If F=4 And B=7Ù
Then Locate 4,7,"Ö"Ù
Z+1ãZÙ
Goto 6Ù
Else Locate 4,7,"-"Ù
Y-1ãYÙ
IfEndÙ
IfEndÙ
If Getkey=59Ù
Then If G=8 And C=7Ù
Then Locate 8,7,"-"Ù
Z+1ãZÙ
Goto 6Ù
Else Locate 8,7,"-"Ù
Y-1ãYÙ
Goto 6Ù
IfEndÙ
IfEndÙ
If Getkey=49Ù
Then If H=12 And D=7Ù
Then Locate 12,7,"-"Ù
Z+1ãZÙ
Goto 6Ù
Else Locate 12,7,"-"Ù
Y-1ãYÙ
Goto 6Ù
IfEndÙ
IfEndÙ
If Getkey=39Ù
Then If I=16 And D=7Ù
Then Locate 16,7,"-"Ù
Z+1ãZÙ
Goto 6Ù
Else Locate 16,7,"-"Ù
Y-1ãYÙ
Goto 6Ù
IfEndÙ
IfEndÙ
If B=7 Or C=7 Or D=7 Or E=7Ù
Then Y-1ãYÙ
Goto 6Ù
IfEndÙ
For 1ãU To 80Ù
NextÙ
LpWhile YÈ0
LephenixnoirHors ligneAdministrateurPoints: 24700 Défis: 170 Message
Posté le 27-09-2014 à 19:10 | #
Ouf
Pour information, lorsque tu affectes la même valeur à des variables qui se suivent tu peux utiliser le tilde :
1→B~I

Lorsque tu veux augmenter une valeur de 1, tu peux utiliser Isz :
Isz B

En revanche, il existe un bug si la nouvelle valeur est nulle donc à utiliser avec précaution.

Sinon, je vois pas où est le bug... je vais voir plus en détail.

Pages: Précédente | 1, 2, 3 | Suivante

Planète Casio v4.3 © créé par Neuronix et Muelsaco 2004 - 2024 | Il y a 32 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