mIRC Scripting  


Geri dön   mIRC Scripting > mIRC Scripting > Help - Yardım

Help - Yardım mIRC Scripting hakkında her konuda yardım alabileceğiniz bölümdür.

Cevapla
 
LinkBack Seçenekler
  #1  
Alt 06 Ekim 2012, 20:11
Avatar Yok

mS Puan: 1
mS Derece: Samet
 
Üyelik tarihi: 03 Ağustos 2012
Mesajlar: 1
Konular: 1
Eklentiler: 0
Alınan Teşekkür: 0
Yapılan Teşekkür: 0
Standart iddaa botu yardım

PHP- Kodu:
;(YapımcıProduct by Difuzyon ;E-Mail difuzy0n@hotmail.com ;Tarih :  27/11/2010 ;Web  www.ircforumlari.net ;#kanal genelinde .bilgi yazarak  komutlara ulaşabilirsiniz. ;Güncellenme Tarihi : 01/02/2011 alias  golkral {   .remove golkral.txt   sockclose golkral   sockopen golkral  www.tff.org 80   sockmark golkral %iddaachan } on *:sockopen:golkral:{    sockwrite -n $sockname GET /default.aspx?pageID=821 HTTP/1.1    sockwrite -n $sockname Host: www.tff.org $str($crlf,2) } on  *:sockread:golkral:{   sockread %dify   if  $regex(%dify,/rptGolKralligi_ctl/i) {     write -n golkral.txt  $htmlfree($replace(%dify,GolSayisi,$+(>,$chr(160),]04<),kisiID,>05<,kulupID,>10  [<,</span></b>,$lf))   }   if $regex(%dify,/align="left"  valign="top" style="padding-right. 10px"/) {     play  $sock($sockname).mark golkral.txt 1000      .timerdify 1 11 play stop      sockclose golkral    }  } alias bankoaltust {   .remove bankoaltust.txt    sockclose bankoaltust   sockopen bankoaltust www.bahisci.com 80    sockmark bankoaltust %iddaachan } on *:sockopen:bankoaltust:{    sockwrite -n $sockname GET /sanal-iddaa/kullanici-istatistikleri/alt-ust  HTTP/1.1   sockwrite -n $sockname Host: www.bahisci.com $str($crlf,2) }  on *:sockread:bankoaltust:{   sockread %dify   if  $regex(%dify,/(<\/td>|<\/tr>)/g) {      write -n  bankoaltust.txt  $replace($htmlfree($regsubex($regsubex(%dify,/<\/tr>/g,$lf),/\t/g,$chr(160))),ü,ü,ÅŸ,ş,ı,ı,Ç,Ç,ÄŸ,ğ,Ä°,İ,ç,ç,ö,ö,æ,æ,Ö,Ö,Ã…,A,Ãœ,Ü,Å�,Ş,Ç,Ç,ÄŸ,ğ,ê,ê,Ã�,Á)    }   elseif $regex(%dify,sideholder) { msg $sock($sockname).mark    $str($chr(160),8) [3TAKIM(1) - TAKIM(2)1] $str($chr(160),6)  (7Bahis Sayısı1) $str($chr(160),4) (Alt) $str($chr(160),6) (Üst)  | play $sock($sockname).mark bankoaltust.txt 1000 | sockclose  bankoaltust } } alias bankoiy {   .remove bankoiy.txt   sockclose  bankoiy   sockopen bankoiy www.bahisci.com 80   sockmark bankoiy  %iddaachan } on *:sockopen:bankoiy:{   sockwrite -n $sockname GET  /sanal-iddaa/kullanici-istatistikleri/iy-sonucu HTTP/1.1   sockwrite -n  $sockname Host: www.bahisci.com $str($crlf,2) } on *:sockread:bankoiy:{    sockread %dify   if $regex(%dify,/(<\/td>|<\/tr>)/g) {       write -n bankoiy.txt  $replace($htmlfree($regsubex($regsubex(%dify,/<\/tr>/g,$lf),/\t/g,$chr(160))),ü,ü,ÅŸ,ş,ı,ı,Ç,Ç,ÄŸ,ğ,Ä°,İ,ç,ç,ö,ö,æ,æ,Ö,Ö,Ã…,A,Ãœ,Ü,Å�,Ş,Ç,Ç,ÄŸ,ğ,ê,ê,Ã�,Á)    }   elseif $regex(%dify,sideholder) { msg $sock($sockname).mark    $str($chr(160),8) [3TAKIM(1) - TAKIM(2)1] $str($chr(160),6)  (7Bahis Sayısı1) $str($chr(160),4) (1) $str($chr(160),6) (X)  $str($chr(160),4) (2) | play $sock($sockname).mark bankoiy.txt 1000 |  sockclose bankoiy } } alias bankocifte {   .remove bankocifte.txt    sockclose bankocifte   sockopen bankocifte www.bahisci.com 80   sockmark  bankocifte %iddaachan } on *:sockopen:bankocifte:{   sockwrite -n  $sockname GET /sanal-iddaa/kullanici-istatistikleri/cifte-sans HTTP/1.1    sockwrite -n $sockname Host: www.bahisci.com $str($crlf,2) } on  *:sockread:bankocifte:{   sockread %dify   if  $regex(%dify,/(<\/td>|<\/tr>)/g) {      write -n  bankocifte.txt  $replace($htmlfree($regsubex($regsubex(%dify,/<\/tr>/g,$lf),/\t/g,$chr(160))),ü,ü,ÅŸ,ş,ı,ı,Ç,Ç,ÄŸ,ğ,Ä°,İ,ç,ç,ö,ö,æ,æ,Ö,Ö,Ã…,A,Ãœ,Ü,Å�,Ş,Ç,Ç,ÄŸ,ğ,ê,ê,Ã�,Á)    }   elseif $regex(%dify,sideholder) { msg $sock($sockname).mark    $str($chr(160),8) [3TAKIM(1) - TAKIM(2)1] $str($chr(160),6)  (7Bahis Sayısı1) $str($chr(160),4) (1&X) $str($chr(160),6)  (X&2) $str($chr(160),4) (1&2) | play $sock($sockname).mark  bankocifte.txt 1000 | sockclose bankocifte } }  alias tumbulten {    .remove bultenx.txt   sockclose bultenx   sockopen bultenx  www.bahisci.com 80   sockmark bultenx %iddaachan } on  *:sockopen:bultenx:{   sockwrite -n $sockname GET /iddaa/iddaa-programi/  HTTP/1.1   sockwrite -n $sockname Host: www.bahisci.com $str($crlf,2) }  on *:sockread:bultenx:{   sockread %dify   if  $regex(%dify,/(<\/td>|<\/tr>)/g) {      write -n bultenx.txt   $replace($htmlfree($regsubex($regsubex($regsubex($regsubex($regsubex($regsubex($regsubex($regsubex($regsubex(%dify,/<\/a><\/td>/g,$+(,01)),/<td  title="iddaa ma.+tarihi">/g,$+($chr(160),02)),/<td title="iddaa  kodu">/g,$+(,10)),/<td title="Lig  .+tatisti.+">/g,$+(,04)),/<td  class="col5">/g,$+(,07)),/<td  class="col6">/g,$+($chr(160),14Alt1][14Üst01,$chr(160))),/<td>/g,$chr(160)),/<\/tr>/g,$lf),/\t/g,$null)),ü,ü,ÅŸ,ş,ı,ı,Ç,Ç,ÄŸ,ğ,Ä°,İ,ç,ç,ö,ö,æ,æ,Ö,Ö,Ã…,A,é,è)    }   elseif $regex(%dify,sideholder) {     msg $sock($sockname).mark   10Kod $str($chr(160),4) 02Tarih $str($chr(160),5) 04Lig  $str($chr(160),6) 07Maçlar $str($chr(160),5) 01MBS $str($chr(160),2) 1  $str($chr(160),2) X $str($chr(160),2) 2 $str($chr(160),2) 1&X  $str($chr(160),2) 1&2 $str($chr(160),2) X&2  $str($chr(160),7)  14Alt $str($chr(160),5) Üst      play $sock($sockname).mark bultenx.txt  1000      sockclose bultenx   } }   alias bulten {   if %bultentakim {      .remove bulten.txt     sockclose bulten     sockopen bulten  www.bahisci.com 80     sockmark bulten %iddaachan   } } on  *:sockopen:bulten:{   sockwrite -n $sockname GET /iddaa/iddaa-programi/  HTTP/1.1   sockwrite -n $sockname Host: www.bahisci.com $str($crlf,2) }  on *:sockread:bulten:{   sockread %dify   if  $regex(%dify,/(<\/td>|<\/tr>)/g) {      write -n bulten.txt  $replace($htmlfree($regsubex($regsubex($regsubex($regsubex($regsubex($regsubex($regsubex($regsubex($regsubex(%dify,/<\/a><\/td>/g,$+(,01)),/<td  title="iddaa ma.+tarihi">/g,$+($chr(160),02)),/<td title="iddaa  kodu">/g,$+(,10)),/<td title="Lig  .+tatisti.+">/g,$+(,04)),/<td  class="col5">/g,$+(,07)),/<td  class="col6">/g,$+($chr(160),14Alt1][14Üst01,$chr(160))),/<td>/g,$chr(160)),/<\/tr>/g,$lf),/\t/g,$null)),ü,ü,ÅŸ,ş,ı,ı,Ç,Ç,ÄŸ,ğ,Ä°,İ,ç,ç,ö,ö,æ,æ,Ö,Ö,Ã…,A,é,è)    }   elseif $regex(%dify,sideholder) {     msg $sock($sockname).mark   10Kod $str($chr(160),4) 02Tarih $str($chr(160),5) 04Lig  $str($chr(160),6) 07Maçlar $str($chr(160),5) 01MBS $str($chr(160),2) 1  $str($chr(160),2) X $str($chr(160),2) 2 $str($chr(160),2) 1&X  $str($chr(160),2) 1&2 $str($chr(160),2) X&2  $str($chr(160),7)  14Alt $str($chr(160),5) Üst      if  $read(bulten.txt,w,$+(*,%bultentakim,*)) {        msg %iddaachan  $read(bulten.txt,$readn)     }     else { msg %iddaachan Takima ait  bulten bulunmuyor }     sockclose bulten   } }  alias canli {   .remove  canli.txt   sockclose canli   sockopen canli www.bahisci.com 80    sockmark canli %iddaachan } on *:sockopen:canli:{   sockwrite -n  $sockname GET /istatistik/canli-skorlar/live HTTP/1.1   sockwrite -n  $sockname Host: www.bahisci.com $str($crlf,2) } on *:sockread:canli:{    sockread %dify   ;write caps.txt %dify   if  $regex(%dify,/(<\/td>|<\/tr>|<h3 title=")/g) {      write  -n canli.txt  $htmlfree($regsubex($regsubex($replace(%dify,ø,o,ü,ü,Ã*-,ì,Ñ,Ñ,ñ,ñ,ÅŸ,ş,ã,ã,é,è,ı,ı,Ç,Ç,ÄŸ,ê,ê,Ã�,Á,ğ,á,ì,Ä°,İ,ç,ç,ö,ö,æ,æ,ë,e,ó,ò,Ö,Ö,ă,ã,Ã…,A,h3   title=,>10<,</h3>,$lf,</span>,$+($chr(160),07),<td   class="col3">,$+($chr(160),01),</a></td>,$chr(160),</a></strong>,$chr(160),<td  class="col1">,04,<td title="iddaa kodu"  class="col2"></td>,$+($str($chr(160),5),01)),/<\/tr>/g,$lf),/\t/g,$null))    }   elseif $regex(%dify,sideholder) {     play $sock($sockname).mark  canli.txt 1000      sockclose canli    } }   alias superlig {   .remove  puan.txt   sockclose puan   sockopen puan proje.hurriyet.com.tr 80    sockmark puan %iddaachan } on *:sockopen:puan:{   sockwrite -n $sockname  GET /spor/DisplaySporNew.aspx?ligID=24 HTTP/1.1   sockwrite -n  $sockname Host: proje.hurriyet.com.tr $str($crlf,2) } on  *:sockread:puan:{   sockread %dify   if $regex(%dify,/bgcolor='#FFFFFF'  style='text-indent/i) {     write -n puan.txt  $regsubex($htmlfree($regsubex(%dify,/(height='20')/g,$+(>,$replace(\1,\1,$lf),<))),/2011/,$+(2011,$lf))    }   if $regex(%dify,/en çok okunan spor haberleri/i) { play  $sock($sockname).mark puan.txt | sockclose puan } }   alias banko1X2 {    .remove banko.txt   sockclose banko   sockopen banko www.bahisci.com 80    sockmark banko %iddaachan } on *:sockopen:banko:{   sockwrite -n  $sockname GET /sanal-iddaa/kullanici-istatistikleri/ HTTP/1.1    sockwrite -n $sockname Host: www.bahisci.com $str($crlf,2) } on  *:sockread:banko:{   sockread %dify   if  $regex(%dify,/(<\/td>|<\/tr>)/g) {      write -n banko.txt  $replace($htmlfree($regsubex($regsubex(%dify,/<\/tr>/g,$lf),/\t/g,$chr(160))),ü,ü,,Ãœ,Ü,Å�,Ş,Ç,Ç,ÄŸ,ğ,ê,ê,Ã�,Á,ÅŸ,ş,ı,ı,Ç,Ç,ÄŸ,ğ,Ä°,İ,ç,ç,ö,ö,æ,æ)    }   elseif $regex(%dify,sideholder) { msg $sock($sockname).mark    $str($chr(160),8) [3TAKIM(1) - TAKIM(2)1] $str($chr(160),6)  (7Bahis Sayısı1) $str($chr(160),4) (1) $str($chr(160),6) (X)  $str($chr(160),6) (2)   | play $sock($sockname).mark banko.txt 1000 |  sockclose banko } }  alias takim {   if !$1- { msg %iddaachan Takim ismi  girmediniz | return }   .remove takim.txt   set -e %takim  $replace($1-,ş,s,Ş,s,ı,i,ö,o,Ö,o,ç,c,Ç,c,ğ,g,Ğ,g,ü,u,Ü,u,$chr(32),-)     sockclose takim   sockopen takim www.bahisci.com 80   sockmark takim  %iddaachan } on *:sockopen:takim:{   sockwrite -n $sockname GET  $+(/istatistik/takim/,%takim,/) HTTP/1.1   sockwrite -n $sockname Host:  www.bahisci.com $str($crlf,2) } on *:sockread:takim:{   sockread %dify    if $regex(%dify,/You have an error in your/) { msg %iddaachan Veriye  erişilemiyor. (Takım ismini yanlış girmiş olabilirsiniz) | sockclose  takim | goto finish }   if  $regex(%dify,/(<h3>|<dd>|Oynad|ralama|Resmi|Kurulu|GENEL  |<\/td>)/ig) {     write takim.txt  $replace($regsubex($htmlfree(%dify),/\t/g,$null),Galibiyet,Galibiyet  14(İçSaha-DışSaha-Tümü),Ä°,İ,$chr(58),$+($chr(58),03))   }   if  $regex(%dify,/div class="banner/) {      play $sock($sockname).mark  takim.txt 1000      sockclose takim   }   :finish }  alias kadro {   if  !$1- { msg %iddaachan Takim ismi girmediniz | return }   .remove  Akadro.txt   .remove bkadro.txt   set -e %kadro  $replace($1-,ş,s,Ş,s,ı,i,ö,o,Ö,o,ç,c,Ç,c,ğ,g,Ğ,g,ü,u,Ü,u,$chr(32),-)     sockclose kadro   sockopen kadro www.bahisci.com 80   sockmark kadro  %iddaachan } on *:sockopen:kadro:{   sockwrite -n $sockname GET  $+(/istatistik/takim/,%kadro,/oyuncular/) HTTP/1.1   sockwrite -n  $sockname Host: www.bahisci.com $str($crlf,2) } on *:sockread:kadro:{    sockread %dify            if  $regex(%dify,/(Kaleci|Defans|Ortasaha|Forvet|vertical-align.middle.padding-left.3px|text-align.left.padding-left.3px|<td  class="center"|<\/tr>)/g) {     write -n bkadro.txt  $htmlfree($replace($remove(%dify,$chr(9)),</td>,$str($chr(160),2),</tr>,$lf,Ä°,İ,ü,ü,ç,ç,ı,ı,ÅŸ,ş,ö,ö,ü,ü,Ç,Ç,ÄŸ,ğ,Ãœ,Ü,Å�,Ş,é,ê,á,â,Å¡,s,Ö,Ü,Ãœ,Ü,Å�,Ş,Ç,Ç,ÄŸ,ğ,ê,ê,Ã�,Á))    }   if $regex(%dify,/Lig .statistikleri/i) {      filter -ffg  bkadro.txt Akadro.txt ^\w      msg $sock($sockname).mark 5İsim Soyisim   3[Yaş]  6 Mevkii 4  ÜLKE  10 Oyn.Maç  [Gol] SarıKart KırmızıKart      play $sock($sockname).mark Akadro.txt 1000      sockclose kadro   } }    alias premier {   .remove premier.txt   sockclose premier   sockopen  premier proje.hurriyet.com.tr 80   sockmark premier %iddaachan } on  *:sockopen:premier:{   sockwrite -n $sockname GET  /spor/DisplaySporNew.aspx?ligID=1 HTTP/1.1   sockwrite -n $sockname  Host: proje.hurriyet.com.tr $str($crlf,2) } on *:sockread:premier:{    sockread %dify   if $regex(%dify,/bgcolor='#FFFFFF'  style='text-indent/i) {     write -n premier.txt  $regsubex($htmlfree($regsubex(%dify,/(height='20')/g,$+(>,$replace(\1,\1,$lf),<))),/2011/,$+(2011,$lf))    }   if $regex(%dify,/en çok okunan spor haberleri/i) { play  $sock($sockname).mark premier.txt | sockclose premier } } alias ligue1 {    .remove ligue.txt   sockclose ligue   sockopen ligue  proje.hurriyet.com.tr 80   sockmark ligue %iddaachan } on  *:sockopen:ligue:{   sockwrite -n $sockname GET  /spor/DisplaySporNew.aspx?ligID=2 HTTP/1.1   sockwrite -n $sockname  Host: proje.hurriyet.com.tr $str($crlf,2) } on *:sockread:ligue:{    sockread %dify   if $regex(%dify,/bgcolor='#FFFFFF'  style='text-indent/i) {     write -n ligue.txt  $regsubex($htmlfree($regsubex(%dify,/(height='20')/g,$+(>,$replace(\1,\1,$lf),<))),/2011/,$+(2011,$lf))    }   if $regex(%dify,/en çok okunan spor haberleri/i) { play  $sock($sockname).mark ligue.txt | sockclose ligue } } alias bundesliga {    .remove bundesliga.txt   sockclose bundesliga   sockopen bundesliga  proje.hurriyet.com.tr 80   sockmark bundesliga %iddaachan } on  *:sockopen:bundesliga:{   sockwrite -n $sockname GET  /spor/DisplaySporNew.aspx?ligID=3 HTTP/1.1   sockwrite -n $sockname  Host: proje.hurriyet.com.tr $str($crlf,2) } on *:sockread:bundesliga:{    sockread %dify   if $regex(%dify,/bgcolor='#FFFFFF'  style='text-indent/i) {     write -n bundesliga.txt  $regsubex($htmlfree($regsubex(%dify,/(height='20')/g,$+(>,$replace(\1,\1,$lf),<))),/2011/,$+(2011,$lf))    }   if $regex(%dify,/en çok okunan spor haberleri/i) { play  $sock($sockname).mark bundesliga.txt | sockclose bundesliga } } alias  seriea {   .remove serie.txt   sockclose serie   sockopen serie  proje.hurriyet.com.tr 80   sockmark serie %iddaachan } on  *:sockopen:serie:{   sockwrite -n $sockname GET  /spor/DisplaySporNew.aspx?ligID=4 HTTP/1.1   sockwrite -n $sockname  Host: proje.hurriyet.com.tr $str($crlf,2) } on *:sockread:serie:{    sockread %dify   if $regex(%dify,/bgcolor='#FFFFFF'  style='text-indent/i) {     write -n serie.txt  $regsubex($htmlfree($regsubex(%dify,/(height='20')/g,$+(>,$replace(\1,\1,$lf),<))),/2011/,$+(2011,$lf))    }   if $regex(%dify,/en çok okunan spor haberleri/i) { play  $sock($sockname).mark serie.txt | sockclose serie } } alias laliga {    .remove liga.txt   sockclose liga   sockopen liga proje.hurriyet.com.tr  80   sockmark liga %iddaachan } on *:sockopen:liga:{   sockwrite -n  $sockname GET /spor/DisplaySporNew.aspx?ligID=5 HTTP/1.1   sockwrite -n  $sockname Host: proje.hurriyet.com.tr $str($crlf,2) } on  *:sockread:liga:{   sockread %dify   if $regex(%dify,/bgcolor='#FFFFFF'  style='text-indent/i) {     write -n liga.txt  $regsubex($htmlfree($regsubex(%dify,/(height='20')/g,$+(>,$replace(\1,\1,$lf),<))),/2011/,$+(2011,$lf))    }   if $regex(%dify,/en çok okunan spor haberleri/i) { play  $sock($sockname).mark liga.txt | sockclose liga } } alias bankasya {    .remove bankasya.txt   sockclose bankasya   sockopen bankasya  proje.hurriyet.com.tr 80   sockmark bankasya %iddaachan } on  *:sockopen:bankasya:{   sockwrite -n $sockname GET  /spor/DisplaySporNew.aspx?ligID=6 HTTP/1.1   sockwrite -n $sockname  Host: proje.hurriyet.com.tr $str($crlf,2) } on *:sockread:bankasya:{    sockread %dify   if $regex(%dify,/bgcolor='#FFFFFF'  style='text-indent/i) {     write -n bankasya.txt  $regsubex($htmlfree($regsubex(%dify,/(height='20')/g,$+(>,$replace(\1,\1,$lf),<))),/2011/,$+(2011,$lf))    }   if $regex(%dify,/en çok okunan spor haberleri/i) { play  $sock($sockname).mark bankasya.txt | sockclose bankasya } } ; # KANAL  İSMİNİ BU SATIRDA DEĞİŞTİREBİLİRSİNİZ. on  $*:text:/[!\.](bilgi|tumbulten|canli|tumsonuc|bulten|superlig|alt-ust|sonuc|golkral|banko1X2|bankoaltust|bankoiy|bankocifte|takim  .+|kadro .+|premier|ligue1|bundesliga|laliga|bankasya|seriea)/iS:#:{    if $play(1) || $sock(sonucx,1).status == active || $sock(canli,1).status  == active || $sock(bankasya,1).status == active ||  $sock(bankocifte,1).status == active || $sock(bankoaltust,1).status ==  active || $sock(bankoiy,1).status == active || $sock(serie,1).status ==  active || $sock(liga,1).status == active || $sock(bundesliga,1).status  == active || $sock(ligue,1).status == active || $sock(sonuc,1).status ==  active || $sock(premier,1).status == active || $sock(bultenx,1).status  == active || $sock(bulten,1).status == active || $sock(puan,1).status ==  active || $sock(kadro,1).status == active || $sock(golkral,1).status ==  active || $sock(banko,1).status == active || $sock(takim,1).status ==  active {    }    else {      set -e %iddaachan $chan      if $regml(1)  == bulten { set %bultentakim  $replace($2-,ş,s,Ş,s,ı,i,ö,o,Ö,o,ç,c,Ç,c,ğ,g,Ğ,g,ü,u,Ü,u) }     if  $regml(1) == sonuc { set %sonuctakim  $replace($2-,ş,s,Ş,s,ı,i,ö,o,Ö,o,ç,c,Ç,c,ğ,g,Ğ,g,ü,u,Ü,u) }      $regml(1)   } } alias bilgi {   msg %iddaachan İddaa botu hakkında  kullanım bilgileri:   .timer -m 1 500 msg %iddaachan .canli  $str($chr(160),10) 14Devam eden karşılaşmalar hakkında  [4Dakika1-7İddaa No1-Takımlar(skor)1] 14bilgilerini verir.     .timer -m 1 1200 msg %iddaachan .tumbulten $str($chr(160),3) 14Tüm  İddaa bültenini 3[1Kod-Tarih-Takımlar-MBS 1 X 2 1&X 1&2  X&2 Alt Üst(oranlar)3]14 bilgisini listeler.   .timer -m 1 1550  msg %iddaachan .bulten takim 14Takima ait bulteni listeler   .timer  -m 1 1900 msg %iddaachan .superlig $str($chr(160),9) 14Türkiye Spor  Toto Süper Ligi puan durumunu listeler.   .timer -m 1 2600 msg  %iddaachan .tumsonuc $str($chr(160),3) 14Sona eren karşılaşmaların  6[1İddaa No-Takımlar(skor)-İlk Yarı Sonucu6]14 bilgilerini verir.    .timer -m 1 3000 msg %iddaachan .sonuc takim 14Takima ait sonuclanan  karşılaşma varsa listeler.   .timer -m 1 3300 msg %iddaachan .golkral  $str($chr(160),8) 14Türkiye Spor Toto Süper Ligi 2Gol Krallığı14  listesini verir.   .timer -m 1 3800 msg %iddaachan .banko1X2  $str($chr(160),4) 14[1 X 2] Maç Sonucu sistemi üzerinden oynanmış bahis  durumlarının yüzdelik oranını verir.   .timer -m 1 4200 msg %iddaachan  .bankoaltust $chr(160) 14Alt/Üst sistemi üzerinden oynanmış bahis  durumlarının yüzdelik oranını verir.     .timer -m 1 4700 msg %iddaachan  .bankoiy $str($chr(160),7) 14[1 X 2 ] İlkyarı (İY) sonucu sistemi  üzerinden oynanmış bahis durumlarının yüzdelik oranını verir.    .timer  -m 1 5100 msg %iddaachan .bankocifte $str($chr(160),2) 14[1&X  X&2 1&2 ] Maç sonucu sistemi üzerinden oynanmış bahis  durumlarının yüzdelik oranını verir.    .timer -m 1 5900 msg %iddaachan  .takim Takım 14Girilen takım hakkında bilgi ve karşılaşma  istatistiklerini listeler.   .timer -m 1 6400 msg %iddaachan .kadro  Takım 14Girilen takımın kadrosu\oyuncuları hakkında bilgi ve  istatistikleri listeler     .timer -m 1 6900 msg %iddaachan .Premier  $str($chr(160),5) 14 İngiltere Premier League puan durumunu listeler.    .timer -m 1 7300 msg %iddaachan .Ligue1 $str($chr(160),7) 14 Fransa  Ligue 1 puan durumunu listeler.   .timer -m 1 8000 msg %iddaachan  .Bundesliga $chr(160) 14Almanya Bundesliga 1 puan durumunu listeler.    .timer -m 1 8700 msg %iddaachan .SerieA $str($chr(160),7) 14 İtalya  Serie A puan durumunu listeler.   .timer -m 1 9400 msg %iddaachan  .LaLiga $str($chr(160),7) 14 İspanya La Liga puan durumunu listeler.    .timer -m 1 10000 msg %iddaachan .BankAsya $str($chr(160),3)  14Türkiye Bank Asya 1. Ligi puan durumunu listeler. } alias htmlfree {    var %x, %i =  $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$chr(32),%x),  %x = $remove(%x,&nbsp;)      return %x }      alias sonuc {   if  %sonuctakim {     .remove sonuc.txt     sockclose sonuc     sockopen  sonuc canlimacsonuclari.hurriyet.com.tr 80     sockmark sonuc %iddaachan    } } on *:sockopen:sonuc:{   sockwrite -n $sockname GET  /macsonuclari.aspx HTTP/1.1   sockwrite -n $sockname Host:  canlimacsonuclari.hurriyet.com.tr $str($crlf,2) } on *:sockread:sonuc:{    if ($sockerr) { msg %iddaachan Veri alımında hata oluştu. | halt }    else {     var %dify     sockread %dify     if $regex(%dify,/sona  erdi/i) {       write -n sonuc.txt  $htmlfree($regsubex($regsubex($replace(%dify,Ä°,İ,ü,ü,ç,ç,ı,ı,ÅŸ,ş,ö,ö),/(<td  colspan="7" height="1">|İY)/g,$lf),/<td width="40" align="center"  bgcolor="#ff9900">/g,$+($chr(32),14[İlk Yarı]01,$chr(32))))     }      if $regex(%dify,/SCRIPT LANGUAGE="JAVASCRIPT"  type="text\/javascript"/i) {        if  $read(sonuc.txt,w,$+(*,%sonuctakim,*)) { msg %iddaachan  $read(sonuc.txt,$readn) }       else { msg %iddaachan Sonuç bulunmuyor }        sockclose sonuc      }   } }  alias tumsonuc {   .remove  tumsonuc.txt   sockclose sonucx   sockopen sonucx  canlimacsonuclari.hurriyet.com.tr 80   sockmark sonucx %iddaachan } on  *:sockopen:sonucx:{   sockwrite -n $sockname GET /macsonuclari.aspx  HTTP/1.1   sockwrite -n $sockname Host:  canlimacsonuclari.hurriyet.com.tr $str($crlf,2) } on *:sockread:sonucx:{    if ($sockerr) { msg %iddaachan Veri alımında hata oluştu. | halt }    else {     var %dify     sockread %dify     if $regex(%dify,/sona  erdi/i) {       write -n tumsonuc.txt  $htmlfree($regsubex($regsubex($replace(%dify,Ä°,İ,ü,ü,ç,ç,ı,ı,ÅŸ,ş,ö,ö),/(<td  colspan="7" height="1">|İY)/g,$lf),/<td width="40" align="center"  bgcolor="#ff9900">/g,$+($chr(32),14[İlk Yarı]01,$chr(32))))     }      if $regex(%dify,/SCRIPT LANGUAGE="JAVASCRIPT"  type="text\/javascript"/i) {        play $sock($sockname).mark  tumsonuc.txt 1000        sockclose sonucx      }   } } 
Codesini yüklediğimde sadece .bilgi komutu çalışıyor diğer bilgileri vermiyor. Eğer düzeltme imkânınız var ise çok mutlu mesut bahtiyar olacağım.

Konu Samet tarafından (06 Ekim 2012 Saat 20:33 ) değiştirilmiştir.
Alıntı ile Cevapla
Sponsored Links
Cevapla

Etiketler
botu, iddaa, yardım

Seçenekler

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Açık
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
IBot Sunucu Koruma botu Supernova Bots - Botlar 1 01 Ocak 2014 02:51
/* Radyo Botu (Socket) */ WingmaN Showcase - Hazır kodlar 1 04 Şubat 2013 09:00
Soru-cevap botu Minstrel Help - Yardım 2 15 Aralık 2011 21:03
Iddaa 2010/2011 Difuzyon Snippets - Parça kodlar 0 27 Kasım 2010 19:15
Koruma Botu İcin Oylama Aykut Help - Yardım 11 12 Ekim 2009 18:35


Yasal Uyarı

    5651 sayılı yasada belirtilen "Yer Sağlayıcı" olarak hizmet sunmaktadır. İlgili yasaya göre site yönetiminin tüm içerikleri kontrol etme yükümlülüğü yoktur. Bu sebep ile sitemiz, uyarıları dikkate alarak yasa dışı paylaşımlar hakkında gerekli işlemleri yapmaktadır. Oluşabilecek yasal sorumluluklar üyelerimize aittir. Gerekli şikayet bildirimleri yapabilmek için "burayı" tıklayarak gerekli alanları doldurup yapabilirsiniz.
mIRCScripting©
Powered by vBulletin®
Copyright © 2000-2015, Jelsoft Enterprises Ltd.
SEO by vBSEO 3.6.1

1 2 13 14 16 17 18 19 21 22 23 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 49 50 51 52 54 55 56 57 58 59 60 61 62 63 67 68 69 70 71 72 73 74 75 76