Posted by Dragnlord in 2008
Code: Select all
# Usage example: !sitetest egghelp.org
bind pub - !sitetest site:test
proc site:test {n u h c a} {
if {[catch {set site_test [socket -async $a 80]} sockerr]} {
putserv "privmsg $c :$a is Down"
} else {
putserv "privmsg $c :$a is Up"
}
if {[info exist site_test]} {close $site_test}
}
putlog "Site Test loaded.."
<user>!status ltc-us
<bot> Server on 3333 - Online
<bot> Server on 3334 - Online
<bot> Server on 80 - online
<user> !status ltc-eu
<bot> Server on 3333 - Online
<bot> Server on 3334 - Online
I know this is a bit different than the original code up top but can this be done?