Манделброт в ASCII Art

[gid]

Код можно ещё на капелюшечку ускорить, если заменить функцию mid$ на массив символов.

Оказывается, нет, если взять код из поста #94, становится видно, что mid$ быстрее массива.

3) целочисленные+одинарной точности ==> 130.75 / 132.59

У меня в эмуляторе вышло быстрее, 126.926848
Вы применяли оптимизацию? В БКшном бейсике, команда NEXT <переменная>, выполняется быстрее, чем команда NEXT без переменой, особенно становится это заметно во вложенных циклах.

- - - Добавлено - - -

В БКшном бейсике все арифметические и логические операции делаются через стек. Для плавающих чисел: значение переменной, где бы оно ни было кладётся в стек, если надо - делается преобразование типа, для переменной одинарной точности - это тупо добавление двух нулевых слов к мантиссе в стеке, затем сама операция, с переменными двойной точности, затем, результат из стека помещается по адресу, выделенному для переменной, для переменной одинарной точности - не знаю, делается ли округление, но скорее всего просто берётся первые 2 слова и остальная мантисса отбрасывается.
Для работы с числами двойной точности слишком много накладных расходов на копирование данных туда-сюда, для чисел одинарной точности копировать данных в 2 раза меньше. Поэтому и быстрее с ними получается.

[dim33]

У меня в эмуляторе вышло быстрее, 126.926848
Вы применяли оптимизацию?

Да, конечно оптимизировал. Я нашёл расхождения в цифрах - в порыве оптимизации объявил переменную MX и константу "2" как целочисленныео, в результате во внутреннем цикле постоянно выполнялось преобразование в числа одинарной точности
Скорость в эмуляторе 126.92, на реальной машине - 129.37

В БКшном бейсике, команда NEXT <переменная>, выполняется быстрее, чем команда NEXT без переменой, особенно становится это заметно во вложенных циклах.

NEXT у меня с переменной. Специально проверил скорость для второго случая (команда NEXT без переменой) - расхождение на две сотые секунды.


PS: спасибо за исправление бага со звуком при записи на магнитофон - теперь можно загружать с эмулятора прямо на реальную машину! Правда приходится пропускать сигнал через предусилитель (в колонках), подбирать уровень сигнала и искать оптимальную конфигурацию сигнальных и сетевых проводов
Есть ли возможность в следующих версиях эмулятора увеличить уровень выходного сигнала и/или сделать ползунок для его настройки?

[gid]

Есть ли возможность в следующих версиях эмулятора увеличить уровень выходного сигнала

Алгоритмы не позволяют. На реальной БКшке используется только верхний полупериод амплитуды от 0 до +1. А превращение сигнала в двух полупериодный и нужной амплитуды делался аналоговыми средствами типа магнитофона.
Единственное, что возможно - в опции "Коррекция смещения" возможно увеличить амплитуду в 2 раза до максимума -1..+1. Но нужно ли делать новый ползунок, чтобы можно было корректировать коэффициент усиления, не знаю, тем более, что нужен отдельный ползунок для каждого звукового устройства: пищалки, ковокса, AY, менестреля и куда их впихнуть - неясно. Можно просто дискретно. Включил опцию - получил бонус к громкости, выключил - вернул как было.

[dim33]

Алгоритмы не позволяют. На реальной БКшке используется только верхний полупериод амплитуды от 0 до +1. А превращение сигнала в двух полупериодный и нужной амплитуды делался аналоговыми средствами типа магнитофона.
Единственное, что возможно - в опции "Коррекция смещения" возможно увеличить амплитуду в 2 раза до максимума -1..+1. Но нужно ли делать новый ползунок, чтобы можно было корректировать коэффициент усиления, не знаю, тем более, что нужен отдельный ползунок для каждого звукового устройства: пищалки, ковокса, AY, менестреля и куда их впихнуть - неясно. Можно просто дискретно. Включил опцию - получил бонус к громкости, выключил - вернул как было.

Я говорил о том, что через эмулятор я могу получить сигнал амплитудой максимум 250 мВ, в то время как при проигрывании wav-файлов (даже непосредственно с сайта) максимальная амплитуда более 2 В и её приходится снижать до 1 В.
Через предусилитель амплитуда сигнала повышается до 1 В и можно загрузить программы непосредственно с эмулятора.

[litwr]

Есть ли возможность в следующих версиях эмулятора увеличить уровень выходного сигнала и/или сделать ползунок для его настройки?

Можно ещё это попробывать.

[dim33]

Можно ещё это попробывать.

Этот конвертер я попробовал в первую очередь, после стал разбираться с железом. Когда понял, что дело в программной реализации, то попросил многоуважаемого gid'a внести доработки в эмулятор.

[Advertiser]

[litwr]

В теме появилась информация о результатах по продвинутому компику Thomson MO6 (6809@1MHz, грaфика с поддержкой нескольких уровней прозрачности, поддержка светового пера на уровне ОС, ...). Пусть и тема не совсем соответствует содержанию поста, но БК почти в ТРИ раза быстрее. Так что по бейсику БК реально быстрее всех.