Помогите закоментировать каждую строчку кода
Я уже начал ...
procedure TForm1.Timer1Timer(Sender: TObject);
begin
//Отображаем очки игрока
Label1.Caption:=IntToStr(Bonus); //преобразование числа в строку
//Задаем движение препятствия1
Block1.Top:=Block1.Top+(Block1.Height div 2);
//Проверяем не произошла ли авария
if (Block1.Top+Block1.Height)>(Car.Top) then
if (Block1.Left+1
