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