Rechercher
 
 

Résultats par :
 


Rechercher Recherche avancée

Connexion

Récupérer mon mot de passe

Chatbox externe


Derniers sujets
» [JEU] Mon voisin du dessous
Dim 3 Sep 2017 - 19:50 par Clément.7

» 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++

» flappy bird
Jeu 15 Déc 2016 - 10:23 par Ti64CLi++

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
Ti64CLi++
 
Clément.7
 


[résolu]TI82Stat/Ti83 (Basic) une roue..

Voir le sujet précédent Voir le sujet suivant Aller en bas

[résolu]TI82Stat/Ti83 (Basic) une roue..

Message par jo2geek le Jeu 30 Jan 2014 - 21:47

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
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
:
à terme si j'ai le temps et la motivation je ferai des engrenages.
Fichiers joints
A1.83p.zip (1 Ko) Téléchargé 148 fois
roue.png (86 Ko) Téléchargé 151 fois


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
Connaisseur

Messages : 116
Points Concours : 81
Productivité : 9
Date d'inscription : 27/01/2014
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: [résolu]TI82Stat/Ti83 (Basic) une roue..

Message par Wistaro le Jeu 30 Jan 2014 - 23:47

Coucou, joli programme Smile

En revanche, ta fenête d'affichage peut être optimisée (a mon avis)

__________________________________________________________________________
Clique ici pour retrouver tout mes programmes en TIbasic

Tu es curieux, Invité? Alors clique ici:


Coucou Invité !Ta dernière visite sur ce forum date de . Tu as posté un total de 78 message(s) sur Tout 82 et enfin, tu as 0 ans.
Si nous sommes le 0, je te souhaite un joyeux anniversaire ;-)

avatar
Wistaro
Passioné
Passioné

Messages : 909
Points Concours : 86
Productivité : 28
Date d'inscription : 16/06/2013
Localisation : Tarbes - DUT GEII
Calculatrice(s) :
  • TI-82
  • TI-82 Stats
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur http://www.youtube.com/user/Wistaro

Revenir en haut Aller en bas

Re: [résolu]TI82Stat/Ti83 (Basic) une roue..

Message par Linkakro le Ven 31 Jan 2014 - 1:05

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.
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

__________________________________________________________________________
Vétéran du TI-Basic Zilog80. Ti82statfr sur Tout82 depuis 2009 et ti84pocketfr depuis noël 2012. Ti83plusfrUSB (été 2014, concours tiplanet suite du geek). Bidouille un peu d'assembleur Z80.
Incappable de gérer le temps et manque de tact, plutôt serviable.
Je prend les commandes de programme. Je suis motivé par les maths et la physique tant que ce n'est pas une simple copie d'antisèche.
Vous pouvez trouver une grande partie de mes données hébergées dans mon mediafire. Le ZIP et la liste sont périmées depuis longtemps.
coucou Invité What a Face
avatar
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

. : TI-82 Stats.fr

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: [résolu]TI82Stat/Ti83 (Basic) une roue..

Message par jo2geek le Ven 31 Jan 2014 - 7:48

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


Dernière édition par jo2geek le Ven 31 Jan 2014 - 13:50, édité 1 fois

jo2geek
Connaisseur
Connaisseur

Messages : 116
Points Concours : 81
Productivité : 9
Date d'inscription : 27/01/2014
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: [résolu]TI82Stat/Ti83 (Basic) une roue..

Message par Wistaro le Ven 31 Jan 2014 - 13:26

Pour faire les images animées, c'est très simple: utilise l'émulateur WabbitEmu sur PC:
http://tout82.forumactif.org/t29-utiliser-l-emulateur-wabbitemu?highlight=wabbitemu

__________________________________________________________________________
Clique ici pour retrouver tout mes programmes en TIbasic

Tu es curieux, Invité? Alors clique ici:


Coucou Invité !Ta dernière visite sur ce forum date de . Tu as posté un total de 78 message(s) sur Tout 82 et enfin, tu as 0 ans.
Si nous sommes le 0, je te souhaite un joyeux anniversaire ;-)

avatar
Wistaro
Passioné
Passioné

