10 SCREEN 2
15 VDP(1)=&B10100000
20 CIRCLE(125,95),90
30 PAINT STEP(0,0)
35 VDP(1)=&B11100000
40 GOTO 40