Poster un nouveau sujet Poster une réponse
Juste un peu d'aide s'il vous plait =)
Auteur Message
Legall
Invité
Posté le : Dim 17 Jui 2012, 12:16   Citer 

Bonjour,
Voila j'ai récupéré des programme sur le site mais la version pour câble n'est pas dispo, et étant très occupé je ne peux pas le faire moi même pour l'instant.
Une âme charitable pourrait elle me les mettre au format .82p ? minied.gif

Il s'agit de coorpol, droite, fondame, et req.

Si le post existe déjà pouvez vous m'envoyer le lien ? Merci d'avance.
Je fais un bête copier/coller des fichier.txt

PS: il semblerait que certaines lignes aient modifié certain caractère en smileys ^^'

Coorpol Compatible TI-82/TI-82 STATS

http://tout82.free.fr

------------------------------------
------------------------------------

:Lbl M
:ClrHome
:Menu("COORPOL","POL A CARTE",1,"CARTE A POL",2,"QUITTER",3)
:Lbl 1
:Radian (* se trouve dans le menu "MODE" *)
:Disp "(R,[THETA])"
:Input "R = ",A
:Input "[THETA] = ",B
:ClrHome

(* Les 2 commandes qui suivent peuvent être remplacées par :
tongue.gif>Rx(A,B) -> C
tongue.gif>Ry(A,B) -> D
Si vous avez choisi de remplacer les commandes, pensez à supprimer la commande ":Radian" au dessus. Au fait, "P>Rx" et "P>Ry" sont dans le menu [2nd] + [ANGLE] *)

:Acos B -> C
:Asin B -> D

:Disp "(X,Y)"
:Disp "X",C>Frac
:Disp "Y",D>Frac
:Pause
:Goto 3
:Lbl 2
:Radian
:Disp "(X,Y)"
:Input "X = ",A
:Input "Y = ",B
:ClrHome

(* Les 2 commandes qui suivent peuvent être remplacées par :
:R>Pr(A,B) -> C
:R>P[THETA](A,B) -> D
Si vous avez choisi de remplacer les commandes, pensez toujours à supprimer la commande ":Radian" au dessus. *)

:[Racine carrée]((A²)+(B²)) -> C
:(sin-1 (B/C))/[Pi] -> D

:Disp "(R,[THETA])"
:Disp "R",C
:Disp "[THETA] ([PI])",D>Frac
:Pause
:Lbl 3
:ClrHome

-------------------------------------------------------

Droite Compatible TI-82/TI-82 STATS

http://tout82.free.fr

-----------------------------------
-----------------------------------

:ClrHome
:Input "XA ",A
:Input "YA ",B
:Input "XB ",C
:Input "XB ",D
:ClrHome
:Output(1,1,"RESULTAT :")
:Menu("CALCULER","AB",1,"MILIEU {AB}",2,"EQU (AB)",3,"VECT AB",4,"EQU MEDIATR",5,"VECT ORTHO",6,"ANGLES COORD",7)
:Lbl 1
:[Racine carré de]((C-A)²+(D-b)²) -> Z
:Output(3,1,"AB")
:Output(5,1,Z)
:Goto 8
:Lbl 2
sad.gifA+C)/2 -> X
sad.gifB+D)/2 -> Y
:Output(3,1,"I MILLIEU {AB}")
:Output(5,1,"I :")
:Output(6,1,X)
:Output(7,1,Y)
:Goto 8
:Lbl 3
sad.gifD-B)/(C-A) -> E
:B-AE -> F
:Output(3,1,"EQUA (AB)")
:Output(5,1,"Y=AX+B)
:Output(6,1,"A =")
:Output(6,5,E)
:Output(7,1,"B =")
:Output(7,5,F)
:Goto 8
:Lbl 4
sad.gifC-A) -> X
sad.gifD-B) -> Y
:Output(3,1,"VECTEUR AB")
:Output(5,1,"AB :")
:Output(6,1,X)
:Output(7,1,Y)
:Goto 8
:Lbl 5
:cupsmiley.gif((C-A)/(D-B)) -> E (* Attention, cupsmiley.gif est le signe : consulté le site pour en savoir plus à la page programme *)
sad.gif(A+C)/2)((C-A)/(D-B))+((B+D)/2) -> F
:Output(3,1,"EQUA MEDIATR")
:Output(5,1,"Y=AX+B)
:Output(6,1,"A =")
:Output(6,5,E)
:Output(7,1,"B =")
:Output(7,5,F)
:Goto 8
:Lbl 6
:B-D -> X
:C-A -> Y
:Output(3,1,"VECT ORTHO (AB)")
:Output(5,1,"CD :")
:Ouptut(6,1,X)
:Output(7,1,Y)
:Goto 8
:Lbl 7
:Degree
:abs ([tan-1]((D-B)/(C-A))) -> E
:abs (90-E) -> F
:Output(3,1,"EN °")
:Output(5,1,"((OI),(AB))")
:Output(6,1,E)
:Output(7,1,"((OJ),(AB))")
:Output(8,1,F)
:Lbl 8
:Pause
:ClrHome

------------------------------------------------------

Fondame Compatible TI-82/TI-82 STATS

http://tout82.free.fr

------------------------------------
------------------------------------

:Lbl M
:ClrHome
:Menu("F.FONDAMENTALES","F.GRAVITATION.",N,"F.ELECTRIQUE",C,"QUITTER",Q)
:Lbl N
:Input "MASSE A (KG)",A
:Input "MASSE B (KG)",B
:Input "DISTANCE AB (M)",C
sad.gif6.67*10^-11*A*B)/c² -> F
:Disp "FORCES ATTRAC."
:Goto F
:Lbl C
:Input "CHARGE A (C)",A
:Input "CHARGE B (C)",B
:Input "DISTANCE AB (M)",C
:abs (9*10^9*A*B)/C² -> F
:If A*B < 0
:Disp "FORCES REPULS."
:If A*B > 0
:Disp "FORCES ATTRAC."
:Lbl F
:Disp "FORCE DE ",F,"NEWTONS"
:Pause
:Goto M
:Lbl Q
:ClrHome

