SCREEN 13
PAINT (1, 1), 0
PAINT (1, 199), 1, 0
CIRCLE (40, 40), 7, 8
PAINT (40, 40), 8, 8
CIRCLE (50, 36), 9, 8
PAINT (50, 36), 8, 8
CIRCLE (60, 40), 7, 8
PAINT (60, 40), 8, 8
CIRCLE (50, 40), 8, 8
PAINT (50, 40), 8, 8
PAINT (50, 45), 8, 8
CIRCLE (140, 60), 7, 8
PAINT (140, 60), 8, 8
CIRCLE (150, 56), 9, 8
PAINT (150, 56), 8, 8
CIRCLE (160, 60), 7, 8
PAINT (160, 60), 8, 8
CIRCLE (150, 60), 8, 8
PAINT (150, 60), 8, 8
PAINT (150, 65), 8, 8
CIRCLE (240, 30), 7, 8
PAINT (240, 30), 8, 8
CIRCLE (250, 26), 9, 8
PAINT (250, 26), 8, 8
CIRCLE (260, 30), 7, 8
PAINT (260, 30), 8, 8
CIRCLE (250, 30), 8, 8
PAINT (250, 30), 8, 8
PAINT (250, 35), 8, 8
PRINT
PRINT
PRINT
PRINT
PRINT
PRINT
PRINT
PRINT
PRINT
COLOR 1: PRINT " /    /       /       /       /       /                       /       /"
PRINT ""
PRINT "/  /  /     /               /       //      //      /       /               /"
PRINT
PRINT "/          /       /       /      //      /       /       /       "
PRINT
PRINT "      /       /               /               /               /      /       /"
PRINT
DO
ljud% = INT(RND * 10000) + 500
SOUND ljud%, .1
LOOP