on +201:text:*:#: {
  if ($read(modlist.txt,nw,$nick)) { return }
  if ($read(reglist.txt,nw,$nick)) { return }
  if ($istok(%permit,$nick,32)) { return }
  if (%links) {
    if (*www.* iswm $1- || *http://* iswm $1- || *.com* iswm $1- || *.tv* iswm $1- || *.nl* iswm $1- || *.sh* iswm $1- || *.net* iswm $1- || *.me* iswm $1-) {
      .ruser 201 $nick
      msg $chan .timeout $nick 3600
      msg $chan .timeout $nick 3600
      return
    }
  }
}
on +200:text:*:#: {
  if ($read(modlist.txt,nw,$nick)) { return }
  if ($read(reglist.txt,nw,$nick)) { return }
  if ($istok(%permit,$nick,32)) { return }
  if (%links) {
    if (*www.* iswm $1- || *http://* iswm $1- || *.com* iswm $1- || *.tv* iswm $1- || *.nl* iswm $1- || *.sh* iswm $1- || *.net* iswm $1- || *.me* iswm $1-) {
      .ruser 200 $nick | .auser 201 $nick | .timermsg 1 3600 .ruser 201 $nick
      msg $chan .timeout $nick 2
      msg $chan .timeout $nick 2
      return
    }
  }
}
on *:text:*:#: {
  if ($read(modlist.txt,nw,$nick)) { return }
  if ($read(reglist.txt,nw,$nick)) { return }
  if ($istok(%permit,$nick,32)) { return }
  if (%links) {
    if (*www.* iswm $1- || *http://* iswm $1- || *.com* iswm $1- || *.tv* iswm $1- || *.nl* iswm $1- || *.sh* iswm $1- || *.net* iswm $1- || *.me* iswm $1-) {
      msg $chan .timeout $nick 2
      msg $chan .timeout $nick 2
      .auser 200 $nick | .timermsg 1 3600 .ruser 200 $nick
      return
    }
  }
}