egghelp/eggheads community

game_over

Hello to everyone! I have problem with isvoice command on kick! Here simple example: bind pub - !v v:pub proc v:pub {nick uhost hand chan text} { puts "[isvoice $nick $chan]" } -> !v <- 1 kick -> !v <- 0 When i get voice and bot is in the channel code returns 1 but when i kick him and he r...

game_over

And why not call your procedure again. I mean proc somename {args} { .... ::http::register https 443 ::tls::socket if {![catch {set http_handle [http::geturl $the_url -binary 1 -timeout $::check(timeout)]} error]} { set http_status [http::status $http_handle] if {$http_status == "ok"} { if...

game_over

try

Code: Select all

set PokeText [string map "\$nick {$nick} \$dest {$dest} \$botnick {$::botnick}" $PokeText]

game_over

long way proc reply {nick} { set crazybib " {$nick are the real crazy} {lol $nick} " return [lindex $crazybib [rand [llength $crazybib]]] } bind pubm - *$botnick?crazy* pub_crazy proc pub_crazy {nick uhost handle chan args} { global oldreplytime botnick set replytime [unixtime] if { $reply...

game_over

bind nick - * check:nick:bug proc check:nick:bug {nick uhost handle chan newnick} { global cversion if {[utimerexists [list no:version:reply $nick $uhost $chan]]!=""} { set sd [utimers]; set begin [lsearch -regexp $sd "$nick"] utimer [lindex [lindex $sd $begin] 0] [list no:versi...

game_over

Code: Select all

set ::the_chan "#fr3ddy"

game_over

make all users to join one channel when login and bind join on bot on this channel.

join bind returns hosts

game_over

You can check mail but on servers whit pop3 but if the mail is in gmail.com for exaple you need TLS protocol. I am working on this project now. SSL conection on tcl is real and posible. I have criptation algorithms RC4 and MD5 but i don't have time now for write final script. I have this idea in min...

game_over

proc test:del {file num criteria} { ;# criteria is must ot be "word2" set out [open $file r] set data [read $out] set line [split $data \n] close $out set out1 [open $file w] ;# $out i use diferent names to w nad r foreach delline $line { if {[lindex $delline 0] == "$criteria" &...

game_over

Code: Select all

 if {![isvoice $nick $tls_chan]} { putquick "PRIVMSG $tls_chan :You need voice to run game!"; return 0}

change same if who i say to change before

game_over

if write script whit any timers you wrong or make bugs. use uptime to bot like variable. See this to exaple: set time "" set counter 1 set floodnick "" pind pubm - * flood:pub proc flood:pub {nick uhost hand chan text} { global time counter floodnick if {[expr [clock seconds]-$::...

game_over

are you set

Code: Select all

set tls_chan "#game"

to your chan

this is last i can think like potential problem

- get the original code and then replase

- rehash your bot

game_over

hummm on my bot last work. Only if i have +v he listen me.

game_over

yes i wrong not

Code: Select all

if {![isvoice $nick $tls_chan]} { return }

this is tested

game_over

when i whant to delete line in file i use foreach see when you find line who starts for example thing1 you replase whit new and dont write again. firest you read txt split to lines "\n" and foreach line you set some if when if is false "== 0" you write old line when is true "...

egghelp/eggheads community

Search found 29 matches

isvoice on kick!