Forum de Ti-Gen.org, le site francophone des TI

Bienvenue Invité ! Se connecter Mes sujets	Administrer
Utilisateurs actifs : Aucun membre + 1 visiteur

Avant de poster sur le forum, il y a des régles de bases à respecter pour une bonne entente et un respect de tous.
Veuillez lire la charte du forum.

:: Index » Forum Ti68K » Programmation TI-Basic » popup (24 réponse(s))

./REPRISE DU POST PRECEDENT (post n°19) Marquer comme non lu.

Folco

Ecrit le: Dimanche 3 juillet 2005 à 22:55

Administrateur

Groupe: Staff de Ti-Gen

Messages: 1286

Membre n°181

Inscrit le 05 avril 2004

je ne sais pas si on parle bien du même cas de programme construit grâce à 'define' alors.

<<< Kernel Extremist©®™ >>>
Pas la peine d'aller là plus d'une fois tous les six mois...

"Il faut apprendre pour savoir qu'il faut apprendre pour savoir."

./Post n°20 Marquer comme non lu.

Kevin Kofler

Ecrit le: Dimanche 3 juillet 2005 à 23:01

Administrateur

Groupe: Staff de Ti-Gen

Messages: 4814

Membre n°40

Inscrit le 08 février 2004

Bah si tu définis un programme avec expr, tu auras de toute façon un problème avec la localisation... #roll#

Si tu utilises Define sans un expr autour, c'est traduit sans problèmes.

Membre de l'équipe de TIGCC: http://tigcc.ticalc.org
Mainteneur du portage Linux/Unix de TIGCC: http://tigcc.ticalc.org/linux/
Membre de l'équipe de CalcForge: http://www.calcforge.org:70/

Participez à la reprise de Ti-Gen!

./Post n°21 Marquer comme non lu.

Folco

Ecrit le: Dimanche 3 juillet 2005 à 23:08

Administrateur

Groupe: Staff de Ti-Gen

Messages: 1286

Membre n°181

Inscrit le 05 avril 2004

Define sousprog=Prgm:EndPrgm

je vois pas trop le problème...

<<< Kernel Extremist©®™ >>>
Pas la peine d'aller là plus d'une fois tous les six mois...

"Il faut apprendre pour savoir qu'il faut apprendre pour savoir."

./Post n°22 Marquer comme non lu.

Kevin Kofler

Ecrit le: Lundi 4 juillet 2005 à 00:51

Administrateur

Groupe: Staff de Ti-Gen

Messages: 4814

Membre n°40

Inscrit le 08 février 2004

Avec ça, il n'y a pas de problème avec la localisation non plus. Les problèmes, ils surviennent quand on fait expr("Define f(x)="&f), à remplacer par expr(f&"->f(x)").

./Post n°23 Marquer comme non lu.

Link

Ecrit le: Lundi 4 juillet 2005 à 10:05

Membre: Magister

Messages: 302

Membre n°896

Inscrit le 25 juin 2005

Si tu définis un sous-programme en local, du tapes directement dans ton prog:

:Local sprog
:Define sprog=Prgm
:Disp "Coucou!"
:EndPrgm

Le define sera automatiquement traduit, aucun problème.
Là où ce sera plus dur, c'est ceci:

:Local chn
:"Define "&progname&"=Prgm:"->chn
:If mode=1 Then
:chn&"Disp""Coucou!"":"->chn
:Else
:chn&"Text string("&varname&"):"->chn
:Endif
:chn&"EndPrgm"->chn
:expr(chn)

Là, tu as besoin de traduire Define, et rien ne peut le remplaçer (contrairement à une sous-fonction du type int(x), remplaçable par une fonction perso int(x)->part_ent(x) )

[EDIT par Kevin Kofler: !"§$%&/()=? de smilies qui "disparaissent" dans le code.]
-Edité le Lundi 4 juillet 2005 à 10:16 par Kevin Kofler-

Edit: (oui, ça m'a tout l'air d'un bug dans [ code ])
C'est vrai, y'a pas que Define qui pose problème: C'est plutot un cas extrême, ici.
Mais pour la compatibilité linguistique, on peut toujours mettre des s-progs persos qui se chargent d'effectuer les appels à Text et Disp (au prix, hélas, d'une lourdeur exceptionnelle