!plays old smokey

!do trace, step(music$)

DO while more data

READ music$

PLAY music$

LOOP

DATA o4 l4 c c e g o5 l2 c. o4 a.

DATA l4 a f g a l1 g

DATA l4 c c e g l2 g. d.

DATA l4 e f e d l2 c.

END