10 CLS

15 X=ROOT(2,12)

20 FOR I=0 TO 14

30 COLOR I,15

40 AT I+1,I+1

45 F=440*POW(X,I)

50 PRINT "Hello World!";

55 TONE F,500

60 NEXT I

70 PRINT ""

80 END