That works great, but here's something to shoot for ...

When you learn a bit more about the CIRCLE statement and a few other graphics commands...

DEFINT X-Y
CONST pi! = 3.14159
SCREEN 12

OUT &H3C8, 1: OUT &H3C9, 0: OUT &H3C9, 0: OUT &H3C9, 63
OUT &H3C8, 4: OUT &H3C9, 63: OUT &H3C9, 0: OUT &H3C9, 0
OUT &H3C8, 8: OUT &H3C9, 10: OUT &H3C9, 10: OUT &H3C9, 10

CIRCLE (320, 240), 70, 8, 0, pi! * .42
CIRCLE (320, 240), 140, 8, 0, pi! * .45
LINE (330, 112)-(330, 163), 8
CIRCLE (342, 114), 12, 8, pi! * .5, pi!
CIRCLE (338, 164), 8, 8, pi!, pi! * 1.5
FOR x = 320 TO 360
FOR y = 80 TO 240
PSET (560 - y, 560 - x), POINT(x, y)
NEXT y
NEXT x
FOR x = 320 TO 480
FOR y = 80 TO 240
PSET (640 - x, y), POINT(x, y)
NEXT y
NEXT x
FOR x = 160 TO 480
FOR y = 80 TO 240
PSET (x, 480 - y), POINT(x, y)
NEXT y
NEXT x

CIRCLE (320, 240), 160, 8
CIRCLE (320, 240), 60, 8
PAINT (320, 120), 8
CIRCLE (320, 240), 54, 7

PAINT (380, 160), 4, 8
PAINT (260, 160), 3, 8
PAINT (380, 320), 1, 8
PAINT (260, 320), 14, 8

END