ALIAS CheckJoin {
if ((%invited. [ $+ [ $1 ] ] != Xx_Molson_xX) && ($calc($nick($1,0) - 1) < 2) && (!$findtok(%autojoin.always,$1,44))) { .part $1 Not enough users. 2 User Minimum, Talk to Xx_molson_xX 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 Xx_molson_xX *** [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 Xx_molson_xX *** [4INVITE]: New Invitation to4 $1 by4 %invited. [ $+ [ $1 ] ] (Users:4 $nick($1,0) $+ $chr(124) Kicks:4 %kicknum $+ )
msg $1 Bot $me $+ , Reporting for duty. I've been invited here by4 %invited. [ $+ [ $1 ] ] $+ , To find out more about this bot Message Xx_molson_xX, it has a price script and calcuaters on it... $iif(%kicknum > 0,- 4WARNING: Kicked from $1 %kicknum Times. You only get 5!)
}
}
ON *:JOIN:#:{
if ($nick == Xx_molson_xX) {
if ($chan == #Jr_Jaguars) mode $chan Xx_molson_xX
.msg $chan [4Xx_molson_xX]: Creator of $me $+ , and a proud member of Clan Jaguar #clanjag ;)
}
else .timer 1 3 CheckJoin $chan
}
ON *:INVITE:#:{
if ($chan(0) == 30) { notice $nick Sorry! I'm already on 30 Channels, that's the most the network allows. Soon in the future there will be more bots to help. | halt }
if ($isignored($nick) || ($chan == #rsmarket) || ($chan == #finalownage)) halt
if (*price* iswm $chan && $chan != #RsPrices) halt
if (*value* iswm $chan) halt
IF (%kicked. [ $+ [ $chan ] ] >= 5) {
notice $nick *** [7Invitation]: I have been kicked from $chan 5 times. Channel is Blacklisted. Talk to Xx_molson_xX 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
}