<?xml version="1.0" encoding="UTF-8"?>
<feed xmlns="http://www.w3.org/2005/Atom" xml:lang="en-gb">
	<link rel="self" type="application/atom+xml" href="https://forum.eggheads.org/app.php/feed/topic/20805" />

	<title>egghelp/eggheads community</title>
	<subtitle>Discussion of eggdrop bots, shell accounts and tcl scripts.</subtitle>
	<link href="https://forum.eggheads.org/index.php" />
	<updated>2020-07-04T14:49:39-04:00</updated>

	<author><name><![CDATA[egghelp/eggheads community]]></name></author>
	<id>https://forum.eggheads.org/app.php/feed/topic/20805</id>

		<entry>
		<author><name><![CDATA[CrazyCat]]></name></author>
		<updated>2020-07-04T14:49:39-04:00</updated>

		<published>2020-07-04T14:49:39-04:00</published>
		<id>https://forum.eggheads.org/viewtopic.php?p=108669#p108669</id>
		<link href="https://forum.eggheads.org/viewtopic.php?p=108669#p108669"/>
		<title type="html"><![CDATA[Re: Bot self kick/ban &amp; Protected flag User Protection]]></title>

		
		<content type="html" xml:base="https://forum.eggheads.org/viewtopic.php?p=108669#p108669"><![CDATA[
<blockquote class="uncited"><div>Hello There i need help with this TCL.<br>Bot adding <strong class="text-strong">-ao+d</strong> flag for a user if he kicks bot or a Protected flag nick.<br>I want to remove this function from code.</div></blockquote>Remove the line:<div class="codebox"><p>Code: </p><pre><code>chattr $hand |-ao+d $chan</code></pre></div><blockquote class="uncited"><div>And also <br>Bot put modes like<br><strong class="text-strong">** eggdrop sets mode(s) -o flagkicker<br>** eggdrop sets mode(s) +b  *!*flagkicker@*.domain</strong><br><br>I need like this<br><br><strong class="text-strong">** eggdrop sets mode(s) -o+b flagkicker *!*flagkicker@*.domain</strong></div></blockquote>You can't do that. The script already use the correct way to put modes.<p>Statistics: Posted by <a href="https://forum.eggheads.org/memberlist.php?mode=viewprofile&amp;u=691">CrazyCat</a> — Sat Jul 04, 2020 2:49 pm</p><hr />
]]></content>
	</entry>
		<entry>
		<author><name><![CDATA[illusionist]]></name></author>
		<updated>2020-07-04T02:28:28-04:00</updated>

		<published>2020-07-04T02:28:28-04:00</published>
		<id>https://forum.eggheads.org/viewtopic.php?p=108668#p108668</id>
		<link href="https://forum.eggheads.org/viewtopic.php?p=108668#p108668"/>
		<title type="html"><![CDATA[Bot self kick/ban &amp; Protected flag User Protection]]></title>

		
		<content type="html" xml:base="https://forum.eggheads.org/viewtopic.php?p=108668#p108668"><![CDATA[
Hello There i need help with this TCL.<br>Bot adding <strong class="text-strong">-ao+d</strong> flag for a user if he kicks bot or a Protected flag nick.<br>I want to remove this function from code.<br>And also <br>Bot put modes like<br><strong class="text-strong">** eggdrop sets mode(s) -o flagkicker<br>** eggdrop sets mode(s) +b  *!*flagkicker@*.domain</strong><br><br>I need like this<br><br><strong class="text-strong">** eggdrop sets mode(s) -o+b flagkicker *!*flagkicker@*.domain</strong><br><br>Really appreciated if someone can help me with this...<br>Thanks in advance <div class="codebox"><p>Code: </p><pre><code>#      #Protected Flagset jaDuflag "P";                                                 ##                                                                 ## Ban Time for DeOpingset deoptime "15";                                                ##                                                                 ## Ban time for kickingset kicktime "20";                                                ##                                                                 ## Ban time For Banningset banstime "60";                                                ##                                                                 ## Flag for exceptions other than m|m and bot ?� (A-Z or userflag) #set exceflag "E";                                                 ##                                                                 ## Msg user informing him how to get his ops back (0/1) ?�         #set msgeuser "1";                                                 ##                                                                 ## If you want to log every thing jaDuX                          ## does uncomment the this line out. (recommend)                   ##                                                                 ##logfile 7 * "/path/to/log/jaDuX.log";                          ##                                                                 ########################## END OF SYSTEM SETTINGS ########################### BINDS ##############bind mode - *-o* jaDuX:deopbind kick - * jaDuX:kickbind mode - *+b* jaDuX:banbind chon - * jaDuX:console######### BINDS ################# Set jaDu sys console #####proc jaDuX:console { hand idx } {set chan [lindex [console $idx] 0]if {[matchattr $hand m|m]} { console $idx +1 }return 0}#### End of set console ############### jaDu deop ##########proc jaDuX:deop {nick host hand chan mdechg dnick} {global botnick jaDuflag exceflag deoptime msgeuser if {([matchattr $hand m|m $chan]) || ([matchattr $hand $exceflag|$exceflag]) || ([matchattr $hand b])} {return 0} if {[string tolower $nick] == [string tolower $botnick]} {return 0}  if {[string tolower $dnick] == [string tolower $botnick]} {   if {[validuser $hand]} {    if {[matchattr $hand |o $chan]} {     putserv "PRIVMSG $nick :You have lost your op on $chan for that !!"     chattr $hand |-ao+d $chan     if {$msgeuser} {putserv "PRIVMSG $nick :If you want your op back please talk to one of my masters. Masters on channel $chan are now: [chanlist $chan m|m]"}     if {![string match "$deoptime" "0"]} {newchanban $chan [maskhost $host] jaDuX "Deoped me !! [ctime [unixtime]] - $deoptime min ban." $deoptime}     putloglev 7 * "Protectison system: $nick!$host !$hand! deoped me on $chan !!"     return 0     } else {     chattr $hand |-ao+d $chan     if {![string match "$deoptime" "0"]} {newchanban $chan [maskhost $host] jaDuX "Deoped me !! [ctime [unixtime]] - $deoptime min ban." $deoptime}     putloglev 7 * "Protectison system: $nick!$host !$hand! deoped me on $chan !!"     return 0     }  }   if {![string match "$deoptime" "0"]} {newchanban $chan [maskhost $host] jaDuX "Deoped me !! [ctime [unixtime]] - $deoptime min ban." $deoptime}   putloglev 7 * "Protectison system: $nick!$host !$hand! deoped me on $chan !!"   return 0 } if {![matchattr [nick2hand $dnick $chan] $jaDuflag|$jaDuflag $chan]} {return 0} if {[string tolower $dnick] == [string tolower $nick]} {return 0} if {[botisop $chan]} {   pushmode $chan -o $nick    pushmode $chan +o $dnick   if {![string match "$deoptime" "0"]} {pushmode $chan +b [maskhost $host]}   flushmode $chan     if {[matchattr $hand |o $chan]} {       chattr $hand |-ao+d $chan       putserv "KICK $chan $nick :Do NOT deop $dnick !! - You have lost your op on $chan for that !!"       if {$msgeuser} {putserv "PRIVMSG $nick :If you want your op back please talk to one of my masters. Masters on channel $chan are now: [chanlist $chan m|m]"}     } else {       if {[validuser $hand]} {       chattr $hand |-ao+d $chan       }       putserv "KICK $chan $nick :Do NOT deop $dnick !! - $deoptime min shitlist."       if {![string match "$deoptime" "0"]} {newchanban $chan [maskhost $host] jaDuX "Deoped [nick2hand $dnick $chan] [ctime [unixtime]] - $deoptime min ban." $deoptime}     } }putloglev 7 * "Protectison system: $nick!$host !$hand! deoped $dnick![getchanhost $dnick $chan] ![nick2hand $dnick $chan]! on channel $chan !!"return 0}######### End proc deop ############# jaDu kick ##########proc jaDuX:kick {nick host hand chan knick reason} {global botnick jaDuflag exceflag kicktime msgeuser if {([matchattr $hand m|m $chan]) || ([matchattr $hand $exceflag|$exceflag]) || ([matchattr $hand b])} {return 0} if {[string tolower $nick] == [string tolower $botnick]} {return 0}  if {[string tolower $botnick] == [string tolower $knick]} {   if {[validuser $hand]} {    if {[matchattr $hand |o $chan]} {putserv "PRIVMSG $nick :You have lost your op on $chan for that !!"}     chattr $hand |-ao+d $chan     if {$msgeuser} {putserv "PRIVMSG $nick :If you want your op back please talk to one of my masters. Masters on channel $chan are now: [chanlist $chan m|m]"}     if {![string match "$kicktime" "0"]} {newchanban $chan [maskhost $host] jaDuX "Kicked [nick2hand $knick $chan] [ctime [unixtime]] - $kicktime min ban." $kicktime}     putloglev 7 * "Protectison system: $nick!$host !$hand! kicked me off $chan reason: $reason"     return 0     } else {     chattr $hand |-ao+d $chan     if {![string match "$kicktime" "0"]} {newchanban $chan [maskhost $host] jaDuX "Kicked me !! [nick2hand $knick $chan] [ctime [unixtime]] - $kicktime min ban." $kicktime}     putloglev 7 * "Protectison system: $nick!$host !$hand! kicked me off $chan reason: $reason"     return 0     }   if {![string match "$kicktime" "0"]} {newchanban $chan [maskhost $host] jaDuX "Kicked me !! [ctime [unixtime]] - $kicktime min ban." $kicktime}   putloglev 7 * "Protectison system: $nick!$host !$hand! kicked me off $chan reason: $reason"   return 0 } if {![matchattr [nick2hand $knick $chan] $jaDuflag|$jaDuflag $chan]} {return 0} if {[string tolower $knick] == [string tolower $nick]} {return 0} if {[botisop $chan]} {   pushmode $chan -o $nick   if {![string match "$kicktime" "0"]} {pushmode $chan +b [maskhost $host]}   flushmode $chan     if {[matchattr $hand |o $chan]} {       chattr $hand |-ao+d $chan       putserv "KICK $chan $nick :Do NOT Kick $knick !! - You have lost your op on $chan for that !!"       if {$msgeuser} {putserv "PRIVMSG $nick :If you want your op back please talk to one of my masters. Masters on channel $chan are now: [chanlist $chan m|m]"}     } else {       if {[validuser $hand]} {       chattr $hand |-ao+d $chan       }       putserv "KICK $chan $nick :Do NOT Kick $knick !! - $kicktime min shitlist."       if {![string match "$kicktime" "0"]} {newchanban $chan [maskhost $host] jaDuX "Kicked [nick2hand $knick $chan] [ctime [unixtime]] - $kicktime min ban." $kicktime}     } }putloglev 7 * "Protectison system: $nick!$host !$hand! kicked $knick![getchanhost $knick $chan] ![nick2hand $knick $chan]! off channel $chan reason: $reason"}######### End proc kick ############# jaDu ban ##########proc jaDuX:ban {nick host hand chan mdechg ban} {global botnick botname jaDuflag  exceflag banstime msgeuser if {([matchattr $hand m|m $chan]) || ([matchattr $hand $exceflag|$exceflag]) || ([matchattr $hand b])} {return 0} if {[string tolower $nick] == [string tolower $botnick]} {return 0}   if {[string match "$ban" "$botname"]} {    pushmode $chan -o $nick    putserv "MODE $chan -b $ban"    if {![string match "$banstime" "0"]} {pushmode $chan +b [maskhost $host]}    flushmode $chan     if {[matchattr $hand |o $chan]} {       chattr $hand |-ao+d $chan       putserv "KICK $chan $nick :Do NOT ban me !! - You have lost your op on $chan for that !!"       if {$msgeuser} {putserv "PRIVMSG $nick :If you want your op back please talk to one of my masters. Masters on channel $chan are now: [chanlist $chan m|m]"}     } else {       if {[validuser $hand]} {chattr $hand |-ao+d $chan}       putserv "KICK $chan $nick :Do NOT ban me !! - $banstime min shitlist."       if {![string match "$banstime" "0"]} {newchanban $chan [maskhost $host] jaDuX "Banned me [ctime [unixtime]] - $banstime min ban." $banstime}     }    putloglev 7 * "Protectison system: $nick!$host !$hand! banned me on $chan !!"  } set pnicks [chanlist $chan $jaDuflag|$jaDuflag]  foreach pnick $pnicks {   if {[string match "$ban" "$pnick![getchanhost $pnick $chan]"]} {    pushmode $chan -o $nick    pushmode $chan -b $ban    if {![string match "$banstime" "0"]} {pushmode $chan +b [maskhost $host]}    flushmode $chan     if {[matchattr $hand |o $chan]} {       chattr $hand |-ao+d $chan       putserv "KICK $chan $nick :Do NOT ban $pnick !! - You have lost your op on $chan for that !!"       if {$msgeuser} {putserv "PRIVMSG $nick :If you want your op back please talk to one of my masters. Masters on channel $chan are now: [chanlist $chan m|m]"}     } else {       if {[validuser $hand]} {chattr $hand |-ao+d $chan}       putserv "KICK $chan $nick :Do NOT ban $pnick !! - $banstime min shitlist."       if {![string match "$banstime" "0"]} {newchanban $chan [maskhost $host] jaDuX "Banned [nick2hand $pnick $chan] [ctime [unixtime]] - $banstime min ban." $banstime}     }    putloglev 7 * "Protectison system: $nick!$host !$hand! banned $pnick![getchanhost $pnick $chan] ![nick2hand $pnick $chan]!on channel $chan !!"  } }}######### End proc ban ####</code></pre></div><p>Statistics: Posted by <a href="https://forum.eggheads.org/memberlist.php?mode=viewprofile&amp;u=12853">illusionist</a> — Sat Jul 04, 2020 2:28 am</p><hr />
]]></content>
	</entry>
	</feed>
