numpad9::
SendMessage, 0x50,, 0x4190419,, A
if (isPlayerDriverMod()==1)
   {
   NumberPre:=NumberPre+1
   if (NumberPre==2)
      {
      s := "0"
      p := getStreamedInPlayersInfo()
      For i, o in p
         {
         if(getTargetVehicleModelNameById(i)!="PoliceCar" and getTargetVehicleModelNameById(i)!="" and getTargetVehicleModelNameById(i)!="HPV1000" and getTargetVehicleModelNameById(i)!="Enforcer" getTargetVehicleModelNameById(i)!="Sultan" and isTargetInAnyVehiclebyIdMod(i)=="1" and i==IdInCar)
            {
            s:="1"
            ModelCar:=getTargetVehicleModelNameById(IdInCar)
            SendChat("/m Водитель " ModelCar "!")
            sleep 1200
            SendChat("/m Если вы сейчас же не остановитесь, мы будем стрелять!")
            NumberPre:=0
            }
         }
      if (s==0)
         NumberPre:="1"
      }
   if (NumberPre==1)
      {
      IdInCar:=getClosestPlayerIdCar()
      ModelCar:=getTargetVehicleModelNameById(IdInCar)
      if (IdInCar!=-1)
         {
         Random rand, 1, 4
         if (rand==1)
            {
            SendChat("/m Водитель " ModelCar "!")
            sleep 1200
            SendChat("/m Немедленно прижмитесь к обочине и остановитесь или откроем огонь!")
            }
         if (rand==2)
            {
            SendChat("/m Водитель " ModelCar " прижмитесь к обочине")
            sleep 1200
            SendChat("/m В противном случае нам придется открыть огонь!")
            }
         if (rand==3)
            {
            SendChat("/m Водитель " ModelCar " сбавьте скорость!")
            sleep 1200
            SendChat("/m Вам придется прижаться к обочине и остановится или начнем стрелять!")
            }
         if (rand==4)
            {
            SendChat("/m Водитель " ModelCar " остановитесь на обочине")
            sleep 1200
            SendChat("/m Или нам придется открыть по вам огонь!")
            }
         }
      else
         NumberPre:="0"
      }
   }
if (isPlayerDriverMod()==0)
   {
   NumberPre:=NumberPre+1
   if (NumberPre==2)
      {
      s := "0"
      p := getStreamedInPlayersInfo()
      For i, o in p
         {
         if(getTargetVehicleModelNameById(i)!="PoliceCar" and getTargetVehicleModelNameById(i)!="" and getTargetVehicleModelNameById(i)!="HPV1000" and getTargetVehicleModelNameById(i)!="Enforcer" and isTargetInAnyVehiclebyIdMod(i)=="1" and i==IdInCar)
            {
            s:=1
            ModelCar:=getTargetVehicleModelNameById(IdInCar)
            SendChat("/m Водитель " ModelCar "!")
            sleep 1200
            SendChat("/m Если вы сейчас же не остановитесь, мы будем стрелять!")
            NumberPre:=0
            }
         }
      if (s==0)
         NumberPre:="1"
      }
   if (NumberPre==1)
      {
      model:=[]
      name:=[]
      s := 0
      p := getStreamedInPlayersInfo()
      id :=[]
      MainMenu:=""
      For i, o in p
         {
         if(getTargetVehicleModelNameById(i)!="PoliceCar" and getTargetVehicleModelNameById(i)!="" and getTargetVehicleModelNameById(i)!="HPV1000" and getTargetVehicleModelNameById(i)!="Enforcer" and isTargetInAnyVehiclebyIdMod(i)=="1")
            {
            s:=s+1
            id[s] := i
            model[s]:=getTargetVehicleModelNameById(i)
            name[s]:=getPlayerNameById(i)
            MainMenu:= MainMenu "Водитель - " name[s] ", Марка машины -" model[s] ", Введите " s ".`n"
            }
         }
      MainMenu:= MainMenu "Для отмены операции введите 0."
      if (s==0)
         NumberPre:="0"
      if (s==1)
         {
         IdInCar:=id[1]
         ModelCar:=getTargetVehicleModelNameById(IdInCar)
         Random rand, 1, 4
         if (rand==1)
            {
            SendChat("/m Водитель " ModelCar "!")
            sleep 1200
            SendChat("/m Немедленно прижмитесь к обочине и остановитесь или откроем огонь!")
            }
         if (rand==2)
            {
            SendChat("/m Водитель " ModelCar " прижмитесь к обочине")
            sleep 1200
            SendChat("/m В противном случае нам придется открыть огонь!")
            }
         if (rand==3)
            {
            SendChat("/m Водитель " ModelCar " сбавьте скорость!")
            sleep 1200
            SendChat("/m Вам придется прижаться к обочине и остановится или начнем стрелять!")
            }
         if (rand==4)
            {
            SendChat("/m Водитель " ModelCar " остановитесь на обочине")
            sleep 1200
            SendChat("/m Или нам придется открыть по вам огонь!")
            }
         }
      if (s>1)
         {
         ShowDialog("1", "Выбор машины:", MainMenu, "Сообщить")
         Input,vi, V, {Enter}
         if (vi>=1 and vi<=s)
            {
            IdInCar:=id[vi]
            ModelCar:=getTargetVehicleModelNameById(IdInCar)
            Random rand, 1, 4
            if (rand==1)
               {
               SendChat("/m Водитель " ModelCar "!")
               sleep 1200
               SendChat("/m Немедленно прижмитесь к обочине и остановитесь или откроем огонь!")
               }
            if (rand==2)
               {
               SendChat("/m Водитель " ModelCar " прижмитесь к обочине")
               sleep 1200
               SendChat("/m В противном случае нам придется открыть огонь!")
               }
            if (rand==3)
               {
               SendChat("/m Водитель " ModelCar " сбавьте скорость!")
               sleep 1200
               SendChat("/m Вам придется прижаться к обочине и остановится или начнем стрелять!")
               }
            if (rand==4)
               {
               SendChat("/m Водитель " ModelCar " остановитесь на обочине")
               sleep 1200
               SendChat("/m Или нам придется открыть по вам огонь!")
               }
            }
         else
            NumberPre:="0"
         }
      }
   }
return