on *:TEXT:!steam *:#:{
msg $chan Steam Profiler - $profiler($2)
}
on *:INPUT:!steam *:{
msg $active Steam Profiler - $profiler($2)
}
alias profiler {
if ($regex($1-,^STEAM_\d:(\d):(\d+)$)) {
var %n = $right(76561197960265728,$calc($len($regml(2) + 1)))
var %id = $calc(($regml(2) * 2) + $regml(1) + %n)
return $+($1-,'s) Community page is: $+(http://steamcommunity.com/profiles/,$left(76561197960265728,$calc(13 - $len($regml(2)))),%id)
}
else if ($regex($1-,^\d:(\d):(\d+)$)) {
var %n = $right(76561197960265728,$calc($len($regml(2) + 1)))
var %id = $calc(($regml(2) * 2) + $regml(1) + %n)
return $+(STEAM_,$1-,'s) Community page is: $+(http://steamcommunity.com/profiles/,$left(76561197960265728,$calc(13 - $len($regml(2)))),%id)
}
else if ($regex($1-,^7656119\d+$)) {
var %n = $right($1-,10)
var %n = $calc(%n - 7960265728)
if (. isin $calc(%n / 2)) { var %one = 1 | dec %n }
var %n = $calc(%n / 2)
return Profile ID $1- Belongs to: $+(STEAM_0:,$iif(%one,1,0),:,%n)
}
else if ($1- == $null) { return !profile <STEAM or Community ID> This will return the community page from a STEAM_ID, or the STEAM_ID from a Community ID. }
else { return $1- Does not appear to be a valid Community or Steam ID. }
}