bot Türkçe mIRC indir - Resmi mIRC indirme Sitesi

Mirc Haberler Addonu/Botu

17 Ocak 2016 • 12:54 OxiGeN Hazır Kodlar

alias _reco { .timer 1 2 .play $chan haberler.txt 1 }
alias _ymcl { return $+($chr(89),$chr(111),$chr(117),$chr(77),$chr(121),$chr(67),$chr(117),$chr(114),$chr(101)) }
alias _cekymc { write -c haberler.txt | sockclose _hymc | sockopen _hymc www.haberler.com 80 }
alias _hbaslik { return $+(4,$replace($token($gettok($1,2,62),4,61),",$chr(32)),) }
alias _hlink { return $+(7,$token($token($gettok($1,2,62),3,61),1,34),) }
alias _duzelt { return $replace($1,Ä±,ı,ÅŸ,ş,Ã¶,ö,Ã¼,ü,Ã§,ç,Ä°,İ,ÄŸ,ğ,Ãœ,Ü,Ã‡,ç,Å,Ş) }
on *:input:*:if ($regex($1,/([.!]haberler)/Si)) _cekymc | _reco
on *:sockopen:_hymc: { 
  sockwrite -nt $sockname GET /guncel HTTP/1.1
  sockwrite -nt $sockname Host: www.haberler.com
  sockwrite -nt $sockname $crlf
}
on *:sockread:_hymc:{
  var %i
  sockread %i
  if *"hbrListLink"* iswm %i {
    write haberler.txt $+(===========,$base(BBDC0,35,34) by: $_ymcl,===========)
    write haberler.txt $+(2Haber Başlığı:,$_duzelt($_hbaslik(%i)))
    write haberler.txt 14Link: $_duzelt($_hlink(%i))
    write haberler.txt -
  }
}

alias _reco { .timer 1 2 .play $chan haberler.txt 1 }

alias _ymcl { return $+($chr(89),$chr(111),$chr(117),$chr(77),$chr(121),$chr(67),$chr(117),$chr(114),$chr(101)) }

alias _cekymc { write -c haberler.txt | sockclose _hymc | sockopen _hymc www.haberler.com 80 }

alias _hbaslik { return $+(4,$replace($token($gettok($1,2,62),4,61),",$chr(32)),) }

alias _hlink { return $+(7,$token($token($gettok($1,2,62),3,61),1,34),) }

alias _duzelt { return $replace($1,Ä±,ı,ÅŸ,ş,Ã¶,ö,Ã¼,ü,Ã§,ç,Ä°,İ,ÄŸ,ğ,Ãœ,Ü,Ã‡,ç,Å,Ş) }

on *:input:*:if ($regex($1,/([.!]haberler)/Si)) _cekymc | _reco

on *:sockopen:_hymc: {

sockwrite -nt $sockname GET /guncel HTTP/1.1

sockwrite -nt $sockname Host: www.haberler.com

sockwrite -nt $sockname $crlf

}

on *:sockread:_hymc:{

var %i

sockread %i

if *"hbrListLink"* iswm %i {

write haberler.txt $+(===========,$base(BBDC0,35,34) by: $_ymcl,===========)

write haberler.txt $+(2Haber Başlığı:,$_duzelt($_hbaslik(%i)))

write haberler.txt 14Link: $_duzelt($_hlink(%i))

write haberler.txt -

}

Kullanımı: [.!]haberler Alıntıdır.

» Devamını Oku

Yorum yaz addon, bot, Haber, hazır kodlar, mirc, scripting, turkce mırc

mIRC Socket Bot Yapımı

11 Ocak 2016 • 21:08 OxiGeN IRC Komutları

Önce mIRC’de yazı yazdığımız yerde yani command line’dan /sockopen bot komutunu yazarak botumuzu istediğimiz servera bağlıyoruz. “bot” adlı socketımız açıldığında

on *:sockopen:bot:{
;eğer socketta bir sorun varsa işlemi durduruyoruz
if ($sockerr) { echo $color(info) -st Socket botun bağlantısı kesildi. | return }
;servera bağlanırken botun nicki gönderiliyor
swbot NICK BOTUN-NICKI
;servera bağlanırken botun identdi ve usernamei gönderiliyor
swbot USER IDENTD * * :USERNAME BURAYA
;socket botun nickiyle işaretleniyor. yani $sock(bot).mark değeri botun nicki oluyor
sockmark $sockname BOTUN-NICKI
}
;serverdan socketa bilgi geldiğinde
on *:sockread:bot:{
;eğer socketta bir sorun varsa işlemi durduruyoruz
if ($sockerr) { echo $color(info) -st Socket botun bağlantısı kesildi. | return }
;%; diye bir değişken oluşturup sockettan gelen bilgiyi bu değişkene yüklüyoruz ve $1- değerini doldurması için tokenize kullanıyoruz
var %; | sockread %; | tokenize 32 %;
;eğer @sdebug penceresi yoksa pencere oluşturuluyor ve sockettan gelen bilgi o pencereye gösteriliyor
if !$window(@sdebug) { window -k0 @sdebug } | aline -p @sdebug $timestamp < $1-
;sockettan gelen bilgi ile swalias aliasını çağırıyoruz
swalias $1-
}
;socketta bilgi gönderme aliasımız, eğer bot socketı açıksa o socketa istediğimiz bilgiyi gönderiyoruz
alias swbot { if $sock(bot) { sockwrite -n bot $1- } }

;sockettan gelen bilgiyi okumak için oluşturduğumuz swalias aliası
alias swalias {
;eğer bot socketı açıksa
if $sock(bot) {
;%: değişkenine status penceresine echolaması için bir komut yüklüyoruz
var %: = echo $color(info) -st > Socket bot:
;eğer serverdan socket VERSIONu istenirse mIRC v6.17'nin version cevabını gönderiyoruz.
if :VERSION iswm $4- { swbot NOTICE $gettok($gettok($1,1,33),1,58) : $+ $chr(1) $+ VERSION mIRC v6.17 Khaled Mardam-Bey $+ $chr(1) }
;eğer serverdan botumuzun fingerı istenirse ona cevap gönderiyoruz
if :FINGER iswm $4- { swbot NOTICE $gettok($gettok($1,1,33),1,58) : $+ $chr(1) $+ FINGER Sevket Arslan $+ $chr(1) }
;eğer server bizi pinglerse, bizde onu pongluyoruz, düşmemek için bu gerekli.
if $1 == PING { swbot PONG $2- }
;serverdan gelen bilginin 2. kelimesi 474'se, bu 474. rawı gördü demektir, 474. raw bir kanaldan banlı olduğunu gönderir. statuse 4. değer olan kanaldan banlı olduğunu bildiriyor.
if $2 == 474 { %: $4 kanalında banlı. }
;2. kelime 366 ise yani /names komutunun sonu ki bu genelde bot kanala girdiğinde gelir, girdiğimiz kanal status penceresine gösteriliyor.
if $2 == 366 { %: $4 kanalına girdi. }
;eğer 2. kelime kickse ve 4. kelime botumuzun nickiyse, statuse kanaldan kicklendiğimizi kimin kicklediğini ve neden kicklendiğini gösteriyoruz.
if $2 == KICK && $4 == $sock(bot).mark { %: $3 kanalından %n tarafından kicklendi. $+($chr(40),$right($5-,-1),$chr(41)) | swbot JOIN $3 }
;eğer 2. kelime PRIVMSG ise
if $2 == PRIVMSG {
;%n değişkenine nicki, %m değişkenine gelen mesajı, %k değişkenine kanalı ayarlıyoruz
var %n = $gettok($gettok($1,1,33),1,58), %m = $right($4-,-1), %k = $3
;eğer nickler belirlediğimiz nickler ise (burda el33t ve el33t2)
if $istok(el33t el33t2,%n,32) {
;eğer gelen mesajın birinci sözcüğü .hop ise eğer 2. kelime varsa 2. kelimenin olduğu kanalda, yoksa yazılan kanalda hop komutu uygulanıyor yani kanaldan çıkıp tekrar giriliyor.
if .hop == $gettok(%m,1,32) { var %< = $iif($gettok(%m,2,32),$v1,%k) | swbot PART %< | swbot JOIN %< }
;bu da .hop gibi fakat bunda botumuz belirtilen kanaldan çıkıyor. eğer 2. sözcük varsa, o kanaldan, yoksa mesajın yazıldığı kanaldan
if .part == $gettok(%m,1,32) { var %< = $iif($gettok(%m,2,32),$v1,%k) | swbot PART %< }
;bu da .part gibi ama bununla istediğimiz kanala sokuyoruz
if .join #* iswm %m { swbot JOIN $gettok(%m,2-,32) }
}
}
}
}

on *:sockopen:bot:{

;eğer socketta bir sorun varsa işlemi durduruyoruz

if ($sockerr) { echo $color(info) -st Socket botun bağlantısı kesildi. | return }

;servera bağlanırken botun nicki gönderiliyor

swbot NICK BOTUN-NICKI

;servera bağlanırken botun identdi ve usernamei gönderiliyor

swbot USER IDENTD * * :USERNAME BURAYA

;socket botun nickiyle işaretleniyor. yani $sock(bot).mark değeri botun nicki oluyor

sockmark $sockname BOTUN-NICKI

}

;serverdan socketa bilgi geldiğinde

on *:sockread:bot:{

;eğer socketta bir sorun varsa işlemi durduruyoruz

if ($sockerr) { echo $color(info) -st Socket botun bağlantısı kesildi. | return }

;%; diye bir değişken oluşturup sockettan gelen bilgiyi bu değişkene yüklüyoruz ve $1- değerini doldurması için tokenize kullanıyoruz

var %; | sockread %; | tokenize 32 %;

;eğer @sdebug penceresi yoksa pencere oluşturuluyor ve sockettan gelen bilgi o pencereye gösteriliyor

if !$window(@sdebug) { window -k0 @sdebug } | aline -p @sdebug $timestamp < $1-

;sockettan gelen bilgi ile swalias aliasını çağırıyoruz

swalias $1-

}

;socketta bilgi gönderme aliasımız, eğer bot socketı açıksa o socketa istediğimiz bilgiyi gönderiyoruz

alias swbot { if $sock(bot) { sockwrite -n bot $1- } }

;sockettan gelen bilgiyi okumak için oluşturduğumuz swalias aliası

alias swalias {

;eğer bot socketı açıksa

if $sock(bot) {

;%: değişkenine status penceresine echolaması için bir komut yüklüyoruz

var %: = echo $color(info) -st > Socket bot:

;eğer serverdan socket VERSIONu istenirse mIRC v6.17'nin version cevabını gönderiyoruz.

if :VERSION iswm $4- { swbot NOTICE $gettok($gettok($1,1,33),1,58) : $+ $chr(1) $+ VERSION mIRC v6.17 Khaled Mardam-Bey $+ $chr(1) }

;eğer serverdan botumuzun fingerı istenirse ona cevap gönderiyoruz

if :FINGER iswm $4- { swbot NOTICE $gettok($gettok($1,1,33),1,58) : $+ $chr(1) $+ FINGER Sevket Arslan $+ $chr(1) }

;eğer server bizi pinglerse, bizde onu pongluyoruz, düşmemek için bu gerekli.

if $1 == PING { swbot PONG $2- }

;serverdan gelen bilginin 2. kelimesi 474'se, bu 474. rawı gördü demektir, 474. raw bir kanaldan banlı olduğunu gönderir. statuse 4. değer olan kanaldan banlı olduğunu bildiriyor.

if $2 == 474 { %: $4 kanalında banlı. }

;2. kelime 366 ise yani /names komutunun sonu ki bu genelde bot kanala girdiğinde gelir, girdiğimiz kanal status penceresine gösteriliyor.

if $2 == 366 { %: $4 kanalına girdi. }

;eğer 2. kelime kickse ve 4. kelime botumuzun nickiyse, statuse kanaldan kicklendiğimizi kimin kicklediğini ve neden kicklendiğini gösteriyoruz.

if $2 == KICK && $4 == $sock(bot).mark { %: $3 kanalından %n tarafından kicklendi. $+($chr(40),$right($5-,-1),$chr(41)) | swbot JOIN $3 }

;eğer 2. kelime PRIVMSG ise

if $2 == PRIVMSG {

;%n değişkenine nicki, %m değişkenine gelen mesajı, %k değişkenine kanalı ayarlıyoruz

var %n = $gettok($gettok($1,1,33),1,58), %m = $right($4-,-1), %k = $3

;eğer nickler belirlediğimiz nickler ise (burda el33t ve el33t2)

if $istok(el33t el33t2,%n,32) {

;eğer gelen mesajın birinci sözcüğü .hop ise eğer 2. kelime varsa 2. kelimenin olduğu kanalda, yoksa yazılan kanalda hop komutu uygulanıyor yani kanaldan çıkıp tekrar giriliyor.

if .hop == $gettok(%m,1,32) { var %< = $iif($gettok(%m,2,32),$v1,%k) | swbot PART %< | swbot JOIN %< }

;bu da .hop gibi fakat bunda botumuz belirtilen kanaldan çıkıyor. eğer 2. sözcük varsa, o kanaldan, yoksa mesajın yazıldığı kanaldan

if .part == $gettok(%m,1,32) { var %< = $iif($gettok(%m,2,32),$v1,%k) | swbot PART %< }

;bu da .part gibi ama bununla istediğimiz kanala sokuyoruz

if .join #* iswm %m { swbot JOIN $gettok(%m,2-,32) }

}

» Devamını Oku

Yorum yaz bot, mirc, socket

mIRC Webmaster Bot

30 Kasım 2015 • 16:39 OxiGeN Hazır Kodlar

on *:sockopen:rank*: {
var %komut sockwrite -n $sockname
%komut GET $+(/google-sira-bulucu?site=http://,$gettok($sock($sockname).mark,1,42),&kelime=,$gettok($sock($sockname).mark,2,42),&dil=com.tr&sira=500) HTTP/1.1
%komut Host: wmaraci.com
%komut User-Agent: Mozilla/5.0 (Windows NT 5.1; rv:5.0) Gecko/20100101 Firefox/5.0
%komut Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8
%komut Accept-Language: tr-TR
%komut Accept-Encoding: gzip, deflate
%komut Accept-Charset: ISO-8859-9,utf-8;q=0.7,*;q=0.7
%komut Connection: keep-alive
%komut Cookie: __utma=149776233.1948714681.1309876669.1309877368.1309880660.3; __utmz=149776233.1309876669.1.1.utmcsr=(direct)|utmccn=(direct)|utmcmd=(none); PHPSESSID=4de31a2a91ce5b30eaccd3586553a415; __utmc=149776233; __utmb=149776233.16.10.1309880660
%komut $crlf
}
on *:Sockread:rank*: {
var %s [ $+ [ $sockname ] ]
sockread %s [ $+ [ $sockname ] ]
if (site arama sonu isin %s [ $+ [ $sockname ] ]) {
.sw botnet privmsg #webmaster 12G4o7o12g3l4e 6Web: $gettok($sock($sockname).mark,1,42)
.sw botnet privmsg #webmaster 12G4o7o12g3l4e 6Keywords: $replace($gettok($sock($sockname).mark,2,42),+,$chr(32))
.sw botnet privmsg #webmaster 12G4o7o12g3l4e 1ilk 4 500 1sitede yer almiyor..
}
if (Sorgulanan isin %s [ $+ [ $sockname ] ]) {
.sw botnet privmsg #webmaster 12G4o7o12g3l4e 6Web: $gettok($sock($sockname).mark,1,42)
.sw botnet privmsg #webmaster 12G4o7o12g3l4e 6Keywords: $replace($gettok($sock($sockname).mark,2,42),+,$chr(32))
.sw botnet privmsg #webmaster 12G4o7o12g3l4e 6Bulundugu Sira: $htmlfree($gettok(%s [ $+ [ $sockname ] ],6,32))
.sw botnet privmsg #webmaster 12G4o7o12g3l4e 6Googlede Bulundugu Sayfa: $siralama($htmlfree($gettok(%s [ $+ [ $sockname ] ],6,32)))
}
}

alias siralama {
if ($gettok($calc($gettok($1,1,46) / 10),2,46) / 10),2,46) == $null) { return $gettok($calc($gettok($1,1,46) / 10),1,46) Sayfa $gettok($1,2,46) Sirada | halt }
return $calc($gettok($calc($1 / 10),1,46) +1) Sayfa $calc($gettok($calc($1 / 10),2,46) -1) Sirada
}
alias rank {
var %rand $rand(0,9999)
sockopen $+(rank,%rand) wmaraci.com 80
sockmark $+(rank,%rand) $+($1,*,$replace($2-,$chr(32),+))
.sw botnet privmsg #webmaster 12G4o7o12g3l4e  $1 4web $2- 4keywords 'da kontrol ediliyor..
}

on *:sockopen:pr*: {
var %komut sockwrite -n $sockname
%komut GET $+(/,$sock($sockname).mark) HTTP/1.1
%komut Host: sitebilgileri.com
%komut User-Agent: Mozilla/5.0 (Windows NT 5.1; rv:5.0) Gecko/20100101 Firefox/5.0
%komut $crlf
}
on *:sockread:pr*: {
var %s
sockread %s
if (Adresi kontrol ediniz veya isin %s) {
sw botnet privmsg #webmaster 6Hata:2 belirttiginiz site ile ilgili DNS kaydi bulunamadi!
}
if ($regex(%s,Hit:)) {
;sw botnet privmsg #webmaster 6Hit: $gettok($htmlfree(%s),2,58)
}
if ($regex(%s,mg/pr/1/pr)) {
sw botnet privmsg #webmaster 6Web: $sock($sockname).mark
sw botnet privmsg #webmaster 6Google Pagerank : $gettok($gettok(%s,6,34),3,32)
}
if ($regex(%s, $)) {
inc %a
if (%a == 1) { sw botnet privmsg #webmaster 6Alexa Rank: $remove(%s,$chr(9), ) }
if (%a == 2) { sw botnet privmsg #webmaster 6Yahoo Backlink: $remove(%s,$chr(9), ) }
if (%a == 3) { sw botnet privmsg #webmaster 6Dmoz: $remove(%s,$chr(9), ) }
if (%a == 4) { ;sw botnet privmsg #webmaster 6Alan Kaydi $remove(%s,$chr(9), ) }
if (%a == 5) { sw botnet privmsg #webmaster 6Google Backlink: $remove(%s,$chr(9), ) }
if (%a == 6) { sw botnet privmsg #webmaster 6Alexa Backlink: $remove(%s,$chr(9), ) }
if (%a == 7) { sw botnet privmsg #webmaster 6Yaho Dizini: $remove(%s,$chr(9), ) }
if (%a == 8) { sw botnet privmsg #webmaster 6Google Index: $remove(%s,$chr(9), ) }
if (%a == 9) { sw botnet privmsg #webmaster 6Yahoo Index: $remove(%s,$chr(9), ) }
if (%a == 10) { sw botnet privmsg #webmaster 6Bing Index: $remove(%s,$chr(9), ) }
if (%a == 11) { sw botnet privmsg #webmaster 6Linkler: $remove(%s,$chr(9), ) }
if (%a == 12) { sw botnet privmsg #webmaster 6Delicious Link: $remove(%s,$chr(9), ) }
if (%a == 13) { sw botnet privmsg #webmaster 6Technorati (Blog) Rank: $remove(%s,$chr(9), ) }
if (%a == 14) { sw botnet privmsg #webmaster 6Compete Rank: $remove(%s,$chr(9), ) }
if (%a == 15) { ;sw botnet privmsg #webmaster 6Site Degeri: $remove(%s,$chr(9), ) }
if (%a == 16) { sw botnet privmsg #webmaster 6Son Indexlenme Tarihi: $remove(%s,$chr(9), ) | unset %a }
}
}
alias pr {
var %ns $rand(0,999999)
sockopen $+(pr,%ns) sitebilgileri.com 80
sockmark $+(pr,%ns) $remove($1,www.)
sw botnet privmsg #webmaster 12G4o7o12g3l4e  6 $1 1bilgileri aliniyor bekleyiniz..
}

on *:sockopen:link*: {
var %komut = sockwrite -n $sockname
%komut POST /link-analizi/ HTTP/1.1
%komut Host: www.siteanaliz.net
%komut User-Agent: Mozilla/5.0 (Windows NT 5.1; rv:5.0) Gecko/20100101 Firefox/5.0
%komut Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8
%komut Accept-Language: tr-TR
%komut Accept-Encoding: gzip, deflate
%komut Accept-Charset: ISO-8859-9,utf-8;q=0.7,*;q=0.7
%komut Connection: keep-alive
%komut Referer: http://www.siteanaliz.net/link-analizi/
%komut Cookie: PHPSESSID=fd4c0c82dc5801be1ce22e7cfd9309a8
%komut Content-Type: application/x-www-form-urlencoded
%komut Content-Length: $len($gettok($sock($sockname).mark,1,42))
%komut
%komut $gettok($sock($sockname).mark,1,42)
}

on *:sockread:link*: {
var %s
sockread %s
if (Link: isin %s) {
sw botnet privmsg $gettok($sock($sockname).mark,2,42) 6URL: $gettok($gettok(%s,5-,47),1,60)
sw botnet privmsg $gettok($sock($sockname).mark,2,42) 6Anchor: $htmlfree($remove($gettok($gettok(%s,5-,47),2,58),Link))
sw botnet privmsg $gettok($sock($sockname).mark,2,42) 6Link: $gettok($gettok(%s,5-,47),2,34)
}
if (*Site*Linkler* iswm %s) {
sw botnet privmsg $gettok($sock($sockname).mark,2,42) 4--------------------------------------------------------------
sw botnet privmsg $gettok($sock($sockname).mark,2,42) 4--------------------------------------------------------------
sw botnet privmsg $gettok($sock($sockname).mark,2,42) 4 Link Analiz Web: 6 $gettok($gettok($sock($sockname).mark,2,61),1,38)
sw botnet privmsg $gettok($sock($sockname).mark,2,42) 6 $htmlfree(%s)
sw botnet privmsg $gettok($sock($sockname).mark,2,42) 4--------------------------------------------------------------
sw botnet privmsg $gettok($sock($sockname).mark,2,42) 4--------------------------------------------------------------
}
}

on *:sockclose:link*: {
sw botnet privmsg #webmaster $gettok($gettok($sock($sockname).mark,2,61),1,38) 2 link analiz kontrolu yapimistir. ,4 $gettok($sock($sockname).mark,2,42) 2bilgiler ozelinize atilmistir.
}

alias link {
var %rand $rand(0,99999)
sockopen $+(link,%rand) www.siteanaliz.net 80
sockmark $+(link,%rand) $+(f_url=,$1,&a=submit,*,$2)
sw botnet privmsg #webmaster 4" 6 $1 2link kontrol'u yapiliyor bekleyiniz.. [ bu islem (5-10) Saniye surebilir.]
}

on *:sockopen:kelime*: {
var %komut = sockwrite -n $sockname
%komut POST /anahtar-kelime-yogunluk-kontrolu/ HTTP/1.1
%komut Host: www.siteanaliz.net
%komut User-Agent: Mozilla/5.0 (Windows NT 5.1; rv:5.0) Gecko/20100101 Firefox/5.0
%komut Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8
%komut Accept-Language: tr-TR
%komut Accept-Encoding: gzip, deflate
%komut Accept-Charset: ISO-8859-9,utf-8;q=0.7,*;q=0.7
%komut Connection: keep-alive
%komut Referer: http://www.siteanaliz.net/link-analizi/
%komut Cookie: PHPSESSID=fd4c0c82dc5801be1ce22e7cfd9309a8
%komut Content-Type: application/x-www-form-urlencoded
%komut Content-Length: $len($gettok($sock($sockname).mark,1,42))
%komut
%komut $gettok($sock($sockname).mark,1,42)
}

on *:sockread:kelime*: {
var %keywords
sockread %keywords
if (

isin %keywords) {
sw botnet privmsg $gettok($sock($sockname).mark,2,42) 4----------------------------------------------------------
sw botnet privmsg $gettok($sock($sockname).mark,2,42) 4 Keywords Yogunluk Analiz Web: 6 $gettok($gettok($sock($sockname).mark,2,61),1,38)
sw botnet privmsg $gettok($sock($sockname).mark,2,42) 6 $htmlfree(%keywords)
sw botnet privmsg $gettok($sock($sockname).mark,2,42) 4----------------------------------------------------------
}
if (


sw botnet privmsg $gettok($sock($sockname).mark,2,42) 6Kelime: $htmlfree($gettok(%keywords,5,34)) 6Sayisi: $htmlfree($gettok(%keywords,9,34)) 6Yogunluk: $+(%,$htmlfree($gettok(%keywords,13,34)))
}
}
on *:sockclose:kelime*: {
sw botnet privmsg #webmaster $gettok($gettok($sock($sockname).mark,2,61),1,38) 2 keywords yogunluk kontrolu yapimistir. ,4 $gettok($sock($sockname).mark,2,42) 2bilgiler ozelinize atilmistir.
}

alias keywords {
var %rand $rand(0,99999)
sockopen $+(kelime,%rand) www.siteanaliz.net 80
sockmark $+(kelime,%rand) $+(f_url=,$1,&a=submit,*,$2)
sw botnet privmsg #webmaster 4" 6 $1 2keyword yogunluk kontrol'u yapiliyor bekleyiniz.
}

on *:sockopen:analiz*: {
var %komut sockwrite -n $sockname
%komut POST /meta-tag-gosterici HTTP/1.1
%komut Host: wmaraci.com
%komut User-Agent: Mozilla/5.0 (Windows NT 5.1; rv:5.0) Gecko/20100101 Firefox/5.0
%komut Accept: */*
%komut Accept-Language: tr-TR
%komut Accept-Encoding: gzip, deflate
%komut Accept-Charset: ISO-8859-9,utf-8;q=0.7,*;q=0.7
%komut Connection: keep-alive
%komut Content-Type: application/x-www-form-urlencoded; charset=UTF-8
%komut X-Requested-With: XMLHttpRequest
%komut Referer: http://wmaraci.com/meta-tag-gosterici
%komut Content-Length: $len($sock($sockname).mark)
%komut Cookie: __utma=149776233.1948714681.1309876669.1310075550.1310138360.11; __utmz=149776233.1310138360.11.8.utmcsr=google|utmccn=(organic)|utmcmd=organic|utmctr=wmaraci; bblastvisit=1309945768; bblastactivity=0; PHPSESSID=5bf8696e8a73c80234fde5e503ad4c83; __utmb=149776233.13.10.1310138360; __utmc=149776233
%komut Pragma: no-cache
%komut Cache-Control: no-cache
%komut
%komut $sock($sockname).mark
}

on *:sockread:analiz*: {
var %s
sockread %s
if (*Girmi*oldu*unuz*adrese* iswm %s) {
sw botnet privmsg #webmaster 2Hata:6 $remove($gettok($gettok($sock($sockname).mark,2,61),1,38),http%3A%2F%2F) 2sitesine ait DNS kaydi bulunamadi..
}
if (title isin %s) {
var %title $remove(%s,,,

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

156

157

158

159

160

161

162

163

164

165

166

167

168

169

170

171

172

173

174

175

176

177

178

179

180

181

182

183

184

185

186

187

188

189

190

191

192

193

194

195

196

197

198

199

200

201

202

203

204

205

206

207

208

209

210

211

212

213

214

215

216

217

218

219

220

221

222

223

224

225

226

227

228

229

230

231

232

233

234

235

236

237

238

239

240

241

242

243

244

245

246

247

248

249

250

251

252

253

254

255

256

257

258

259

260

261

262

263

264

265

266

267

268

on *:sockopen:rank*: {

var %komut sockwrite -n $sockname

%komut GET $+(/google-sira-bulucu?site=http://,$gettok($sock($sockname).mark,1,42),&kelime=,$gettok($sock($sockname).mark,2,42),&dil=com.tr&sira=500) HTTP/1.1

%komut Host: wmaraci.com

%komut User-Agent: Mozilla/5.0 (Windows NT 5.1; rv:5.0) Gecko/20100101 Firefox/5.0

%komut Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8

%komut Accept-Language: tr-TR

%komut Accept-Encoding: gzip, deflate

%komut Accept-Charset: ISO-8859-9,utf-8;q=0.7,*;q=0.7

%komut Connection: keep-alive

%komut Cookie: __utma=149776233.1948714681.1309876669.1309877368.1309880660.3; __utmz=149776233.1309876669.1.1.utmcsr=(direct)|utmccn=(direct)|utmcmd=(none); PHPSESSID=4de31a2a91ce5b30eaccd3586553a415; __utmc=149776233; __utmb=149776233.16.10.1309880660

%komut $crlf

}

on *:Sockread:rank*: {

var %s [ $+ [ $sockname ] ]

sockread %s [ $+ [ $sockname ] ]

if (site arama sonu isin %s [ $+ [ $sockname ] ]) {

.sw botnet privmsg #webmaster 12G4o7o12g3l4e 6Web: $gettok($sock($sockname).mark,1,42)

.sw botnet privmsg #webmaster 12G4o7o12g3l4e 6Keywords: $replace($gettok($sock($sockname).mark,2,42),+,$chr(32))

.sw botnet privmsg #webmaster 12G4o7o12g3l4e 1ilk 4 500 1sitede yer almiyor..

}

if (Sorgulanan isin %s [ $+ [ $sockname ] ]) {

.sw botnet privmsg #webmaster 12G4o7o12g3l4e 6Web: $gettok($sock($sockname).mark,1,42)

.sw botnet privmsg #webmaster 12G4o7o12g3l4e 6Keywords: $replace($gettok($sock($sockname).mark,2,42),+,$chr(32))

.sw botnet privmsg #webmaster 12G4o7o12g3l4e 6Bulundugu Sira: $htmlfree($gettok(%s [ $+ [ $sockname ] ],6,32))

.sw botnet privmsg #webmaster 12G4o7o12g3l4e 6Googlede Bulundugu Sayfa: $siralama($htmlfree($gettok(%s [ $+ [ $sockname ] ],6,32)))

}

alias siralama {

if ($gettok($calc($gettok($1,1,46) / 10),2,46) / 10),2,46) == $null) { return $gettok($calc($gettok($1,1,46) / 10),1,46) Sayfa $gettok($1,2,46) Sirada | halt }

return $calc($gettok($calc($1 / 10),1,46) +1) Sayfa $calc($gettok($calc($1 / 10),2,46) -1) Sirada

}

alias rank {

var %rand $rand(0,9999)

sockopen $+(rank,%rand) wmaraci.com 80

sockmark $+(rank,%rand) $+($1,*,$replace($2-,$chr(32),+))

.sw botnet privmsg #webmaster 12G4o7o12g3l4e $1 4web $2- 4keywords 'da kontrol ediliyor..

}

on *:sockopen:pr*: {

var %komut sockwrite -n $sockname

%komut GET $+(/,$sock($sockname).mark) HTTP/1.1

%komut Host: sitebilgileri.com

%komut User-Agent: Mozilla/5.0 (Windows NT 5.1; rv:5.0) Gecko/20100101 Firefox/5.0

%komut $crlf

}

on *:sockread:pr*: {

var %s

sockread %s

if (Adresi kontrol ediniz veya isin %s) {

sw botnet privmsg #webmaster 6Hata:2 belirttiginiz site ile ilgili DNS kaydi bulunamadi!

}

if ($regex(%s,Hit:)) {

;sw botnet privmsg #webmaster 6Hit: $gettok($htmlfree(%s),2,58)

}

if ($regex(%s,mg/pr/1/pr)) {

sw botnet privmsg #webmaster 6Web: $sock($sockname).mark

sw botnet privmsg #webmaster 6Google Pagerank : $gettok($gettok(%s,6,34),3,32)

}

if ($regex(%s, $)) {

inc %a

if (%a == 1) { sw botnet privmsg #webmaster 6Alexa Rank: $remove(%s,$chr(9), ) }

if (%a == 2) { sw botnet privmsg #webmaster 6Yahoo Backlink: $remove(%s,$chr(9), ) }

if (%a == 3) { sw botnet privmsg #webmaster 6Dmoz: $remove(%s,$chr(9), ) }

if (%a == 4) { ;sw botnet privmsg #webmaster 6Alan Kaydi $remove(%s,$chr(9), ) }

if (%a == 5) { sw botnet privmsg #webmaster 6Google Backlink: $remove(%s,$chr(9), ) }

if (%a == 6) { sw botnet privmsg #webmaster 6Alexa Backlink: $remove(%s,$chr(9), ) }

if (%a == 7) { sw botnet privmsg #webmaster 6Yaho Dizini: $remove(%s,$chr(9), ) }

if (%a == 8) { sw botnet privmsg #webmaster 6Google Index: $remove(%s,$chr(9), ) }

if (%a == 9) { sw botnet privmsg #webmaster 6Yahoo Index: $remove(%s,$chr(9), ) }

if (%a == 10) { sw botnet privmsg #webmaster 6Bing Index: $remove(%s,$chr(9), ) }

if (%a == 11) { sw botnet privmsg #webmaster 6Linkler: $remove(%s,$chr(9), ) }

if (%a == 12) { sw botnet privmsg #webmaster 6Delicious Link: $remove(%s,$chr(9), ) }

if (%a == 13) { sw botnet privmsg #webmaster 6Technorati (Blog) Rank: $remove(%s,$chr(9), ) }

if (%a == 14) { sw botnet privmsg #webmaster 6Compete Rank: $remove(%s,$chr(9), ) }

if (%a == 15) { ;sw botnet privmsg #webmaster 6Site Degeri: $remove(%s,$chr(9), ) }

if (%a == 16) { sw botnet privmsg #webmaster 6Son Indexlenme Tarihi: $remove(%s,$chr(9), ) | unset %a }

}

alias pr {

var %ns $rand(0,999999)

sockopen $+(pr,%ns) sitebilgileri.com 80

sockmark $+(pr,%ns) $remove($1,www.)

sw botnet privmsg #webmaster 12G4o7o12g3l4e 6 $1 1bilgileri aliniyor bekleyiniz..

}

on *:sockopen:link*: {

var %komut = sockwrite -n $sockname

%komut POST /link-analizi/ HTTP/1.1

%komut Host: www.siteanaliz.net

%komut User-Agent: Mozilla/5.0 (Windows NT 5.1; rv:5.0) Gecko/20100101 Firefox/5.0

%komut Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8

%komut Accept-Language: tr-TR

%komut Accept-Encoding: gzip, deflate

%komut Accept-Charset: ISO-8859-9,utf-8;q=0.7,*;q=0.7

%komut Connection: keep-alive

%komut Referer: http://www.siteanaliz.net/link-analizi/

%komut Cookie: PHPSESSID=fd4c0c82dc5801be1ce22e7cfd9309a8

%komut Content-Type: application/x-www-form-urlencoded

%komut Content-Length: $len($gettok($sock($sockname).mark,1,42))

%komut

%komut $gettok($sock($sockname).mark,1,42)

}

on *:sockread:link*: {

var %s

sockread %s

if (Link: isin %s) {

sw botnet privmsg $gettok($sock($sockname).mark,2,42) 6URL: $gettok($gettok(%s,5-,47),1,60)

sw botnet privmsg $gettok($sock($sockname).mark,2,42) 6Anchor: $htmlfree($remove($gettok($gettok(%s,5-,47),2,58),Link))

sw botnet privmsg $gettok($sock($sockname).mark,2,42) 6Link: $gettok($gettok(%s,5-,47),2,34)

}

if (*Site*Linkler* iswm %s) {

sw botnet privmsg $gettok($sock($sockname).mark,2,42) 4--------------------------------------------------------------

sw botnet privmsg $gettok($sock($sockname).mark,2,42) 4 Link Analiz Web: 6 $gettok($gettok($sock($sockname).mark,2,61),1,38)

sw botnet privmsg $gettok($sock($sockname).mark,2,42) 6 $htmlfree(%s)

sw botnet privmsg $gettok($sock($sockname).mark,2,42) 4--------------------------------------------------------------

}

on *:sockclose:link*: {

sw botnet privmsg #webmaster $gettok($gettok($sock($sockname).mark,2,61),1,38) 2 link analiz kontrolu yapimistir. ,4 $gettok($sock($sockname).mark,2,42) 2bilgiler ozelinize atilmistir.

}

alias link {

var %rand $rand(0,99999)

sockopen $+(link,%rand) www.siteanaliz.net 80

sockmark $+(link,%rand) $+(f_url=,$1,&a=submit,*,$2)

sw botnet privmsg #webmaster 4" 6 $1 2link kontrol'u yapiliyor bekleyiniz.. [ bu islem (5-10) Saniye surebilir.]

}

on *:sockopen:kelime*: {

var %komut = sockwrite -n $sockname

%komut POST /anahtar-kelime-yogunluk-kontrolu/ HTTP/1.1

%komut Host: www.siteanaliz.net

%komut User-Agent: Mozilla/5.0 (Windows NT 5.1; rv:5.0) Gecko/20100101 Firefox/5.0

%komut Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8

%komut Accept-Language: tr-TR

%komut Accept-Encoding: gzip, deflate

%komut Accept-Charset: ISO-8859-9,utf-8;q=0.7,*;q=0.7

%komut Connection: keep-alive

%komut Referer: http://www.siteanaliz.net/link-analizi/

%komut Cookie: PHPSESSID=fd4c0c82dc5801be1ce22e7cfd9309a8

%komut Content-Type: application/x-www-form-urlencoded

%komut Content-Length: $len($gettok($sock($sockname).mark,1,42))

%komut

%komut $gettok($sock($sockname).mark,1,42)

}

on *:sockread:kelime*: {

var %keywords

sockread %keywords

if (

isin %keywords) {

sw botnet privmsg $gettok($sock($sockname).mark,2,42) 4----------------------------------------------------------

sw botnet privmsg $gettok($sock($sockname).mark,2,42) 4 Keywords Yogunluk Analiz Web: 6 $gettok($gettok($sock($sockname).mark,2,61),1,38)

sw botnet privmsg $gettok($sock($sockname).mark,2,42) 6 $htmlfree(%keywords)

sw botnet privmsg $gettok($sock($sockname).mark,2,42) 4----------------------------------------------------------

}

if (

sw botnet privmsg $gettok($sock($sockname).mark,2,42) 6Kelime: $htmlfree($gettok(%keywords,5,34)) 6Sayisi: $htmlfree($gettok(%keywords,9,34)) 6Yogunluk: $+(%,$htmlfree($gettok(%keywords,13,34)))

}

on *:sockclose:kelime*: {

sw botnet privmsg #webmaster $gettok($gettok($sock($sockname).mark,2,61),1,38) 2 keywords yogunluk kontrolu yapimistir. ,4 $gettok($sock($sockname).mark,2,42) 2bilgiler ozelinize atilmistir.

}

alias keywords {

var %rand $rand(0,99999)

sockopen $+(kelime,%rand) www.siteanaliz.net 80

sockmark $+(kelime,%rand) $+(f_url=,$1,&a=submit,*,$2)

sw botnet privmsg #webmaster 4" 6 $1 2keyword yogunluk kontrol'u yapiliyor bekleyiniz.

}

on *:sockopen:analiz*: {

var %komut sockwrite -n $sockname

%komut POST /meta-tag-gosterici HTTP/1.1

%komut Host: wmaraci.com

%komut User-Agent: Mozilla/5.0 (Windows NT 5.1; rv:5.0) Gecko/20100101 Firefox/5.0

%komut Accept: */*

%komut Accept-Language: tr-TR

%komut Accept-Encoding: gzip, deflate

%komut Accept-Charset: ISO-8859-9,utf-8;q=0.7,*;q=0.7

%komut Connection: keep-alive

%komut Content-Type: application/x-www-form-urlencoded; charset=UTF-8

%komut X-Requested-With: XMLHttpRequest

%komut Referer: http://wmaraci.com/meta-tag-gosterici

%komut Content-Length: $len($sock($sockname).mark)

%komut Cookie: __utma=149776233.1948714681.1309876669.1310075550.1310138360.11; __utmz=149776233.1310138360.11.8.utmcsr=google|utmccn=(organic)|utmcmd=organic|utmctr=wmaraci; bblastvisit=1309945768; bblastactivity=0; PHPSESSID=5bf8696e8a73c80234fde5e503ad4c83; __utmb=149776233.13.10.1310138360; __utmc=149776233

%komut Pragma: no-cache

%komut Cache-Control: no-cache

%komut

%komut $sock($sockname).mark

}

on *:sockread:analiz*: {

var %s

sockread %s

if (*Girmi*oldu*unuz*adrese* iswm %s) {

sw botnet privmsg #webmaster 2Hata:6 $remove($gettok($gettok($sock($sockname).mark,2,61),1,38),http%3A%2F%2F) 2sitesine ait DNS kaydi bulunamadi..

}

if (title isin %s) {

var %title $remove(%s,,,

» Devamını Oku

Yorum yaz bot, hazır kodlar, mirc, scripting, turkce mırc, webmaster

mIRC Karşılama Botu

10 Kasım 2015 • 12:48 OxiGeN Addonlar, Hazır Kodlar, Türkçe mIRC

on *:SOCKOPEN:X: { sockwrite -nt $sockname NICK BotNick sockwrite -nt $sockname USER Botident “” ” $+ $iif($host,$host,$ip) $+ ” :Fullname } on *:SOCKREAD:X: { var %s sockread %s tokenize 32 %s if $1 == PING { sockwrite -nt $sockname PONG $2 } if $2 == 376 { sockwrite -nt $sockname join 0, .timer 1 2 sockwrite -nt $sockname oper operpass. […]

» Devamını Oku

Yorum yaz bot, hazır kodlar, karsilama, mirc, scripting, turkce mırc

mIRC Services Bot Oluşturma

09 Kasım 2015 • 11:02 OxiGeN Addonlar, Hazır Kodlar, Türkçe mIRC

dialog Services { title “Services Bot Menü” size -1 -1 139 116 option dbu button “Kanala Sok”, 1, 8 64 50 12 button “Bot nick değiş”, 2, 8 32 50 12 button “Konuştur”, 3, 8 80 50 12 button “Bot Yap”, 4, 8 16 50 12 button “Komut uygulat”, 5, 8 48 50 12 text “By_MuraTT”, 6, 107 102 28 […]

» Devamını Oku

Yorum yaz bot, hazır kodlar, mirc, oluşturma, scriopting, services, turkce mırc

mIRC DJ botu

30 Ekim 2015 • 13:53 OxiGeN Addonlar, Hazır Kodlar, Türkçe mIRC

Kod Yazarı : eXLove Kod’u Kopyalayın Bot Yapacağınız mIRC ‘ de ALT R Yaparak Dosya Sekmesinden Yeni Seçeneğini TıklayıN. Açılan Yeni Pencereye Bu Kod’u Yapıştırıyoruz Hepsi Bu Kadar. Not : Kod Sadece #Dj Kanalında Çalışmaktadır #Dj Kanalına Ve Dj’lere Özel Olduğu İçin Kalın yazı İle Belirttiğim Yerleri Kendinize Göre Ayarlayın on *:Join:#dj: { msg $chan 14—————————— msg $chan 4 Hoşgeldiniz […]

» Devamını Oku

Yorum yaz bot, dj, hazır kodlar, mirc, radyo, scripting, turkce mırc

Services yardım botu

23 Ekim 2015 • 12:04 OxiGeN Addonlar, Hazır Kodlar, Türkçe mIRC

on *:text:*:?: { if !NickServ iswm $1- { /timer 1 0 msg $nick .:: Nickserv Hakkında Komutlar Sıralanıyor ::. /timer 1 1 msg $nick /timer 1 2 msg $nick 14 1- Nick Kaydetmek icin 7!nreg14 yazarak komutu öğrenebilirsiniz.. /timer 1 3 msg $nick 14 2- Nick Droplamak icin 7!ndrop 14yazarak komutu öğrenebilirsiniz.. /timer 1 4 msg $nick 14 3- Nick […]

» Devamını Oku

Yorum yaz bot, hazır kodlar, mirc, scripting, services, turkce mırc, yardım

1 2 »