Rechercher
Connexion
Chatbox externe
Derniers sujets
Partenaires
TI-Planet | Espace-TI : Forum |
Faire un don à Tout-82...
Où va cet argent ?
Membres donateurs:- Persalteas (10€)
- Wistaro (5€)
- jo2geek (22€)
Les posteurs les plus actifs du mois
Aucun utilisateur |
[résolu]TI82Stat/Ti83 (Basic) une roue..
5 participants
Page 1 sur 1
[résolu]TI82Stat/Ti83 (Basic) une roue..
Bonjour tout est dans le titre
(une roue qui semble tourner..)
en TI basic je me suis amusé à faire ce programme
qui ne sert à rien...
le code
(une roue qui semble tourner..)
en TI basic je me suis amusé à faire ce programme
qui ne sert à rien...
le code
- Code:
:1→Xmin
:1→Ymin
:95→Xmax
:63→Ymax
:0→Xscl
:0→Yscl
:ClrDraw
:CoordOff
:ClrHome
:Degree
:(Xmax-Xmin)/2→A
:(Ymax-Ymin)/2→B
:30→R
:Circle(A,B,R
:For(I,0,360,30
: Line(A,B,A+Rcos(I),B+Rsin(I)
:End
:StorePic Pic1
:For(I,0,360,30)
: Line(A,B,A+Rcos(I),B+Rsin(I),0
:End
:
:For(I,15,360,30
: Line(A,B,A+Rcos(I),B+Rsin(I)
:End
:StorePic Pic2
:For(I,100,1,‾1
: ClrDraw
: RecallPic Pic1
: For(W,1,I:End
: ClrDraw
: RecallPic Pic2
: For(W,1,I:End
:End
:Disp "FIN
:
- Fichiers joints
Dernière édition par jo2geek le Sam 15 Fév 2014 - 8:47, édité 2 fois (Raison : rajout dans le descriptif le fait que ça semble touner)
jo2geek- Connaisseur
- Messages : 116
Points Concours : 81
Productivité : 9
Date d'inscription : 27/01/2014
Calculatrice(s) :- TI-82 Stats.fr
. :
Re: [résolu]TI82Stat/Ti83 (Basic) une roue..
Coucou, joli programme
En revanche, ta fenête d'affichage peut être optimisée (a mon avis)
En revanche, ta fenête d'affichage peut être optimisée (a mon avis)
Re: [résolu]TI82Stat/Ti83 (Basic) une roue..
Tu as pratiqué seul le dessin polaire/cartésien et cela me satisfait. L'utilité est plus pour toi que pour nous.
Il aurait été plus simple (et fiable) d'effacer l'écran après le premier dessin et redessiner aussi le cercle (ou même utiliser une Pic/Img) que d'effacer uniquement les lignes.
Il aurait été plus simple (et fiable) d'effacer l'écran après le premier dessin et redessiner aussi le cercle (ou même utiliser une Pic/Img) que d'effacer uniquement les lignes.
préparer graphe
dessiner cercle
stocker img2
dessiner fuseaux 1
stocker img1
effacer dessin
rappeler img2 // le cercle
dessiner fuseaux 2
stocke img2
boucle de clignotement
Linkakro- ----------------------
- Messages : 533
Points Concours : 55
Productivité : 31
Date d'inscription : 30/07/2013
Localisation : origine région centre, puis perpignan
Calculatrice(s) :- TI-82 Stats.fr
. :
Re: [résolu]TI82Stat/Ti83 (Basic) une roue..
Merci à vous deux
oui c'est sûr comme je le disais ça ne sert à personne en fait, et pas très utile à qui que ce soit...
Je vais faire la version 2 selon les derniers conseils de l'algo.
En fait ce petit programme ce sera pour moi, une base pour faire la même chose mais en assembleur... - mon premier programme dans ce nouveau langage - et là les difficultés vont se présenter
L'occasion d'un autre autre billet... mais je pense que vous saurez m'aider.
petite question au passage, avec quoi faites-vous les images animée sur ce site (des gifs animés ?) vous avez un outil ? Merci
oui c'est sûr comme je le disais ça ne sert à personne en fait, et pas très utile à qui que ce soit...
Je vais faire la version 2 selon les derniers conseils de l'algo.
En fait ce petit programme ce sera pour moi, une base pour faire la même chose mais en assembleur... - mon premier programme dans ce nouveau langage - et là les difficultés vont se présenter
L'occasion d'un autre autre billet... mais je pense que vous saurez m'aider.
petite question au passage, avec quoi faites-vous les images animée sur ce site (des gifs animés ?) vous avez un outil ? Merci
Dernière édition par jo2geek le Ven 31 Jan 2014 - 13:50, édité 1 fois
jo2geek- Connaisseur
- Messages : 116
Points Concours : 81
Productivité : 9
Date d'inscription : 27/01/2014
Calculatrice(s) :- TI-82 Stats.fr
. :
Re: [résolu]TI82Stat/Ti83 (Basic) une roue..
Pour faire les images animées, c'est très simple: utilise l'émulateur WabbitEmu sur PC:
https://tout82.forumactif.org/t29-utiliser-l-emulateur-wabbitemu?highlight=wabbitemu
https://tout82.forumactif.org/t29-utiliser-l-emulateur-wabbitemu?highlight=wabbitemu
jo2geek- Connaisseur
- Messages : 116
Points Concours : 81
Productivité : 9
Date d'inscription : 27/01/2014
Calculatrice(s) :- TI-82 Stats.fr
. :
Re: [résolu]TI82Stat/Ti83 (Basic) une roue..
C'est vachement beau comme animation !!
Continue comme ça... (+1)
Continue comme ça... (+1)
Re: [résolu]TI82Stat/Ti83 (Basic) une roue..
C'est sympa !
m@thieu41- ----------------------
- Messages : 939
Points Concours : 65
Productivité : 47
Date d'inscription : 02/06/2013
Localisation : Nice, France
Calculatrice(s) :- TI-82 Stats.fr
. :
Re: [résolu]TI82Stat/Ti83 (Basic) une roue..
Merci pour les encouragements de chacun
petite question en passant.. il vaux mieux mettre le code ? ou mettre un xx.83P
petite question en passant.. il vaux mieux mettre le code ? ou mettre un xx.83P
jo2geek- Connaisseur
- Messages : 116
Points Concours : 81
Productivité : 9
Date d'inscription : 27/01/2014
Calculatrice(s) :- TI-82 Stats.fr
. :
Re: [résolu]TI82Stat/Ti83 (Basic) une roue..
La bonne habitude est de poster le code et d'héberger le programme.
Et sur TICalc.org il est tout-à-fait faisable de placer un zip avec le programme et le code ensemble.
Bien que le programme donne accès au code, on n'a pas tous d'éditeur pour en créer un code.
Et sur TICalc.org il est tout-à-fait faisable de placer un zip avec le programme et le code ensemble.
Bien que le programme donne accès au code, on n'a pas tous d'éditeur pour en créer un code.
Linkakro- ----------------------
- Messages : 533
Points Concours : 55
Productivité : 31
Date d'inscription : 30/07/2013
Localisation : origine région centre, puis perpignan
Calculatrice(s) :- TI-82 Stats.fr
. :
Re: [résolu]TI82Stat/Ti83 (Basic) une roue..
Le problème de TI-Calc, c'est qu'il n'accepte pas les programmes non terminés (en développement), et qu'en plus il faut attendre la validation...
TI-Planet est plus tolérant.
Mais oui, mieux vaut poster le code source sur le forum, c'est mieux...
Poster aussi le fichier va permettre d'avoir des réponses plus rapides
TI-Planet est plus tolérant.
Mais oui, mieux vaut poster le code source sur le forum, c'est mieux...
Poster aussi le fichier va permettre d'avoir des réponses plus rapides
Re: [résolu]TI82Stat/Ti83 (Basic) une roue..
Bonjour
voila la version 2 juste le code alors (j’utilise Ti-Editor en ligne... mais il traduit en anglais... il y a peut-être mieux ?)
les touches pas trop réactives... sans doute code un peu à revoir..
la touche haut et bas pour augmenter/diminuer la vitesse
la touche 2nde pour arrêter
un bug (de ma façon de faire pour la touche Entrer ? ça arrête bizarrement le programme...
la touche On arrête également
à bientôt
voila la version 2 juste le code alors (j’utilise Ti-Editor en ligne... mais il traduit en anglais... il y a peut-être mieux ?)
les touches pas trop réactives... sans doute code un peu à revoir..
la touche haut et bas pour augmenter/diminuer la vitesse
la touche 2nde pour arrêter
un bug (de ma façon de faire pour la touche Entrer ? ça arrête bizarrement le programme...
la touche On arrête également
- Code:
:1→Xmin
:1→Ymin
:95→Xmax
:63→Ymax
:0→Xscl
:0→Yscl
:ClrDraw
:CoordOff
:ClrHome
:25→P
:Degree
:(Xmax-Xmin)/2→A
:(Ymax-Ymin)/2→B
:Text(5,1,"V:
:Text(B-2,A-10,"ROUE 2
:30→R
:Circle(A,B,R
:20→C
:Circle(A,B,C
:StorePic Pic2
:For(I,0,360,30
: Line(A+Ccos(I),B+Csin(I),A+Rcos(I),B+Rsin(I)
:End
:StorePic Pic1
:ClrDraw
:RecallPic Pic2
:For(I,15,360,30
: Line(A+Ccos(I),B+Csin(I),A+Rcos(I),B+Rsin(I)
:End
:StorePic Pic2
:Lbl D
:10P→I
:0→K
:While K≠21
: getKey→K
: If K=25 and I≥P:I-P→I
: If K=34 and I<19P:I+P→I
: 20P-I→V
: ClrDraw
: RecallPic Pic1
: Text(5,8,V
: For(W,1,I:End
: ClrDraw
: RecallPic Pic2
: Text(5,8,V
: For(W,1,I:End
:End
:Disp "FIN
:
à bientôt
jo2geek- Connaisseur
- Messages : 116
Points Concours : 81
Productivité : 9
Date d'inscription : 27/01/2014
Calculatrice(s) :- TI-82 Stats.fr
. :
Re: [résolu]TI82Stat/Ti83 (Basic) une roue..
- anglais vs français:
- TI-Graph-Link-ti83plusFR permet d'éditer en français, mais il crée des 8XP.
Mais les éditeurs de TI ne supportent pas les lettres accentuées (pas le même code que tout le monde, quelle plaie) à cause de la table ascii ansi que TI n'a pas entièrement respecté avec ses polices de caractère.
Sinon il faudrait bien traduire les TokenMap de l'éditeur TokenIDE.
J'ai déjà commencé mais j'ai des problèmes avec les dernières mises à jour de TokenIDE, et mon intervention a été ignorée sur Cemetech.
- Code:
: For(W,1,I:End
Tu as un cycle de deux paires d'affichage et effacement et deux temporisations qui sont exécutées dans la même boucle que les tests de touches. C'est normal que la saisie des touches ne soit pas réactive si non appuie sur la touche juste après le test de touche. L'exécution est séquentielle je te rappelle.
Dernière édition par Linkakro le Sam 1 Fév 2014 - 19:50, édité 2 fois
Linkakro- ----------------------
- Messages : 533
Points Concours : 55
Productivité : 31
Date d'inscription : 30/07/2013
Localisation : origine région centre, puis perpignan
Calculatrice(s) :- TI-82 Stats.fr
. :
Re: [résolu]TI82Stat/Ti83 (Basic) une roue..
Merci Linkakro
si je comprends bien soit j'écris
soit sur 2 lignes
si je comprends bien soit j'écris
- Code:
For(W,1,I):End
soit sur 2 lignes
- Code:
For(W,1,I:
End
jo2geek- Connaisseur
- Messages : 116
Points Concours : 81
Productivité : 9
Date d'inscription : 27/01/2014
Calculatrice(s) :- TI-82 Stats.fr
. :
Re: [résolu]TI82Stat/Ti83 (Basic) une roue..
Les deux points de la fin ne servent à rien si tu reviens à la ligne. Je recommande simplement une de ces écritures.
- Code:
:For(W,1,I):End
:For(W,1,I
:End
- Mais à quoi je pensais moi en écrivant ça ???:
Ah non, c'était "jouer avec". Merci m@thieu41.linkakro a écrit: je n'aime pas prescrire de jour avec la juxtaposition
Dernière édition par Linkakro le Sam 1 Fév 2014 - 19:51, édité 1 fois
Linkakro- ----------------------
- Messages : 533
Points Concours : 55
Productivité : 31
Date d'inscription : 30/07/2013
Localisation : origine région centre, puis perpignan
Calculatrice(s) :- TI-82 Stats.fr
. :
Re: [résolu]TI82Stat/Ti83 (Basic) une roue..
- Spoiler:
- Tu voulais peut être dire "jouer avec" tout simplement
m@thieu41- ----------------------
- Messages : 939
Points Concours : 65
Productivité : 47
Date d'inscription : 02/06/2013
Localisation : Nice, France
Calculatrice(s) :- TI-82 Stats.fr
. :
Re: [résolu]TI82Stat/Ti83 (Basic) une roue..
Pour ne rien vous cacher je n'avais pas compris à ce "je n'aime pas prescrire de jour avec la juxtaposition" mais j’avais noté que ma syntaxe pouvait dans certains cas être source d'erreur.
merci des conseils
merci des conseils
jo2geek- Connaisseur
- Messages : 116
Points Concours : 81
Productivité : 9
Date d'inscription : 27/01/2014
Calculatrice(s) :- TI-82 Stats.fr
. :
Sujets similaires
» [résolu]TI-Basic convertisseur Hexadecimal <>Decimal
» Cherche documentation assembleur TI82stat
» [TI83] assembleur additionner 2 registres
» basic to asm
» 2048 (jeu - ti basic)
» Cherche documentation assembleur TI82stat
» [TI83] assembleur additionner 2 registres
» basic to asm
» 2048 (jeu - ti basic)
Page 1 sur 1
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum
Dim 16 Oct 2022 - 21:11 par Wistaro
» Bonne année 2018!
Ven 2 Nov 2018 - 19:42 par Ti64CLi++
» Lancement du TI-Concours 2017 !
Sam 20 Mai 2017 - 0:27 par Paulo1026
» Chaînes Youtube des membres
Ven 19 Mai 2017 - 22:41 par Wistaro
» cacul du taux d'intêret
Ven 24 Mar 2017 - 21:50 par m@thieu41
» [Projet] Un mario by tout82
Dim 29 Jan 2017 - 14:09 par Wistaro
» Cherche documentation assembleur TI82stat
Mer 25 Jan 2017 - 12:29 par Ti64CLi++
» Probleme Ti-82 Stats fr
Jeu 12 Jan 2017 - 13:56 par Ti64CLi++
» ROM 82 stats.fr
Jeu 15 Déc 2016 - 10:24 par Ti64CLi++