myDC.ru

Здравствуйте, гость ( Вход | Регистрация )

 
 
Ответить в данную темуНачать новую тему

> Помогите переделать, Помогите переделать

Теги
Нет тегов для показа
Mr. DoKeP
сообщение 23.6.2012, 16:23
Сообщение #1


Абсолютный новичок


Группа: Пользователи
Сообщений: 4
Регистрация: 6.4.2012
Пользователь №: 10 467
Спасибо сказали: 0 раз




итак есть скрипт

CODE
--[[

Версия для LUA 5.0.2 / 5.1.1 by NRJ

Сконвертировано под Lua 5.1.3 неизвестно кем big_smile.gif Конвертер, отзовись ;)

Таблица trigs взята из одноименного скрипта перевода romiros'a
Поддержка русских букв взята из NOYELL script от NoNick'a

]]--

BotName = "®PlayGamer®" -- имя бота
BotDesc = "Говорящий бот " -- описание бота
BotEmail = "" -- email бота

------------------------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------------------------

-- Таблица ников-исключений,чьи фразы бот не будет комментировоть (примеры ниже)
TableName = {
}

------------------------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------------------------

trigs = {

["ИГРЫ"]={
"magnet:?xt=urn:tree:tiger:K7WCLT4GNMTWIJRRPOHX6UUQWY7F7R665TKKDKQ&xl=4575897600&dn=THE_WITCHER_GOLD%5BPlayGamer%C2%AE%5D.iso , \n"..
"magnet:?xt=urn:tree:tiger:QI3BS2VYBVH3K5PW4W3FVRMXVF5OH6L3SEVJ57I&xl=4549869568&dn=Resident_Evil_5%5BPlayGamer%C2%AE%5D.iso , \n"..
"magnet:?xt=urn:tree:tiger:WRPYJDTT654SPKVWJ5LLKABQRWKICZSSC5U6ZWQ&xl=4422074368&dn=Ghostbusters%5BPlayGamer%C2%AE%5D.iso , \n"..
"magnet:?xt=urn:tree:tiger:CR2FJBPXC4IHDURMXECZSD5Q7ANQN5AMODLPO6Y&xl=5786959872&dn=Assasins+Creed+2%5BPlayGamer%C2%AE%5D.iso , \n"..
"magnet:?xt=urn:tree:tiger:ATELDYFFIW35XPLNRXNM74ZFQMOD3FHBV5JECPI&xl=3205994496&dn=Burnout+Paradise%5BPlaygamer%C2%AE%5D.iso , \n"..
"magnet:?xt=urn:tree:tiger:WERRPQVIR3SQCUQISEILCPCXTPNAEANNZSIVDFQ&xl=5856057896&dn=Test+Drive+Unlimited+2%5BPlayGamer%C2%AE%5D.rar , \n"..
"magnet:?xt=urn:tree:tiger:I7LTXN2MZHESH7LO4AKMZ5CBB5F6ND5FH5GXMGA&xl=8229953536&dn=Call+of+Duty+-+5+World+at+War+%5BPlayGamer%C2%AE%5D.iso .",
},

["АДРЕСА"]={
"\nАдреса наших ресурсов \nЭрлайн --10.101.32.85 \nСум-Тел -- 10.5.49.216 ",
},

["ТИМСПИК"]={
"Эрлайн --10.101.32.85 , Сум-Тел -- 10.5.49.216 ",
},

["ПОРТАЛ"]={
"Эрлайн --http://10.101.32.85 , Сум-Тел -- http://10.5.49.216",
},

["ФОРУМ"]={
"Эрлайн --http://10.101.32.85/forum , Сум-Тел -- http://10.5.49.216/forum",
},

["КОННЕКТ"]={
"\n"..
"Наши сервера: \n"..
"Counter-Strike 1.6 Public Эрлайн -10.101.32.85 Сум-Тел 10.5.49.216 , \n"..
"Counter-Strike 1.6 CSDM Эрлайн-10.101.32.85:1 Сум-Тел-10.5.49.216:1 , \n"..
"Team Speak Эрлайн-10.101.32.85 Сум-Тел-10.5.49.216 , \n"..
"Call Of Duty 4 Эрлайн-10.101.32.85 Сум-Тел-10.5.49.216 ,\n"..
" GTA-Samp Эрлайн-10.101.32.85:7777 Сум-Тел-10.5.49.216:7777 , \n"..
"Battle.Net Эрлайн-10.101.32.85 Сум-Тел-10.5.49.216 . ",
},
["ДРУЗЬЯ"]={
"\n"..
"GAMES.RU dchub://10.70.15.221 \n"..
"Общество Мусульман dchub://10.217.30.30 , \n"..
"Хаб *****T_A_K_B_I_R***** dchub://10.102.28.69 ",
},
["РЕКЛАМА"]={
"\n"..
"Наша реклама %D0%9C%D0%B5%D0%B3%D0%B0+%D1%80%D0%B5%D0%BA%D0%BB%D0%B0%D0%BC%D0%B0+PlayGamer.mp4" (27.81 мегабайт),
},
}
------------------------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------------------------

Rus={["А"]="а",["Б"]="б",["В"]="в",["Г"]="г",["Д"]="д",["Е"]="е",["Ё"]="ё",
["Ж"]="ж",["З"]="з",["И"]="и",["Й"]="й",["К"]="к",["Л"]="л",["М"]="м",
["Н"]="н",["О"]="о",["П"]="п",["Р"]="р",["С"]="с",["Т"]="т",["У"]="у",["Ф"]="ф",["Х"]="х",["Ц"]="ц",["Ч"]="ч",
["Ш"]="ш",["Щ"]="щ",["Ъ"]="ъ",["Ы"]="ы",["Ь"]="ь",["Э"]="э",["Ю"]="ю",["Я"]="я"}

function OnStartup()
if (_VERSION == "Lua 5.1.1") or (_VERSION == "Lua 5.1") then
TableMaxSize = table.maxn
elseif (_VERSION == "Lua 5.0.2") then
TableMaxSize = table.getn
end

Core.RegBot(BotName,BotDesc,BotEmail,true)
end

function ChatArrival(curUser,data)
Core.GetUserAllData(curUser)
if TableName[curUser.sNick] ~=1 then if string.sub(data, 1, 1) then
data=string.sub(data,1,string.len(data)-1)
s,e,cmd,RestOfText = string.find( data, "%b<>%s+(%S+)%s+(.*)" )
if RestOfText == nil then
RestOfText = ""
s,e,cmd = string.find( data, "%b<>%s+(%S+)" )
end
end
s,e,mess = string.find(data, "^%b<>%s(.*)$")
for key in pairs(trigs) do
if mess then
for b,s in pairs(Rus) do
data=string.gsub(data , b, Rus[b])
if( string.find(data, key) ) then
answer, x = string.gsub(trigs[key][math.random(1,TableMaxSize(trigs[key]))], "%b[]", curUser.sNick)
Core.SendToAll("<"..curUser.sNick.."> "..cmd.." "..RestOfText)
Core.SendToAll("<"..curUser.sNick.."> ".. answer )
return true
end
end
if( string.find( string.lower(mess), key) ) then
answer, x = string.gsub(trigs[key][math.random(1,TableMaxSize(trigs[key]))], "%b[]", curUser.sNick)
Core.SendToAll("<"..curUser.sNick.."> "..cmd.." "..RestOfText)
Core.SendToAll("<"..curUser.sNick.."> ".. answer )
return true
end
end
end
end
end


нужно чтоб ответ на сообщение мог получить человек отправлявший его!!!
Go to the top of the page
+Quote Post
ShadoWx
сообщение 23.6.2012, 17:32
Сообщение #2


Освоившийся участник
*****

Группа: Пользователи
Сообщений: 216
Регистрация: 23.10.2008
Из: Саратов
Пользователь №: 865
Спасибо сказали: 59 раз




Цитата
Core.SendToAll("<"..curUser.sNick.."> ".. answer )


