egghelp/eggheads community

Re: Ping error ?

2024-11-23T19:21:44-04:00

thank you everyone in advance

Statistics: Posted by pektek — Sat Nov 23, 2024 7:21 pm

Re: Ping error ?

2024-05-09T01:26:58-04:00

Restarted the bot last night, after 8hrs of sleep. I tried it and it is working perfect. You are right Crzy.
Pektek, now you're script is working properly.

Statistics: Posted by aslpls — Thu May 09, 2024 1:26 am

Re: Ping error ?

2024-05-08T18:16:57-04:00

Check if you don't have 2 binds ctcr loaded (multiple loading of script without restarting it ?)
When I tested it, I only got one response from the eggdrop. And as your ping aren't the same, I suspect it's due to a side-effect in your eggdrop (restart could be a good idea) or the network you're on, or anything else but not related to the script itself.

Statistics: Posted by CrazyCat — Wed May 08, 2024 6:16 pm

Re: Ping error ?

2024-05-08T13:03:42-04:00

it is working with the updated code from Crzy..

the output is

Code:

 aslpls ping süreniz 2.177 saniye. aslpls ping süreniz 2.321 saniye.

2 ping results in the channel. how can we remove the second ping output? it is redundant to have two output when you
type !ping in the channel.

Statistics: Posted by aslpls — Wed May 08, 2024 1:03 pm

Re: Ping error ?

2024-05-08T07:09:52-04:00

This is because if you don't put any argument when doing !ping, you use the nick of the person without lowercase it: script script

if {[lindex $arg 0] == ""} { set nick $nick }

script Correct that with: script script

if {[lindex $arg 0] == ""} { set nick [string tolower $nick] }

script

Statistics: Posted by CrazyCat — Wed May 08, 2024 7:09 am

Ping error ?

2024-05-07T19:51:30-04:00

I ran tcl for myself but I got an error

!ping

[02:48:07] Tcl error [ping_cevabi]: can't read "ping_suresi(cengiz)": no such element in array

Code:

set ping_bklm_srsi 15000set ping_kanal "#Sohbet" bind pub - !ping pingbind ctcr - PING ping_cevabiproc ping {nick uhost handle chan arg} {    global botnick ping_suresi ping_kanal ping_bklm_srsi    if {[lindex $arg 0] == ""} { set nick $nick }    if {[lindex $arg 0] != ""} { set nick [string tolower [lindex $arg 0]] }    set ms [clock clicks -milliseconds]    if {[info exists ping_suresi($nick)]} {if {[expr $ms - $ping_suresi($nick)] < $ping_bklm_srsi} {    putserv "NOTICE $nick :Henüz bir ping istediniz, lütfen biraz sonra tekrar deneyin."    return}    }    set ping_suresi($nick) $ms    set ping_kanal $chan    putserv "PRIVMSG $nick :\001PING $ping_suresi($nick)\001";}proc ping_cevabi {nick uhost handle {dest ""} keyword text} {    global botnick ping_suresi ping_kanal    set cnick [string tolower $nick]    if {$dest == ""} {set dest $botnick}    if {$dest == $botnick} {set ms [clock clicks -milliseconds]set fark [expr [expr $ms - $ping_suresi($cnick)]/1000.0]putserv "PRIVMSG $ping_kanal :$nick ping süreniz $fark saniye."    }}putlog "pingkanal.tcl"

Statistics: Posted by pektek — Tue May 07, 2024 7:51 pm