CLS
SCREEN 13
PAINT (1, 1), 14
CIRCLE (150, 100), 100, 0
PAINT (150, 100), 0
CIRCLE (150, 100), 50, 15
PAINT (150, 100), 15
CIRCLE (150, 80), 20, 0
PAINT (150, 80), 0
CIRCLE (150, 110), 30, 0
PAINT (150, 110), 0
CIRCLE (150, 80), 8, 15
PAINT (150, 80), 15
CIRCLE (150, 110), 15, 15
PAINT (150, 110), 15
DO
PLAY "MB"
PLAY "O2 L12 D N0 >D l32 E L12 DC+<B>C+ N0 DE< N0"
PLAY "AD N0 >D l32 E l12 D C+<B>C+ N0 DE N0"
PLAY "<AD> N0 FA..GF N0 A >C..< A+A N0 >CEDC+<A+GFE"
LOOP