[Помощь]Автоответчик ARP - Форум - Cheat-Master.Ru | Читерский Форум | Читы для SAMP,CS,Minecraft,CoD,Warface | Продажа аккаунтов SAMP,WoT,Steam,Origin,Warface | Баги,статьи SAMP-RP,Advance-RP,Diamond-RP | Магазин аккаунтов SAMP-RP,Advance-RP,Diamond-RP,Steam,WoT,Warface

Страница 1 из 11
Модератор форума: Radiance, karabawka, tumkin 
Форум » Программирование » AHK Программирование » [Помощь]Автоответчик ARP
[Помощь]Автоответчик ARP
Gyfall004Дата: Суббота, 22.10.2016, 00:16 | Сообщение # 1
Боец
Группа: Пользователи
Сообщений: 148
Статус: Offline
Войдите на сайт или зарегистрируйтесь для просмотра полного содержимого темы.

Помогите сделать автооответчик по слову(Несколько)
На пример Пишут Когда призыв и сразу ответ на номер телефона
Ccылки
Найти еще что-нибудь в магазине:
QuiсkДата: Суббота, 22.10.2016, 13:59 | Сообщение # 2
Боец
Группа: Пользователи
Сообщений: 65
Статус: Offline
Войдите на сайт или зарегистрируйтесь для просмотра полного содержимого темы.

Через чтение последней строки или чатлога и RegExMatch вроде можно реализовать.

<> <> <> <> <> <> <> <> <> <> <> <> <> <> Помог? - поддержи репкой :3 <> <> <> <> <> <> <> <> <> <> <> <> <> <>
http://cheat-master.ru/forum/208-645733-1 - ЛОВЛЯ БИЗНЕСОВ AZRP
http://cheat-master.ru/forum/159-676319-1 - СКРИПТ ДЛЯ ИНВОКЕРА!
<> <> <> <> <> <> <> <> <> <> <> <> <> <> <> <> <> <> <> <> <> <> <> <> <> <> <> <><> <> <> <> <> <> <> <> <> <>
Ccылки
Найти еще что-нибудь в магазине:
DemchogДата: Суббота, 22.10.2016, 15:00 | Сообщение # 3
Любитель
Группа: Пользователи
Сообщений: 34
Статус: Offline
Войдите на сайт или зарегистрируйтесь для просмотра полного содержимого темы.

Vitalyandr, без регулярки вполне можно!
Ccылки
Найти еще что-нибудь в магазине:
MrGProДата: Суббота, 22.10.2016, 19:19 | Сообщение # 4
Боец
Группа: Пользователи
Сообщений: 117
Статус: Offline
Войдите на сайт или зарегистрируйтесь для просмотра полного содержимого темы.

Тут типо читаем/создаём массив с файла
Код

global DirectWords = "C:\Users\Dell\Desktop\x.txt"
global DirectChat = "C:\GTA San Andreas User Files\SAMP\chatlog.txt" ; Лично у меня генерируеться на диске C
;~ global DirectChat = % A_MyDocuments "\GTA San Andreas User Files\SAMP\chatlog.txt" ; Стандартный путь для всех (Мои Документы)

IfNotExist, %A_ScriptDir%\Words.txt
{
if (GenWordsFile())
MsgBox, Базовый файл - сгенерирован
}

Words := Object()
Loop, Read, % DirectWords
{
Words.Insert(A_LoopReadLine)
}
GenWordsFile() ; генерация базового файла
{
GenWords=<br / <img src="/.s/sm/2/angry.gif" border="0" align="absmiddle" alt="angry" />
Когда призыв
)
FileDelete, %A_ScriptDir%\Words.txt
FileAppend, %GenWords%, %A_ScriptDir%\Words.txt, UTF-8
return True
}


Ищем по чат-логу
Код

Loop
{
chatline := GetNewLine(DirectChat) ; Пока размер файла не измениться ничего не делаем
if (RegExMatch(chatline, "^\[\d{2}:\d{2}:\d{2}\] (\w+)\[(\d{1,3})\] говорит: (.*)", mKey))
{
for index, fword in Words
{
if (InStr(mKey3, fword))
{
MsgBox, %fword% " - найден "
SendChat("/ans " match2 " Администрация желает вам приятной игры! ")
}
}
}
}

GetNewLine(filename) ; Минус данной функции в том что она зациклина на изменение размера файла // Иные функции нужно запускать через таймер
{
   static old
   static new
   if !old
   {
      FileGetSize, old, %filename%
      new := old
   }
   while old = new
   {
      sleep 500
      FileGetSize, new, %filename%
   }
   old := new
   Loop, read, %filename%
      if A_LoopReadLine
         last := A_LoopReadLine
   return last
}


