roboforum.ru

Исходник пробовал понять - не читабельно

Ну что вы, очень даже читабельно

m = 40 ' Положение центра колокола в первой строке

Это означает, что линия ОБЯЗАНА начаться в центре и иметь размер ~80 пиксел, т.е. о глазке и AVR речь уже не идет, поскольку

If Abs((3.1415929 * 2) * (i - m) * ((23 - j) + 12) / 800) > 3.14159 Then…

МК "на лету" вычислить не может. Еще это говорит о том, что в пригодном для анализа виде 20 строк автор топика с дверного глазка снять не смог.
ИМХО, вполне достаточно для губозакаточной машинки

МК "на лету" вычислить не может. Еще это говорит о том, что в пригодном для анализа виде 20 строк автор топика с дверного глазка снять не смог.

Ты бы наверно и sin() на МК как функцию вычислял бы, вместо того чтоб подумать немного.

Добавлено спустя 3 минуты 20 секунд:
Michael_K, а к чему вообще тут эти пляски с pi, 2*pi ?

contr писал(а):

m = 40 ' Положение центра колокола в первой строке

Это означает, что линия ОБЯЗАНА начаться в центре и иметь размер ~80 пиксел

Не осталось еще этой волшебной травы?

Добавлено спустя 1 минуту 34 секунды:

blindman писал(а):Michael_K, а к чему вообще тут эти пляски с pi, 2*pi ?

Дык он обрубок косинуса взял вместо гауссова нормального распределения.

Я не про косинус, а про условие. Обе части неравенства поделить на 2pi и домножить на 800 что мешает?

Так это же не оптимизированный код, а который просто хоть как-то работает

Добавлено спустя 33 секунды:
Ну и читабельность конечно была бы лучше, если бы этот параметр вынести в переменную из под косинуса и условия и назвать разумно.

Это намеренно запутанный код Он работает, а вот как и почему - неочевидно

Вы забыли всех и вся обвинить в краже идеи

Ну зачем Вы так? С глазком идея оригинальная, правда не реализована, да и большого смысла в ее реализации нет. А алгоритм стандартный под PC или DSP заточенный. Автор этого не скрывает. Какие здесь могут быть (с) претензии?
Можно лишь пожелать скорейшей "материлаизации духов и раздачи слонов"!

Ребята, йокарный бабай,
предложите способ показать, что происходит внутри МК на лету - покажу.

Хотя пофиг - кто не верит, идут лесом.

2 blindman: ничего не мешает, а зачем? Чтобы еще больше запутать?
Комп сосчитает, если не компилятор на стадии компиляции.
Это ж не оптимизированный ассемблер.

Нихрена он не запутанный - там вычислений-то три строчки.
Вот эта часть вычисляет значение коэффициента для точки i,j при центре колокола m

If Abs(бла-бла-бла) > 3.14159 Then
k = 0.01 ' далеко от центра "колокола" - считаем что почти ноль
Else
k = ((Cos(бла-бла-бла) + 1) / 2) ' ближе к центру считаем кусок косинуса
End If


Затем вычисляются суммы (К*пиксель*позиция) и (К*пиксель)
После накопления в строке одна сумма делится на другую - это расчет "центра тяжести" в лоб.

Выражение m = 1.5 * i - 0.5 * m
пытается предсказать положение ЦТ в следующей строке на основе полученного ЦТ.
и немножко сглаживает точки.

Все!!!

2Michael_K: Спокойствие, только спокойствие это всё оттого - что руки чешутся поучаствовать, а сил для проверки элементарного мелкого изменения в алгоритме надо до фига и больше

сил для проверки элементарного мелкого изменения в алгоритме надо до фига и больше

Всего-то выйти с форума и открыть студию (или даже ёксель).

Ну во-первых не у всех она есть во-вторых не все в ней привыкшие, тем более в васике, в-третьих обычно после этого начинается - тут добавить библиотеку надо, там еще что-то подкрутить короче нестандартизовано всё это

Исходники там forum88/topic6822-15.html
Надо попробовать для отслеживания лазерного пятна на матовом экране перед камерой, вместо ноутбука.