egghelp/eggheads community

Chatspace Identifier {Help Me}

2006-02-04T21:09:01-04:00

thanks
works perfect

Statistics: Posted by minted — Sat Feb 04, 2006 9:09 pm

Chatspace Identifier {Help Me}

2006-02-04T18:27:56-04:00

That because nickpass is not global in the proc. Either add

Code:

global nickpass

in the proc or use $::nickpass instead of $nickpass.

Statistics: Posted by Sir_Fz — Sat Feb 04, 2006 6:27 pm

Chatspace Identifier {Help Me}

2006-02-04T15:06:45-04:00

ok i tested that, it actually sent the nickpass, but i got an error with it

Code:

[13:57] chat.wiredreality.net :: 512 :: ChatBot :Authorization required to use Registered Nickname ChatBot[13:57] Tcl error [identify:nick]: can't read "nickpass": no such variableset errorInfoCurrently: can't read "nickpass": no such variableCurrently: while executingCurrently: "putserv "PASS $nickpass""Currently: (procedure "identify:nick" line 2)Currently: invoked from withinCurrently: "identify:nick $_raw1 $_raw2 $_raw3"

Statistics: Posted by minted — Sat Feb 04, 2006 3:06 pm

Chatspace Identifier {Help Me}

2006-02-04T09:07:26-04:00

I don't see why it shouldn't work, gets raw 512 and identifies. You can do some tests by adding a line:

Code:

putlog "$from :: $key :: $arg"

to know what id being sent and match upon that (if you want to take anything into consideration).

Statistics: Posted by Sir_Fz — Sat Feb 04, 2006 9:07 am

Chatspace Identifier {Help Me}

2006-02-03T21:02:42-04:00

thanks

i was hoping to use the raw for this though.
now, im a 100% newb at tcl, and haven't even tried to code with it before now.
but i made a naive attempt
i dont have the ability to test it atm though
think this will work?

Code:

set nickpass "password"bind raw - 512 identify:nickproc identify:nick {from key arg} { putserv "PASS $nickpass"}

i dont want to take any other factors into account, not nickname, server, etc
just in all cases, when the bot gets raw 512, do /pass password

Statistics: Posted by minted — Fri Feb 03, 2006 9:02 pm

Chatspace Identifier {Help Me}

2006-02-03T13:24:43-04:00

It's not that long, but can be tweaked a little bit.

Code:

set password ""bind raw - NOTICE notice_bncproc notice_bnc {from keyword arg} { global password if {[lindex [split [set arg [string tolower $arg]]] 0] == "auth" ||[string tolower $from] == "my.server.here"} {  set bnc_notice [join [lrange [split $arg] 1 end]]  if {[string match "*type /pass password*" $bnc_notice]} {    putserv "PASS $password"  } }}

Statistics: Posted by Sir_Fz — Fri Feb 03, 2006 1:24 pm

Chatspace Identifier {Help Me}

2006-02-01T01:06:03-04:00

*bump*?

Statistics: Posted by minted — Wed Feb 01, 2006 1:06 am

Chatspace Identifier {Help Me}

2006-01-28T19:27:09-04:00

Code:

set password ""bind raw - NOTICE notice_bncproc notice_bnc {from keyword arg} { global password if {([string tolower [join [lrange [split $arg] 0 0]]] == "auth") ||([string tolower $from] == "my.server.here")} {  set bnc_notice [string tolower [join [lrange [split $arg] 1 end]]]  if {[string match "*type /pass password*" $bnc_notice]} {    putserv "PASS $password"  } }}

this is some nickserv auth script, it works, just seems a bit long?
and in my conf in proc evnt:init_server i set the bot to ignore our services (chatspace services runs most things, all it does is notice a bunch of pointless crap to the bot, my bot simply runs your allprotection script)

i prefer to work from raws in mirc, although i know little about tcl.

Statistics: Posted by minted — Sat Jan 28, 2006 7:27 pm

Chatspace Identifier {Help Me}

2006-01-28T18:44:52-04:00

it just appears rather bloated, its about 10 lines long.
all i want is it to respond to raw 512 with /pass mypass, with no other factors being taken into account.

Paste your code.

Statistics: Posted by Sir_Fz — Sat Jan 28, 2006 6:44 pm

Chatspace Identifier {Help Me}

2006-01-27T21:59:51-04:00

it just appears rather bloated, its about 10 lines long.
all i want is it to respond to raw 512 with /pass mypass, with no other factors being taken into account.

Statistics: Posted by minted — Fri Jan 27, 2006 9:59 pm

Chatspace Identifier {Help Me}

2006-01-27T21:33:09-04:00

Why? What complications have you done in yours?

Statistics: Posted by Sir_Fz — Fri Jan 27, 2006 9:33 pm

Chatspace Identifier {Help Me}

2006-01-27T19:50:04-04:00

is this best done using the raw prompt for password, or by reading the snotice saying to enter nickpass?

at the moment the code i use uses

Code:

if {[string match "*type /pass password*" $bnc_notice]} {

reading from the snotice

raw 512 shows as

Code:

Authorization required to use Registered Nickname minted

could u make a simple, clean little code that will simply send nickpass when asked by raw 512, on chatspace its /pass password to identify yourself

Statistics: Posted by minted — Fri Jan 27, 2006 7:50 pm

Chatspace Identifier {Help Me}

2006-01-27T09:10:41-04:00

replied, file sent

Statistics: Posted by minted — Fri Jan 27, 2006 9:10 am

Chatspace Identifier {Help Me}

2006-01-27T08:11:46-04:00

But he asked me to mail and i emailed him not yet get reply

Ever heard of being patient? It might be that minted has a life outside of the Internet.

Also, do not make any further posts regarding this matter in other forums; it is here that it will be dealt with. Double posts get moved to the Junkyard.

Statistics: Posted by Alchera — Fri Jan 27, 2006 8:11 am

Chatspace Identifier {Help Me}

2006-01-27T03:49:48-04:00

But he asked me to mail and i emailed him not yet get reply

Statistics: Posted by zaibi — Fri Jan 27, 2006 3:49 am