egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2007-06-10T21:06:36-04:00 https://forum.eggheads.org/app.php/feed/topic/13567 2007-06-10T21:06:36-04:00 2007-06-10T21:06:36-04:00 https://forum.eggheads.org/viewtopic.php?p=73405#p73405 <![CDATA[[SOLVED] A little UserMRG.tcl script...]]>
Skip the string-match completely, and just test wether deleting the host works or not?
Thank you :D :D ..it works but it was not necessary to remove the string-match...I`ve replaced the

Code: 

{![string match -nocase $dhost $dhuser]} {
with your suggestion ..

Code: 

{![delhost $dhuser $dhost]} {
and the scripts works perfectly 8) :lol:
<me> .delhost
-|EGG- SYNTAX: .delhost <user> <*!*@host>
<me> .delhost lol
-|EGG- Error lol is not a valid user. Check .userlist
<me> .delhost test 34893948
-|EGG- Error 34893948 is not a valid host.
<me> .delhost test *!*@domain.name
-|EGG- Error *!*@domain.name was not added to test.
<me> .delhost test *!*@test.ro
-|EGG- Deleted host *!*@test.ro from user test


Thanks again for the help nml375 :D :wink: :P

Statistics: Posted by Riddler — Sun Jun 10, 2007 9:06 pm

]]> 2007-06-10T19:30:16-04:00 2007-06-10T19:30:16-04:00 https://forum.eggheads.org/viewtopic.php?p=73401#p73401 <![CDATA[[SOLVED] A little UserMRG.tcl script...]]>

Code: 

proc s:delhost {nick uhost hand chan text} { global botnick dj if {[channel get $chan djtools] && ![isbotnick $nick]} {  set dhuser [lindex [split $text] 0]  set dhost [lindex [split $text] 1]  if {$dhuser == ""} {   puthelp "NOTICE $nick :SYNTAX:\002 .delhost <user> <*!*@host>\002"  } elseif {![validuser $dhuser]} {   puthelp "NOTICE $nick :Error\002 $dhuser \002is not a valid user. Check\002 .userlist \002"  } elseif {![delhost $dhuser $dhost]} {   puthelp "NOTICE $nick :Error\002 $dhost \002was not added to $dhuser."  } else {   puthelp "NOTICE $nick :Deleted host\002 $dhost \002from user\002 $dhuser \002"  } }}

Statistics: Posted by nml375 — Sun Jun 10, 2007 7:30 pm

]]> 2007-06-10T18:40:29-04:00 2007-06-10T18:40:29-04:00 https://forum.eggheads.org/viewtopic.php?p=73399#p73399 <![CDATA[[SOLVED] A little UserMRG.tcl script...]]>
Easiest, I'd guess, would just to use delhost, and test the returncode to see wether the hostmask was successfully removed...
delhost <handle> <hostmask>
Description: deletes a hostmask from a user's host list
Returns: 1 on success; 0 if the hostmask (or user) doesn't exist
Module: core
Well I`ve tried that also and still not the results I want....

The new code

Code: 

proc s:delhost {nick uhost hand chan text} {  global botnick dj   if {[channel get $chan djtools] && ![isbotnick $nick]} {     set dhuser [lindex [split $text] 0]     set dhost [lindex [split $text] 1]     if {$dhuser == ""} {     puthelp "NOTICE $nick :SYNTAX:\002 .delhost <user> <*!*@host>\002"     } elseif {![validuser $dhuser]} {     puthelp "NOTICE $nick :Error\002 $dhuser \002is not a valid user. Check\002 .userlist \002"     } elseif {![string match -nocase *!*@* $dhost]} {     puthelp "NOTICE $nick :Error\002 $dhost \002is not a valid host."     } else {     delhost $dhuser $dhost     puthelp "NOTICE $nick :Deleted host\002 $dhost \002from user\002 $dhuser \002"     return 0 }     puthelp "NOTICE $nick :Error\002 $dhost \002is not added as host for user\002 $dhuser \002"     }}
a nother suggestion/ideea :idea: ? pls :shock:

Statistics: Posted by Riddler — Sun Jun 10, 2007 6:40 pm

]]> 2007-06-07T16:49:57-04:00 2007-06-07T16:49:57-04:00 https://forum.eggheads.org/viewtopic.php?p=73336#p73336 <![CDATA[[SOLVED] A little UserMRG.tcl script...]]>

Code: 

