Вот забавный туннель получился. Компилировалось под TP7. Синхронизации с таймером нет, так что вероятно придется подправить константу Speed (возможны отрицательные значения). Особой оптимизации нет, изначально задумывалось как тест. Эх, это бы в RGB, можно было бы демку сделать...

Классно!!! Какое разрешение?

PS компилировал на BP - пришлось добавить директиву {$G+}.

Режим 13h 320x200x8bit

Красиво! Ещё бы лазерную пушечку и мишени на заднем фоне

Как я уже сказал, если бы в RGB... А так, попробуешь добавить еще какой-нибудь цвет, и с блюром можно распрощаться.

А что такое блюр?

Получается нахождением среднего арифметического?

Да, но не обязательно.
Вообще принято описывать blur с помощью маски (числа - "вес" соответствующего пиксела, жирным выделен обрабатываемый пиксел):
111
101 - это обычное размытие, как у меня в процедуре TrueBlur (среднее арифметическое)
111

010
101 - упрощенный вариант
010

000000
001111 - картинка смазывается смазывание влево
000000

111
101 - неплохое "пламя"
111