Update source.bas

Удалил лишние переносы