Рисуем интерференцию
 

Изначально создавалось с желанием нарисовать интерференционную картину на телефоне. Красиво, но тормозит даже на компе.
Изначально источников света нет - добавляем их нажатием на экран. (lib_sensor) Есть два режима рисования - честный и без доп. библиотек, и второй (попытка сделать быстрее), использующий lib beta (рисование массива) и приближенный метод вычисления синусов и косинусов - очень забавно выглядит в итоге, ступеньками.
Управление:
Нажатие в нижний левый угол экрана-выход
В нижнюю по центру часть - удаление всех источников света
В нижний правый угол - смена режима рисования (2-3 сек)

Разрешаю изучать, редакировать и использовать код с указанием моего авторства.

Ответ: Рисуем интерференцию
 

Кстати, когда-то писал то же самое на java, работало на порядки быстрее, потому что в midlet pascal работа с типом данных real программная. Красивых ступенек я так и не получил, наверно, дело в хитрой реализации real.