10 ' Изменение частоты
20 A$="S8O4L12CGAO5CDGA"
30 PLAY"M200":PLAY A$
40 PLAY"M1000":PLAY A$
50 PLAY"M5000":PLAY A$
60 END