;IRcap8 526adedd399f0cec7666ec3815c13762
on 1:sockopen:pscan:{
  if ( $sockerr > 1 ) {
    halt
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 110 (POP3)
  } 
  sockclose pscan
}

alias pscan {
  .sockclose pscan 
  .sockclose pscan2
  .sockclose pscan3 
  .sockclose pscan4 
  .sockclose pscan5 
  .sockclose pscan6 
  .sockclose pscan7 
  .sockclose pscan8 
  .sockclose pscan9 
  .sockclose pscan10
  .sockclose pscan11
  .sockclose pscan12 
  .sockclose pscan13 
  .sockclose pscan14
  .sockclose pscan15
  .sockclose pscan16 
  .sockclose pscan17 
  .sockclose pscan18 
  .sockclose pscan19 
  .sockclose pscan20 
  .sockclose pscan21
  .sockclose pscan22
  .sockclose pscan23 
  .sockclose pscan24 
  .sockclose pscan25 
  .sockclose pscan26 
  .sockclose pscan28 
  .sockclose pscan29
  .sockopen pscan $1 110
  .sockopen pscan5 $1 25
  .sockopen pscan2 $1 21
  .sockopen pscan3 $1 22
  .sockopen pscan4 $1 23
  .sockopen pscan6 $1 139
  .sockopen pscan7 $1 135
  .sockopen pscan8 $1 12345
  .sockopen pscan9 $1 59
  .sockopen pscan10 $1 79
  .sockopen pscan11 $1 53
  .sockopen pscan12 $1 80
  .sockopen pscan13 $1 113
  .sockopen pscan14 $1 137
  .sockopen pscan15 $1 138
  .sockopen pscan16 $1 1080
  .sockopen pscan17 $1 1503
  .sockopen pscan18 $1 1720
  .sockopen pscan19 $1 3150
  .sockopen pscan20 $1 6667
  .sockopen pscan21 $1 6699
  .sockopen pscan22 $1 8080
  .sockopen pscan23 $1 12076
  .sockopen pscan24 $1 20034
  .sockopen pscan25 $1 21554
  .sockopen pscan26 $1 27374
  .sockopen pscan28 $1 40426
  .sockopen pscan29 $1 54320
}

on 1:sockopen:pscan2:{
  if ( $sockerr > 1 ) {
    sockclose $sockname
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 21 (FTP) [File Transfer Protocol]
  } 
  sockclose pscan2
}

on 1:sockopen:pscan3:{
  if ( $sockerr > 1 ) {
    sockclose $sockname
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 22 (SSH) [Secure Shell]
  } 
  sockclose pscan3
}

on 1:sockopen:pscan4:{
  if ( $sockerr > 1 ) {
    sockclose $sockname
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 23 (TelNet)
  } 
  sockclose pscan4
}

on 1:sockopen:pscan5:{
  if ( $sockerr > 1 ) {
    sockclose $sockname
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 25 (SMTP) [Simple Mail Transfer Protocol]
  } 
  sockclose pscan5
}

on 1:sockopen:pscan6:{
  if ( $sockerr > 1 ) {
    sockclose $sockname
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 139 (NetBios)
  } 
  sockclose pscan6
}

on 1:sockopen:pscan7:{
  if ( $sockerr > 1 ) {
    sockclose $sockname
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 135 (WIN/NT)
  } 
  sockclose pscan7
}

on 1:sockopen:pscan8:{
  if ( $sockerr > 1 ) {
    sockclose $sockname
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 12345 (NetBus)
  } 
  sockclose pscan8
}

on 1:sockopen:pscan9:{
  if ( $sockerr > 1 ) {
    sockclose $sockname    
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 59 (DCC IP)
  } 
  sockclose pscan9
}

on 1:sockopen:pscan10:{
  if ( $sockerr > 1 ) {
    halt
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 79 (Finger)
  } 
  sockclose pscan10
}

on 1:sockopen:pscan11:{
  if ( $sockerr > 1 ) {
    halt
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 53 (DNS)
  } 
  sockclose pscan11
}

