Skip to content

Commit eb7cb20

Browse files
Fixed example.
1 parent 751dee7 commit eb7cb20

File tree

1 file changed

+20
-20
lines changed

1 file changed

+20
-20
lines changed

examples/graphics_shapes_04.bas

Lines changed: 20 additions & 20 deletions
Original file line numberDiff line numberDiff line change
@@ -1,20 +1,20 @@
1-
REM @english
2-
REM GRAPHICS PRIMITIVES DRAWING ENCLOSED CIRCLES
3-
REM
4-
REM This example will draw enclosed circles on the screen.
5-
REM
6-
REM @italian
7-
REM PRIMITIVE DI GRAFICA CON DISEGNO DI FORME (3)
8-
REM
9-
REM Questo esempio disegnerà cerchi concentrici sullo schermo.
10-
REM
11-
REM @include atari,atarixl,c128,c64,coco,coco3,d32,d64,coleco,sg1000,sc3000,cpc
12-
13-
BITMAP ENABLE (160,200,16)
14-
CLS
15-
FOR i=0 TO 10
16-
r = ( SCREEN WIDTH / 4 - i*2 )
17-
IF r > 0 THEN
18-
CIRCLE SCREEN WIDTH / 2,SCREEN WIDTH / HEIGHT, r
19-
ENDIF
20-
NEXT
1+
REM @english
2+
REM GRAPHICS PRIMITIVES DRAWING ENCLOSED CIRCLES
3+
REM
4+
REM This example will draw enclosed circles on the screen.
5+
REM
6+
REM @italian
7+
REM PRIMITIVE DI GRAFICA CON DISEGNO DI FORME (3)
8+
REM
9+
REM Questo esempio disegnerà cerchi concentrici sullo schermo.
10+
REM
11+
REM @include atari,atarixl,c128,c64,coco,coco3,d32,d64,coleco,sg1000,sc3000,cpc
12+
13+
BITMAP ENABLE (160,200,16)
14+
CLS
15+
FOR i=0 TO 10
16+
r = ( SCREEN WIDTH / 4 - i*2 )
17+
IF r > 0 THEN
18+
CIRCLE SCREEN WIDTH / 2,SCREEN HEIGHT / 2, r
19+
ENDIF
20+
NEXT

0 commit comments

Comments
 (0)