------------------------------------------------------

Req Compatible TI-82/TI-82 STATS

http://tout82.free.fr

--------------------------------
--------------------------------

:ClrHome
:Input "R 1 (OHM) = ",A
:Input "R 2 (OHM) = ",B
:Menu("RESISTANCE","SERIE",S,"DERIVATION",D)
:Lbl S
:A+B -> R
:Goto A
:Lbl D
:(AB)/(A+B) -> R
:Lbl A
:Output(4,2,"RESISTANCE EQ")
:Output(5,3,R)
:Pause
:ClrHome

  Haut de page Bas de page 
 
linkakro



Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Dim 17 Jui 2012, 12:31   Citer 

Pour ne pas avoir de smilies ET ETRE LISIBLE il faut utiliser les balises [ code][/code ]

Si ta calculatrice est une ti82stat(fr) alors l'extension des fichiers doit être 83p.
En outre les ti82 basiques sont très mal gérées par les logiciels.
Donc j'ai besoin de savoir avec certitude ce que tu veux.

Coorpol Compatible TI-82/TI-82 STATS
http://tout82.free.fr
Code
:Lbl M
:ClrHome
:Menu("COORPOL","POL A CARTE",1,"CARTE A POL",2,"QUITTER",3)
:Lbl 1
:Radian  (* se trouve dans le menu "MODE" *)
:Disp "(R,[THETA])"
:Input "R = ",A
:Input "[THETA] = ",B
:ClrHome

(* Les 2 commandes qui suivent peuvent être remplacées par :
:P>Rx(A,B) -> C
:P>Ry(A,B) -> D
Si vous avez choisi de remplacer les commandes, pensez à supprimer la commande ":Radian" au dessus. Au fait, "P>Rx" et "P>Ry" sont dans le menu [2nd] + [ANGLE] *)

:Acos B -> C
:Asin B -> D

:Disp "(X,Y)"
:Disp "X",C>Frac
:Disp "Y",D>Frac
:Pause
:Goto 3
:Lbl 2
:Radian
:Disp "(X,Y)"
:Input "X = ",A
:Input "Y = ",B
:ClrHome

(* Les 2 commandes qui suivent peuvent être remplacées par :
:R>Pr(A,B) -> C
:R>P[THETA](A,B) -> D
Si vous avez choisi de remplacer les commandes, pensez toujours à supprimer la commande ":Radian" au dessus. *)

:[Racine carrée]((A²)+(B²)) -> C
:(sin-1 (B/C))/[Pi] -> D

:Disp "(R,[THETA])"
:Disp "R",C
:Disp "[THETA] ([PI])",D>Frac
:Pause
:Lbl 3
:ClrHome

