egghelp.org community Forum Index
[ egghelp.org home | forum home ]
egghelp.org community
Discussion of eggdrop bots, shell accounts and tcl scripts.
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Request!!!!!!!!

 
This forum is locked: you cannot post, reply to, or edit topics.   This topic is locked: you cannot edit posts or make replies.    egghelp.org community Forum Index -> Archive
View previous topic :: View next topic  
Author Message
AW
Guest





PostPosted: Thu Apr 25, 2002 4:38 am    Post subject: Reply with quote

Hi, i need help, any kind person?
here is a deal, took me few hours to figure out how do i set a date in a kick message, like Z was kicked by eggdrop(Apr 25 AW:ta ta), its worked fine, but if i kickban someone like .kb Z ta ta, its shows ok like Z was kicked by eggdrop(Apr 25 AW: ta ta), and if i do .bans, ban is there.
if someone unban the Z, since ban is still active, bot will kickban again, like Z was kicked by eggdrop(banned: ta ta), now my nick n date is not showing in a kick msg.
i will apprecite for the help, here r codes..

proc ban_command {nick host handle channel args1 flag} {
global bannick
if {[test_real $nick]} {
return 0
}
set args [split $args1 " "]
set bnick [lindex $args 0]
set knick $bnick
set btime "90"

if {[matchattr $handle m] || [matchattr $handle n]} {set btime "180"}

set reason [lrange $args 1 end]
if {$reason==""} {
puthelp "NOTICE $nick :Ban will not be set without a reason, provide a reason for banning $bnick!"
return 0
}

if {[string match "*@*" $bnick]==0} {
putserv "WHOIS $bnick"
set reason [lrange $args 1 end]
lappend bannick [list [string tolower $bnick] $handle $reason $btime $flag $channel $knick $nick 1]
return 1
}

if {$bnick==""} {
puthelp "NOTICE $nick :Usage: .b <nick|host> <reason>"
return 0
}

set badd [getchanhost $bnick $channel]
if {$badd!={}} {
set bhnick [maskhost $badd]
set bnick "*!*"
append bnick [string range $bhnick 2 end]
}
set date [clock format [clock seconds] -format "%b %d"]
if {[onchan $knick $channel]} {
putserv "MODE $channel +b $bnick"
putserv "KICK $channel $knick :$date $nick: $reason"
}
if {$flag} {
newchanban $channel $bnick
$handle $reason $btime
} else {
newban $bnick $handle $reason 0
}
return 1
}

thanks

Back to top
Display posts from previous:   
This forum is locked: you cannot post, reply to, or edit topics.   This topic is locked: you cannot edit posts or make replies.    egghelp.org community Forum Index -> Archive All times are GMT - 4 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


Forum hosting provided by Reverse.net

Powered by phpBB © 2001, 2005 phpBB Group
subGreen style by ktauber