versionbot:= "от 24.11.2015"

stringcasesense, locale

fileclog:=% a_mydocuments "\gta san andreas user files\samp\chatlog.txt"

gui, add, button, x10 y10 w100 h40 , exit

gui, add, button, x10 y60 w100 h40 , help
gui, add, button, x10 y100 w100 h40 , about

gui, show, h160 w120, сдача устава для Diamond rp %versionbot%

^0::

loop
{

lastline2 := getnewline(fileclog)

if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*1[[\.\s-]1[\d\s]")
string:= "военнослужащий обязан исполнять обязанности, указанные в уставе министерства обороны и чтить правила военнослужащего, указанных в уставе министерства обороны."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*1[\.\s-]2[\d\s]")
string:= "военнослужащий обязан добросовестно нести службу."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*1[\.\s-]3[\d\s]")
string:= "военнослужащий обязан защищать военную базу, других военнослужащих, гостей базы от незаконного вторжения на территорию базы или от нападения."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*1[\.\s-]4[\d\s]")
string:= "военнослужащий обязан находится на территории своей части."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*1[\.\s-]5[\d\s]")
string:= "каждый военнослужащий обязан подчинятся военнослужащему по званию выше. например, старшина подчиняется младшему лейтенанту, младший лейтенант подчиняется вице-адмиралу."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*1[\.\s-]6[\d\s]")
string:= "при уходе в отпуск запрещается вступать в нелегальные организации."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*1[\.\s-]7[\d\s]")
string:= "каждый военнослужащий обязан исполнять приказы, указанные в официальных документах, выпущенных министром обороны, министром внутренних дел, либо генералом,адмиралом,президентом."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*1[\.\s-]8[\d\s]")
string:= "запрещается посещать казино вне увольнительного времени."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*1[\.\s-]9[\d\s]")
string:= "бойцам запрещается спать на посту "
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*1[\.\s-]10[\d\s]")
string:= "за нарушение правил пользования тиром выдается выговор."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*1[\.\s-]11[\d\s]")
string:= "все бойцы не достигших звания лейтенант(св, ввс) ст. лейтенант(вмф) обязаны жить в казарме."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*1[\.\s-]12[\d\s]")
string:= "за употребление наркотических веществ выдается наказание."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*1[\.\s-]13[\d\s]")
string:= "всем военнослужащим запрещено состоять в байкерских клубах."

if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*2[\.\s-]1[\d\s]")
string:= "военнослужащий обязан исполнять любые приказы старшего по званию."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*2[\.\s-]2[\d\s]")
string:= "военнослужащий обязан обращаться к старшим строго по званию."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*2[\.\s-]3[\d\s]")
string:= "если военнослужащий не будет соблюдать правила субординации, он будет отчислен из рядов армии."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*2[\.\s-]4[\d\s]")
string:= "военнослужащий обязан проявлять уважение к старшим по званию. обращаться к старшим строго по уставному общению: по стойке смирно,здравия желаю,разрешите обратиться?"
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*2[\.\s-]5[\d\s]")
string:= "в армии строго обращаться к военнослужащим фразой: сэр,мэм."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*2[\.\s-]6[\d\s]")
string:= "в армии запрещено употре(МАТ) такие слова как: ку, да, нет и так далее. все эти слова должны автоматически заменяться на: здравия желаю, так точно, никак нет"
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*2[\.\s-]7[\d\s]")
string:= "военнослужащим запрещено использовать рацию армии и рацию мин. обороны не по назначению"

if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*3[\.\s-]1[\d\s]")
string:= "при команде: общее построение, строятся все военнослужащие."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*3[\.\s-]2[\d\s]")
string:= "при опоздании в строй, боец обязан произнести фразу: виноват. разрешите встать в строй?"
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*3[\.\s-]3[\d\s]")
string:= "строй офицеров должен быть отделён от строя бойцов младшего состава."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*3[\.\s-]4[\d\s]")
string:= "в строю запрещается: разговаривать, засыпать, использовать мобильные телефон, держать оружие в руках, смеяться, улыбаться, плакать, выполнять другие действия, разговаривать в любые чаты."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*3[\.\s-]5[\d\s]")
string:= "во время строя бойцы,офицеры должны выполнять всё приказания которым им даёт командующий строем"
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*3[\.\s-]6[\d\s]")
string:= "армию разрешается строить по приказу сотрудников фбр"
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*3[\.\s-]7[\d\s]")
string:= "общее построение разрешается делать со звания ст.лейтенант,и по приказу ст.состава со звания мл.лейтенант"
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*3[\.\s-]8[\d\s]")
string:= "прапорщик имеет право строить бойцовский состав"
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*3[\.\s-]9[\d\s]")
string:= "за обман министра обороны, генерала, адмирала, либо же офицеров выговор/увольнение."

if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*4[\.\s-]1[\d\s]")
string:= " при обнаружении гражданских лиц на территории военной базы, военнослужащий должен вывести его за территорию. в случае неподчинения, боец обязан дать отсчет на 10 секунд и в случае игнорирования приказа открыть огонь на поражение."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*4[\.\s-]2[\d\s]")
string:= "при обнаружении представителей банд на территории военной базы незамедлительно открывать огонь на поражение."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*4[\.\s-]3[\d\s]")
string:= "при обнаружении представителей государственных организаций на территории военной базы, военнослужащий обязан спросить цель прибытия, после чего доложить в рацию о постороннем, спросить разрешение на пропуск на территорию военной базы."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*4[\.\s-]4[\d\s]")
string:= "cотрудники swat и fbi имеют право круглосуточно находится на территории базы."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*4[\.\s-]5[\d\s]")
string:= "в том случае, если кто-либо подъехал к кпп, дежурный должен спросить о цели прибытия, но открывать огонь или давать отсчёт запрещается."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*4[\.\s-]6[\d\s]")
string:= "в случае подачи признаков агрессии (вооруженное или невооруженное), боец имеет право открыть огонь на поражение без отсчёта."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*4[\.\s-]7[\d\s]")
string:= "если военнослужащий не в военной форме ему запрещается находиться на базе во время действия комендантского часа."

if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*5[\.\s-]1[\d\s]")
string:= "базу разрешается покидать со звания полковник,вице-адмирал."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*5[\.\s-]2[\d\s]")
string:= "увольнительные можно брать бойцам со звания сержант,мичман."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*5[\.\s-]3[\d\s]")
string:= "увольнительное время действует с 22:00 до 08:00. в выходные дни с 20:00 до 10:00"
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*5[\.\s-]4[\d\s]")
string:= "запрещено использовать оружие в личных целях"
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*5[\.\s-]5[\d\s]")
string:= "бойцы звания рядовой,матрос и мл.сержант,старшина не имеют право отправляться в увольнительное"

if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*6[\.\s-]1[\d\s]")
string:= "при обнаружении на территории склада оружия представителей банд,мафий незамедлительно открыть огонь на поражение."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*6[\.\s-]2[\d\s]")
string:= "при обнаружении на территории склада оружия сотрудников сми, мз, или гражданских, обязан сопроводить их за территорию, а потом указать путь от закрытой зоны. в случае агрессии или отказа - огонь на поражение."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*6[\.\s-]3[\d\s]")
string:= "сотрудники swat и fbi имеют полное право находится на территории склада оружия."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*6[\.\s-]4[\d\s]")
string:= "военнослужащий на кпп обязан проверять документы у всех въезжающих на территорию склада оружия (со) лиц, не важно, гражданский это, военный или министр обороны."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*6[\.\s-]5[\d\s]")
string:= "каждый военнослужащий, въезжающий и выезжающий за пределы склада оружия, обязан закрывать за собой шлагбаум на кпп."

if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*7[\.\s-]1[\d\s]")
string:= "общее повышения проходят в установленное генералом.адмиралом время."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*7[\.\s-]2[\d\s]")
string:= "за выпрашивание воинских званий в любом виде боец получает выговор."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*7[\.\s-]3[\d\s]")
string:= "внеочередное повышение можно получить за ночное дежурство."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*7[\.\s-]4[\d\s]")
string:= "каждый генерал,адмирал обязан перед повышение принимать присягу у военнослужащих."

if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*8[\.\s-]1[\d\s]")
string:= "каждый офицер обязан оставлять заявление на отпуск, прежде чем уйти в него."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*8[\.\s-]2[\d\s]")
string:= "каждый боец, находящийся при исполнении, обязан докладывать в рацию о состоянии."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*8[\.\s-]3[\d\s]")
string:= "каждый генерал,адмирал обязан оставлять отчёт о проделанной работе раз в 2 дня."

if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*9[\.\s-]1[\d\s]")
string:= "норма бп для мл.сержантов - прапорщиков составляет 500 ед. и 500 патронов."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*9[\.\s-]2[\d\s]")
string:= "норма бп для офицеров составляет 1000 ед. и 1000 патронов. "
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*9[\.\s-]3[\d\s]")
string:= "норма бп для стажеров учебной части составляет 180 ед. и 100 патронов."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*9[\.\s-]4[\d\s]")
string:= "офицеры после прибытия конвоев,фур с со обязаны раздать норму бойцовскому составу и стажерам у.ч."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*9[\.\s-]5[\d\s]")
string:= "за нарушение правил пользования складом выдается выговор,увольнение."

if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*10[\.\s-]1[\d\s]")
string:= "военный транспорт разрешено брать с разрешения офицера."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*10[\.\s-]2[\d\s]")
string:= "запрещается оставлять военные фуры на cо."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*10[\.\s-]3[\d\s]")
string:= "военные фуры разрешается брать со звания мл.сержант,старшина."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*10[\.\s-]4[\d\s]")
string:= "военные хаммеры разрешается брать со звания сержант,мичман."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*10[\.\s-]5[\d\s]")
string:= "воздушную технику разрешается брать со звания младший лейтенант,лейтенант и бойцам спец.подразделений."

if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*11[\.\s-]1[\d\s]")
string:= " запрещено повторять одну информацию два и более раз."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*11[\.\s-]2[\d\s]")
string:= " рация создана для докладов, а так же для важного общения."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*11[\.\s-]3[\d\s]")
string:= " запрещен мат в рацию, а так же оскорбления."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*11[\.\s-]4[\d\s]")
string:= " рацию министерства доступна со звания сержант,мичман."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*11[\.\s-]5[\d\s]")
string:= " запрещено нести бред в рацию."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*11[\.\s-]6[\d\s]")
string:= "запрещается игнорировать рацию старших по званию, всегда носить с собой, несоблюдение выговор."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*11[\.\s-]7[\d\s]")
string:= " запрещено невнятно говорить. "
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*11[\.\s-]8[\d\s]")
string:= " запрещено устраивать конфликты по рации."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*11[\.\s-]9[\d\s]")
string:= " запрещено использовать рацию в личный целях"
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*11[\.\s-]10[\d\s]")
string:= " военнослужащий обязан уважительно относиться к другим."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*11[\.\s-]11[\d\s]")
string:= " запрещено пользоваться неисправной рацией, издавать частые помехи, выговор."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*11[\.\s-]12[\d\s]")
string:= " военнослужащий обязан соблюдать субординацию."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*11[\.\s-]13[\d\s]")
string:= " военнослужащим запрещено задавать вопросы из серии: проверьте отчет, вы проверили мой перевод и т.д"

if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*12[\.\s-]1[\d\s]")
string:= " к проверке призывников допускаются военнослужащие со звания прапорщика."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*12[\.\s-]2[\d\s]")
string:= " в военкомат категорически запрещено являться с оружием."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*12[\.\s-]3[\d\s]")
string:= " запрещено отрывать огонь и наносить ущерб кулаками гражданским."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*12[\.\s-]4[\d\s]")
string:= " запрещено допускать к службе не законопослушных призывников."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*12[\.\s-]5[\d\s]")
string:= " запрещено допускать к службе призывников, не ознакомленных с правилами штата."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*12[\.\s-]6[\d\s]")
string:= " призыв может проходить только в военкомате."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*12[\.\s-]7[\d\s]")
string:= " проводить призыв на базе, или на заднем дворе военкомата категорически запрещено."

if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*13[\.\s-]1[\d\s]")
string:= " во время отпуска нельзя быть в нелегальных организациях."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*13[\.\s-]2[\d\s]")
string:= " во время отпуска запрещено получать варны и баны."
if regexmatch( lastline2, "\[\d\d:\d\d:\d\d\] - .*13[\.\s-]3[\d\s]")
string:= " во время отпуска запрещено подниматься по карьерной лестницe "

if string
{
sleep 2000

varrep := regexmatch(string, "\s" , limitvar, 80)
stringleft, newstr1, string, %varrep%
stringreplace, newstr2, string, %newstr1%, , all

string2 := newstr2
varrep := regexmatch(string2, "\s" , limitvar, 80)
stringleft, newstr2, string2, %varrep%
stringreplace, newstr3, string2, %newstr2%, , all

if newstr1
{
sendinput {f6} %newstr1%{enter}
sleep 2000
}

if newstr2
{
sendinput {f6} %newstr2%{enter}
sleep 2000
}

if newstr3
sendinput {f6} %newstr3%{enter}

string:= ""
}
}

return

buttonexit:
exitapp
return

guiclose:
exitapp
return

buttonhelp:
msgbox, 48, , активация на cntrl + 0`nпосле совпадения пункта устава в чат выводится сообщение. ( длинная строка сама делится )
return

buttonabout:
msgbox, 48, , сдача устава для вояки diamond rp. `n`n`nдругие полезные скрипты для daemond rp:`nавтодокладчик для военного: http://cheat-master.ru/forum/192-527703`nмой анти адм бот: http://cheat-master.ru/forum/150-527469`nмой бот для врача: http://cheat-master.ru/forum/192-524963`nверсия %versionbot%`n by godarck
return

getnewline(filename)
{
static old
static new
if !old
{
filegetsize, old, %filename%
new := old
}
while old = new
{
sleep 100
filegetsize, new, %filename%
}
old := new
loop, read, %filename%
if a_loopreadline
{
last := a_loopreadline
}
return last
}