Вручную. Нашёл инфу по QBasic-Play. Все цифирки частот пальчиками набрал в программе #2, пока не стало пищать похоже. Потом вручную переписал под Оберон. Так что никакой фантастики.

---------- Post added at 22:36 ---------- Previous post was at 22:30 ----------

Непонятно было соответствие октав. В книжке по QBasic написано:
O n - Устанавливает текущую октаву. Всего семь октав, от 0 до 6
Не понял какие частоты какой октаве соответствуют, поэтому пришлось подобрать на слух. Надеюсь угадал.

Книжка "Программируем на языке Quick BASIC 4.5 Г.Зельднер 1996". Не помню где скачал, нашёл в гугле.