[Résolu]Text clignotant

→ **MyCalcs** profile · by **Marco** » 01 Dec 2009, 20:11

Klaxx wrote:Marco t'a méthode marche très bien sauf que j'ai aussi besoin de mettre un autre texte qui lui ne clignote pas, car avec ta méthode tout l'écran blink. Solution ?
Mais peut-être un jour auras-tu besoin de faire clignoter certains messages et pas d'autres.

C'est justement se dont j'ai besoin mais je n'arrive pas à ralentir le clignotement même avec la technique de Ciwtron (je mis prend sûrement mal...).
Merci en tout cas.

Ah nan avec ma méthode t'efface juste le texte qui clignote et pas autre chose t'as mal vu.
Pour ralentir le clignotement tu augmentes T.

→ **MyCalcs** profile · by **Ciwtron** » 01 Dec 2009, 20:51

Je sais ou je me suis trompé: j'aurais du mettre Text(-1,32,28," et non pas Text(32,28,".

→ **MyCalcs** profile · by **Marco** » 01 Dec 2009, 20:54

Ciwtron wrote:Je sais ou je me suis trompé: j'aurais du mettre Text(-1,32,28," et non pas Text(32,28,".

Ouais, dans ce cas là tes espaces prendront autant de place qu'une case de texte sur home, soit 6*8 pixels. Tu peux aussi mettre plein de petits espaces, mais il en faut plus dans ce cas, un espace ne prenant qu'un pixel de large et 6 de hauteur.

→ **MyCalcs** profile · by **KaL.K** » 01 Dec 2009, 21:07

Marco wrote:
Klaxx wrote:Marco t'a méthode marche très bien sauf que j'ai aussi besoin de mettre un autre texte qui lui ne clignote pas, car avec ta méthode tout l'écran blink. Solution ?
Mais peut-être un jour auras-tu besoin de faire clignoter certains messages et pas d'autres.

C'est justement se dont j'ai besoin mais je n'arrive pas à ralentir le clignotement même avec la technique de Ciwtron (je mis prend sûrement mal...).
Merci en tout cas.

Ah nan avec ma méthode t'efface juste le texte qui clignote et pas autre chose t'as mal vu.
Pour ralentir le clignotement tu augmentes T.

Bizarre voici ce que j'ai mis :

Code: Select all: :ClrDraw :ClrHome :While 1 :Output(2,5,"TITLE // j'ai aussi essayé avec Disp :Text(32,28,"Press ENTER :For(I,1,T :End :Text(-1,32,28," " :For(I,1,T :End :End

Mais "TITLE" continue toujours de clignoter et j'aimerais qu'il reste fixe car il apparait quand "Press ENTER" disparaît... Mon erreur ?

→ **MyCalcs** profile · by **Marco** » 01 Dec 2009, 21:18

Si tu utilises l'écran graphique, fais tout dessus. Il faut donc que tu écrives ton TITLE sur l'écran graphique, avec Text(). Les écrans de calcul et graphique sont indépendants, avec ta méthode tu changes d'écran et ton TITLE n'est marqué que sur un des deux écrans c'est pour ça qu'il clignote.

Code: Select all: :ClrDraw :While 1 :Text(-1,24,8,"TITLE :Text(32,28,"Press ENTER :For(I,1,T :End :Text(-1,32,28," //7 espaces sont suffisants ici :For(I,1,T :End :End