Помогите люди добрые Сделать так чтобы машинка доезжала до светофора (стоп-линии) затормозила переключился свет и они поехали.Буду приемного благодарен)))

Uses crt, graphabc;
var
   picBkGround, picBkGround1, picBkGround2 : Integer;
   pic1, pic4, pic5, pic6 : Integer;
   car1_x, car1_y:integer;
   car2_x, car2_y:integer;
   deltax, deltay:integer;
   p : Integer;
   stopLine : Integer;
begin
   SetWindowSize(530, 530);
   SetWindowCaption('Ïåðåìåùåíèå êàðòèíêè');

   picBkGround := LoadPicture ('1.jpg');
    picBkGround1 := LoadPicture ('1(1).jpg');
     picBkGround2 := LoadPicture ('1(2).jpg');
     

   pic1 := LoadPicture ('luxcar2(1).jpg');
   pic4 := LoadPicture ('luxcar1(2).jpg');
   pic6 := LoadPicture ('luxcar1(3).jpg');
   pic5 := Loadpicture ('luxcar2(3).jpg');
   // Dvijnyak
   LockDrawing;
   car1_x := 217; car1_y := 0;
   car2_x := 270; car2_y := WindowHeight;
   deltax := 0; deltay := -1; p := pic4;
   stopLine := 5 * (WindowHeight div 4);
   repeat
      DrawPicture (picBkGround2, 1, 1);
      DrawPicture (pic1, car1_x, car1_y);
      DrawPicture (p, car2_x, car2_y);
      Redraw;
      Sleep (1);

      Inc (car1_y);
      car2_x := car2_x + deltax;
      car2_y := car2_y + deltay;

      if deltay = 0 then
         if car1_y > stopLine then deltay := -1;
        if car2_y = stopLine then deltay := 0;

      if car2_y = 220 then
      begin
         deltax := -1;
         deltay := 0;
         p := pic6;
      end;
   until car2_x < 0;
   UnlockDrawing;
end.

Нажмите для просмотра прикрепленного файла
Нажмите для просмотра прикрепленного файла
Нажмите для просмотра прикрепленного файла
Нажмите для просмотра прикрепленного файла
Нажмите для просмотра прикрепленного файла
Нажмите для просмотра прикрепленного файла
Нажмите для просмотра прикрепленного файла

Вы уже это выкладывали, вам уже ответили

У него было другое задание, там просто надо было одной машине пропустить другую. Здесь требуется еще подчиняться сигналам светофора. IlyasKaz, кто куда должен ехать, расскажи? Прямо, безо всяких поворотов?

Если делать по ПДД, то со светофорами даже проще, циклов возникнуть не может.

Пикап слева на права ----->>>>>а седан
____>
|
|
помогите пожалуйста а то курсовую завтра сдавать уже
Нажмите для просмотра прикрепленного файла