Enfin, la dernière méthode utilise l'écran graphique, grâce à la fonction Text (=>
[SHIFT][F4][F6][F6][F2]). Le texte affiché est écrit en beaucoup plus petit, et chaque caractère ne prend pas la même place (par exemple, un "i" fera 1 pixel de large alors qu'un "W" en fera 5).
Text prend en compte, comme Locate, trois paramètres : ordonnée, abscisse puis texte (oui,
ordonnée est avant abscisse !). Le texte est toujours entre guillemets. L'ordonnée et l'abscisse sont la position du haut du premier caractère, plus ordonnée et abscisse augmentent, plus on va vers le bas à droite. Ordonnée est un nombre de [1,63] et abscisse est un nombre de [1,127].
Certains aimeront la fonction Text, d'autres non. Pour ma part, j'adore, ça permet d'afficher quelque chose de consistant en une seule fois. De plus, l'affichage est assez rapide, et on peut positionner son texte de manière très précise.
Voici un code d'exemple, que vous comprendrez sans problème une fois lu la partie Graphismes :
Code : Autre - Du texte avec Text1
2
3
4
| AxesOff
Cls
Text 1,25,"PREMIERE LIGNE"
Text 15,1,"TROISIEME LIGNE" |
Et la capture d'écran associée que voici :
Là-encore, Aliasker m'a demandé de mettre un repère :
Et toujours pour ceux qui veulent, voici le code :
Secret (cliquez pour afficher)
Code : Autre - Code du repère1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
| 128->D
ViewWindow 1,127,0,1,63,0
{2,2,4,1,1,127,124,124,125}->List 1
{3,4,4,1,63,63,60,62,62}->List 2
DrawStat
Text 3,3,"(1,1)"
Text 58,6,"(63,1)"
Text 6,103,"(1,127)"
Text 29,35,"Text Y,X, (X,Y)"
{69,69,D,71,71}->List 1
{36,34,D,36,34}->List 2
DrawStat
List 1+21->List 1
DrawStat
Text 3,62,"X"
Text 32,3,"Y" |