Messages : 909
Points Concours : 86
Productivité : 28
Date d'inscription : 16/06/2013
Localisation : Tarbes - DUT GEII
Calculatrice(s) :
  • TI-82
  • TI-82 Stats
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur http://www.youtube.com/user/Wistaro

Revenir en haut Aller en bas

Re: [résolu]TI82Stat/Ti83 (Basic) une roue..

Message par jo2geek le Ven 31 Jan 2014 - 14:05

Voilà merci Smile

pour la première version

jo2geek
Connaisseur
Connaisseur

Messages : 116
Points Concours : 81
Productivité : 9
Date d'inscription : 27/01/2014
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: [résolu]TI82Stat/Ti83 (Basic) une roue..

Message par persalteas le Ven 31 Jan 2014 - 14:14

C'est vachement beau comme animation Very Happy Bien Joué!!

Continue comme ça... (+1)

__________________________________________________________________________
Bienvenue sur le nouveau Tout-82, Invité ! Viens discuter sur le chat... What a Face
Depuis que je me suis tatoué une calculatrice sur le bras, vous pouvez compter sur moi ! :P (Best joke ever x) )
avatar
persalteas
----------------------
----------------------

Messages : 482
Points Concours : 152
Productivité : 39
Date d'inscription : 06/12/2012
Localisation : Savoie, France
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur http://tout82.forumactif.org

Revenir en haut Aller en bas

Re: [résolu]TI82Stat/Ti83 (Basic) une roue..

Message par m@thieu41 le Sam 1 Fév 2014 - 11:23

C'est sympa  Bien Joué !

__________________________________________________________________________
ZSNAKE Mon premier (et unique) jeu en ASM:
Un Snake 2 joueurs (2caltos)
-> Je travaille sur une version plus stable du jeu, je poste dès que possible.
avatar
m@thieu41
----------------------
----------------------

Messages : 934
Points Concours : 65
Productivité : 47
Date d'inscription : 02/06/2013
Localisation : Nice, France
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: [résolu]TI82Stat/Ti83 (Basic) une roue..

Message par jo2geek le Sam 1 Fév 2014 - 11:26

Merci pour les encouragements de chacun Smile

petite question en passant.. il vaux mieux mettre le code ? ou mettre un xx.83P

jo2geek
Connaisseur
Connaisseur

Messages : 116
Points Concours : 81
Productivité : 9
Date d'inscription : 27/01/2014
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: [résolu]TI82Stat/Ti83 (Basic) une roue..

Message par Linkakro le Sam 1 Fév 2014 - 14:53

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.

__________________________________________________________________________
Vétéran du TI-Basic Zilog80. Ti82statfr sur Tout82 depuis 2009 et ti84pocketfr depuis noël 2012. Ti83plusfrUSB (été 2014, concours tiplanet suite du geek). Bidouille un peu d'assembleur Z80.
Incappable de gérer le temps et manque de tact, plutôt serviable.
Je prend les commandes de programme. Je suis motivé par les maths et la physique tant que ce n'est pas une simple copie d'antisèche.
Vous pouvez trouver une grande partie de mes données hébergées dans mon mediafire. Le ZIP et la liste sont périmées depuis longtemps.
coucou Invité What a Face
avatar
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

. : TI-82 Stats.fr

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: [résolu]TI82Stat/Ti83 (Basic) une roue..

Message par persalteas le Sam 1 Fév 2014 - 15:44

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 Smile

__________________________________________________________________________
Bienvenue sur le nouveau Tout-82, Invité ! Viens discuter sur le chat... What a Face
Depuis que je me suis tatoué une calculatrice sur le bras, vous pouvez compter sur moi ! :P (Best joke ever x) )
avatar
persalteas
----------------------
----------------------

Messages : 482
Points Concours : 152
Productivité : 39
Date d'inscription : 06/12/2012
Localisation : Savoie, France
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur http://tout82.forumactif.org

Revenir en haut Aller en bas

Re: [résolu]TI82Stat/Ti83 (Basic) une roue..

Message par jo2geek le Sam 1 Fév 2014 - 17:02

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

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  Smile

jo2geek
Connaisseur
Connaisseur

Messages : 116
Points Concours : 81
Productivité : 9
Date d'inscription : 27/01/2014
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: [résolu]TI82Stat/Ti83 (Basic) une roue..

