Forums Scripts & Popups Checking to see if an html link is valid

on *:snotice:*client connecting*: {
  if ($6 == on) {
    /whois $9
  }
  if ($6 == at) {
    /whois $8
  }
}
raw 378:*: {
  set %host $remove($6, @)
  set %host1 $remove(%host, *)
}

on *:START: {
  /hmake spam 10
  if ($isfile(spam.hsh)) /hload spam spam.hsh
}
on *:JOIN:#: {
  var %mask = $gettok($address($nick, 5), 2, $asc(@))
  if ($hget(spam, %mask)) {
    if (($me isop $chan) || ($me ishop $chan)) /kick $chan $nick Don't spam here
    else /msg $chan Notice: $nick is a known spammer.
  }
}
on *:TEXT:*: {
  var %msg = Come watch me on my webcam and chat /w me :-)
  if (%msg isin $1-) {
    var %mask = $gettok($address($nick, 5), 2, $asc(@))
    /hadd spam %mask
    /hsave spam spam.hsh
    if (($me isop $chan) || ($me ishop $chan)) /kick $chan $nick Don't spam here
    else /msg $chan Notice: $nick is a known spammer.
  }
}

on *:START:{
  hmake spam 10
  if ($isfile(spam.hsh)) /hload spam spam.hsh
}
on *:JOIN:#:{
  if ($hget(spam,[color:green]$site[/color])) {
    if (($me isop $chan) || ($me ishop $chan)) /kick $chan $nick Don't spam here
    else /msg $chan Notice: $nick is a known spammer.
  }
}
on *:TEXT:*:[color:red]#:[/color]{
  if (*Come watch me on my webcam and chat /w me* iswm $strip($1-)) {
    hadd spam [color:green]$site[/color] [color:red]<value>[/color]
    hsave spam spam.hsh
    if (($me isop $chan) || ($me ishop $chan)) /kick $chan $nick Don't spam here
    else /msg $chan Notice: $nick is a known spammer.
  }
}