string match -nocase $dhost $dhuser
You're only checking wether the the two parameters you've entered "match" eachother. It does no test whatsoever if the hostmask entered on the commandline is added to the user record.
Easiest, I'd guess, would just to use delhost, and test the returncode to see wether the hostmask was successfully removed...
delhost <handle> <hostmask>
Description: deletes a hostmask from a user's host list
Returns: 1 on success; 0 if the hostmask (or user) doesn't exist
Module: core

Statistics: Posted by nml375 — Thu Jun 07, 2007 4:49 pm

]]> 2007-06-07T16:44:06-04:00 2007-06-07T16:44:06-04:00 https://forum.eggheads.org/viewtopic.php?p=73334#p73334 <![CDATA[[SOLVED] A little UserMRG.tcl script...]]>
Code:

Code: 

proc s:delhost {nick uhost hand chan text} {  global botnick dj   if {[channel get $chan djtools] && ![isbotnick $nick]} {     set dhuser [lindex [split $text] 0]     set dhost [lindex [split $text] 1]     if {$dhuser == ""} {     puthelp "NOTICE $nick :SYNTAX:\002 .delhost <user> <*!*@host>\002"     } elseif {![validuser $dhuser]} {     puthelp "NOTICE $nick :Error\002 $dhuser \002is not a valid user. Check\002 .userlist \002"     } elseif {![string match -nocase *!*@* $dhost]} {     puthelp "NOTICE $nick :Error\002 $dhost \002is not a valid host."     } elseif {![string match -nocase $dhost $dhuser]} {     puthelp "NOTICE $nick :Error\002 $dhost \002is not added as host for user\002 $dhuser \002"     } else {     delhost $dhuser $dhost     puthelp "NOTICE $nick :Deleted host\002 $dhost \002from user\002 $dhuser \002"    }  }}
and the Error:
<me> .delhost
-|EGG- SYNTAX: .delhost <user> <*!*@host>
<me> .delhost lol
-|EGG- Error lol is not a valid user. Check .userlist
<me> .delhost user1 34787
-|EGG- Error 34787 is not a valid host.
<me> .delhost user1 *!*@1.1.1.1
-|EGG- Error *!*@1.1.1.1 is not added as host for user user1
<me> .delhost user1 *!*@user1.users.undernet.org
-|EGG- Error *!*@user1.users.undernet.org is not added as host for user user1



The host *!*@1.1.1.1 dosen`t exists... but the host *!*@user1.users.undernet.org exists, it`s the default one... and the bot reply's that it dosen`t .. :?: :!:

This is the way it should answer:
<me> .delhost
-|EGG- SYNTAX: .delhost <user> <*!*@host>
<me> .delhost lol
-|EGG- Error lol is not a valid user. Check .userlist
<me> .delhost user1 34787
-|EGG- Error 34787 is not a valid host.
<me> .delhost user1 *!*@1.1.1.1
-|EGG- Error *!*@1.1.1.1 is not added as host for user user1
<me> .delhost user1 *!*@user1.users.undernet.org
-|EGG- Deleted host *!*@user1.users.undernet.org from user user1


any suggestion/hints ?! :?

Statistics: Posted by Riddler — Thu Jun 07, 2007 4:44 pm

]]> 2007-06-07T14:36:06-04:00 2007-06-07T14:36:06-04:00 https://forum.eggheads.org/viewtopic.php?p=73321#p73321 <![CDATA[[SOLVED] A little UserMRG.tcl script...]]> the syntax code was

Code: 

set allu [lindex [userlist -|MASDTOV $chan]]
Thank you :D... cheers again mate 8)

Statistics: Posted by Riddler — Thu Jun 07, 2007 2:36 pm

]]> 2007-06-06T18:39:06-04:00 2007-06-06T18:39:06-04:00 https://forum.eggheads.org/viewtopic.php?p=73314#p73314 <![CDATA[[SOLVED] A little UserMRG.tcl script...]]> join-command to see how to easily convert a list of items (such as handles) into a string..
And skip the foreach-loop :p

Statistics: Posted by nml375 — Wed Jun 06, 2007 6:39 pm

]]> 2007-06-06T18:24:51-04:00 2007-06-06T18:24:51-04:00 https://forum.eggheads.org/viewtopic.php?p=73313#p73313 <![CDATA[[SOLVED] A little UserMRG.tcl script...]]> it works, at last it works... :D cheers mate
Now all I need to add is a .userlist command to show the users on the bot ...

