π
<-
Chat plein-écran
[^]

Return data to home history from a PRG

Programmation et implémentation d'algorithmes.

Return data to home history from a PRG

Message non lude compsystems » 08 Mar 2017, 16:15

Hello, sorry for my bad English

TI-BASIC have not RETURN CMD for a PRG, the following prg (copyto_h) written in ASM, http://www.ticalc.org/archives/files/fi ... 16366.html
returns a string or expr to HOME HISTORY from a PRG =)

Code: Tout sélectionner
prt2HOME()
Local titlereq,x,s1,s2
ClrHome
"Places a str the entry"→s1
"Places a str at the answer"→s2
"x"→titlereq
©4→x
Dialog
  Request titlereq,x
EndDlog
expr(x)→x
copyto_h("s1","s2")
copyto_h("titleReq","x")
EndPrgm
Avatar de l’utilisateur
compsystems
Niveau 9: IC (Compteur Infatigable)
Niveau 9: IC (Compteur Infatigable)
Prochain niv.: 40.2%
 
Messages: 256
Inscription: 30 Mai 2011, 13:44
Genre: Homme
Calculatrice(s):
MyCalcs profile

Re: Return data to home history from a PRG

Message non lude compsystems » 08 Mar 2017, 21:15

In the current version, if an argument is a string that does not call a variable, the command does nothing =(

Someone can improve the asm code (Or someone has the contact of Samuel Stearley [Your email no longer exists] ), allowing arguments to be a simple string of text,

Thanks

Code: Tout sélectionner
...
copyto_h("x is ","x")


the first arg "x is " should put it in the history

Code: Tout sélectionner
Local titlereq,x,s1,s2
ClrHome
"Places a str the entry"→s1
"Places a str at the answer"→s2
"x"→titlereq
©4→x
Dialog
  Request titlereq,x
EndDlog
expr(x)→x
copyto_h("s1","s2")
copyto_h("titleReq","x")

copyto_h("x is ","x")  © does nothing =(

EndPrgm
Avatar de l’utilisateur
compsystems
Niveau 9: IC (Compteur Infatigable)
Niveau 9: IC (Compteur Infatigable)
Prochain niv.: 40.2%
 
Messages: 256
Inscription: 30 Mai 2011, 13:44
Genre: Homme
Calculatrice(s):
MyCalcs profile


Retourner vers Programmation

Qui est en ligne

Utilisateurs parcourant ce forum: Aucun utilisateur enregistré et 15 invités

-
Rechercher
-
Social TI-Planet
-
Sujets à la une
Comparaisons des meilleurs prix pour acheter sa calculatrice !
Aidez la communauté à documenter les révisions matérielles en listant vos calculatrices graphiques !
Phi NumWorks jailbreak
123
-
Faire un don / Premium
Pour plus de concours, de lots, de tests, nous aider à payer le serveur et les domaines...
Faire un don
Découvrez les avantages d'un compte donateur !
JoinRejoignez the donors and/or premium!les donateurs et/ou premium !


Partenaires et pub
Notre partenaire Jarrety Calculatrices à acheter chez Calcuso
-
Stats.
1250 utilisateurs:
>1239 invités
>6 membres
>5 robots
Record simultané (sur 6 mois):
6892 utilisateurs (le 07/06/2017)
-
Autres sites intéressants
Texas Instruments Education
Global | France
 (English / Français)
Banque de programmes TI
ticalc.org
 (English)
La communauté TI-82
tout82.free.fr
 (Français)