Pomoc - Szukaj - Użytkownicy - Kalendarz
Pełna wersja: K.Bot - /brb command (bot.lua)
Konnekt | Forum > Inne > Archiwum > Wtyczki > K.bot
Peper
Pomyślałem sobie, że fajnie by było, żeby /brb zmieniało też opis ;] Jak pomyślałem tak zrobiłem.
Wystarczy dodać jedną linijkę do komendy /brb.
CODE
     KStatusSet(KCntInfo(cntID, "net"), KStatusNum("away"), "tutaj wpisz opis")  


Dla jasności nowy kod /brb wygląda tak:

CODE

elseif command == "brb" then
   local contacts = {}
   KCntListOpen(-1, contacts)  -- numery uid otwartych okien
   for var, val in contacts do
     KSend(contacts[var], "tutaj wpisz wysyłaną wiadomość")
     KInform(contacts[var], "- Konnekt Bot - Wysłałem do "..KCntInfo(contacts[var], "display").." ("..KCntGetUID(contacts[var])..") wiadomosc: zaraz wracam...")
    KStatusSet(KCntInfo(cntID, "net"), KStatusNum("away"), "tutaj wpisz opis")
   end

KStatusNum("xxx") może przyjmować wartości:
online - dostępny
away - zaraz wracam
hidden - ukryty
offline - niedostępny
Matzec
A w tej wersji opis można podać jako parametr (np. /brb "jem obiad" - w cudzysłowie, jeżeli jest więcej niż jedno słowo), a jeżeli się go nie poda, opis będzie "brb" (lub inny, do ustawienia w skrypcie...)
CODE
 elseif command == "brb" then
   brbopis = params[1]
   local contacts = {}
   KCntListOpen(-1, contacts)  -- numery uid otwartych okien
   for var, val in contacts do
     KSend(contacts[var], "zaraz wracam...")
     KInform(contacts[var], "- Konnekt Bot - Wysłałem do "..KCntInfo(contacts[var], "display").." ("..KCntGetUID(contacts[var])..") wiadomosc: zaraz wracam...")
   end
   if brbopis ~= nil then
    KStatusSet(KCntInfo(cntID, "net"), KStatusNum("away"), brbopis)
   else
    KStatusSet(KCntInfo(cntID, "net"), KStatusNum("away"), "brb")
   end
   return true
Sija
a od czego jest skrypt away ? ;]
Matzec
Jakoś ten skrypt przeoczyłem, ściągnę go później...
To jest wersja lo-fi głównej zawartości. Aby zobaczyć pełną wersję z większą zawartością, obrazkami i formatowaniem proszę kliknij tutaj.
Invision Power Board © 2001-2012 Invision Power Services, Inc.