Çevrimdışı

on *:text:*:#webmaster: {
if $1 == !keywords {
if !$2 { msg $chan Yanlış kullanım. Kullanmanız gereken kod: !keywords domain.com , !keywords domain.net gibi. }
else {
if !$regex($2,.com|.net|.org|.biz|.info|.com.tr|.in|. tv|.cc|.xxx|.co|.gen.tr|.me|.bel.tr|.org.tr|.gov.t r|.edu.tr|.web.tr|.name.tr) {
msg $chan Sorgulama başarısız. Sorgulama yapabileceğiniz uzantılar: com, net, org, biz, com.tr, info, in, tv, cc, gen.tr, co, me, bel.tr, gov.tr, edu.tr, web.tr, name.tr
}
else {
sockclose keywords-incele
remove keywords.txt
set %keywords-domain $2
webmasters keywords-incele
set %keywords-nick $nick
msg $chan $2 domaini anahtar kelimeleri toplanıyor.
}
}
}
}
alias webmasters { sockopen $1 webmaster-toolkit.com 80 }
on *:sockopen:keywords-incele: {
set %swp sockwrite -n $sockname
%swp GET $+(/keyword-analysis-tool.shtml?url=http://,%keywords-domain) HTTP/1.1
%swp Host: webmaster-toolkit.com
%swp $crlf
}
on *:sockread:keywords-incele: {
var %keywords
sockread %keywords
write keywords.txt $temizle(%keywords)
if $regex(%keywords,</html>) {
keywords-gonder
}
}
alias keywords-gonder {
msg #webmaster Toplam $remove($read(keywords.txt,24),Found,unique,words. ) anahtar kelime bulundu. 10 tanesi özelinize gönderiliyor.
msg %keywords-nick 1. Kelime: $+($chr(3),4,$read(keywords.txt,28),$chr(3)) – Frekans: $read(keywords.txt,29) – Pay: $+(%,$read(keywords.txt,30))
msg %keywords-nick 2. Kelime: $+($chr(3),4,$read(keywords.txt,31),$chr(3)) – Frekans: $read(keywords.txt,32) – Pay: $+(%,$read(keywords.txt,33))
msg %keywords-nick 3. Kelime: $+($chr(3),4,$read(keywords.txt,34),$chr(3)) – Frekans: $read(keywords.txt,35) – Pay: $+(%,$read(keywords.txt,36))
msg %keywords-nick 4. Kelime: $+($chr(3),4,$read(keywords.txt,37),$chr(3)) – Frekans: $read(keywords.txt,38) – Pay: $+(%,$read(keywords.txt,39))
msg %keywords-nick 5. Kelime: $+($chr(3),4,$read(keywords.txt,40),$chr(3)) – Frekans: $read(keywords.txt,41) – Pay: $+(%,$read(keywords.txt,42))
msg %keywords-nick 6. Kelime: $+($chr(3),4,$read(keywords.txt,43),$chr(3)) – Frekans: $read(keywords.txt,44) – Pay: $+(%,$read(keywords.txt,45))
msg %keywords-nick 7. Kelime: $+($chr(3),4,$read(keywords.txt,46),$chr(3)) – Frekans: $read(keywords.txt,47) – Pay: $+(%,$read(keywords.txt,48))
msg %keywords-nick 8. Kelime: $+($chr(3),4,$read(keywords.txt,49),$chr(3)) – Frekans: $read(keywords.txt,50) – Pay: $+(%,$read(keywords.txt,51))
msg %keywords-nick 9. Kelime: $+($chr(3),4,$read(keywords.txt,52),$chr(3)) – Frekans: $read(keywords.txt,53) – Pay: $+(%,$read(keywords.txt,54))
msg %keywords-nick 10. Kelime: $+($chr(3),4,$read(keywords.txt,55),$chr(3)) – Frekans: $read(keywords.txt,56) – Pay: $+(%,$read(keywords.txt,57))
}


Arkadaşlar kod çalişiyor ama sonuçlar görünmüyor özelede gitmior.Bu kodun sonuclarini özele değilde kanala nasil çikartabiLiriz??