Version Française English Version Planete-casio.fr
Bienvenue sur la nouvelle version de planete-casio! Laissez vos impressions sur le forum!
Forums Casio - Problèmes de programmation ou avec un programme

Index du Forum | Problèmes de programmation ou avec un programme | Bouger un dessin avec getkey
Blizzard 2
Hors ligne
Statut: Membre
Niveau: Aucun
Points: 20
Défis: 0
Email | Message
Posté le 26/09/2006 22:27

Bouger un dessin avec getkey:

Bonsoir, j'étais déja passé ici il y a quelques mois et j'aurais une question à vous poser.

Comment on peut faire pouger un petit dessin avec getkey?

J'ai réussi à le faire mais que pour une seule direction, je ne peux pas reculer ?

Je vous remercie d'avance




Meithal
Hors ligne
Statut: Admin
Niveau: Aucun
Points: 3097
Défis: 7
Email | Message
Posté le 26/09/2006 22:37 |
bouger une image de fond tu veux dire? Non c'est impossible. Tu peux éventuellement faire bouger du texte, un pixel, ou bien un petit objet dessiné en drawstat mais pas l'image de fond.

Bonne chance
----------------------------------
Calculatrice : Graph 35+
Titi
Hors ligne
Statut: Membre
Niveau: Elite
Points: 988
Défis: 0
Email | Message
Posté le 27/09/2006 00:18 |

ou bien un petit objet dessiné en drawstat



Peux-tu donner plus d'explications, stp ?
----------------------------------
My games: Final Fantasy Next-G, TSC, GTA2, MYST, GTA
Meithal
Hors ligne
Statut: Admin
Niveau: Aucun
Points: 3097
Défis: 7
Email | Message
Posté le 27/09/2006 07:12 |
cls
RclPict A
List B+C->List B
Drawstat

par exemple. J'imagine que ca fonctionne.
----------------------------------
Calculatrice : Graph 35+
Titi
Hors ligne
Statut: Membre
Niveau: Elite
Points: 988
Défis: 0
Email | Message
Posté le 27/09/2006 11:03 |
Ok !
Je pense que ça marche aussi.
Mais il faut que vraiment que cela soit un petit objet sinon ça risque de ramer.
----------------------------------
My games: Final Fantasy Next-G, TSC, GTA2, MYST, GTA
Blizzard 2
Hors ligne
Statut: Membre
Niveau: Aucun
Points: 20
Défis: 0
Email | Message
Posté le 27/09/2006 13:30 |

Filename:GETKEY
Seq(0,X,1,24,1)=>List 1
Seq(0,X,1,24,1)=>List 2
For 33=>A To 29 Step -1
A=>List 1[A-28]
Next
For 1=>B To 5
2=>List 2[B]
Next
Do
While Getkey=53
List 2+2=>List 2
S-Gph1 DrawOn,Scatter,List 2,List 1,1,Dot
S-WindMan
ViewWindow 1,127,0,62,1,0
DrawStat
WhileEnd
LpWhile 1=1




Voila c'est le prog d'origine.
Titi
Hors ligne
Statut: Membre
Niveau: Elite
Points: 988
Défis: 0
Email | Message
Posté le 27/09/2006 15:49 |
Désolé mais ton code ne fonctionne pas.
Je l'ai testé sur ma G100+

Bon aller, je suis cool
Je vais te donner un peu de mon code source de mon prochain jeu.

Fait un test avec ceci:


DEBUT
Initialisation
0->A~Z
1->U:63->V
Cls
ClrText
ClrGraph
BG-None
FuncOff
G-Connect
CoordOff
GridOff
AxesOff
LabelOff
Ma fenetre
ViewWindow 1,127,0,1,63,0
Deplacements curseur
Do
Getkey->A
Limites
U>124=>1->U
U<1=>124->U
V>63=>4->V
V<4=>63->V
Mon curseur
F-Line U,V,U+2,V
F-Line U,V,U,V-2
F-Line U,V,U+3,V-3
Do
A=28=>V+10->V
A=27=>U+10->U
A=37=>V-10->V
A=38=>U-10->U
(A=28 Or A=27 Or A=37 Or A=38)=>Cls
LpWhile (A=28 And A=27 And A=37 And A=38)
LpWhile A#31
Cls
Text 1,1,"Test ok!"-DISP-
Cls
FIN
Stop

