10 A$="T90e8o5e.f8g8.f16e8.f16d2.o4eo5d. e8f8.e16d8.e16c2.o4ao5g.a8b-8a8 g8a8f2.da.b8o6c8o5b8a8b8g#2."
20 B$="T80r4o2ao3ao4co3bo2a8o3f8o4d8c8o3 b2o2g+8o3e8o4deo3g+o2ao4eeeo2ao4 ec+eo3d8a8o4e8d8o3a2f8a8oedbc8o3 do4eo3b"
30 C$="T80r8r1r1r1r4o3aaar4o4c#o3gar2d2r2.ae2."
40 PLAY A$,B$,C$
50 FOR K=1 TO 500:PRINT K^2;:NEXT