ALIAS CheckJoin {
if ((%invited. [ $+ [ $1 ] ] != Booty) && ($calc($nick($1,0) - 1) < 3) && (!$findtok(%autojoin.always,$1,44))) { .part $1 Not enough users. 4 User Minimum, Talk to Booty or join #booty to get bot in channel for temporary use. | halt }
elseif ((%invited. [ $+ [ $1 ] ] != ChanServ) && (%invited. [ $+ [ $1 ] ]) && ($haspower(%invited. [ $+ [ $1 ] ],$1) == false)) {
part $1 Invited by4 %invited. [ $+ [ $1 ] ] $+ , but they do not have ops. If an op wishes me here, please re-invite me.
.notice Booty *** [4INVITE]: New Invitation to4 $1 by4 %invited. [ $+ [ $1 ] ] - But they did not have ops, so I left.
%autojoin.channels = $remove(%autojoin.channels,$chr(44) $+ $1)
}
elseif (%invited. [ $+ [ $1 ] ]) {
var %kicknum = %kicked. [ $+ [ $1 ] ]
if (%kicknum == $null) %kicknum = 0
.notice Booty *** [4INVITE]: New Invitation to4 $1 by4 %invited. [ $+ [ $1 ] ] (Users:4 $nick($1,0) $+ $chr(124) Kicks:4 %kicknum $+ )
msg $chan $me $+ , is here! I've been invited here by4 %invited. [ $+ [ $1 ] ] $+ , To find out more about $me type ~commands for a list of commands.If you would like to make me leave type !part. Only 7Half-op's& 4OP'sCan use this command!! Visit http://z8.invisionfree.com/BootysBots/index.php?showtopic=41 for info on Events/Drawings!! 4 kicks = Blacklist $iif(%kicknum > 0,- 4WARNING: Kicked from $1 %kicknum Times. You only get 5!)
}
}
ON *:JOIN:#:{
if $chan == #stats { halt }
if ($nick == Booty) {
if ($chan == #Booty) mode $chan Booty
.msg $chan [4Booty]: Creator of $me $+!
}
else .timer 1 3 CheckJoin $chan
}
ON *:INVITE:#:{
if ($comchan($me,0) == 30) { notice $nick Searching for a Open Booty Bot!! One Moment Please..
/set %invite $rand(1,2)
if (%invite == 1) { msg Boots Join $chan }
if (%invite == 2) { msg Bootay join $chan }
if ($isignored($nick) || ($chan == #rsmarket) || ($chan == #finalownage)) halt
if (*price* iswm $chan && $chan != #RsPrices) halt
if (*value* iswm $chan) halt
IF (%kicked. [ $+ [ $chan ] ] >= 4) {
notice $nick *** [7Invitation]: I have been kicked from $chan 3 times. Channel is Blacklisted. Talk to Booty if you want me to rejoin again.
halt
}
else {
join $chan
set -u15 %invited. [ $+ [ $chan ] ] $nick
%autojoin.channels = %autojoin.channels $+ , $+ $chan
}
set -u15 %invitedby $nick
set -u15 %invitedchan $chan
}
}