Hello, im publishing the Infobot used on AnonOps operations.

Commands
!check <website/url> - checks if the host is online/offline
!loic - Returns the latest loic link.
!hive - Returns the hive server + port.
!set hive - Changes hive info.
!target - Returns the current target.
!set target - changes target info.
!shout - Shouts the text you set with !set shout.
!set shout - Changes shout text.
!linux - Returns T50 link.
!commands - Returns all commands you see above.
!peak - Returns how much loic's are in the hive.

I will make a decent version soon.
on $*:text:/^[.!@]check*/Si:#: {
if ($sock(check)) { sockclose check }
sockopen check www.downforeveryoneorjustme.com 80
sockmark check $$2 # $nick
}
on *:sockopen:check: {
sockwrite -n $sockname GET $+(/,$gettok($sock(check).mark,1,32)) HTTP/1.1
sockwrite -n $sockname Host: www.downforeveryoneorjustme.com
sockwrite -n $sockname Connection: close
sockwrite -n $sockname $crlf
}
on *:sockread:check: {
var %x | sockread %x
if ($regex(%x,(.+)<a href="(.+)"\sclass="domain">.+<\/a>(.+))) {
tokenize 32 $sock(check).mark
msg $2 $+($3,:) $regsubex($+($regml(1),,$regml(2),,$regml(3)),/(<[^>]*>)/g,)
}
}
on *:text:!loic:#:{
msg $chan https://github.com/NewEraCracker/LOIC/downloads
}


on *:text:!commands:#:{
notice $nick !check, !loic, !linux, !hive, !peak, !target
}

on *:text:!sethive *:#:{
if ($nick isop #) {
set %hiveserver $2-
msg $chan Hive server changed, New server $2-
}
}

on *:text:!hive:#:{
msg $chan HIVE: %hiveserver
}

on *:join:#OpV:{
notice $nick Welcome to Operation Vendetta, !commands for more info.
}
on *:text:!linux:#:{
msg $chan Get T50 at http://is.gd/u36O65
}

on *:text:!set target *:#:{
if ($nick isop #) {
msg $chan Target updated see: !target
set %atarget $3-
}
}

on *:text:!target:#:{
notice $nick Current Target: %atarget
}

on *:text:!set shout *:#:{
if ($nick isop #) {
set %ashout $3-
msg $chan Shout changed!
}
}
on *:Text:!shout:#:{
if ($nick isop #) {
msg $chan %ashout
}
}

on *:text:!peak:#:{ scon $getscon(irc.infatech.net) | var %a $nick(#OpV,0) | scon $getscon(belldandy.anonops.in) | msg #Opv There are %a lazors in the hive! }
alias getscon var %a 1 | while ($scon(%a) != $null) { if ($scon(%a).server == $1) return %a | inc %a }