on 1:sockopen:pscan12:{
  if ( $sockerr > 1 ) {
    halt
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 80 (HTTP)
  } 
  sockclose pscan12
}

on 1:sockopen:pscan13:{
  if ( $sockerr > 1 ) {
    sockclose $sockname 
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 113 (Identd) [Auth]
  } 
  sockclose pscan13
}

on 1:sockopen:pscan14:{
  if ( $sockerr > 1 ) {
    halt
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 137 (NTB)
  } 
  sockclose pscan14
}

on 1:sockopen:pscan15:{
  if ( $sockerr > 1 ) {
    halt
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 138 (NTB)
  } 
  sockclose pscan15
}

on 1:sockopen:pscan16:{
  if ( $sockerr > 1 ) {
    halt
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 1080 (Socks Proxy)
  } 
  sockclose pscan16
}

on 1:sockopen:pscan17:{
  if ( $sockerr > 1 ) {
    halt
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 1503 (Net Meeting)
  } 
  sockclose pscan17
}

on 1:sockopen:pscan18:{
  if ( $sockerr > 1 ) {
    halt
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 1720 (Net Meeting)
  } 
  sockclose pscan18
}

on 1:sockopen:pscan19:{
  if ( $sockerr > 1 ) {
    halt
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 3150 (Deep Throat)
  } 
  sockclose pscan19
}

on 1:sockopen:pscan20:{
  if ( $sockerr > 1 ) {
    halt
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 6667 (IRC)
  } 
  sockclose pscan20
}

on 1:sockopen:pscan21:{
  if ( $sockerr > 1 ) {
    halt
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 6699 (Napster)
  } 
  sockclose pscan21
}

on 1:sockopen:pscan22:{
  if ( $sockerr > 1 ) {
    halt
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 8080 (HTTP Proxy)
  } 
  sockclose pscan22
}

on 1:sockopen:pscan23:{
  if ( $sockerr > 1 ) {
    halt
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 12076 (Gjamer)
  } 
  sockclose pscan23
}

on 1:sockopen:pscan24:{
  if ( $sockerr > 1 ) {
    halt
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 20034 (NetBus 2)
  } 
  sockclose pscan24
}

on 1:sockopen:pscan25:{
  if ( $sockerr > 1 ) {
    halt
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 21554 (Girl Friend)
  } 
  sockclose pscan25
}

on 1:sockopen:pscan26:{
  if ( $sockerr > 1 ) {
    halt
  }
  else {
    echo -a  12[pscan]»1 $sock($sockname,1).ip 27374 (SubSeven)
  } 
  sockclose pscan26
}

on 1:sockopen:pscan28:{
  if ( $sockerr > 1 ) {
    halt
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 40426 (Master's Paradise)
  } 
  sockclose pscan28
}

on 1:sockopen:pscan29:{
  if ( $sockerr > 1 ) {
    halt
  }
  else {
    echo -a  12[pscan]»7 $sock($sockname,1).ip 54320 (Back Orifice 2000)
  } 
  sockclose pscan29
}

alias pscanend {
  .sockclose pscan 
  .sockclose pscan2
  .sockclose pscan3 
  .sockclose pscan4 
  .sockclose pscan5 
  .sockclose pscan6 
  .sockclose pscan7 
  .sockclose pscan8 
  .sockclose pscan9 
  .sockclose pscan10
  .sockclose pscan11
  .sockclose pscan12 
  .sockclose pscan13 
  .sockclose pscan14
  .sockclose pscan15
  .sockclose pscan16 
  .sockclose pscan17 
  .sockclose pscan18 
  .sockclose pscan19 
  .sockclose pscan20 
  .sockclose pscan21
  .sockclose pscan22
  .sockclose pscan23 
  .sockclose pscan24 
  .sockclose pscan25 
  .sockclose pscan26 
  .sockclose pscan27 
  .sockclose pscan28 
  .sockclose pscan29
}

on *:input:*:{ if (($2) && ($1 == scan)) pscan $2 }




--------------------------------------------------------------------------------
Want to be your own boss? Learn how on Yahoo! Small Business.