egghelp/eggheads community

hehhe

2008-12-16T15:31:35-04:00

Hello

They are all working.

Ty :]

Statistics: Posted by garfwen — Tue Dec 16, 2008 3:31 pm

Get #auth on Mask

2008-12-15T07:47:06-04:00

now garfwen need to test them all ;p

Statistics: Posted by tomekk — Mon Dec 15, 2008 7:47 am

Get #auth on Mask

2008-12-15T05:32:56-04:00

Code:

bind join - {*} hello:joinbind raw - {354} hello:rawproc hello:join {n u h c t} {    global hello    if {[string match -nocase *users.quakenet.org $h]} {        putserv "PRIVMSG $c :Hello $n ([lindex [split [lindex [split $h @] 1] .] 0])"    } elseif {![info exists hello([string tolower $n])]} {        set hello([string tolower $n]) "$c"        putserv "WHO $n %nat,97"    }}proc hello:raw {from raw arg} {    global hello    set t [lindex [split $arg] 1]    set n [lindex [split $arg] 2]    set a [lindex [split $arg] 3]    if {![info exists hello([string tolower $n])]} { return }    set c "$hello([string tolower $n])"    unset hello([string tolower $n])    if {$t == "97"} {        if {$a != "" && $a != "0"} {            putserv "PRIVMSG $c :Hello $n ($a)"        } else {            putserv "PRIVMSG $c :Hello $n"        }    }}

Untested..

Statistics: Posted by r0t3n — Mon Dec 15, 2008 5:32 am

Get #auth on Mask

2008-12-15T00:46:28-04:00

In this case, adding another callback seems overkill to me, given the nature of the network.

Code:

bind pub - hello proc:helloproc proc:hello {nick host hand chan text} { set auth "" regexp {[^[:space:]@]+@([^[:space:].]+)\.users.quakenet.org} $host match auth putquick "privmsg $chan :Hello $nick (#$auth)"}

Statistics: Posted by nml375 — Mon Dec 15, 2008 12:46 am

Get #auth on Mask

2008-12-14T19:44:18-04:00

Its infact 5 lines of output, but your only processing a certain line from the whois reply. WHO is however one line of output.

Statistics: Posted by r0t3n — Sun Dec 14, 2008 7:44 pm

Get #auth on Mask

2008-12-14T16:55:08-04:00

Im using whois to check "account : " section.
It's just one line of output, can be easier? ;p

Statistics: Posted by tomekk — Sun Dec 14, 2008 4:55 pm

Get #auth on Mask

2008-12-14T16:24:23-04:00

Its better to use WHO with a special reply, raw 354 with %na arguments.

Statistics: Posted by r0t3n — Sun Dec 14, 2008 4:24 pm

Get #auth on Mask

2008-12-14T09:58:42-04:00

better to use WHOIS command than parse user host:

Code:

# Author: tomekk# e-mail:  tomekk/@/oswiecim/./eu/./org# home page: http://tomekk.oswiecim.eu.org/## Version 0.1## This file is Copyrighted under the GNU Public License.# http://www.gnu.org/copyleft/gpl.htmlset auth_chans {#chan1 #chan2}##################################################bind pub - hello hello_procbind raw - 330 whois_procproc hello_proc { nick uhost hand chan arg } {global user_irc_name user_irc_chan auth_chansif {[lsearch $auth_chans $chan] != -1} {set user_irc_name $nickset user_irc_chan $chanputserv "WHOIS $nick"}}proc whois_proc { from keyword arg } {global user_irc_name user_irc_chanset list_of_args [split $arg]set auth_name [lindex $list_of_args 2]if {($auth_name != "") && ($keyword == 330)} {putquick "PRIVMSG $user_irc_chan :Hello $user_irc_name (\#$auth_name)"}}putlog "show-auth.tcl ver 0.1 by tomekk"

try :>

Statistics: Posted by tomekk — Sun Dec 14, 2008 9:58 am

Get #auth on Mask

2008-12-14T09:01:32-04:00

Hello.

No, i just want the Auth-name:

"$auth"should be, in this case, "ZIMBORA"

Statistics: Posted by garfwen — Sun Dec 14, 2008 9:01 am

Get #auth on Mask

2008-12-14T08:58:29-04:00

try:

Code:

putquick "privmsg $chan :Hello $nick ($nick!$host)"

Statistics: Posted by tomekk — Sun Dec 14, 2008 8:58 am

Get #auth on Mask

2008-12-14T05:23:35-04:00

Hello.
On quakenet, when you'r authed, you can see you'r auth on your mask:

GaRfWeN!GaRfwen@ZIMBORA.users.quakenet.org

("ZIMBORA" is the #auth)

Code:

bind pub - hello proc:helloproc proc:hello {nick host hand chan text} {putquick "privmsg $chan :Hello $nick (#$auth)"}

Now my question is how can i put the AUTH-NAME on the variable $auth ?

Ty,
GaRfWeN

Statistics: Posted by garfwen — Sun Dec 14, 2008 5:23 am