Download Manuel du BASIC 1000D

Transcript
Chapitre 19: Appels système
445
Table des commandes du VDI
Dans la table des commandes VDI suivante, la liste maximum d’arguments est donnée pour chaque valeur du numéro de la fonction (certains arguments doivent être mis égaux à 0, ce qui est indiqué par un 0). La référence g107
renvoie à la page 107 de G Szczepanowski (1985), et la référence b158 renvoie à
la page 158 de L Besle (1986).
-10, x, y, dx, 0, a, b, S
Affiche la chaı̂ne S avec justification g125 b172
x, y
point d’affichage
dx
longueur d’affichage en pixels
a, b
espace les mots (si a = 0) et caractères (si b = 0)
intin(2) à intin(n) et contrl(3) sont mis suivant la chaı̂ne S.
Exemple
On écrit divers textes graphiques. La procédure deftext permet de
modifier les attributs de texte.
char c
cls
hidem
for i=1,10
j=2^(i-2)
ift i=1 j=0
ift i>6 j=random(32)
c="j=",justr$(j,2)," "
ift j and 1 c=c&"gras "
ift j and 2 c=c&"brillant "
ift j and 4 c=c&"italique "
ift j and 8 c=c&"souligné "
ift j and 16 c=c&"esquissé"
ift j=0 c=c&"normal"
deftext j,0,13
vdi -10,0,88+18*i,10*len(c),0,1,0,c
next i
deftext 0,0,6
vdi -10,0,290,100,0,1,1,"Texte 6"
deftext 0,2700,32
vdi -10,400,88,200,0,1,1,"Texte 32"
stop
deftext:procedure(t,a,h)