Спасибо.Руки до этого не дошли.Хотел посмотреть Basic

Спасибо.Руки до этого не дошли.Хотел посмотреть Basic работает или нет.Оказалось что работает.Не может же из за него пострадать железо???Не могу этот код найти