Publicité
Comment Programmer
(Exemple)
100 WAIT 0 : DEGREE
110 FOR A = 180 TO
-180
STEP
-2
120 B = SIN A * 1 2
130 C - COS A * 1 2
140 X = B + 80
150 Y = C + 14
160 PSET (X, Y )
170 NEXT A
<- *3
180 WAIT : GPRINT
«- "4
*1
Détermine les coordonnées du périmètre d'un cercle de rayon 12. Le centre se
trouve en (0, 0).
*2
Déplace le centre du cercle en (80, 14).
*3 Affiche le point spécifié par (x, y).
*4 Continue; à afficher le cercle dessiné.
L'exécution de ce programme provoque le traçage d'un cercle ayant un rayon de 12
et dont le centre se trouve en (80, 14);
L'angle passe de +180 à -180
dans la boucle FOR-NEXT.
A chaque angle, les
coordonnées du périmètre du cercle sont déterminées et le point correspondant
est affiché.
(4) Tracés de lignes et de carrés
Bien que les lignes et les carrés puissant également être tracés à l'aide de la
commande
PSET, ils peuvent être tracés facilement en spécifiant uniquement
deux points dans la commande LINE.
(Exemple)
LINE (0,0) - (149, 31)
Cette commande permet de tracer une ligne allant de (0, 0) à (149, 31).
LINE (30,0) - (80, 31), B
Cette commando permet de tracer un carré dont la diagonale va de (30, 0)
à (80, 31). Si B devient BF, l'intérieur du carré sera rempli.
LINE (30,0) - (80,31), X, BF
Un carré rempli est dessiné. Cependant, si un point à l'intérieur de ce carré
était déjà affiché, il est effacé.
(Lorsque "X" est utilisé, les points sont affichés en image inversée.)
(Exemple)
200 "A" : W A I T 0
210 LINE (60,0)- (100,31)
, X, BF
220 GOTO 210
70
Publicité
