on $*:TEXT:/^[@!]botinfo/Si:#: {
if ( *$* iswm $1- ) { ignore -u600 $nick | notice $nick You are not allowed to use ''$'' in ANY of my commands. 10 min ignore | timer 1 600 notice $nick You are no longer ignored, please dont do it again. Thnx | halt
}
if ($hget(botinfo,$nick) >= 2) { notice $nick Do not flood commands. Ignored for 10 mins | /ignore -u600 $nick | timer 1 600 You have been unignored. please dont do that again. Thnx | halt
}
set %way $iif($left($1,1) == @, msg $chan, notice $nick) 12[14Bot-Info12]14
hinc -mu5 botinfo $nick 1
var %a = 1
while (%a <= $scon(0)) {
scon %a
inc %chans $chan(0)
inc %a
}
scon -r
%way 14I have been online on this server for12 $uptime(server,1) 14And last Reboot was12 $uptime(system,1) 14ago.
%way 14I am in12 %chans $+ / $+ $calc( $scon(0) * 30 ) 14Channels over12 $scon(0) 14networks. (Thinking Each network has limit of 30 channels.)
%way 14I am using12 Windows $+ $os $+ 14, and current bot time is12 $time 14or12 $asctime(hh:nn:TT) $+ 14.
%way 14Most channels I've ever been in:12 %mostchannelsever 14Record sat on:12 %mostchannelseverdate
unset %way
unset %chans
}
on me:*:JOIN:#: {
var %c = 1
var %maxchan = 0
while (%c <= $scon(0)) {
scon %c
inc %maxchan $chan(0)
inc %c
}
scon -r
if (%maxchan > %mostchannelsever) {
set %mostchannelsever %maxchan
set %mostchannelseverdate $date
}
unset %maxchan
}