Poster un nouveau sujet Poster une réponse
animation sniper
Auteur Message
ggdu34
Invité
Posté le : Mer 28 Nov 2012, 18:39   Citer 

Une petite animation ou vous regardez a travers la lunette d'un sniper, et un petit O va mourir d'une balle...
Mon premier prgm, soyez gentil ! bigmouth.gif


Code

Lbl P
Effecr
Output(4,1,"++++++++++++++++      (16 +)
Output(1,8,"+
Output(2,8,"+
Output(3,8,"+
Output(4,8,"+
Output(5,8,"+
Output(6,8,"+
Output(7,8,"+
Output(8,8,"+
entAléat(3,5)[sto]Q
entAléat(7,9)[sto]R
Output(Q,R,"O
NbrAléat
NbrAléat
NbrAléat
NbrAléat
NbrAléat
NbrAléat
NbrAléat
If Q=4 et R=8:Goto S
Goto P
Lbl S
Effecr
Output(4,3,"CIBLE ELIMINE
Output(6,5,"ONE SHOT
Pause
Effecr



  Haut de page Bas de page 
 
Sangohan38



Autorisation : Membre
Nb de messages : 3293
Inscrit le : Sam 31 Déc 2005, 19:48
Posté le : Mer 28 Nov 2012, 19:21   Citer 

On est pas la pour te descendre mais pour t'aider à améliorer tes programmes ou donner des conseils.

D'ailleurs ton programme peux voir son affichage des "+" raccourcis en deux boucles et les nbraléat qui je supposent servent à ralentir le programme peuvent être remplacés par un 69! (qui est le plus long calcul en le moins de caractères que peux faire la calculatrice):


Code
Lbl P
Effecr
For(A,1,16
Output(4,A,"+
End
For(A,1,8
Output(A,8,"+
End
69!
entAléat(3,5)[sto]Q
entAléat(7,9)[sto]R
Output(Q,R,"O
If Q=4 et R=8:Goto S
Goto P
Lbl S
Effecr
Output(4,3,"CIBLE ELIMINE
Output(6,5,"ONE SHOT
Pause
Effecr



Sangohan38

 Adresse email Haut de page Bas de page 
 
ggdu34
Invité
Posté le : Mer 28 Nov 2012, 20:32   Citer 

Ok merci Sangohan c'est cool ! Cela m'aide vu mon petit niveau !
happy.gif

  Haut de page Bas de page 
 
Google_AdSense



Publicité    



 
ggdu34
Invité
Posté le : Mer 28 Nov 2012, 20:42   Citer 

Encore un truc, je cherche a créer un programme pour qu'une lettre (ici V) se déplace sur la huitième ligne et il y a un problème... eyeonly.gif
Le prgm c'est :

Code

Effecr
Repeat K=45
codetouche[sto]K
5[sto]A
If K=24:A-1[sto]A
If K=26:A+1[sto]A
Output(8,A,"V
End



Mon problème est:
- La lettre V ne peut se décaler que d'un côté de sa place de début !

  Haut de page Bas de page 
 
ggdu34
Invité
Posté le : Mer 28 Nov 2012, 20:44   Citer 

erreur, c'est pas un côté de sa place de début mais sulement un cran de chaque côté de sa place de début..
Dsl pour le triple-post

  Haut de page Bas de page 
 
linkakro



Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Mer 28 Nov 2012, 23:40   Citer 

C'est parce que tu réinitialises tout le temps A à 5.
Déplace "5->A" avant Repeat.

----------------------
ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)

Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store
 Adresse email Haut de page Bas de page 
 
ggdu34
Invité
Posté le : Jeu 29 Nov 2012, 12:29   Citer 

Ok merci linkakro mais maintenant j'ai un autre problème, mon V laisse des traces... Comment les supprimer et que mon V puisse quand même se déplacer ?
question sur ce programme


Code

Effecr
5[sto]A
Repeat K=45
codetouche[sto]K
If K=24:A-1[sto]A
If K=26:A+1[sto]A
Output(8,A,"V
End



  Haut de page Bas de page 
 
ggdu34
Invité
Posté le : Jeu 29 Nov 2012, 16:15   Citer 

En fait non ça c'est bon j'ai réglé ce petit problème, celui qui se pose maintenant est :
Comment faire pour que des O descendent ? Case a case, comme si on lachait un objet d'en haut.

  Haut de page Bas de page 
 
linkakro



Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Jeu 29 Nov 2012, 23:38   Citer 

Plusieurs possibilités graphiques
-effacer les caractères ou l'écran avant de les dessiner à la nouvelle position
-"scroller" l'écran avec Disp permet de faire monter des choses (alors retourne la TI ou change de concept)

données :
-une ou plusieurs variables (notammant de position) pour chaque "O".
-une variable par position indiquant la présence ou non d'un ennemi.

Il est aussi possible de rassembler ces multiples variables dans une liste ou une matrice.
S'il n'y a qu'un ennemi par ligne je te conseille de stocker la position horizontale d'un ennemi dans une liste dont chaque case correspondra à une ligne d'écran.

----------------------
ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)

Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store
 Adresse email Haut de page Bas de page 
 
Poster un nouveau sujet Poster une réponse





  Page générée en 9 requêtes