Poster un nouveau sujet Poster une réponse
économiseur d'écran trés sympa
Auteur Message
Akmdad



Autorisation : Membre
Nb de messages : 713
Inscrit le : Mar 22 Jui 2010, 21:03
Posté le : Ven 02 Juil 2010, 11:23   Citer 

voici un economiseur d'écran ou la calculatrice dessine! ca peut faire très joli et avec un petit peu d'imagination vous verrez des visages etc...

Code

Effdessin //cleardraw en anglais
50->X
50->Y
Lbl 1
Pxl-change(X,Y
entalea(1,4->A //intrand
codetouche->K //getkey
If K=105
Pause
X+(A=1)-(A=2)->X
Y+(A=3)-(A=4)->Y
If X=-1
100->X
If Y=-1
100->Y
If X=101
0->X
If Y=101
0->Y
goto 1



----------------------
retrouvez moi sur twitter!!!


j'ai une ti 82 stats fr et une ti89 titanium happy.gif
 Adresse email Haut de page Bas de page 
 
Akmdad



Autorisation : Membre
Nb de messages : 713
Inscrit le : Mar 22 Jui 2010, 21:03
Posté le : Ven 02 Juil 2010, 18:28   Citer 

n'hesitez pas si vous avez des améliorations, des problèmes ou pour dire ce que vous en pensez!!!

----------------------
retrouvez moi sur twitter!!!


j'ai une ti 82 stats fr et une ti89 titanium happy.gif
 Adresse email Haut de page Bas de page 
 
alexvire



Autorisation : Membre
Nb de messages : 230
Inscrit le : Dim 10 Mai 2009, 13:31
Posté le : Ven 02 Juil 2010, 18:41   Citer 

Tu n'es pas obligé de redimensionner l'écran si tu utilise "Pxl-Change(" à la place en inversant X et Y.

----------------------
Salut, visitez mon site:

Et mon forum !

Mes programmes.
Convertissez vos images en un programme à mettre sur votre TI.
 Adresse email Haut de page Bas de page 
 
Akmdad



Autorisation : Membre
Nb de messages : 713
Inscrit le : Mar 22 Jui 2010, 21:03
Posté le : Ven 02 Juil 2010, 19:53   Citer 

bien pensé! je corrige ça tout de suite!

----------------------
retrouvez moi sur twitter!!!


j'ai une ti 82 stats fr et une ti89 titanium happy.gif
 Adresse email Haut de page Bas de page 
 
Persalteas



Autorisation : Membre
Nb de messages : 2086
Inscrit le : Sam 23 Jan 2010, 20:09
Posté le : Sam 03 Juil 2010, 19:10   Citer 

X+(A=1)-(A=2)->X
Y+(A=3)-(A=4)->Y

peuvent remplacer tes 8 lignes de calculs.

 Adresse email Haut de page Bas de page 
 
Akmdad



Autorisation : Membre
Nb de messages : 713
Inscrit le : Mar 22 Jui 2010, 21:03
Posté le : Sam 03 Juil 2010, 19:44   Citer 

c'est fait

----------------------
retrouvez moi sur twitter!!!


j'ai une ti 82 stats fr et une ti89 titanium happy.gif
 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