no manual op TCL HELP !!!

[natter]

I create a simple tcl to prevent manual op on chan :

Code: Select all

bind mode - *+o* no_manual_op

proc no_manual_op {nick uhost hand chan mode victim} {

        if {([matchattr $hand b]) || ([matchattr $hand n])} {
        putlog "Manual OP on $chan by $nick for $victim"
        } else {
        putserv "MODE $chan -o $nick"
        }
}

If user without n/b flag can Manual op other user ...

now ...

I want to add this check :

if opped user are n/b stay opped , else is deopped


Can you help me please ?

[demond]

just add [matchattr] check for victim in that if

[natter]

How ?

[Sir_Fz]

Code: Select all

[nick2hand $victim]

[natter]

Code: Select all

if {([matchattr nick2hand $victim b]) || ([matchattr nick2hand $victim n])}

im a newbie

[Sir_Fz]

I gave you the command with brackets, yet you managed to remove them

Code: Select all

if {([matchattr [nick2hand $victim] b]) || ([matchattr [nick2hand $victim] n])} {