Тебе помогли не забывай про благодарность >> тыкни репутацию
--------------------------------------------------------------------------------------------


Сообщение отредактировал MrGPro - Суббота, 22.10.2016, 19:21
Ccылки
Найти еще что-нибудь в магазине:
QuiсkДата: Суббота, 29.10.2016, 09:06 | Сообщение # 5
Боец
Группа: Пользователи
Сообщений: 65
Статус: Offline
Войдите на сайт или зарегистрируйтесь для просмотра полного содержимого темы.

Demchog, тут на выбор и удобство каждого. Я лишь пару своих задумок описал.

<> <> <> <> <> <> <> <> <> <> <> <> <> <> Помог? - поддержи репкой :3 <> <> <> <> <> <> <> <> <> <> <> <> <> <>
http://cheat-master.ru/forum/208-645733-1 - ЛОВЛЯ БИЗНЕСОВ AZRP
http://cheat-master.ru/forum/159-676319-1 - СКРИПТ ДЛЯ ИНВОКЕРА!
<> <> <> <> <> <> <> <> <> <> <> <> <> <> <> <> <> <> <> <> <> <> <> <> <> <> <> <><> <> <> <> <> <> <> <> <> <>
Ccылки
Найти еще что-нибудь в магазине:
Форум » Программирование » AHK Программирование » [Помощь]Автоответчик ARP
Страница 1 из 11
Поиск:
Статистика Форума
Последнии темы Читаемые темы Лучшие пользователи Новые пользователи
Скрипт на казино рулетка [lolic]

[SVL] VL-DGUN [Чуня]

[DRP-S]История игры на вс... [Erik_Vok21]

не валид CM_Xrom [Glory]

1566586,klikklaks, не вал... [Sayat55555]

[Arizona-RP] История Дард... [atreretrov]

Скупаю аккаунты с CS:GO /... [[CM]Wildman]

Заявки на снятие замечани... [atreretrov]

Подача заявок на "Чи... [atreretrov]

[AIM] По скину для SAMP R... [KarlosFaber666]

[1]>S0beit - pr9n project for samp 0.3.7 [9446]

[2]>RakBot 0.6.6 - прокачка аккаунтов без GTA [9179]

[3]>Часто задаваемые вопросы... [8119]

[4]>Успей купить. 1кк 300р! [7554]

[5]>Вопросы и ответы [6246]

[6]>[0.3.7][RUS] Sobeit modified by MishaN [6146]

[7]>Продажа вирт 1кк АРП~400р ДРП~400р.СРП~150р. [5959]

[8]>SAMP-Bot 0.5.9 by Jamely [4649]

[9]>Бесконечное слово [4545]

[10]>[Samp-Rp.Ru]Обновлен список Админов (27.01.2016) [4117]

[11]>[CLEO] Вопрос - Ответ [4038]

[12]>Курилка [3147]

[1]>АК_47 [22978]

[2]>GеNius [6384]

[3]>romka619 [5375]

[4]>[CM]AGRESSOR [4588]

[5]>baffometi [4422]

[6]>Snake_Firm [4134]

[7]>[CM]Russel [4126]

[8]>Artem_Buero [3962]

[9]>sky_Woker [3030]

[10]>[CM]Durman [2923]

[11]>iMaddy [2853]

[12]>Sa1nteD [2615]

[13]>zetkolya [2529]

[14]>Logan™ [2499]

[15]>Ch0c0Cube [2407]

Sergei27 [20.02.2017|07:02]

Dima214 [20.02.2017|07:01]

Dippero [20.02.2017|05:44]

arkasha2009877 [20.02.2017|05:24]

Pidoninho [20.02.2017|05:00]

TheWhiteDwarf [20.02.2017|04:25]

ghlaal222 [20.02.2017|04:22]

DavidMorelli [20.02.2017|03:52]

tr1cky [20.02.2017|03:22]

Capitan123 [20.02.2017|02:59]

lyna_cheater [20.02.2017|02:49]

Kaha7001 [20.02.2017|02:40]

javier23mq [20.02.2017|02:25]

MRErste [20.02.2017|02:24]

Dominion12 [20.02.2017|02:01]


CM Team © 2009-2017 Администрация не несёт ответственности за размещённые материалы. Условия пользования
Все материалы предоставлены в ознакомительных целях и администрация предлагает удалить их после ознакомления.

Положение о защите персональных данных на сайте, Пользовательское соглашение, Договор оказания услуг.