Poster un nouveau sujet Poster une réponse
SAUT DE HAIES (Basic)
Auteur Message
tonio 2



Autorisation : Membre
Nb de messages : 18
Inscrit le : Mar 01 Nov 2011, 19:00
Posté le : Jeu 03 Nov 2011, 13:02   Citer 

J'étais parti pour faire un jeu de saut de haies en graphique mais pour de sombres raisons ... ca marche pas...


Code

0->S
0->U
1->M
8->Y
Lbl 0
EffEcr
EffVar B
16->A
Output(Y,6,"I
Output(8,A,"H
Output(1,1,S
Lbl 1
Y->X
A-1->A
codeTouche->K
If A=1:Goto 0
If K=25
Then
1->U
A->B
End
If U=1                // Pour ces quelques lignes de code
Then                 // j'ai vraiment pris mon pied  :mdr:
If Y=8                         
Then
If M=(-)1
Then
0->M
0->U
Else
1->M
End
End
If Y= 6
(-)1->M
Y-M->Y
End                             // jusque la !
Output(8,A,"H  [1 espace]
Output(X,6,"  [1 espace]
Output(Y,6,"I
If (Y=8) et (A=6 ou A=5:Goto 2
If Y<8 et A=6:S+1->S
If S>L1(1:S->L1(1
Goto 1
Lbl 2
EffEcr
Menu("GAME OVER","SCORES",S,"RECOMENCER",R
Lbl S
EffEcr
Output(2,2,"SCORE PERSONEL
Output(4,2,S
Output(6,2,"MEILLEUR SCORE
Output(8,2,L1(1
Stop
Lbl R
prgmSAUTHAIE               // moi je l'ai appelé comme ca, après vous faites ce que vous voulez ;)



Avant de faire votre première partie inserer 0 dans liste 1 (1)

 Adresse email Haut de page Bas de page 
 
tonio 2



Autorisation : Membre
Nb de messages : 18
Inscrit le : Mar 01 Nov 2011, 19:00
Posté le : Jeu 03 Nov 2011, 13:09   Citer 

Voila ce que je voulais faire à la base, ca change pas grand chose, vous me direz, c'est juste plus petit mais c'est ce que je voulais faire... alors si qqun peut m'expliquer pourquoi ca marche pas ce serait sympa winkle.gif


Code

0->S
0->U
5->M
57->Y
Lbl 0
EffEcr
EffVar B
89->A
Texte(Y,39,"I
Texte(57,A,"H
Texte(1,1,S
Lbl 1
Y->X
A-5->A
codeTouche->K
If A=4:Goto 0
If K=25
Then
1->U
A->B
End
If U=1               
Then                 
If Y=57                         
Then
If M=(-)5
Then
0->M
0->U
Else
5->M
End
End
If Y= 47
(-)5->M
Y-M->Y
End                             
Texte(57,A,"H  [1 espace]
Texte(X,39,"  [1 espace]
Texte(Y,39,"I
If (Y=57) et (A=39 ou A=34:Goto 2
If Y<57 et A=39:S+1->S
If S>L1(1:S->L1(1
Goto 1
Lbl 2
EffEcr
Menu("GAME OVER","SCORES",S,"RECOMENCER",R
Lbl S
EffDessin
EffEcr
Output(2,2,"SCORE PERSONEL
Output(4,2,S
Output(6,2,"MEILLEUR SCORE
Output(8,2,L1(1
Stop
Lbl R
prgmSAUTHAIE



 Adresse email Haut de page Bas de page 
 
sandro



Autorisation : Membre
Nb de messages : 1387
Inscrit le : Ven 25 Mar 2011, 22:58
Posté le : Jeu 03 Nov 2011, 19:02   Citer 

Tu pourrait déjà s'il te plait dire qu'est ce qui ne marche pas, quand, quelles sont les valeures des variables, s'il y a un bug,...


Sandro

PS: évite le double post, tu peut éditer tes messages.

----------------------
mort à l'inutile, place à la mémoire libre et aux programmes
 Adresse email Haut de page Bas de page 
 
The K



Autorisation : Membre
Nb de messages : 878
Inscrit le : Sam 15 Oct 2011, 11:07
Posté le : Jeu 03 Nov 2011, 19:06   Citer 

J'ai mon idée ... Entre le "If U=1" Et le "Y-M -> M : End" Tu as 4 If pour 3 End ... Ça viendrait pas de la dis moi ? winkle.gif

----------------------
La la la ...

Avez-vous pensé à regarder le manuel avant de demander conseil ? Un manuel est fait avant tout pour être consulté : MANUEL
Un problème de programmation ? Allez consulter ce tutoriel crée pour cela : TUTORIEL PROGRAMMATION
Vous avez un problème avec l'ordinateur avec votre calculatrice ? SOLUTION EN VIDEO

Mes programmes sur le site : Produit scalaire KMorpion Puissance 4 Mastermind

Mes nouveaux programmes de calcul formel : FCarré FPrime

Projet base de données : ici mais abandonné. Trop de travail ...
 Adresse email Haut de page Bas de page 
 
tonio 2



Autorisation : Membre
Nb de messages : 18
Inscrit le : Mar 01 Nov 2011, 19:00
Posté le : Dim 06 Nov 2011, 20:55   Citer 

Ouhlala oui que je suis tête en l'air alors ca ne marche pas quand je passe en graphique ( quand il y a texte au lieu de output) car mon "k" ( personnage) se dédouble, il y en a un tout en bas de l'écran et un touyt en haut et quand j'appuie sur la flèche du haut qui devrait faire sauter le "k" du bas, cela fait aussi sauter le k du haut qui sort alors de l'écran donc ... " erreur domaine " aie aie aie frozen.gif
et non dsl ce n'est pas la faute au end, car quand on met un if sans then derrière, pas besoin de end mais cela inclu qu'une seule conséquence peut être inclu dans le if

 Adresse email Haut de page Bas de page 
 
The K



Autorisation : Membre
Nb de messages : 878
Inscrit le : Sam 15 Oct 2011, 11:07
Posté le : Dim 06 Nov 2011, 23:13   Citer 

Ah c'est vrai tout juste ! (et le pire c'est que je le savais xD)

Bon après les déplacements de quoi que ce soit je suis pas spécialiste (je commence a comprendre le codetouche et ce qui est lie ...). Bref, je ne pense pas pouvoir t'aider ;(

----------------------
La la la ...

Avez-vous pensé à regarder le manuel avant de demander conseil ? Un manuel est fait avant tout pour être consulté : MANUEL
Un problème de programmation ? Allez consulter ce tutoriel crée pour cela : TUTORIEL PROGRAMMATION
Vous avez un problème avec l'ordinateur avec votre calculatrice ? SOLUTION EN VIDEO

Mes programmes sur le site : Produit scalaire KMorpion Puissance 4 Mastermind

Mes nouveaux programmes de calcul formel : FCarré FPrime

Projet base de données : ici mais abandonné. Trop de travail ...
 Adresse email Haut de page Bas de page 
 
tonio 2



Autorisation : Membre
Nb de messages : 18
Inscrit le : Mar 01 Nov 2011, 19:00
Posté le : Lun 07 Nov 2011, 22:57   Citer 

Bah de toute façon c'était pas ungrand grand programme et il marche en output alors c'est déja pas mal... on fait avec ce qu'on a, hein bigmouth.gif godgrace.gif

 Adresse email Haut de page Bas de page 
 
Poster un nouveau sujet Poster une réponse





  Powered by Fire-Soft-Board v1.0.10 © 2004 - 2024 Groupe FSB
Page générée en 9 requêtes
BlackOne par Grimmlink