Code: Select all
PRIVMSG #686450 :/m evilloli a
Code: Select all
NOTICE #686450 :System: Uživatel(ka) evilloli není v žádné místnosti
Code: Select all
PRIVMSG #686450 :/m evilloli a
Code: Select all
NOTICE #686450 :System: Uživatel(ka) evilloli není v žádné místnosti
ja to prave potrebuju zistovat takhle pres irc jak sem napsal PRIVMSG #686450 :/m evilloli adwickie wrote:i suppose you speak czech:
dej primou adresu, kde se jak se zjisti, jestli je uzivatel online (http://chat.lide.cz/neco.php?nick=evilloli) nebo neco na ten zpusob. napsat script, kterej to z toho dostane je hracka
in english:
gimme full url adress where to check if user is online or offline
Code: Select all
/m evilloli a
Code: Select all
/m evilloli a
Code: Select all
NOTICE #686450 :System: Uživatel(ka) evilloli není v žádné místnosti
Code: Select all
# v kazdych xx:00 a xx:30 provede proceduru "checker"
bind time - "00,30 * * * *" checker
bind notc - * notcchecker
proc notcchecker {nick host handle text dest} {
putlog "checking notice: $text"
# pokud prvni slovo z notice je "System:" (nejde cela,
# ma to asi problemy s diakritikou"), tak nastavi ::replied na 1
if { [lindex [split $text] 0] == "System:" } {
set ::replied 1
}
}
proc checker { min hour day month year } {
set ::replied 0
# posle msg na kanal
putquick "PRIVMSG #686450 :/m evilloli a"
# a nastavi minutu timer, pokud ::replied bude 0, jumpne servery
utimer 60 [list if {$::replied == "0"} {putlog "jumping servers";jump}]
}
putlog "script loaded"
no kazdych 30 minut to posila to "/m evilloli a" tak jestli chces aby to posilalo tohle a tecku za tim, tak zaLolita wrote:no zadnou chybu to nepsalo zatim, tak doufam ze to teda bude fungovat
btw moh bys este udelat at to na ten kanal posle kazdych 30 minut "." - no proste tecku?
Code: Select all
putquick "PRIVMSG #686450 :/m evilloli a"
Code: Select all
proc checker { min hour day month year } {
set ::replied 0
# posle msg na kanal
putquick "PRIVMSG #686450 :/m evilloli a"
putquick "PRIVMSG #686450 :."
# a nastavi minutu timer, pokud ::replied bude 0, jumpne servery
utimer 60 [list if {$::replied == "0"} {putlog "jumping servers";jump}]
}