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. Max channels ever:12 %mostchannelsever 14Set:12 $duration($calc( $ctime - %mostchannelseverdate)) 14ago
%way 14I am using12 Windows $+ $os $+ 14, and current bot time is12 $time 14or12 $asctime(hh:nn:TT) $+ 14.
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 $ctime
}
unset %maxchan
}