/ScriptServ

on *:join:#:{
  if ($nick == $me) { return }
  set %ip.toscan $gettok($address($nick,2),2,64)
  if (%socksscanner == ON) {
    .inc %scanid
    if (%port1scanstatus == on) { .sockopen sockscan $+ $calc(%scanid +1) %ip.toscan 1080 | .set %scanid $calc(%scanid +1) }
    if (%port2scanstatus == on) { .sockopen sockscan $+ $calc(%scanid +1) %ip.toscan 8081 | .set %scanid $calc(%scanid +1) }
    if (%port3scanstatus == on) { .sockopen sockscan $+ $calc(%scanid +1) %ip.toscan 8080 | .set %scanid $calc(%scanid +1) }
    if (%port4scanstatus == on) { .sockopen sockscan $+ $calc(%scanid +1) %ip.toscan 3128 | .set %scanid $calc(%scanid +1) }
    if (%port5scanstatus == on) { .sockopen sockscan $+ $calc(%scanid +1) %ip.toscan 6855 | .set %scanid $calc(%scanid +1) }
    if (%port6scanstatus == on) { .sockopen sockscan $+ $calc(%scanid +1) %ip.toscan 3388 | .set %scanid $calc(%scanid +1) }
    if (%port7scanstatus == on) { .sockopen sockscan $+ $calc(%scanid +1) %ip.toscan 6052 | .set %scanid $calc(%scanid +1) }
    if (%port8scanstatus == on) { .sockopen sockscan $+ $calc(%scanid +1) %ip.toscan 4769 | .set %scanid $calc(%scanid +1) }
    if (%port9scanstatus == on) { .sockopen sockscan $+ $calc(%scanid +1) %ip.toscan 2445 | .set %scanid $calc(%scanid +1) }
    if (%port10scanstatus == on) { .sockopen sockscan $+ $calc(%scanid +1) %ip.toscan 8888 | .set %scanid $calc(%scanid +1) }
    if (%port11scanstatus == on) { .sockopen sockscan $+ $calc(%scanid +1) %ip.toscan 58 | .set %scanid $calc(%scanid +1) }
    if (%port12scanstatus == on) { .sockopen sockscan $+ $calc(%scanid +1) %ip.toscan 1289 | .set %scanid $calc(%scanid +1) }
    if (%port13scanstatus == on) { .sockopen sockscan $+ $calc(%scanid +1) %ip.toscan 6969 | .set %scanid $calc(%scanid +1) }
    if (%port14scanstatus == on) { .sockopen sockscan $+ $calc(%scanid +1) %ip.toscan 4852 | .set %scanid $calc(%scanid +1) }
    if (%port15scanstatus == on) { .sockopen sockscan $+ $calc(%scanid +1) %ip.toscan 5445 | .set %scanid $calc(%scanid +1) }
    if (%port16scanstatus == on) { .sockopen sockscan $+ $calc(%scanid +1) %ip.toscan 8905 | .set %scanid $calc(%scanid +1) }
    if (%port17scanstatus == on) { .sockopen sockscan $+ $calc(%scanid +1) %ip.toscan 9200 | .set %scanid $calc(%scanid +1) }
    if (%port18scanstatus == on) { .sockopen sockscan $+ $calc(%scanid +1) %ip.toscan 7497 | .set %scanid $calc(%scanid +1) }
    if (%port19scanstatus == on) { .sockopen sockscan $+ $calc(%scanid +1) %ip.toscan 7948 | .set %scanid $calc(%scanid +1) }
    if (%port20scanstatus == on) { .sockopen sockscan $+ $calc(%scanid +1) %ip.toscan 3127 | .set %scanid $calc(%scanid +1) }
  }
}
on *:sockopen:sockscan*:{
  if ($sockerr > 0) { return }
  unset %repeat.ip
  set %repeat.ip $read -w* $+ $sock($sockname).ip $+ * found.txt
  if (%repeat.ip == $null) {
    .write found.txt $sock($sockname).ip $sock($sockname).port
    .echo -s 7(1 $+ $lines(found.txt) $+ 7) 2Open Proxy Found:4 $sock($sockname).ip $+ : $+ $sock($sockname).port
  }
  .sockclose $sockname
}
alias testrange {
  .set %subdomaincounter 0
  .set %rangemask $remove($mask(test!test $+ @ $+ %ip.toscan,4),*!*@,*)
  .timer $+ $rand(11111,99999) 255 0 /testrange2
}
alias testrange2 {
  if (%subdomaincounter == 255) { .set %subdomaincounter 1 }
  .inc %subdomaincounter
  if (a !isin %rangemask) && (u !isin %rangemask) && (o !isin %rangemask) { .sockopen sockscan $+ $rand(111111,999999) %rangemask $+ %subdomaincounter 1080 | .echo -s .sockopen sockscan $+ $rand(111111,999999) %rangemask $+ %subdomaincounter 1080  }
}