----------------------------------
My games: Final Fantasy Next-G, TSC, GTA2, MYST, GTA
Muelsaco
Hors ligne
Statut: Webmaster
Niveau: Elite
Points: 9229
Défis: 175
Email | Message
Posté le 27/09/2006 17:14 |
Tu peux aussi le faire tout simplement en F-Line met se sera plus long

ClrGraph
ViewWindow 1,127,0,1,63,0
64->A
32->B
Do
Getkey->G
G=27=>A+1->A
G=38=>A-1->A
G=37=>B-1->B
G=28=>B+1->B
F-Line A,B,A,B
'suite du dessin en F-Line
LpWhile 1

----------------------------------
Calculatrices : Fx 92 Collège, Graph 25, Graph 65, Graph 85, Graph 100, Classpad 300.
Zefortiche
Hors ligne
Statut: Super admin
Niveau: Confirmé
Points: 5340
Défis: 54
Email | Message
Posté le 27/09/2006 17:59 |
le code à muelsaco est plus simple à réaliser
----------------------------------
Calculatrices : Graph 35+, G100+
Titi
Hors ligne
Statut: Membre
Niveau: Elite
Points: 988
Défis: 0
Email | Message
Posté le 27/09/2006 18:52 |
C'est normal dans le code de Muelsaco
il n'y a pas:
-une initialisation complète
-des limites de déplacement
-un objet complet (ici c'est juste une droite)
-un rafraîchissement d'image
-un l'arrêt de boucle


----------------------------------
My games: Final Fantasy Next-G, TSC, GTA2, MYST, GTA
Zefortiche
Hors ligne
Statut: Super admin
Niveau: Confirmé
Points: 5340
Défis: 54
Email | Message
Posté le 27/09/2006 19:44 |
-initialisation complète : personnellement, je trouve ça inutile
-limites de déplacement : faudrait les rajouter, mais juste pour éviter le ArgError (je crois que c'est celui là )
-un objet complet : "F-Line A,B,A,B
'suite du dessin en F-Line"
-j'admet qu'il faudrait faire une double boucle et il y aurait un Cls dans la plus grande des 2
-un arrêt de boucle : euh...bin moi, je trouve ça pas important
----------------------------------
Calculatrices : Graph 35+, G100+
Blizzard 2
Hors ligne
Statut: Membre
Niveau: Aucun
Points: 20
Défis: 0
Email | Message
Posté le 27/09/2006 20:08 |
Titi: il faut appuyer sur 6, y a un petit dessin qui apparait eet qui va vers la droite si on appuie plusieurs fois sur 6.
Meithal
Hors ligne
Statut: Admin
Niveau: Aucun
Points: 3097
Défis: 7
Email | Message
Posté le 27/09/2006 20:39 |
Il faut toujours faire une initialisation complète pour les jeux graphiques

On ne sait jamais les crasses qu'ont pu laisser les précédents programmes.
----------------------------------
Calculatrice : Graph 35+
Muelsaco
Hors ligne
Statut: Webmaster
Niveau: Elite
Points: 9229
Défis: 175
Email | Message
Posté le 27/09/2006 22:40 |
Oui mais c'est pour aller vite là!
Sinon oui en effet j'ai oublié le Cls après le Do par ex
----------------------------------
Calculatrices : Fx 92 Collège, Graph 25, Graph 65, Graph 85, Graph 100, Classpad 300.
Blizzard 2
Hors ligne
Statut: Membre
Niveau: Aucun
Points: 20
Défis: 0
Email | Message
Posté le 30/09/2006 14:11 |
J'ai résolu le problême en remplaçant while par des sauts conditionnels, merci :o


Index du Forum | Problèmes de programmation ou avec un programme | Bouger un dessin avec getkey
Pseudo :
Adresse email :
Réponse :
 :)  ;)  :D  :p
 :lol:  8)  :(  :@
 0_0  :oops:  :grr:  :E
 :O  :sry:  :mmm:  :waza:
 :?:  :arrow:  :!:  :here:
Ajouter fichier joint :


Me prévenir par mail lorsqu'une réponse est postée



Recherche :
Publicité et partenaires
Top cinema - Les meilleurs films (par les créateurs de Planete Casio)
Top cinema - Les meilleurs films

www.planete-casio.fr v3.0 © crée par Neuronix et Muelsaco 2007
Il y a 6 connectés | Nous contacter | Recherches effectuées | Liens | Forum Commun Casio