egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2002-03-04T01:03:00-04:00 https://forum.eggheads.org/app.php/feed/topic/1174 2002-03-04T01:03:00-04:00 2002-03-04T01:03:00-04:00 https://forum.eggheads.org/viewtopic.php?p=5031#p5031 <![CDATA[public commands & userflags]]>
u dont know how happy u made some people :smile::)

it works just perfekt :eek:)

Statistics: Posted by Guest — Mon Mar 04, 2002 1:03 am

]]> 2002-03-04T00:49:00-04:00 2002-03-04T00:49:00-04:00 https://forum.eggheads.org/viewtopic.php?p=5028#p5028 <![CDATA[public commands & userflags]]>

Code: 

set vampy_flags "Bmnfb|Bmnfb"set no_vampy "#novamp"bind pub - !beiss pub_beissproc pub_beiss {nick uhost hand chan arg} {global no_vampy vampy_flagsset arg [lindex [split $arg] 0]if {[matchattr [nick2hand $arg] $vampy_flags $chan] || [isbotnick $arg]} { return 0 }putlog "$nick used !beiss $arg"putserv "PRIVMSG $chan :blablabla with $arg"putserv "KICK $chan $arg :moreblabla"putserv "NOTICE $arg :still some more blabla"}

Statistics: Posted by Wcc — Mon Mar 04, 2002 12:49 am

]]> 2002-03-03T23:50:00-04:00 2002-03-03T23:50:00-04:00 https://forum.eggheads.org/viewtopic.php?p=5026#p5026 <![CDATA[public commands & userflags]]>
I'm a quite newbie on tcl and have a question on a script i created copying parts of another one.

the basic thing i have a problem with is, that i added a public fun-kick command, but i want to prevent global and channel +m and +n as well as bots from being kicked.

so far, global owners and bots dont get kicked.

(i dont understand every option/argument/whatever from this script as i copied the relevant bits, so please have mercy if theres something horribly wrong or complicated with this script)

this is, how far i have come with that target, i'd be thankfull for any help on this.

Code: 

set vampy_flags "Bmnfb|Bmnfb"set no_vampy "#novamp"...bind pub - !beiss pub_beissproc pub_beiss {nick uhost hand chan arg} {global no_vampy vampy_flagsif {[matchattr $arg $vampy_flags $chan] || [matchattr $arg $vampy_flags]} { return 0 }putlog "$nick used !beiss $arg"putchan $chan "blablabla with $arg"puthelp "KICK $chan $arg :moreblabla"putnotc $arg "still some more blabla"}proc vampyflagcheck {user chan} {global vampy_flagsset protected 0set user [nick2hand $user] if {[matchattr $user $vampy_flags $chan] || [matchattr $user $vampy_flags]} {  set protected 1 } return $protected}
thanks in advance for helping me

oh, and i need to prevent the bot from kicking itself ... it does that :sad:

<font size=-1>[ This Message was edited by: RaeTheGit on 2002-03-03 21:25 ]</font>

Statistics: Posted by Guest — Sun Mar 03, 2002 11:50 pm

]]>