Message par Linkakro le Sam 1 Fév 2014 - 17:54

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
est certes fonctionnel mais je n'aime pas prescrire de jouer avec la juxtaposition des lignes en même temps que d'abréger les syntaxes de fermeture. Cela apporte des problèmes évidents avec des chaînes de caractère en dur. Et cela apporte d'autres problèmes bien plus étranges avec quelques défaut de TI (DelVar, sto, l'algorithmie, les guillemets).

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

__________________________________________________________________________
Vétéran du TI-Basic Zilog80. Ti82statfr sur Tout82 depuis 2009 et ti84pocketfr depuis noël 2012. Ti83plusfrUSB (été 2014, concours tiplanet suite du geek). Bidouille un peu d'assembleur Z80.
Incappable de gérer le temps et manque de tact, plutôt serviable.
Je prend les commandes de programme. Je suis motivé par les maths et la physique tant que ce n'est pas une simple copie d'antisèche.
Vous pouvez trouver une grande partie de mes données hébergées dans mon mediafire. Le ZIP et la liste sont périmées depuis longtemps.
coucou Invité What a Face
avatar
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

. : TI-82 Stats.fr

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: [résolu]TI82Stat/Ti83 (Basic) une roue..

Message par jo2geek le Sam 1 Fév 2014 - 18:32

Merci Linkakro
si je comprends bien soit j'écris
Code:
For(W,1,I):End
de cette façon sur une seule ligne
soit sur  2 lignes
Code:
For(W,1,I:
End
ainsi la visibilité est meilleur et moins source de problème

jo2geek
Connaisseur
Connaisseur

Messages : 116
Points Concours : 81
Productivité : 9
Date d'inscription : 27/01/2014
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: [résolu]TI82Stat/Ti83 (Basic) une roue..

Message par Linkakro le Sam 1 Fév 2014 - 18:56

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
Heureusement les problèmes sont rares et dans des cas très particuliers.
Mais à quoi je pensais moi en écrivant ça ???:
linkakro a écrit: je n'aime pas prescrire de jour avec la juxtaposition
Ah non, c'était "jouer avec". Merci m@thieu41.


Dernière édition par Linkakro le Sam 1 Fév 2014 - 19:51, édité 1 fois

__________________________________________________________________________
Vétéran du TI-Basic Zilog80. Ti82statfr sur Tout82 depuis 2009 et ti84pocketfr depuis noël 2012. Ti83plusfrUSB (été 2014, concours tiplanet suite du geek). Bidouille un peu d'assembleur Z80.
Incappable de gérer le temps et manque de tact, plutôt serviable.
Je prend les commandes de programme. Je suis motivé par les maths et la physique tant que ce n'est pas une simple copie d'antisèche.
Vous pouvez trouver une grande partie de mes données hébergées dans mon mediafire. Le ZIP et la liste sont périmées depuis longtemps.
coucou Invité What a Face
avatar
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

. : TI-82 Stats.fr

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: [résolu]TI82Stat/Ti83 (Basic) une roue..

Message par m@thieu41 le Sam 1 Fév 2014 - 19:45

Spoiler:
Tu voulais peut être dire "jouer avec" tout simplement :P

__________________________________________________________________________
ZSNAKE Mon premier (et unique) jeu en ASM:
Un Snake 2 joueurs (2caltos)
-> Je travaille sur une version plus stable du jeu, je poste dès que possible.
avatar
m@thieu41
----------------------
----------------------

Messages : 934
Points Concours : 65
Productivité : 47
Date d'inscription : 02/06/2013
Localisation : Nice, France
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: [résolu]TI82Stat/Ti83 (Basic) une roue..

Message par jo2geek le Sam 1 Fév 2014 - 20:02

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 Smile

jo2geek
Connaisseur
Connaisseur

Messages : 116
Points Concours : 81
Productivité : 9
Date d'inscription : 27/01/2014
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: [résolu]TI82Stat/Ti83 (Basic) une roue..

Message par Contenu sponsorisé


Contenu sponsorisé


Revenir en haut Aller en bas

Voir le sujet précédent Voir le sujet suivant Revenir en haut

- Sujets similaires

 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum