Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

MyDC.ru _ Kорзина _ Комманды И Текст

Автор: SlavaX 7.3.2009, 18:24

Я покачто нуб в этих делах, и буду очень признателен и благодарен, если поможете разобраться с одной вещью

Код
hubscmd = "!hubs"
hubsfile = "texts/hubs.txt"

OpConnected = NewUserConnected



function ChatArrival(curUser,data)
    local data = string.sub(data,1,-2)
    local s,e,cmd =string.find(data, "%b<>%s+(%S+)")

    if cmd == hubscmd then
dofile(hubsfile)
curUser:SendPMtonickloadtext(hubsfile)
end

curUser:SendData("$UserCommand 1 2 Ваше меню\\Внутрисетевые хабы$<%[mynick]> "..hubscmd.." %[nick]|")

end


Это я написал сам, тока вот где тут ошибка, не пойму.
Мне надо, что бы при команде !hubs вылазил текст, лежащий в директории ptokaXLoation scripts/text/

Помогите плиз ;-)

Автор: Setuper 7.3.2009, 18:34

Код
hubscmd = "!hubs"
hubsfile = "texts/hubs.txt"


function ChatArrival(curUser,data)
  local data = string.sub(data,1,-2)
  local s,e,cmd =string.find(data, "%b<>%s+(%S+)")

  if cmd == hubscmd then
    local h = io.open(frmHub:GetPtokaXLocation()..hubsfile)
    if h then
      curUser:SendPM("Bot", h:read"*a")
          h:flush()
          h:close()
    end
  end
end

function NewUserConnected(curUser)
  curUser:SendData("$UserCommand 1 2 Ваше меню\\Внутрисетевые хабы$<%[mynick]> "..hubscmd.." %[nick]&#*124;")
end

OpConnected = NewUserConnected

Автор: SlavaX 7.3.2009, 19:30

Ура... Скрипт заработал. В конечном итоге получилось вот что... Если кому-то надо, пользуйтесь)

Код
sBot = "Глывый бот хаба"

hubscmd = "!hubs"
hubsfile = "scripts/texts/hubs.txt"

sitecmd = "!sites"
sitesfile = "scripts/texts/sites.txt"


function ChatArrival(User,data)
  local data = string.sub(data,1,-2)
  local s,e,cmd =string.find(data, "%b<>%s+(%S+)")

  if cmd == hubscmd then
    local h = io.open(frmHub:GetPtokaXLocation()..hubsfile)
    if h then
      User:SendPM(""..sBot.."", h:read"*a")
          h:flush()
          h:close()
    end
    return 1
  end
if cmd == sitecmd then
    local h = io.open(frmHub:GetPtokaXLocation()..sitesfile)
    if h then
      User:SendPM(""..sBot.."", h:read"*a")
          h:flush()
          h:close()
    end
    return 1
  end
end

function NewUserConnected(User)
    User:SendData("$UserCommand 1 2 Ваше меню\\Внутрисетевые хабы$<%[mynick]> "..hubscmd.." %[nick]|")
    User:SendData("$UserCommand 1 2 Ваше меню\\Внутрисетевые сайты$<%[mynick]> "..sitecmd.." %[nick]|")
end

OpConnected = NewUserConnected


Делал сам, помог Setuper =) Ыыыы

Автор: THE STRELOK 7.3.2009, 19:42

А можно API2

Автор: Wariner 7.3.2009, 20:48

Не вижу смысла этого скрипта!!! Зачем он если есть в птоке есть функция вывода текстовых файлов?

Автор: SlavaX 11.3.2009, 20:09

А где эта функция?

Автор: Wariner 11.3.2009, 20:31

http://mydc.ru/topic1164s0.html?p=8573&#entry8573