Bu yazıyı burdan copy yapıp txt dosyasına atıyoruz dosya adı port.txt olucak sekilde ayarlıyoruz. ve bu dosyayı Bilgisayarınızdaki C:\Program Filesiçindeki scriptinize atıosunuz ve bu dosyayı attıkdan sonra Scriptinizi acıp /load -rs port.txt yazıp enterleyiniz.
İlk önce portscanner için alias(kısayol) yapıyoruz.
alias portscanner {
window -aCdek[0] @portscanner
}
alias portscan {;Variableleri ayarlayıp sockopen için döngü kuruyoruz.
sockclose pscan*
var %port = 1
while (%port <= %p.end) {
sockopen pscan $+ %port %p.server %port
inc %port
}
aline @portscanner Port Bakmaksı tamamlandı.
}
;Port bulunduğunda yapılacak olayları yazıyoruz.
on 1:sockopen:pscan*:{
if ($sockerr > 0) { sockclose $sockname }
else {
aline @portscanner $sock($sockname).ip üzerinde $+ $sock($sockname).$+ port portu açık
}
}
;Port scanner penceresi için menüleri yapıyoruz.
menu @portscanner {
Port Scan:{
set %p.server $?=”Bakmakk için ip?”
set %p.end $?=”Kaçıncı porta kadar tarancak?”
aline @portscanner %p.server üzerinde port Bakmaksı başladı.
portscan
}
}
;Normal menülere portscanner ekleyelim.
menu status,menubar,channel,query,nicklist {
-
Port-Scanner:portscanner
}
Ekleyen : Serkan