Droite Compatible TI-82/TI-82 STATS
http://tout82.free.fr
Code
:ClrHome
:Input "XA ",A
:Input "YA ",B
:Input "XB ",C
:Input "XB ",D
:ClrHome
:Output(1,1,"RESULTAT :")
:Menu("CALCULER","AB",1,"MILIEU {AB}",2,"EQU (AB)",3,"VECT AB",4,"EQU MEDIATR",5,"VECT ORTHO",6,"ANGLES COORD",7)
:Lbl 1
:[Racine carré de]((C-A)²+(D-b)²) -> Z
:Output(3,1,"AB")
:Output(5,1,Z)
:Goto 8
:Lbl 2
:(A+C)/2 -> X
:(B+D)/2 -> Y
:Output(3,1,"I MILLIEU {AB}")
:Output(5,1,"I :")
:Output(6,1,X)
:Output(7,1,Y)
:Goto 8
:Lbl 3
:(D-B)/(C-A) -> E
:B-AE -> F
:Output(3,1,"EQUA (AB)")
:Output(5,1,"Y=AX+B)
:Output(6,1,"A =")
:Output(6,5,E)
:Output(7,1,"B =")
:Output(7,5,F)
:Goto 8
:Lbl 4
:(C-A) -> X
:(D-B) -> Y
:Output(3,1,"VECTEUR AB")
:Output(5,1,"AB :")
:Output(6,1,X)
:Output(7,1,Y)
:Goto 8
:Lbl 5
:(-)((C-A)/(D-B)) -> E (* Attention, (-) est le signe : consulté le site pour en savoir plus à la page programme *)
:((A+C)/2)((C-A)/(D-B))+((B+D)/2) -> F
:Output(3,1,"EQUA MEDIATR")
:Output(5,1,"Y=AX+B)
:Output(6,1,"A =")
:Output(6,5,E)
:Output(7,1,"B =")
:Output(7,5,F)
:Goto 8
:Lbl 6
:B-D -> X
:C-A -> Y
:Output(3,1,"VECT ORTHO (AB)")
:Output(5,1,"CD :")
:Ouptut(6,1,X)
:Output(7,1,Y)
:Goto 8
:Lbl 7
:Degree
:abs ([tan-1]((D-B)/(C-A))) -> E
:abs (90-E) -> F
:Output(3,1,"EN °")
:Output(5,1,"((OI),(AB))")
:Output(6,1,E)
:Output(7,1,"((OJ),(AB))")
:Output(8,1,F)
:Lbl 8
:Pause
:ClrHome

Fondame Compatible TI-82/TI-82 STATS
http://tout82.free.fr
Code
:Lbl M
:ClrHome
:Menu("F.FONDAMENTALES","F.GRAVITATION.",N,"F.ELECTRIQUE",C,"QUITTER",Q)
:Lbl N
:Input "MASSE A (KG)",A
:Input "MASSE B (KG)",B
:Input "DISTANCE AB (M)",C
:(6.67*10^-11*A*B)/c² -> F
:Disp "FORCES ATTRAC."
:Goto F
:Lbl C
:Input "CHARGE A (C)",A
:Input "CHARGE B (C)",B
:Input "DISTANCE AB (M)",C
:abs (9*10^9*A*B)/C² -> F
:If A*B < 0
:Disp "FORCES REPULS."
:If A*B > 0
:Disp "FORCES ATTRAC."
:Lbl F
:Disp "FORCE DE ",F,"NEWTONS"
:Pause
:Goto M
:Lbl Q
:ClrHome

Req Compatible TI-82/TI-82 STATS
http://tout82.free.fr
Code
:ClrHome
:Input "R 1 (OHM) = ",A
:Input "R 2 (OHM) = ",B
:Menu("RESISTANCE","SERIE",S,"DERIVATION",D)
:Lbl S
:A+B -> R
:Goto A
:Lbl D
:(AB)/(A+B) -> R
:Lbl A
:Output(4,2,"RESISTANCE EQ")
:Output(5,3,R)
:Pause
:ClrHome



----------------------
ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)

Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store
 Adresse email Haut de page Bas de page 
 
The K



Autorisation : Membre
Nb de messages : 878
Inscrit le : Sam 15 Oct 2011, 11:07
Posté le : Dim 17 Jui 2012, 12:33   Citer 

Fallait s'y prendre plus tôt pour ses programmes de bac hein happy.gif

(remarque j'suis pas le meilleur pour dire ça je suis dans le paté jusqu'au cou pour le bac d'histoire lol)

----------------------
La la la ...

Avez-vous pensé à regarder le manuel avant de demander conseil ? Un manuel est fait avant tout pour être consulté : MANUEL
Un problème de programmation ? Allez consulter ce tutoriel crée pour cela : TUTORIEL PROGRAMMATION
Vous avez un problème avec l'ordinateur avec votre calculatrice ? SOLUTION EN VIDEO

Mes programmes sur le site : Produit scalaire KMorpion Puissance 4 Mastermind

Mes nouveaux programmes de calcul formel : FCarré FPrime

Projet base de données : ici mais abandonné. Trop de travail ...
 Adresse email Haut de page Bas de page 
 
linkakro



Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Dim 17 Jui 2012, 13:12   Citer 

J'ai uploadé des 82p.
http://www.mediafire.com/?6id684222udw8cd

----------------------
ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)

Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store
 Adresse email Haut de page Bas de page 
 
Poster un nouveau sujet Poster une réponse





  Powered by Fire-Soft-Board v1.0.10 © 2004 - 2024 Groupe FSB
Page générée en 9 requêtes
BlackOne par Grimmlink