#IfWinActive GTA:SA:MP

global Nachalo := false    ; Скрипт делится на две части: объявление в общий чат (/o) и телепортация игроков
global KolvoStrok:=0       ; Все кто писал + в смс до объявления в /o не будут учитываться.

numpad5::
Nachalo := not Nachalo     
File = %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt ; Путь к чатлогу
if Nachalo
   {
   KolvoStrok:=0
   sendinput, {F6}/o Желающие попасть на МП, напишите + в смс.{enter} ; Само сообщение в /o чат
   Loop, Read, %File%
      KolvoStrok:=KolvoStrok+1
   }
else
   {
   pamyat:=[]
   kolvoIgrokov:=0
   Schetchik:=0
   Dubl:=0
   Loop, Read, %File%
      {
      Schetchik:=Schetchik+1
      if (Schetchik>Kolvostrok and RegExMatch(A_LoopReadLine, "\[..:..:..\]\s\sSMS:\s+\.\sОтправитель:\s[A-Za-z_0-9]*?\[(\d+)\]", id)) ; маска смс
         {
         SchetchikIgrokov:=1
         while SchetchikIgrokov<=s ; проверка на наличие дублей (Чтобы одного и того же игрока по 5 раз не тпшило)
            {
            if (pamyat[SchetchikIgrokov]==id1)
               Dubl:=1
            SchetchikIgrokov:=SchetchikIgrokov+1
            }
         if (Dubl!=1)
            {
            kolvoIgrokov:=kolvoIgrokov+1
            pamyat[kolvoIgrokov]:=id1
            sendinput, {F6}/tp %id1%{enter} 
            sleep 1200
            }
         else
            Dubl:=0
         }
      }
   }