###############################################
# Planetarion Scan Relay script 1.0 by JDD
###############################################

#To load this script place this file in your C:\Documents and Settings\[username]\Application Data\mIRC or for vista/win7 C:\Users\[username]\AppData\Roaming\mIRC
#You may need to turn your settings for folders to view hidden files.
#Open mIRC type /load -rs scanscript.mrc
#Setup: right click in any window and select Setup Scan Relay. This will pop up 2 edit box's.
#In the first edit box you will need to input the server on which your bot is located.
#In the second box you will need to input the name of the bot you wish scans to be relayed to.
#To change the destination server and bot simply run the "Setup Scan Relay" again.




Menu * {
  -
  Scan Relay Setup: {
    set %serv $input(Enter Your Destination Server Name located at the top of your status window.,e,Planetarion Scan Relay script 1.0 by JDD)
    set %bot $input(Enter Your Destination Bot Name.,e,Planetarion Scan Relay script 1.0 by JDD)
  }
  -
}
alias -l net {
  var %netcount $scon(0)
  while %netcount {
    if ($scon(%netcount).network == $1) { var %netid %netcount }
    dec %netcount
  }
  scon %netid return $!cid
}
alias -l relay {
  scid $net($1) { $2- }
}
on *:TEXT:*:*:{
  if (($regex($1-,/http:\/\/[^/]+\/showscan.pl\?scan_(grp|id)=[0-9a-zA-Z]+/)) && (($chan == $null) || (%bot !ison $chan))) { relay %serv .msg %bot $1- }
}
on *:INPUT:*:{
  if (($regex($1-,/http:\/\/[^/]+\/showscan.pl\?scan_(grp|id)=[0-9a-zA-Z]+/)) && (($chan == $null) || (%bot !ison $chan))) { relay %serv .msg %bot $1- }
}