20 Y=ROOT(2,12)

30 X=10: D=1

40 GOSUB 1000

50 X=12: D=1

60 GOSUB 1000

70 X=8: D=2

80 GOSUB 1000

90 X=3: D=2

100 GOSUB 1000

110 X=15: D=3

120 GOSUB 1000

990 END

1000 TONE 440*POW(Y,X),500*D

1010 RETURN