egghelp/eggheads community

Solbu's Slowvoice

2021-07-12T08:54:23-04:00

Anyway, how do you check if someone has his nickname registered/logged in with NickServ?

Depends.

Nick is registered (but you don't care if they logged in): Ask NickServ.
If you share a common channel, and the network has account-notify and extended join, you can use that info. (eggdrop 1.9 keeps track of the account name in that case)
If the network has WHOX (advertised in the 005 isupport numeric), then you can do a /who on the nick and see if the account name is != 0.
On some networks you can see if someone is logged in by looking at their /who flags - if they have the r flag, they are logged in.
As a last resort - ask NickServ. Many NickServ implementations have a /ns status NICK command, which can be somewhat easily scripted.

Statistics: Posted by DasBrain — Mon Jul 12, 2021 8:54 am

Solbu's Slowvoice

2021-07-12T13:00:36-04:00

No, i meant I was working on something else where had implemented something similar and did a copy/paste without actually thinking.

Anyway, how do you check if someone has his nickname registered/logged in with NickServ?

Ahh okay.. I misunderstood you

Statistics: Posted by taxick — Mon Jul 12, 2021 8:04 am

Solbu's Slowvoice

2021-07-12T05:41:03-04:00

No, i meant I was working on something else where had implemented something similar and did a copy/paste without actually thinking.

Anyway, how do you check if someone has his nickname registered/logged in with NickServ?

Statistics: Posted by caesar — Mon Jul 12, 2021 5:41 am

Solbu's Slowvoice

2021-07-10T16:57:41-04:00

Hi again

Thanks for the help so far

I have a little wish..

Are it possible to give users that have registered / log in to NickServ instant voice

People that don't have a account will need to wait 60:120 sec

Statistics: Posted by taxick — Sat Jul 10, 2021 4:57 pm

Solbu's Slowvoice

2021-07-10T14:35:35-04:00

Was working on another piece of code with arrays and got carried away. Well that should fix everything.

Hi

If you have made a new version, I will be happy to check it out

Statistics: Posted by taxick — Sat Jul 10, 2021 2:35 pm

Solbu's Slowvoice

2021-07-10T14:11:41-04:00

Was working on another piece of code with arrays and got carried away. Well that should fix everything.

Statistics: Posted by caesar — Sat Jul 10, 2021 2:11 pm

Solbu's Slowvoice

2021-07-10T13:59:52-04:00

Hi..

This edit fixed my problem

Thanks a lot to all the user that help me out here

Statistics: Posted by taxick — Sat Jul 10, 2021 1:59 pm

Solbu's Slowvoice

2021-07-10T13:30:05-04:00

I'm not sure of:

Code:

set pos [lsearch -nocase [dict keys [join $sv(chan)]] $chan]

You'd better use:

Code:

set pos [lsearch -nocase [split $sv(chan)] $chan]

Statistics: Posted by CrazyCat — Sat Jul 10, 2021 1:30 pm

Solbu's Slowvoice

2021-07-10T13:25:36-04:00

ive tested the exact same code and it works fine on my end tho

on what network / IRCD are you using this ?

Statistics: Posted by simo — Sat Jul 10, 2021 1:25 pm

Solbu's Slowvoice

2021-07-10T11:50:18-04:00

Hi,

Thanks for the reply..

My script look like this now:

Code:

set sv(delay) 10:15set sv(chan) "#futurenode #help"bind join - * sv:joinbind nick - * sv:nickproc sv:join {nick uhost hand chan} {   sv:delay $nick $uhost $hand $chan}proc sv:nick {nick uhost hand chan newnick} {   sv:delay $nick $uhost $hand $chan $newnick}proc sv:delay {nick uhost hand chan {newnick ""}} {   global sv   set chan [string tolower $chan]   if {[isbotnick $nick] || ![botisop $chan]} return   scan [split $sv(delay) :] {%d%d} min max   set delay [expr {int(rand() * ($max + 1 - $min)) + $min}]   if {[llength $newnick]} {      set nick $newnick   }   utimer $delay [list sv:voice $nick $chan]   putlog "Will voice $nick in $chan channel in $delay seconds"}proc sv:voice {nick chan} {   global sv   if {![botisop $chan] || [isvoice $nick $chan]} return   if {![llength $sv(chan)]} {      pushmode $chan +v $nick   } else {      set pos [lsearch -nocase [dict keys [join $sv(chan)]] $chan]      if {$pos > -1} {         pushmode $chan +v $nick      }   }}foreach chan [channels] {   if {[channel get $chan autovoice]} {      channel set $chan -autovoice   }}

LOG

Code:

[17:48:31] sockread EAGAIN: 8 11 (Resource temporarily unavailable)[17:48:31] net: connect! sock 8[17:48:31] Connected to irc.futurenode.dk[17:48:31] -NOTICE- *** Looking up your hostname...[17:48:35] -NOTICE- *** Could not resolve your hostname: Request timed out; using your IP address (194.233.162.198) instead.[17:48:35] triggering bind evnt:init_server[17:48:35] triggered bind evnt:init_server, user 0.049ms sys 0.049ms[17:48:35] -NOTICE- *** You are connected to irc.futurenode.dk using TLS (SSL) cipher 'TLS1.3-ECDHE-RSA-AES-256-GCM-AEAD' and your TLS (SSL) client certificate fingerprint is 0c889fdae2bbb9a8d7aaf823935d417aaf837f5fefb6412d0fe26a362ea826c1[17:48:35] -NickServ (NickServ@futurenode.dk)- This nickname is registered. Please choose a different nickname, or identify via /msg NickServ identify .[17:48:36] -NickServ (NickServ@futurenode.dk)- You are now identified for Anne.[17:48:36] SASL: You are now logged in as Anne[17:48:40] triggering bind sv:join[17:48:40] triggered bind sv:join, user 0.060ms sys 0.060ms[17:48:40] Anne joined #futurenode.[17:48:40] #futurenode: mode change '+o :Anne' by Future-Bot!bot@futurenode.dk[17:48:48] triggering bind sv:join[17:48:48] triggered bind sv:join, user 0.024ms sys 0.000ms[17:48:48] Anne joined #help.[17:48:48] #help: mode change '+o :Anne' by Future-Bot!bot@futurenode.dk[17:49:04] triggering bind sv:join[17:49:04] Will voice Web-Client in #help channel in 12 seconds[17:49:04] triggered bind sv:join, user 0.067ms sys 0.000ms[17:49:04] Web-Client (05ba3630@future-3oq.2p0.rovm06.IP) joined #help.[17:50:00] @#futurenode (+tn) : [m/6 o/2 h/1 v/0 n/3 b/0 e/- I/-][17:50:00] @#help (+tn) : [m/6 o/2 h/0 v/0 n/4 b/0 e/- I/-]

I have also try to set thise

.console #help +c
.console #futurenode +c
.chanset #help +autovoice
.chanset #futurenode +autovoice

It says it will give voice in an amount of time. But nothing happens.. Can the problem be the user will have to register to nickserv?

Statistics: Posted by taxick — Sat Jul 10, 2021 11:50 am

Solbu's Slowvoice

2021-07-10T10:04:27-04:00

Ah, right. I made some changes in the proc names and forgot to adjust. Anyway, to debug this thing just add:

Code:

putlog "Will voice $nick in $chan channel in $delay seconds"

before or after:

Code:

utimer $delay [list sv:voice $nick $chan]

and see if that happens after said seconds.

Statistics: Posted by caesar — Sat Jul 10, 2021 10:04 am

Solbu's Slowvoice

2021-07-10T11:28:59-04:00

Hi

Thanks for the reply.

The last code from @willyw fixed my error in the console

But the eggdrop still don't give voice after some time

No errors in the console

EDIT

So far my script look like this

Code:

set sv(delay) 30:60set sv(chan) "#futurenode #help"bind join - * sv:joinbind nick - * sv:nickproc sv:join {nick uhost hand chan} {   sv:delay $nick $uhost $hand $chan}proc sv:nick {nick uhost hand chan newnick} {   sv:delay $nick $uhost $hand $chan $newnick}proc sv:delay {nick uhost hand chan {newnick ""}} {   global sv   set chan [string tolower $chan]   if {[isbotnick $nick] || ![botisop $chan]} return   scan [split $sv(delay) :] {%d%d} min max   set delay [expr {int(rand() * ($max + 1 - $min)) + $min}]   if {[llength $newnick]} {      set nick $newnick   }   utimer $delay [list sv:voice $nick $chan]}proc sv:voice {nick chan} {   global sv   if {![botisop $chan] || [isvoice $nick $chan]} return   if {![llength $sv(chan)]} {      pushmode $chan +v $nick   } else {      set pos [lsearch -nocase [dict keys [join $sv(chan)]] $chan]      if {$pos > -1} {         pushmode $chan +v $nick      }   }}foreach chan [channels] {   if {[channel get $chan autovoice]} {      channel set $chan -autovoice   }}

I have to you set

.console #help +c
.console #futurenode +c
.chanset #help +autovoice
.chanset #futurenode +autovoice

// Thomas

Statistics: Posted by taxick — Sat Jul 10, 2021 8:18 am

Solbu's Slowvoice

2021-07-10T08:07:35-04:00

...
I get this error in the console:
Code:
[13:13:52]  [13:13:53] Tcl error [sv:nick]: invalid command name "sv:nick"

You didn't specify which script that error is from, but I believe it is from caesar's above.

Find:

Code:

proc nick:sv {nick uhost hand chan newnick} {   sv:delay $nick $uhost $hand $chan $newnick}

Change it to:

Code:

proc sv:nick {nick uhost hand chan newnick} {   sv:delay $nick $uhost $hand $chan $newnick}

It's the kind of thing that we have all done, a hundred times.

Statistics: Posted by willyw — Sat Jul 10, 2021 8:07 am

Solbu's Slowvoice

2021-07-10T07:25:51-04:00

Hi :)I