I`ve try to code something....

Code: 

proc s:userlist {nick uhost hand chan text} {  global botnick dj   if {[channel get $chan djtools] && ![isbotnick $nick]} {     set listu [lindex [split $text] 0]     if {$listu == ""} {     puthelp "NOTICE $nick :SYNTAX:\002 .userlist all|voice|op|test|dj|senior|admin|manager|suspend|none|bot \002"     } elseif {$listu == "all"} {     foreach allu [userlist -|MASDTOV $chan] {     puthelp "NOTICE $nick :All Users on $chan:\002 $allu \002" }    }  }}
it works, but not like I desire...when I type .userlist all, the reply is :
<me> .userlist
-|EGG- SYNTAX: .userlist all|voice|op|test|dj|senior|admin|manager|suspend|none|bot
<me> .userlist all
-|EGG- All Users on #channel: user1
-|EGG- All Users on #channel: user2
-|EGG- All Users on #channel: user3
-|EGG- All Users on #channel: user4
etc...
....I`ve like to show the list like this :
<me> .userlist
-|EGG- SYNTAX: .userlist all|voice|op|test|dj|senior|admin|manager|suspend|none|bot
<me> .userlist all
-|EGG- All Users on #channel: user1 user2 user3 user4 etc...
It save's the time and I don`t get flooded by the but, or the but can go offline with the "Excess Flood" reason ...

.... a little hint :roll:

Statistics: Posted by Riddler — Wed Jun 06, 2007 6:24 pm

]]> 2007-06-06T14:52:53-04:00 2007-06-06T14:52:53-04:00 https://forum.eggheads.org/viewtopic.php?p=73306#p73306 <![CDATA[[SOLVED] A little UserMRG.tcl script...]]>

Code: 

