Dibujar un círculo, elipse, y ángulos sobre la pantalla durante empleo del Modo de gráficas.
CIRCLE(xcenter, ycenter), radius[,[color][,[start],[end][,aspect]]]
xcenter Y ycenter son el x-y las coordenadas de y-del centro de la elipse, y radius es el radio (moderado a lo largo del eje principal) de la elipse. Las cantidades xcenter y ycenter pueden ser expresiones. Los atributos de centro pueden usar coordenadas absolutas o relativas.
color especifica el color de la elipse. Su valor depende del modo de pantalla corriente. Mirar COLOR SCREEN declaraciones para más información sobre la utilización de colores en modos de pantalla diferentes. En el modo de alta resolución, 0 indica negro y 1 indica blanco. La falta para el modo de alta resolución es 1.
El start y parámetros de ángulo de end son argumentos de radián entre-2p y 2p que especifica donde el dibujo de la elipse debe comenzar y terminarse. Si start or end son negativos, la elipse es unida(conectada) al punto de centro con una línea, y los ángulos son tratados como si ellos son positivos (note que esto es diferente de añadir 2p).
aspect describe la proporción del radio x al radio (x:y). La relación de aspecto de falta depende del modo de pantalla, pero da un círculo visual en el uno o el otro modo de gráficas, asumiendo una relación de aspecto de pantalla de monitor estándar de 4:3. Si la relación de aspecto es menos de 1, entonces dan al radio en x-pixeles. Si es mayor que 1, dan al radio en y-pixeles. En muchos casos, una relación de aspecto de 1 da mejores elipses en el modo de resolución media. Esto también hace que la elipse sea dibujada más rápido. El ángulo de principio puede ser menos que el ángulo de final.
10 SCREEN1: CIRCLE(100,100), 50
Dibuja un círculo de radio 50, centrado en puntos de gráficos 100x y 100y.
1 ' Esto dibujará 17 elipses 10 CLS 20 SCREEN 1 30 FOR R=160 TO 0 STEP-10 40 CIRCLE (160,100),R,,,,5/18 50 NEXT
10 'Esto dibujará 5 esferas 20 GOTO 160 50 IF VERT GOTO 100 60 CIRCLE (X,Y),R,C,,,.07 70 FOR I = 1 TO 5 80 CIRCLE (X,Y),R,C,,,I*.2:NEXT I 90 IF VERT THEN RETURN 100 CIRCLE (X,Y),R,C,,,1.3 110 CIRCLE (X,Y),R,C,,,1.9 120 CIRCLE (X,Y),R,C,,,3.6 130 CIRCLE (X,Y),R,C,,,9.8 140 IF VERT GOTO 60 150 RETURN 160 CLS: SCREEN 1: COLOR 0,1: KEY OFF: VERT=0 170 X=160: Y=100: C=1: R=50: GOSUB 50 180 X=30: Y=30: C=2: R=30: GOSUB 50 190 X=30: Y=169: GOSUB 50 200 X=289: Y=30: GOSUB 50 210 X=289: Y=169: GOSUB 50 220 LINE (30,30)-(289,169),1 230 LINE (30,169)-(289,30),1 240 LINE (30,169)-(289,30),1,B 250 Z$=INKEY$: IF Z$="" THEN 250