Thanks for your replies

The bot have up. (@)

I get this error in the console:

Code:

[13:13:52]  [13:13:53] Tcl error [sv:nick]: invalid command name "sv:nick"

Statistics: Posted by taxick — Sat Jul 10, 2021 7:25 am

Solbu's Slowvoice

2021-07-10T14:10:36-04:00

Code:

set sv(delay) 60:120set sv(chan) "#chan1 #chan2"bind join - * sv:joinbind nick - * sv:nickproc sv:join {nick uhost hand chan} {sv:delay $nick $uhost $hand $chan}proc sv:nick {nick uhost hand chan newnick} {sv:delay $nick $uhost $hand $chan $newnick}proc sv:delay {nick uhost hand chan {newnick ""}} {global svset chan [string tolower $chan]if {[isbotnick $nick] || ![botisop $chan]} returnscan [split $sv(delay) :] {%d%d} min maxset delay [expr {int(rand() * ($max + 1 - $min)) + $min}]if {[llength $newnick]} {set nick $newnick}utimer $delay [list sv:voice $nick $chan]}proc sv:voice {nick chan} {global svif {![botisop $chan] || [isvoice $nick $chan]} returnif {![llength $sv(chan)]} {pushmode $chan +v $nick} else {set pos [lsearch -nocase [split $sv(chan)] $chan]if {$pos > -1} {pushmode $chan +v $nick}}}foreach chan [channels] {if {[channel get $chan autovoice]} {channel set $chan -autovoice}}

Try this out. Haven't tested it.

Edit: Fixed all errors, this is the working code.. or at least should. xD

Statistics: Posted by caesar — Sat Jul 10, 2021 4:49 am