proc s:deluser {nick uhost hand chan text} {  global botnick dj   if {[channel get $chan djtools] && ![isbotnick $nick]} {     set username [lindex [split $text] 0]     if {$username == ""} {       puthelp "NOTICE $nick :SYNTAX:\002 .deluser <user> \002"     } elseif {[validuser $username]} {       # The username was valid, do some stuff here...       puthelp "NOTICE $nick :User \002$username\002 doesn't exist! User\002 .userlist \002"     } {      # The username was not valid, do some other stuff here...      deluser $username      puthelp "NOTICE $nick :User \002$username\002 has been deleted."    }  }}
Think added comments should shed some light on the typo/bug..
Same thing goes with "chuser".

Hint, to negate an expression (turn true into false, and false into true; use ! )
Ie: if {!$true} {...

Statistics: Posted by nml375 — Wed Jun 06, 2007 2:52 pm

]]> 2007-06-06T14:37:09-04:00 2007-06-06T14:37:09-04:00 https://forum.eggheads.org/viewtopic.php?p=73305#p73305 <![CDATA[[SOLVED] A little UserMRG.tcl script...]]>

Code: 

# Set here levels for accessesset dj(l1) "Voice Access"set dj(l2) "OP Access"set dj(l3) "Test DJ Access"set dj(l4) "DJ Access"set dj(l5) "Senior DJ Access"set dj(l6) "Administrator Access"set dj(l7) "Manager Access"bind pub n|MAS .adduser s:adduserbind pub n|MAS .addacc s:addaccbind pub n|MAS .delacc s:delaccbind pub n|MAS .deluser s:deluserbind pub n|MAS .chuser s:chusersetudef flag djtoolsproc s:adduser {nick uhost hand chan text} {  global botnick dj   if {[channel get $chan djtools] && ![isbotnick $nick]} {     set username [lindex [split $text] 0]     if {$username == ""} {     puthelp "NOTICE $nick :SYNTAX:\002 .adduser <Xuser> \002"     } elseif {[validuser $username]} {     puthelp "NOTICE $nick :User \002$username\002 is already added. Add another!"     } {     adduser $username *!*@$username.users.undernet.org     puthelp "NOTICE $nick :Added new user \002$username\002 with host \002*!*@$username.users.undernet.org\002"    }  }}proc s:addacc {nick uhost hand chan text} {  global botnick dj   if {[channel get $chan djtools] && ![isbotnick $nick]} {     set auseracc [lindex [split $text] 0]     set uhand [lindex [split $text] 1]     if {$auseracc == ""} {     puthelp "NOTICE $nick :SYNTAX: .addacc <voice|op|test|dj|senior|admin|manager> <user>"     } elseif {$auseracc == "voice"} {     chattr $uhand -|-VOTDSAM $chan     chattr $uhand -|+loV $chan     puthelp "NOTICE $nick :User\002 $uhand \002added with $dj(l1) on $chan"     } elseif {$auseracc == "op"} {     chattr $uhand -|-VOTDSAM $chan     chattr $uhand -|+loO $chan     puthelp "NOTICE $nick :User\002 $uhand \002added with $dj(l2) on $chan"     } elseif {$auseracc == "test"} {     chattr $uhand -|-VOTDSAM $chan     chattr $uhand -|+loT $chan     puthelp "NOTICE $nick :User\002 $uhand \002added with $dj(l3) on $chan"     } elseif {$auseracc == "dj"} {     chattr $uhand -|-VOTDSAM $chan     chattr $uhand -|+loD $chan     puthelp "NOTICE $nick :User\002 $uhand \002added with $dj(l4) on $chan"     } elseif {$auseracc == "senior"} {     chattr $uhand -|-VOTDSAM $chan     chattr $uhand -|+loS $chan     puthelp "NOTICE $nick :User\002 $uhand \002added with $dj(l5) on $chan"     } elseif {$auseracc == "admin"} {     chattr $uhand -|-VOTDSAM $chan     chattr $uhand -|+loA $chan     puthelp "NOTICE $nick :User\002 $uhand \002added with $dj(l6) on $chan"     } elseif {$auseracc == "manager"} {     chattr $uhand -|-VOTDSAM $chan     chattr $uhand -|+loM $chan     puthelp "NOTICE $nick :User\002 $uhand \002added with $dj(l7) on $chan"     }   }}proc s:delacc {nick uhost hand chan text} {  global botnick dj   if {[channel get $chan djtools] && ![isbotnick $nick]} {     set duseracc [lindex [split $text] 0]     if {$duseracc == ""} {     puthelp "NOTICE $nick :SYNTAX: .delacc <user>"     } else {     chattr $duseracc -|-VOTDSAM $chan     chattr $duseracc -|+lo $chan     puthelp "NOTICE $nick :Deleted access for\002 $duseracc \002on $chan"    }  }}proc s:deluser {nick uhost hand chan text} {  global botnick dj   if {[channel get $chan djtools] && ![isbotnick $nick]} {     set username [lindex [split $text] 0]     if {$username == ""} {     puthelp "NOTICE $nick :SYNTAX:\002 .deluser <user> \002"     } elseif {[validuser $username]} {     puthelp "NOTICE $nick :User \002$username\002 doesn't exist! User\002 .userlist \002"     } {     deluser $username     puthelp "NOTICE $nick :User \002$username\002 has been deleted."    }  }}proc s:chuser {nick uhost hand chan text} {  global botnick dj   if {[channel get $chan djtools] && ![isbotnick $nick]} {     set username [lindex [split $text] 0]     if {$username == ""} {     puthelp "NOTICE $nick :SYNTAX:\002 .chuser <olduser> <newuser> \002"     } elseif {[validuser $username]} {     puthelp "NOTICE $nick :Error,\002 $username \002is not a valid user. Use:\002 .userlist \002"     } {     set n1 [lindex $text 0]     set n2 [lindex $text 1]     chhandle $n1 $n2     puthelp "NOTICE $nick :Successfully changed\002 $n1 \002username to\002 $n2 \002"    }  }}putlog "Loaded: usermrg.tcl"
I`ve tested it, and here are the results:

.adduser = working great ( thanks to Sir_Fz's help :D )
.addacc = working ( thanks to nml375 :D )
.delacc = working ( thanks to nml375 :D )
.deluser = error ->
<me> .deluser
-|EGG- SYNTAX: .deluser <user>
<me> .deluser t3st3
-|EGG- User t3st3 doesn't exist! User .userlist
<me> .deluser lol
-|EGG- User lol has been deleted.


user "t3st3" exists... but it says that it dosen't ! :?:

user "lol" dosen't exist ....but the bot deleted it ( How can you delete nothing :?: ) ...

.chuser = error ->

approximately the same type of error as the .deluser command :arrow:
<me> .chuser
-|EGG SYNTAX: .chuser <olduser> <newuser>
<me> .chuser t3st3 test1
-|EGG- Error, t3st3 is not a valid user. Use: .userlist
<me> .chuser lol test1
-|EGG- Successfully changed lol username to test1
user "t3st3" exists... but it says that it's not a valid one... :shock:

user "lol" dosen't exist ....but the bot say's that it successfully changed him .... :shock:

...uofff ...my head aches .... :x :x

Statistics: Posted by Riddler — Wed Jun 06, 2007 2:37 pm

]]> 2007-06-06T14:10:16-04:00 2007-06-06T14:10:16-04:00 https://forum.eggheads.org/viewtopic.php?p=73304#p73304 <![CDATA[[SOLVED] A little UserMRG.tcl script...]]>

Statistics: Posted by nml375 — Wed Jun 06, 2007 2:10 pm

]]> 2007-06-06T14:03:12-04:00 2007-06-06T14:03:12-04:00 https://forum.eggheads.org/viewtopic.php?p=73303#p73303 <![CDATA[[SOLVED] A little UserMRG.tcl script...]]>
(...) Also, I really don't see why you modify the flags for a single handle multiple times. Especially in the cases where you first remove a flag just to add it right back again...
Ok, thanks for the hint, I`ll include them and see if it works :D :wink:
A hint while we're at it, when you build large blocks of if-ifelse-ifelse..., you might considder using switch instead. Yields cleaner code and slightly faster execution.
.... easy for you to say, but hard to do ( for me :cry: )... because I`m not a excellent coder...I`m new in public commands, and I`m still learning :) :P

Statistics: Posted by Riddler — Wed Jun 06, 2007 2:03 pm

]]> 2007-06-06T13:47:40-04:00 2007-06-06T13:47:40-04:00 https://forum.eggheads.org/viewtopic.php?p=73302#p73302 <![CDATA[[SOLVED] A little UserMRG.tcl script...]]>
chattr <handle> [changes [channel]]
Description: changes the attributes for a user record, if you include any.
Changes are of the form '+f', '-o', '+dk', '-o+d', etc. If changes are
specified in the format of |<changes> <channel>, the channel-specific
flags for that channel are altered. You can now use the +o|-o #channel
format here too.
Returns: new flags for the user (if you made no changes, the current
flags are returned). If a channel was specified, the global AND the
channel-specific flags for that channel are returned in the format of
globalflags|channelflags. "*" is returned if the specified user does
not exist.
Module: core
To make changes channel-speciffic, you'll have to do something like this:

Code: 

chattr |+Tol-VODSAM $chanchattr |+Vol-TODSAM $chanetc
Also, I really don't see why you modify the flags for a single handle multiple times. Especially in the cases where you first remove a flag just to add it right back again...

A hint while we're at it, when you build large blocks of if-ifelse-ifelse..., you might considder using switch instead. Yields cleaner code and slightly faster execution.

Statistics: Posted by nml375 — Wed Jun 06, 2007 1:47 pm

]]> 2007-06-06T13:28:36-04:00 2007-06-06T13:28:36-04:00 https://forum.eggheads.org/viewtopic.php?p=73301#p73301 <![CDATA[[SOLVED] A little UserMRG.tcl script...]]>
I'd suggest something like this:

Code: 

chattr $hand "+olT-VODSAM"
It will remove all but the desired flags of your userdefined ones, along with making sure ol is set aswell.

As for your problems with t3st, you do not trim any "extra" spaces or such, which could cause problems. That is, ".deluser t3st" would work, yet ".deluser t3st " would not. Could you confirm wether this might be the case?
I understand nml375, so...I`ve changed a little of the tcl code....

Code: 

# Set here levels for accessesset dj(l1) "Voice Access"set dj(l2) "OP Access"set dj(l3) "Test DJ Access"set dj(l4) "DJ Access"set dj(l5) "Senior DJ Access"set dj(l6) "Administrator Access"set dj(l7) "Manager Access"bind pub n|MAS .adduser s:adduserbind pub n|MAS .addacc s:addaccbind pub n|MAS .delacc s:delaccsetudef flag djtoolsproc s:adduser {nick uhost hand chan text} { global botnick dj   if {[channel get $chan djtools] && ![isbotnick $nick]} {     set username [lindex [split $text] 0]     if {$username == ""} {     puthelp "NOTICE $nick :SYNTAX:\002 .adduser <Xuser> \002"     } elseif {[validuser $username]} {     puthelp "NOTICE $nick :User \002$username\002 is already added. Add another!"     } {     adduser $username *!*@$username.users.undernet.org     puthelp "NOTICE $nick :Added new user \002$username\002 with host \002*!*@$username.users.undernet.org\002"    }  }}proc s:addacc {nick uhost hand chan text} {  global botnick dj   if {[channel get $chan djtools] && ![isbotnick $nick]} {     set auseracc [lindex [split $text] 0]     set uhand [lindex [split $text] 1]     if {$auseracc == ""} {     puthelp "NOTICE $nick :SYNTAX: .addacc <voice|op|test|dj|senior|admin|manager> <user>"     } elseif {$auseracc == "voice"} {     chattr $uhand -VODSAM $chan     chattr $uhand +loV $chan     puthelp "NOTICE $nick :User\002 $uhand \002added with $dj(l1) on $chan"     } elseif {$auseracc == "op"} {     chattr $uhand -VODSAM $chan     chattr $uhand +loO $chan     puthelp "NOTICE $nick :User\002 $uhand \002added with $dj(l2) on $chan"     } elseif {$auseracc == "test"} {     chattr $uhand -VODSAM $chan     chattr $uhand +loT $chan     puthelp "NOTICE $nick :User\002 $uhand \002added with $dj(l3) on $chan"     } elseif {$auseracc == "dj"} {     chattr $uhand -VODSAM $chan     chattr $uhand +loD $chan     puthelp "NOTICE $nick :User\002 $uhand \002added with $dj(l4) on $chan"     } elseif {$auseracc == "senior"} {     chattr $uhand -VODSAM $chan     chattr $uhand +loS $chan     puthelp "NOTICE $nick :User\002 $uhand \002added with $dj(l5) on $chan"     } elseif {$auseracc == "admin"} {     chattr $uhand -VODSAM $chan     chattr $uhand +loA $chan     puthelp "NOTICE $nick :User\002 $uhand \002added with $dj(l6) on $chan"     } elseif {$auseracc == "manager"} {     chattr $uhand -VODSAM $chan     chattr $uhand +loM $chan     puthelp "NOTICE $nick :User\002 $uhand \002added with $dj(l7) on $chan"     } else {     puthelp "NOTICE $nick :Error,\002 $uhand \002doesn't exists! Use:\002 .userlist \002"     }   }}proc s:delacc {nick uhost hand chan text} {  global botnick dj   if {[channel get $chan djtools]&& ![isbotnick $nick]} {     set duseracc [lindex [split $text] 0]     if {$duseracc == ""} {     puthelp "NOTICE $nick :SYNTAX: .delacc <user>"     } else {     chattr $duseracc -VODSAM $chan     chattr $duseracc +lo $chan     puthelp "NOTICE $nick :Deleted access for\002 $duseracc \002on $chan"    }  }}putlog "Loaded: usermrg.tcl"
and now the commands work, but not as I want :( ... instead of giveing that user the access on the channel ( +lo and one of the V, O, etc ).... it give's him global access...
<me> .addacc
-|EGG- SYNTAX: .addacc <voice|op|test|dj|senior|admin|manager> <user>
----
<me> .addacc voice t3st3
-|EGG- User t3st3 added with Voice Access on #channel
----
and now the .whois looks like this

Code: 

.whois t3st3[18:40] #me# whois t3st3HANDLE       PASS NOTES FLAGS           LASTt3st3        no       0 hlopV          never (nowhere)     #channel           -             never  HOSTS: *!*@t3st3.users.undernet.org
----

strange ....normaly this is the way that it shoud look like on the .whois command..

Code: 

.whois t3st3[18:40] #me# whois t3st3HANDLE       PASS NOTES FLAGS           LASTt3st3        no       0 hp          never (nowhere)     #channel           loV            never  HOSTS: *!*@t3st3.users.undernet.org
... what shoud I do ?

P.S.: nml375, I`m still working on the .deluser and .chuser commands, after I will test them, I`ll include them in this script...

Statistics: Posted by Riddler — Wed Jun 06, 2007 1:28 pm

]]> 2007-06-06T11:18:53-04:00 2007-06-06T11:18:53-04:00 https://forum.eggheads.org/viewtopic.php?p=73300#p73300 <![CDATA[[SOLVED] A little UserMRG.tcl script...]]>

Code: 

chattr $hand "+olT-VODSAM"
It will remove all but the desired flags of your userdefined ones, along with making sure ol is set aswell.

As for your problems with t3st, you do not trim any "extra" spaces or such, which could cause problems. That is, ".deluser t3st" would work, yet ".deluser t3st " would not. Could you confirm wether this might be the case?

Statistics: Posted by nml375 — Wed Jun 06, 2007 11:18 am

]]>