на

Цитата
Core.SendToUser("<"..curUser.sNick.."> ".. answer )


заменить там где это необходимо...
Go to the top of the page
+Quote Post
warhammer
сообщение 23.6.2012, 20:05
Сообщение #3


Начинающий
*

Группа: Пользователи
Сообщений: 13
Регистрация: 12.4.2011
Из: VAViLON
Пользователь №: 9 126
Спасибо сказали: 8 раз




А интересно придумано меню сделать в главный чат с этого бота. про бывал только плохо команды пользователя и ответы видны в главном Чате минус засоряет Главный Чат , ЕСЛИ ТАКОЙ СКРИПТ СУЩЕСТВУЕТ МЕНЮ В ГЛАВНЫЙ ЧАТ СКИНЬТЕ ССЫЛКУ surrender.gif
Go to the top of the page
+Quote Post
Ksan
сообщение 24.6.2012, 7:08
Сообщение #4


Белый Волк
*********

Группа: Пользователи
Сообщений: 1 715
Регистрация: 11.9.2008
Из: г.Томск
Пользователь №: 516
Спасибо сказали: 648 раз




Цитата(ShadoWx @ 23.6.2012, 21:32) *
на

Core.SendToUser("<"..curUser.sNick.."> ".. answer )

заменить там где это необходимо...

Неправильный совет.
Правильно так:
Код
Core.SendToUser(curUser.sNick, answer)
Go to the top of the page
+Quote Post
Mr. DoKeP
сообщение 24.6.2012, 9:23
Сообщение #5


Абсолютный новичок


Группа: Пользователи
Сообщений: 4
Регистрация: 6.4.2012
Пользователь №: 10 467
Спасибо сказали: 0 раз




Цитата(ShadoWx @ 23.6.2012, 18:32) *
на



заменить там где это необходимо...


Пробовал не получается. Если не трудно скопируй и сам посмотри я думаю у тебя сразу получиться сделать

Цитата(Ksan @ 24.6.2012, 8:08) *
Неправильный совет.
Правильно так:
Код
Core.SendToUser(curUser.sNick, answer)


Твой совет не помог
Go to the top of the page
+Quote Post
Ksan
сообщение 24.6.2012, 10:47
Сообщение #6


Белый Волк
*********

Группа: Пользователи
Сообщений: 1 715
Регистрация: 11.9.2008
Из: г.Томск
Пользователь №: 516
Спасибо сказали: 648 раз




Цитата
Твой совет не помог
Я не советовал, я только поправил предлагаемый предыдущим товарищем код.
Go to the top of the page
+Quote Post
ShadoWx
сообщение 24.6.2012, 14:31
Сообщение #7


Освоившийся участник
*****

Группа: Пользователи
Сообщений: 216
Регистрация: 23.10.2008
Из: Саратов
Пользователь №: 865
Спасибо сказали: 59 раз




ну по сути там просто поменять функцию ;)
Go to the top of the page
+Quote Post
Mr. DoKeP
сообщение 25.6.2012, 7:09
Сообщение #8


Абсолютный новичок


Группа: Пользователи
Сообщений: 4
Регистрация: 6.4.2012
Пользователь №: 10 467
Спасибо сказали: 0 раз




Но все таки помогите чтоб работало
Go to the top of the page
+Quote Post
warhammer
сообщение 26.6.2012, 13:53
Сообщение #9


Начинающий
*

Группа: Пользователи
Сообщений: 13
Регистрация: 12.4.2011
Из: VAViLON
Пользователь №: 9 126
Спасибо сказали: 8 раз




Помогите же этому хлопцу choler.gif
Go to the top of the page
+Quote Post
Alexey
сообщение 26.6.2012, 18:16
Сообщение #10


7 квадратиков
*******

Группа: Модераторы
Сообщений: 792
Регистрация: 21.1.2009
Пользователь №: 1 895
Спасибо сказали: 299 раз




