[82][84+] horloge
3 participants
Page 1 sur 1
[82][84+] horloge
voilà le code de mon programme montre, dont la version pour Ti 82 stats.fr est disponible sur le site.
version pour Ti 82 stats:
ce programme se dérègle de 2min environ par heure, mais ça dépend de la mémoire de la calto, et il faut rentrer l'heure au début du prog.
et maintenant, nettement mieux, la version pour Ti 84+, qui clignote beaucoup moins, qui se dérègle d'une seconde par siècle et qui se met à l'heure toute seule.
version pour Ti 82 stats:
ce programme se dérègle de 2min environ par heure, mais ça dépend de la mémoire de la calto, et il faut rentrer l'heure au début du prog.
- Spoiler:
- Code:
:AxesNaff
:EffDessin
:1.4->Ymax:-1.4->Ymin
:-2.2->Xmin:2.2->Xmax
:Cercle(0,0,1.4
:Cercle(0,0,1.3
:Cercle(0,0,1.1
:Pt-On(0,0,2
:Ligne(Xmin,.8,-1.2,.8
:Ligne(Xmin,-.7,-1.2,-.7
:Ligne(1.2,.8,Xmax,.8
:Ligne(1.2,-.7,Xmax,-.7
:Pt-On(0,1
:Pt-On(0,-1
:Pt-On(-1,0
:Pt-On(1,0
:SauveImage 1
:Input "Heures:",H
:Input "Minutes:",M
:Input "SecOndes:",S
:If H>12:H-12->H
:Degré
:EffEcr
:Repeat 0
:If S=60:M+1->M
:If S=60:0->S
:If M=60:H+1->H
:If M=60:0->M
:If H=12:0->H
:RappelImage 1
:30H+(M/2)->A
:Ligne(0,0,2sin(A)/3,2cos(A)/3
:6M->B
:Ligne(0,0,5sin(B)/6,5cos(B)/6
:6S->C
:Ligne(0,0,sin(C),cos(C)
:For(D,1,100):End
:S+1->S
:Ligne(0,0,5sin(B)/6,5cos(B)/6,0
:Ligne(0,0,2sin(A)/3,2cos(A)/3,0
:Ligne(0,0,sin(C),cos(C),0
:Pt-On(0,1
:Pt-On(1,0
:Pt-On(0,-1
:Pt-On(-1,0
:Pt-On(-.5,.8
:Pt-On(-.8,.5
:Pt-On(.5,.8
:Pt-On(.8,.5
:Pt-On(-.5,-.8
:Pt-On(-.8,-.5
:Pt-On(.5,-.8
:Pt-On(.8,-.5
:End
et maintenant, nettement mieux, la version pour Ti 84+, qui clignote beaucoup moins, qui se dérègle d'une seconde par siècle et qui se met à l'heure toute seule.
- Spoiler:
- Code:
:AxesNaff
:EffDessin
:1.4->Ymax:-1.4->Ymin
:-2.2->Xmin:2.2->Xmax
:Cercle(0,0,1.4
:Cercle(0,0,1.3
:Cercle(0,0,1.1
:Pt-On(0,0,2
:Ligne(Xmin,.8,-1.2,.8
:Ligne(Xmin,-.7,-1.2,-.7
:Ligne(1.2,.8,Xmax,.8
:Ligne(1.2,-.7,Xmax,-.7
:Pt-On(0,1
:Pt-On(0,-1
:Pt-On(-1,0
:Pt-On(1,0
:SauveImage 1
:Degré
:EffEcr
:getTime->L1
:L1(1->H
:L1(2->M
:L1(3->S
:If H>12:H-12->H
:Repeat codetouch(
:RappelImage 1
:30H+(M/2)->A
:Ligne(0,0,2sin(A)/3,2cos(A)/3
:6M->B
:Ligne(0,0,5sin(B)/6,5cos(B)/6
:6S->C
:Ligne(0,0,sin(C),cos(C)
:Repeat L1(3)=/=S
:getTime->L1
:End
:L1(1->H
:L1(2->M
:L1(3->S
:If H>12:H-12->H
:Ligne(0,0,5sin(B)/6,5cos(B)/6,0
:Ligne(0,0,2sin(A)/3,2cos(A)/3,0
:Ligne(0,0,sin(C),cos(C),0
:Pt-On(0,1
:Pt-On(1,0
:Pt-On(0,-1
:Pt-On(-1,0
:Pt-On(-.5,.8
:Pt-On(-.8,.5
:Pt-On(.5,.8
:Pt-On(.8,.5
:Pt-On(-.5,-.8
:Pt-On(-.8,-.5
:Pt-On(.5,-.8
:Pt-On(.8,-.5
:End
Dernière édition par persalteas le Ven 31 Déc - 9:56, édité 1 fois
persalteas- Platinum 2
- Sexe :
Age : 28
Messages : 2068
Date d'inscription : 30/06/2010
Etudes : PACES (médecine)
Points Forum : 114
Points Concours : 10
Langages :- - TI-Basic Z80
- - xLib
- - Grammer
- - TI-Basic Nspire
- - TI-82 Stats.fr
- - TI-83
- - TI-83+
- - TI-84+ SE
- - TI-86
- - TI-Nspire
- - TI-Nspire CX
- - Casio Collège
- - Casio Graph
Re: [82][84+] horloge
Est-ce que le programme pour 84+ est compatible avec une TI-83+?
Metallica- Or 4
- Sexe :
Age : 28
Messages : 926
Date d'inscription : 30/06/2010
Etudes : DUT Info
Points Forum : 17
Points Concours : 9
Langages :- - TI-Basic Z80
- - Axe Parser
- - TI-82 Stats.fr
- - TI-83+ SE
Re: [82][84+] horloge
non, la 83+ n'a pas l'heure intégrée... :pale:
persalteas- Platinum 2
- Sexe :
Age : 28
Messages : 2068
Date d'inscription : 30/06/2010
Etudes : PACES (médecine)
Points Forum : 114
Points Concours : 10
Langages :- - TI-Basic Z80
- - xLib
- - Grammer
- - TI-Basic Nspire
- - TI-82 Stats.fr
- - TI-83
- - TI-83+
- - TI-84+ SE
- - TI-86
- - TI-Nspire
- - TI-Nspire CX
- - Casio Collège
- - Casio Graph
Re: [82][84+] horloge
ok donc je dois prendre celui pour 82 stats.
Metallica- Or 4
- Sexe :
Age : 28
Messages : 926
Date d'inscription : 30/06/2010
Etudes : DUT Info
Points Forum : 17
Points Concours : 9
Langages :- - TI-Basic Z80
- - Axe Parser
- - TI-82 Stats.fr
- - TI-83+ SE
Re: [82][84+] horloge
voui, mon pauvre.
tu peux le télécharger sur le site.
mais je te préviens, c'est pas très utile, sauf pour impressionner les autres.
tu peux le télécharger sur le site.
mais je te préviens, c'est pas très utile, sauf pour impressionner les autres.
persalteas- Platinum 2
- Sexe :
Age : 28
Messages : 2068
Date d'inscription : 30/06/2010
Etudes : PACES (médecine)
Points Forum : 114
Points Concours : 10
Langages :- - TI-Basic Z80
- - xLib
- - Grammer
- - TI-Basic Nspire
- - TI-82 Stats.fr
- - TI-83
- - TI-83+
- - TI-84+ SE
- - TI-86
- - TI-Nspire
- - TI-Nspire CX
- - Casio Collège
- - Casio Graph
Re: [82][84+] horloge
Ok alors je m'en passerai. (j'ai déjà une montre )
Metallica- Or 4
- Sexe :
Age : 28
Messages : 926
Date d'inscription : 30/06/2010
Etudes : DUT Info
Points Forum : 17
Points Concours : 9
Langages :- - TI-Basic Z80
- - Axe Parser
- - TI-82 Stats.fr
- - TI-83+ SE
Re: [82][84+] horloge
certes
A Alexis: pourrais tu remplacer sur le site l'horloge pour 82stats par l'horloge pour 84+? merci
Sinon pour Ti 84+ et modèles ayant l'heure intégrée:
la version chronomètre:
(les dixièmes de seconde, c'est du bluff, ce sont en fait des 7e de seconde mais personne s'en rend compte, il faut le savoir pour le remarquer).
Edit Alexis: Double post rassemblé, merci de lire le [Vous devez être inscrit et connecté pour voir ce lien].
A Alexis: pourrais tu remplacer sur le site l'horloge pour 82stats par l'horloge pour 84+? merci
Sinon pour Ti 84+ et modèles ayant l'heure intégrée:
la version chronomètre:
(les dixièmes de seconde, c'est du bluff, ce sont en fait des 7e de seconde mais personne s'en rend compte, il faut le savoir pour le remarquer).
- Spoiler:
- Code:
0->C
EffDessin
FonctNAff
AxesNaff
0->Xmin
94->Xmax
0->Ymin
62->Ymax
Horizontale 34
Horizontale 44
Texte(56,40,"zero"
Ligne(38,6,58,6
Ligne(38,6,38,0
Ligne(58,6,58,0
Repeat 0
Texte(-1,20,20,"00 00 0"
Pause
0->C
0->M
checkTmr(1->A
Repeat K=13
codeTouch(->K
If K=45:Goto 0
checkTmr(1)-A->B
10M->M
If B=60:Then
M+1->M
checkTmr(1->A
End
B.1->B
M.1->M
Texte(-1,20,44,ent(B
Texte(-1,20,50,10partDéc(B
C+1->C
If C=10:0->C
Texte(-1,20,68,C
Texte(-1,20,20,ent(M
Texte(-1,20,26,10partDéc(M
If K=105:Then
Pause
checkTmr(1->A
A-10B->A
End
End
End
Lbl 0
EffDessin
EffVar AEffVar BEffVar CEffVar MEffVar K
ZStandard
AxesAff
Output(1,1,"Chronometre by persalteas
Edit Alexis: Double post rassemblé, merci de lire le [Vous devez être inscrit et connecté pour voir ce lien].
persalteas- Platinum 2
- Sexe :
Age : 28
Messages : 2068
Date d'inscription : 30/06/2010
Etudes : PACES (médecine)
Points Forum : 114
Points Concours : 10
Langages :- - TI-Basic Z80
- - xLib
- - Grammer
- - TI-Basic Nspire
- - TI-82 Stats.fr
- - TI-83
- - TI-83+
- - TI-84+ SE
- - TI-86
- - TI-Nspire
- - TI-Nspire CX
- - Casio Collège
- - Casio Graph
Re: [82][84+] horloge
Le problème si je modifie le fichier ".8xp" c'est qu'il ne fonctionnera pas sur TI-83+ or c'est celle que possède la majorité des personnes...
persalteas- Platinum 2
- Sexe :
Age : 28
Messages : 2068
Date d'inscription : 30/06/2010
Etudes : PACES (médecine)
Points Forum : 114
Points Concours : 10
Langages :- - TI-Basic Z80
- - xLib
- - Grammer
- - TI-Basic Nspire
- - TI-82 Stats.fr
- - TI-83
- - TI-83+
- - TI-84+ SE
- - TI-86
- - TI-Nspire
- - TI-Nspire CX
- - Casio Collège
- - Casio Graph
Re: [82][84+] horloge
Merci. Je pense que je vais ajouter une ligne pour ce programme car il est différent de l'autre, le problème c'est que mon site c'est pour les TI-82 Stats et TI-83...
Page 1 sur 1
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum
|
|