Access Script

[stevegarbz]

Ok, well currently I have things like:

Code: Select all

bind pub nm .addop h:addop:msg
proc h:addop:msg {nick host hand chan text} {    
     set user [lindex $text 0] 
     set address *![getchanhost [lindex $text 0]] 
     if {[string match -nocase $text ""]} { 
     putquick "NOTICE $nick :You didn't include a nickname." 
     return 0 
  } 
     if {![onchan $text $chan]} { 
     putquick "NOTICE $nick :$user isn't on $chan." 
     return 0 
    } 
    putquick "NOTICE $nick :Added op: $user" 
    adduser $user $address 
    chattr $user +ao $chan
pushmode $chan +o $user
}

Now, after I add the user, I want to be able to use commands like:

.access = Will display my access
.access * = Will display *'s access

If anyone could please help me with this, it would be greatly appreciated.

Thanks.

[Sir_Fz]

Try FzCommands, I don't see why this should be rewritten.

[stevegarbz]

I just don't want a big script like that. I have everything I need in that small one.

[Sir_Fz]

You can do something like this:

Code: Select all

bind pub - .access show:access

proc show:access {nick uhost hand chan arg} {
 if {![llength [set t [lindex [split $arg] 0]]]} { set t $nick }
 if {[matchattr [nick2hand $t] n|n $chan]} {
  puthelp "PRIVMSG $chan :$t is an owner."
 } elseif {[matchattr [nick2hand $t] m|m $chan]} {
  puthelp "PRIVMSG $chan :$t is a master."
 }
}

[stevegarbz]

Thanks. How would I add more levels to it?

[Sir_Fz]

Observe the code and think about it. Also, read eggdrop.conf to know about eggdrop's flags.

[stevegarbz]

Yeah, I got it. Thanks.

[stevegarbz]

What would be the way to make it so people that aren't added to have it say something? What would the flag set be?

And -- My addop script adds their ident too. Is there a way to make it *!*@ip.domain

[Sir_Fz]

This example should help you:

Code: Select all

if {[matchattr $hand n|n $chan]} {
 # he's an owner
} elseif {[matchattr $hand m|m $chan]} {
 # he's a master
} else {
 # he's something else.
}

As for the address, use this:

Code: Select all

set address *!*@[lindex [split [getchanhost [lindex [split $text] 0]] @] 1]

[stevegarbz]

Now is when I run into a bad problem, because it doesn't work. Eggdrop is only holding 9 characters for the person's nickname. Is there a way for the op, to make it .+host the user's address to the user 'Op'? I would pre-add all of these users, and then just .addop would add their host, and then for the access script it would lookup their host?

[stevegarbz]

Nevermind, I got it. Thanks for all the help Sir_Fz