Цитата(Ksan @ 24.6.2012, 7:08) *
Неправильный совет.
Правильно так:
Код
Core.SendToUser(curUser.sNick, answer)


Неправильный совет.
Правильно так:
Код
Core.SendToUser(curUser, answer)


Спасибо сказали:
Go to the top of the page
+Quote Post
Mr. DoKeP
сообщение 26.6.2012, 19:42
Сообщение #11


Абсолютный новичок


Группа: Пользователи
Сообщений: 4
Регистрация: 6.4.2012
Пользователь №: 10 467
Спасибо сказали: 0 раз




Цитата(Alexey @ 26.6.2012, 19:16) *
Неправильный совет.
Правильно так:
Код
Core.SendToUser(curUser, answer)


Спасибо очень помогло
Go to the top of the page
+Quote Post
Ksan
сообщение 27.6.2012, 7:14
Сообщение #12


Белый Волк
*********

Группа: Пользователи
Сообщений: 1 715
Регистрация: 11.9.2008
Из: г.Томск
Пользователь №: 516
Спасибо сказали: 648 раз




Ага. Забыл, что там не ник, а User. big_smile.gif
Go to the top of the page
+Quote Post

Ответить в данную темуНачать новую тему
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

Collapse

> Похожие темы

  Тема Ответов Автор Просмотров Последнее сообщение
No New Posts Помогите собрать пакет хаб софта для прошивки роутера OpenWRT (РЕШЕНО)
ptokax и opendchub
2 мамин_парень 1 176 5.5.2017, 5:21 Посл. сообщение: мамин_парень
No new ПОМОГИТЕ
Как дать определенному нику права администратора в любом скрипте ?
25 probest 7 551 18.1.2015, 1:17 Посл. сообщение: probest
No New Posts От: ПОМОГИТЕ
От темы с ID: 5730
0 dimetro 1 526 17.1.2015, 23:57 Посл. сообщение: dimetro
No New Posts Topic has attachmentsпеределать скрипт kinozal.tv
6 BOKOREZ 5 635 30.10.2014, 18:29 Посл. сообщение: Dani_Filth
No New Posts Topic has attachmentsПомогите !
3 Dani_Filth 2 518 4.10.2014, 14:52 Посл. сообщение: Артём
No New Posts Topic has attachmentsПомогите Новичку разобрать со скрипами.
НЕ могу понять,после того как загрузил скрипт,его ещё надо настраивать
2 Prizrak333 2 415 27.4.2014, 10:53 Посл. сообщение: Prizrak333
No New Posts помогите мне пожалуйста настроить dc++
1 sdncn 2 629 29.9.2013, 9:37 Посл. сообщение: Delia
No new Помогите с Хабом!
26 cpr 15 980 7.2.2013, 17:20 Посл. сообщение: DEN 007
No New Posts Помогите разобрать ситуацию с хабом, создал хаб на птокеX 0.5.0.0
Помогите разобрать ситуацию с хабом
12 mambob 5 904 30.1.2013, 0:03 Посл. сообщение: Yamakasi
No New Posts Помогите наполнить Юзерами свежий хаб Help
Help me please
1 mambob 1 883 20.1.2013, 3:42 Посл. сообщение: Артём
No New Posts помогите с ip_zone4_min
2 ruslanlee 3 287 9.1.2013, 20:43 Посл. сообщение: ruslanlee
No New Posts Помогите со скриптом! Плачу!
help
2 jekasumy 2 476 19.10.2012, 23:10 Посл. сообщение: jekasumy
No New Posts От: помогите переделать скрипт для Ptokax
От темы с ID: 5237
0 Infern0_05 2 741 14.9.2012, 15:46 Посл. сообщение: Infern0_05
No New Posts Помогите выбрать скрипт
RSS читалка
0 dj hoodo 2 647 9.9.2012, 4:27 Посл. сообщение: dj hoodo
No New Posts помогите мне народ!
1
3 _Герой_ 3 629 6.7.2012, 13:44 Посл. сообщение: KCAHDEP

 



RSS Сейчас: 25.6.2018, 20:20