Soccer V1.1 Futbol Canlı Maç Anlatımı ve İddaa Bilgi Botu - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Med Cezir · 20 Şubat 2013, 18:50

Soccer V1.1 Futbol Canlı Maç Anlatımı ve İddaa Bilgi Botu

Yapımcı: uMuT (Med Cezir)
Yapım Tarihi: Şubat 2013

Sistem Hakkında:
Bot tamamen socket mantığı ile oluşturulmuştur. Bir çok siteden güncel verileri alarak bunları derleyip size sunmaktadır.
Bu nedenle verileri aldığı sitelerdeki yapılan değişiklikler veya editörlerden kaynaklanan sorumluluklar bota atfedilemez.
500 satırın üzerinde kodlama yapılmış, bunun sonucunda 1 canlı maç anlatım sistemi, 12 manuel komutun uygunalabileceği futbol-iddaa bilgi sistemi oluşturulmuştur.

1-Canlı Maç Anlatım Sistemi: Anlatacağı maçları günlük olarak kendisi belirler ve maçların zamanları geldiğinde otomatik olarak anlatmaya başlar ve maçlar tamamlandığında kendisi anlatımı durdurur. Tamamen herşey otomatik olarak gerçekleştirilir, siz bir müdahalede bulunmazsınız.
Canlı maç anlatım kanalı istenirse komutların uygulandığı kanallardan ayrılabilir, bunun için kodlamada yer alan "AYARLAR" başlığındaki canlı maç anlatım kanalı satırının altındaki kanalı değiştirmenizdir.

2-Futbol-İddaa Sistemi: Bu bölümdeki özellikler manuel komutların bota uygulatılması ile çalışmaktadır.
/*** #Spor Kanalında Kullanabileceğiniz Komutlar.
/*** [!.]skorlar Günlük maç skorlarını listeler.
/*** [!.]bulten İddaa bültenini listeler.
/*** [!.]kodlar İddaa bültenindeki maçları ve kodlarını listeler.
/*** [!.]istatistik İddaa da en çok ilgi gören 20 maçı yüzdelik istatistikleri ile listeler.
/*** [!.]favori Dikkat edilmasi gereken favori maçları verir.
/*** [!.]dur Listeleme işlemini durdurur.
/*** [!.]puanlar Süper Lig puan durumu ve fikstürünü listeler.
/*** [!.]yayinlar Günlük spor programlarını listeler
/*** [!.]oran <kod> Bültendeki belirtilen koddaki maçın oranlarını yansıtır. Ör: !oran 333
/*** [!.]skor <kod> Belirtilen koddaki maçın skorunu yansıtır. Ör: !skor 333
/*** [!.]askor <kod> Alternatif aramalar için kullanılabilir.Örnegin gecmiş tarihli maçlar için. Ör: !askor 333
/*** [!.]ara <takımadı> Günlük bültende takım adından kodunu öğrenebilirsiniz. Ör: !ara Galatasaray
Komutların başında isteğe göre "!" veya "." kullanılır.

Yapılış amacı: Futbol tutkunu olduğum için izleyemediğim maçları takip etmek amacıyla daha önce hiç bir yerde rastlamadığım canlı maç anlatımı sistemini bota uygulatmaya çalışmamla başladı. Bundan sonra ki kısımlar ise tamamen kendimi durduramamam
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sonucunda sürekli yaptığım güncelleme ve eklemeler sonucunda ortaya çıktı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Paylaşım nedeni: İlk önce botu kendi sunucum için tasalarmış olduğum aSpeRa botuna entegre etme fikrinde idim fakat daha sonra botun yapım sürecinde forumda paylaşmış olduğum Soccer botada entegre etmiş olduğum koda gösterilen ilgi,alaka botuda tamamiyle sizlere sunmama neden oldu.

Nasıl Çalıştıracağım: Aşağıdaki kodların "AYARLAR" başlığında yer alan kısımları(kırmızı renkle belirtilen kısımlar düzenlenmeden bot çalışmayacaktır) üstlerinde belirtilen şekillerde kendinize göre ayarladıktan sonra remotenize atıp /soccerbot komutunu uygulamanız kafidir.

NOT: Botta istenen yerde istenen değişiklikleri yapmak size kalmıştır; yapılan değişiklikerin sistemde meydana getirecegi aksaklıkların sorumlusu sizsiniz.Onun dışında mevcut sitelerde değişiklik olmadığı sürece sorun cıkacağını sanmıyorum, yaptığım denemelere dayanarak.
İstenen yerlerden ismim silinebilir, botu ben yaptım şeklinde beyanda bulunulabilir.Emeğe saygı göstermek isteyenlerden ise ricam "Botun adı" ve "Fullnamesinin" değiştirilmemesidir sadece.

NOT: Botun tüm görüntüleri ekte sunulmuştur. İsteyenler ilk önce inceleyebilirler.

Dosya Halinden İndirmek İsteyenler İçin Download Linki [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Mevcut sitelerin bir kısmı yine değişiklik yapmışlar, botun son güncel hali.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

;##################################################### 
;#  aSpeRa Soccer V1.1                               #
;#  Futbol Canlı Maç Anlatımı ve İddaa Bilgi Botu    #
;#                                                   #
;#  Written By uMuT (Med Cezir)                      #
;#  Şubat 2013                                       #
;#####################################################
;#  -Canli Maç [Anlatımı]                            #
;#  -Canli Skorlar                                   #
;#  -İddaa Bülteni                                   #
;#  -İddaa Kodları                                   #
;#  -İddaa Oranları                                  #
;#  -İddaa İstatistikleri                            #
;#  -İddaa Günün Bankoları                           #   
;#  -Süper Lig Puan Durumu                           #
;#  -Spor Yayınları Tv Akışı                         #
;#####################################################

;---------\
;ALİAS     >
;---------/

;### AYARLAR ###
;Canli Maç Anlatım Kanalı
alias canli.chan return #Spor
;Komutların Uygulanacağı Kanal
alias soccer.chan return #Spor
;Botun aktif olacağı sunucu Ör: irc.sohbetim.com
alias soccersunucu return irc.sunucuadı.com
;Botun bağlanacagı sunucunun portu Ör: 6667
alias soccerport return 6667 
;Botun nick şifresi
alias -l soccernickpass return Sifre
;Botun oper şifresi
alias -l socceroperpass return Sifre
;Botun Oper Acacagı Nick
alias -l socceropernick return Soccer
;Bu kısım Mirc girişleri şifreli olan CR sunucular içindir.
alias -l socceridentpass return Sifre
;Listeleme işlemlerinde geciktirme süresi Milisaniye cinsinden
alias soccerzaman return 200

;####################################################################
;# UYARI:                                                           #
;# Burdan Sonraki Yapacağınız Değişiklikler Sorunlara Yol Açabilir. #
;####################################################################
alias soccernick return Soccer
alias socceridentd return ultrAslan
alias soccerfullname return  15,1 IRC Server Bots 7aSpeRa 15 Generation 10S14occer15 Socket Bot  
alias soccerlogo return  7,1 Soccer5 V1.1 10F14utbol10 Canlı Maç Anlatımı14 ve 10İ14ddaa10 Bilgi Botu 
alias soccerbot sockclose soccerbot | sockopen soccerbot $soccersunucu $soccerport
alias sock.ua { if $sock(soccerbot) { sockwrite -n soccerbot $1- } }
alias c-anlat sockclose $+(c-anlatim,_,$1,_,$2) | sockopen $+(c-anlatim,_,$1,_,$2) live.sporx.com 80
alias iddaa.kod sockclose $+(iddaa.kod,.,$1) | sockopen $+(iddaa.kod,.,$1) m.sporx.com 80
alias iddaa.detay sockclose $+(iddaa.detay,.,$1) | sockopen $+(iddaa.detay,.,$1) m.sporx.com 80
alias skorbul sockclose $+(skorer,.,$1) | sockopen $+(skorer,.,$1) m.skorer.com 80
alias myskor sockclose $+(myskor.,$1) | sockopen $+(myskor.,$1) spor.mynet.com 80 
alias i-arag sockclose $+(i-aragun.,$1) | sockopen $+(i-aragun.,$1) 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80
alias macal sockclose macal | sockopen macal m.sporx.com 80
alias c-skor sockclose soccer~c-skorlar | sockopen soccer~c-skorlar m.sporx.com 80
alias c-iddaa sockclose soccer~c-iddaa | sockopen soccer~c-iddaa m.sporx.com 80
alias l-puan sockclose soccer~lig-puan | sockopen soccer~lig-puan idc.sporx.com 80
alias i-bulten sockclose soccer~iddaa-bulten | sockopen soccer~iddaa-bulten 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80
alias yayin-akis sockclose soccer~yayin-akisi | sockopen soccer~yayin-akisi m.sporx.com 80
alias i-fav sockclose soccer~i-favori | sockopen soccer~i-favori 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80
alias i-ist sockclose soccer~i-istatistik | sockopen soccer~i-istatistik user.mackolik.com 80
alias tit return $token(%.//bo,$1,32)
alias ist.o return 15 $token(%//:i.ist.oran,$1,11)
alias ist.y return $iif($token($token($token(%//:i.ist.yuzde,$1,11),2,32),1,44) >= 20,8 $token(%//:i.ist.yuzde,$1,11) 5,0 $token(%//:i.ist.yuzde,$1,11) 5) 
alias tmz_ return $remove($1-,<div,style="float:left;,margin:,10px;,width:,text-align:,center;,color:,#F00;">,",</div>,15px; , 510px;>,  25px; text-align: center>,      )
alias dgs_ return $replace($1-,<img src='/_img/live/icons/oyuncudegisimi.png'>,4|==== 3 ====| , <img src='/_img/live/icons/sarikart.png'>,$+(1,$chr(44),8,$str($chr(160),8),) , <img src='/_img/live/icons/kirmizikart.png'>,$+(1,$chr(44),4,$str($chr(160),8),) , <img src='/_img/live/icons/duduk.png'>,$+(1,$chr(44),1,$str($chr(160),8),) , <img src='/_img/live/icons/top.png'>,$+(0,$chr(44),2,GOLLLLLLLL) )
alias tmz_2 return $remove($1-,<li><a href="/canli_anlatim.php?frm_id=,</a></li>,> )
alias _tr return $replace($1-,Ã‡,Ç,Ä°,İ,Å?,Ş,Ãœ,Ü,Ã„Â±,ı,Ã…Å¸,ş,Ãƒâ€¡,Ç,Ã§,ç,ÄŸ,ğ,ÅŸ,ş,Ã¼,ü,Ä±,ı,Ã¶,ö,Ã–,Ö,Ä,Ğ)
alias _trc return $replace($1-,&uuml;,ü,&ccedil;,ç,&ouml;,ö,&rsquo;,')
alias htmlfree { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;,$chr(9)) | return %x }

;----------\
;SOCK Bot   >
;----------/
on *:sockopen:soccerbot:{
  if ($sockerr) { echo -ast 0,5Soccer bot bağlanamadı. | .timerbgln 0 30 .soccerbot | return }
  sock.ua PASS $socceridentpass
  sock.ua NICK Soccer $+ $rand(10000,99999)
  sock.ua USER $socceridentd * * $+ $soccerfullname 14 Written: By uMuT(Med Cezir) 
  sockmark $sockname $soccernick
}
on *:sockread:soccerbot:{
  if ($sockerr) { echo -ast 0,4Socccer botun bağlantısı kesildi. | .timerbgln 0 30 .soccerbot | return }
  var %; | sockread %; | tokenize 32 %;
  ;if !$window(@soccerbot) { window -k0 @soccerbot } | aline -p @soccerbot $timestamp < $1-
  swsoccer $1-
}
alias swsoccer {
  if $sock(soccerbot) {
    var %: = echo $color(info) -st > Socket bot:
    if :VERSION iswm $4- { sock.ua NOTICE $gettok($gettok($1,1,33),1,58) : $+ $chr(1) $+ VERSION Soccer Socket System $+ $chr(1) }
    if :FINGER iswm $4- { sock.ua NOTICE $gettok($gettok($1,1,33),1,58) : $+ $chr(1) $+ FINGER By uMuT  $+ $chr(1) }
    if $1 == PING { sock.ua PONG $2- }
    if $1 == ERROR { echo -ast 0,4Soccer botun bağlantısı kesildi. | .timerbgln 0 30 .soccerbot | return }
    if $2 == 001 {
      echo -ast 0,3 Soccer Bot Sunucuya Bağlandı.
      .timerbgln off
      .timercanliskorlar 0 60 mycanli
      sock.ua oper $socceropernick $socceroperpass
      sock.ua nickserv ghost $soccernick $soccernickpass
      sock.ua join 0,
      $+(.timer,.,nickps,.,$rand(100,999)) 1 3 sock.ua nickserv identify $soccernick $soccernickpass
      $+(.timer,.,nick,.,$rand(100,999)) 1 4 sock.ua nick $soccernick
      $+(.timer,.,join,.,$rand(100,999)) 1 5 sock.ua join $soccer.chan $(|) sock.ua join $canli.chan
      ;sock.ua umode +LheX-x
    }
    if $2 == PRIVMSG {
      var %text = $right($4,-1), %chan = $3, %nick = $right($token($1,1,33),-1)
      if $token($date,1,47) != %.bugun.trh && $token($time,1,58) != 00 {
        set %.bugun.trh $token($date,1,47) | unset %.mac/\* | .macal | sock.ua privmsg $canli.chan Günün Maçı Alınıyor.
      }
      if %chan == $soccer.chan {
        if $regex($strip(%text),/^[!.]skorlar$/i) { 
          if $play(Status Window) { sock.ua privmsg $soccer.chan  %nick  Beklemeniz Gerekmektedir. }
          else { .remove c-skor.ua | c-skor | sock.ua privmsg $soccer.chan 3Mac Sonucları Alınıyor Lütfen Bekleyiniz. }
        }
        if $regex($strip(%text),/^[!.]kodlar$/i) { 
          if $play(Status Window) { sock.ua privmsg $soccer.chan  %nick  Beklemeniz Gerekmektedir. }
          else { .remove c-iddaa.ua | c-iddaa | sock.ua privmsg $soccer.chan 3İddaa Mac Kodları Alınıyor Lütfen Bekleyiniz. }
        }
        if $regex($strip(%text),/^[!.]b(u|ü)lten$/i) { 
          if $play(Status Window) { sock.ua privmsg $soccer.chan  %nick  Beklemeniz Gerekmektedir. }
          else { .remove i-bulten.ua | i-bulten | sock.ua privmsg $soccer.chan 3İddaa Bülteni Alınıyor Lütfen Bekleyiniz. }
        }
        if $regex($strip(%text),/^[!.]istatistik/i) { 
          if $play(Status Window) { sock.ua privmsg $soccer.chan  %nick  Beklemeniz Gerekmektedir. }
          else { .remove i-istatistik.ua | i-ist | sock.ua privmsg $soccer.chan 3İddaa Oynanma İstatistikleri Alınıyor Lütfen Bekleyiniz. }
        }
        if $regex($strip(%text),/^[!.]favori$/i) {
          i-fav | sock.ua privmsg $soccer.chan 3 Favori Maçlar Alınıyor Lütfen Bekleyiniz.
        }
        if $regex($strip(%text),/^[!.]dur$/i) { 
          if $play(Status Window) { .play stop | sock.ua privmsg $soccer.chan 2Listeleme İşlemi Durduruldu }
          else { sock.ua privmsg $soccer.chan Hey Dostum!!! Saçmaladığının farkındamısın. }
        }
        if $regex($strip(%text),/^[!.]puan/i) { l-puan | sock.ua privmsg $soccer.chan 3Süper Lig Puan Durumu. }
        if $regex($strip(%text),/^[!.]yay(i|ı|İ)nlar$/i) { yayin-akis | sock.ua privmsg $soccer.chan 3 $date  }
        if $regex($strip(%text),/^[!.]oran$/i) && $5 { 
          if $regex($5,^[0-9]{3}$) { iddaa.kod $5 | sock.ua privmsg $soccer.chan 3 $5 2 Kodlu Maçın Oranlarına Bakılıyor.Lütfen Bekleyiniz.  } 
          else sock.ua privmsg $soccer.chan Hey Dostum!!! Saçmaladığının farkındamısın.
        }
        if $regex($strip(%text),/^[!.]askor$/i) && $5 { 
          if $regex($5,^[0-9]{3}$) { skorbul $5 | sock.ua privmsg $soccer.chan 3 $5 2 Kodlu Maçın Skoruna Bakılıyor Lütfen Bekleyiniz. } 
          else sock.ua privmsg $soccer.chan Hey Dostum!!! Saçmaladığının farkındamısın.
        }
        if $regex($strip(%text),/^[!.]skor$/i) && $5 { 
          if $regex($5,^[0-9]{3}$) { myskor $5 | sock.ua privmsg $soccer.chan 3 $5 2 Kodlu Maçın Skoruna Bakılıyor Lütfen Bekleyiniz. } 
          else sock.ua privmsg $soccer.chan Hey Dostum!!! Saçmaladığının farkındamısın.
        }
        if $regex($strip(%text),/^[!.]ara$/i) && $5 { i-arag $5 | sock.ua privmsg $soccer.chan 3 $5 2 Takımı Günlük Bültende Aranıyor Lütfen Bekleyiniz. }
      } 
    }
    if $2 == JOIN {
      var %jchan = $right($3,-1), %jnick = $right($token($1,1,33),-1), %jident = $token($token($1,1,64),2,33)
      if $token($date,1,47) != %.bugun.trh && $token($time,1,58) != 00 {
        set %.bugun.trh $token($date,1,47) | unset %.mac/\* | .macal | sock.ua privmsg $canli.chan Günün Maçı Alınıyor.
      }
      if (%jchan == $canli.chan || %jchan == $soccer.chan) && %jnick == $soccernick { sock.ua samode %jchan +o $soccernick | sock.ua privmsg %jchan $soccerlogo }
      if %jchan == $canli.chan {
        if %jnick == $soccernick {
          macal | set %.bugun.trh $token($date,1,47)
        }
        elseif $token($time,1,58) < $token(%.mac/\saati,1,58) && $token($date,1,47) == %.bugun.trh {
          sock.ua notice %jnick 4Günün Maçı:1 %.mac/\gunun maçında Saat %.mac/\saati itibariyle sizlerle olucaz.
        }
      }
      if %jchan == $soccer.chan && %jnick != $soccernick  {
        sock.ua privmsg %jnick /*** $soccerlogo
        sock.ua privmsg %jnick /***
        sock.ua privmsg %jnick /*** 3 $soccer.chan 1 Kanalında Kullanabileceğiniz Komutlar.
        sock.ua privmsg %jnick /*** 2[!.]skorlar1 Günlük maç skorlarını listeler.
        sock.ua privmsg %jnick /*** 2[!.]bulten1 İddaa bültenini listeler.
        sock.ua privmsg %jnick /*** 2[!.]kodlar1 İddaa bültenindeki maçları ve kodlarını listeler.
        sock.ua privmsg %jnick /*** 2[!.]istatistik1 İddaa'da en çok ilgi gören 20 maçı yüzdelik istatistikleri ile listeler.
        sock.ua privmsg %jnick /*** 2[!.]favori1 Dikkat edilmasi gereken favori maçları verir. 
        sock.ua privmsg %jnick /*** 2[!.]dur1 Listeleme işlemini durdurur.      
        sock.ua privmsg %jnick /*** 2[!.]puanlar1 Süper Lig puan durumu ve fikstürünü listeler.
        sock.ua privmsg %jnick /*** 2[!.]yayinlar1 Günlük spor programlarını listeler
        sock.ua privmsg %jnick /*** 2[!.]oran 12<kod>1 Bültendeki belirtilen koddaki maçın oranlarını yansıtır. Ör: !oran 333
        sock.ua privmsg %jnick /*** 2[!.]skor 12<kod>1 Belirtilen koddaki maçın skorunu yansıtır. Ör: !skor 333
        sock.ua privmsg %jnick /*** 2[!.]askor 12<kod>1 Alternatif aramalar için kullanılabilir.Örnegin gecmiş tarihli maçlar için. Ör: !askor 333
        sock.ua privmsg %jnick /*** 2[!.]ara 12<takımadı>1 Günlük bültende takım adından kodunu öğrenebilirsiniz. Ör: !ara Galatasaray
      }
    }
    ;The End Sock
  }
}
;--------------\
;SOCK Siteler   >
;--------------/
on *:sockopen:c-anlatim*: {
  sockwrite -n $sockname GET / $+ canlianlatim/SXLIVEQ $+ $token($sockname,3,95) $+ SXQ / HTTP/1.1
  sockwrite -n $sockname host: live.sporx.com 
  sockwrite -n $sockname $crlf
}
on *:sockread:c-anlatim*: {
  var %anlat | sockread %anlat
  if ($sockerr) { sock.ua privmsg $soccer.chan Bağlantıda Hata Oluştu Daha Sonra Tekrar Deneyiniz. | return }
  if %kunye == on {
    if (color:#272727; font-size:12px; float: left; margin-left: 5px; margin-top: 6px;"> isin %anlat) { sock.ua privmsg $canli.chan 12Tarih:14 $htmlfree(%anlat) }
    if (color:#494949; font-size:15px; font-weight:bold; float: left; margin-left: 5px; margin-top: 4px; isin %anlat) { sock.ua privmsg  $canli.chan 12Saat:14 $htmlfree(%anlat) }
    if (color:#272727; font-size:12px; float: left; margin-left: 5px; margin-top: 7px;"> isin %anlat) { if %k >= 1 { sock.ua privmsg $canli.chan 12Hakem:14 $htmlfree(%anlat) } | else { sock.ua privmsg $canli.chan 12Stad:14 $htmlfree(%anlat) | inc -u5 %k 1 } }
    if (color:#272727; font-size:12px; float: left; width:200px; margin-left: 5px; margin-top: 5px;"> isin %anlat) { sock.ua privmsg $canli.chan 12Yardımcı Hakemler:14 $htmlfree(%anlat) }
    if (color:#707070; isin %anlat) { sock.ua privmsg $canli.chan 12Hava Sıcaklığı:14 $htmlfree(%anlat) | unset %kunye }
  }
  else {
    if (*title*Canlı* iswm %anlat) { set -e %_mtitle 4 $remove(%anlat,<title>,</title>) }
    if (<div id="sure" isin %anlat) { 
      var %_sure $htmlfree(%anlat)
      if %_sure == 93:00 && !$timer($+(_,$sockname)) { $+(.timer,_,$sockname) 1 600 $+(.timer,-,$token($sockname,2,95),-,$token($sockname,3,95)) off $(|) sock.ua privmsg $canli.chan Maç Anlatımı Tamamlandı Hoş Sohbetler. $(|) unset $($+(%,_anlatti,.,$token($sockname,3,95))) } 
      if $token(%_sure,1,58) > 90 { if $token(%_sure,2,58) == 00 && !$timer($+(_,$sockname)) { $+(.timer,_,$sockname) 1 600 $+(.timer,-,$token($sockname,2,95),-,$token($sockname,3,95)) off $(|) sock.ua privmsg $canli.chan Maç Anlatımı Tamamlandı Hoş Sohbetler. $(|) unset $($+(%,_anlatti,.,$token($sockname,3,95))) } }
      elseif $regex($token(%_sure,1,58),0$) && $token(%_sure,1,58) != 00 && $token(%_sure,2,58) >= 30 { sock.ua privmsg  $canli.chan %_mtitle }
    }
    if (15px; text-align: center; color: #F00 isin %anlat) { set %_dk $htmlfree(%anlat) }
    if (25px; text-align: center isin %anlat) { set %_m.o.s $htmlfree($dgs_(%anlat)) }
    if (510px; isin %anlat)  { 
      var %_ani $htmlfree(%anlat)
      if (*Bu*ma*canlı*anlatım*olduk*Bir*canlı*anlat* iswm $tr_(%_ani)) { sockclose $sockname | unset %_dk %_m.o.s $($+(%,_anlatti,.,$token($sockname,3,95))) | $+(.timer,-,$token($sockname,2,95),-,$token($sockname,3,95)) off | sock.ua privmsg $canli.chan Maç Anlatımı Tamamlandı Hoş Sohbetler. }
      if (*Bir*sonraki*canlı*anlatımda*görüşmek* iswm iswm $tr_(%_ani)) { sockclose $sockname | unset %_dk %_m.o.s $($+(%,_anlatti,.,$token($sockname,3,95))) | $+(.timer,-,$token($sockname,2,95),-,$token($sockname,3,95)) off | sock.ua privmsg $canli.chan Maç Anlatımı Tamamlandı Hoş Sohbetler. }
      if (*Bir*başka*canlı*anlatımda*görüşmek* iswm $tr_(%_ani)) { sockclose $sockname | unset %_dk %_m.o.s $($+(%,_anlatti,.,$token($sockname,3,95))) | $+(.timer,-,$token($sockname,2,95),-,$token($sockname,3,95)) off | sock.ua privmsg $canli.chan Maç Anlatımı Tamamlandı Hoş Sohbetler. }  
      if %_ani != $($+(%,_anlatti,.,$token($sockname,3,95)),2) { 
        $iif(%_dk != $null,sock.ua privmsg $canli.chan  2Dakika:3 %_dk : %_ani %_m.o.s,$iif(%_m.o.s != $null,sock.ua privmsg $canli.chan  10 %_m.o.s : %_ani,return)) 
        set -e $+(%,_anlatti,.,$token($sockname,3,95)) %_ani | unset %_dk %_m.o.s | sockclose $sockname
      }
      else sockclose $sockname | unset %_dk %_m.o.s     
    }
  }
}
on *:sockopen:macal: {
  sockwrite -nt $sockname GET /canli_anlatim_listele.php? / HTTP/1.1
  sockwrite -nt $sockname host: m.sporx.com
  sockwrite -nt $sockname $crlf
}
on *:sockread:macal: {
  if ($sockerr) { sock.ua privmsg $soccer.chan Bağlantıda Hata Oluştu Daha Sonra Tekrar Deneyiniz. | return }
  var %macdate | sockread %macdate 
  if (Bugün içerisinde herhangi bir canlı anlatım yoktur isin $_tr(%macdate)) { sock.ua privmsg $canli.chan $ifmatch | sockclose $sockname | return }
  if (<li><a href="/canli_anlatim.php?frm_id isin %macdate) && (float:left !isin %macdate) && $regex($token($token($tmz_2(%macdate),2,34),1,32),:) { 
    var %mac $_tr($token($tmz_2(%macdate),2,32)), %saat $token($token($tmz_2(%macdate),1,32),2,34), %id $token($tmz_2(%macdate),1,34)
    ;if $regex($_tr($token($tmz_2(%macdate),2-,32)),/(galatasaray|gs|fenerbahçe|fb|beşiktaş|bjk|trabzonspor|ts|türkiye)/i) {
    if %mac != $null && %id != $null {
      var %s-1 $+($calc($token(%saat,1,58) -1),:,$token(%saat,2,58),:00), %s+2 $+($calc($token(%saat,1,58) +2),:,$token(%saat,2,58),:00)
      sock.ua privmsg $canli.chan Günün-MACI: $_tr($token($tmz_2(%macdate),2-,32)) SAAT: %saat ID: %id 
      set %.mac/\gunun $_tr($token($tmz_2(%macdate),2-,32)) | set %.mac/\saati $token($token($tmz_2(%macdate),1,32),2,34) | set %.mac/\id $token($tmz_2(%macdate),1,34)
      if $token($time,1,58) >= $token(%s-1,1,58) { if $token(%s+2,1,58) > $token($time,1,58) { $+(.timer,-,%mac,-,%id) 0 30 c-anlat %mac %id | $+(.timer,.kunye,.,%id) 1 1 set -u60 %kunye on  } }
      else { $+(.timer,-,%mac,-,%id) %s-1 0 30 c-anlat %mac %id | $+(.timer,.kunye,.,%id) %s-1 1 1 set -u60 %kunye on }
    }
  }
}
on *:sockopen:iddaa.kod.*: {
  sockwrite -n $sockname GET /iddaa.php? HTTP/1.1
  sockwrite -n $sockname host: m.sporx.com 
  sockwrite -n $sockname $crlf
}
on *:sockread:iddaa.kod.*: {
  var %iddaa | sockread %iddaa
  if ($sockerr) { sock.ua privmsg $soccer.chan Bağlantıda Hata Oluştu Daha Sonra Tekrar Deneyiniz. | return }
  ;if $regex(%iddaa,$token($sockname,3,46)) && (<div style="float:left; width:60%; line-height: 20px; ">&nbsp; isin %iddaa) { set -u5 %kd on }
  if (width:62%; margin-top:8px; overflow:hidden; white-space: nowrap; isin %iddaa) { if $token($htmlfree(%iddaa),1,32) == $token($sockname,3,46) { set -u5 %kd on  } }
  if %kd == on && (iddaa_yorum.php?frm_id isin %iddaa) { iddaa.detay $remove($token(%iddaa,4,62),<a href="iddaa_yorum.php?frm_id=,") | unset %kd | sockclose $sockname }
  if (<div style="width:100%; height:1px; background-color:#bfbfbf"></div></div> isin %iddaa) { sock.ua privmsg $soccer.chan 4 $token($sockname,3,46)  15,3  »º» 8Aranan Kodda Maç Bulunamadı.15 «º«   }
}
on *:sockopen:iddaa.detay.*: {
  sockwrite -n $sockname GET /iddaa_yorum.php?frm_id= $+ $token($sockname,3,46) HTTP/1.1 
  sockwrite -n $sockname host: m.sporx.com $+ $crlf $+ $crlf 
  sockwrite -n $sockname $crlf
}
on *:sockread:iddaa.detay.*: {
  var %detay | sockread %detay
  if ($sockerr) { sock.ua privmsg $soccer.chan Bağlantıda Hata Oluştu Daha Sonra Tekrar Deneyiniz. | return }
  if (<span style="color:#dab300; font-size: 20px;"> isin %detay) { sock.ua privmsg $soccer.chan 0,3 $token($htmlfree(%detay),1,32) 8 $_tr($token($htmlfree(%detay),2-,32)) }
  if (<div style="float:left; color:#0F6210;"> isin %detay) { set -e %.mac.oran.bilgi $addtok(%.mac.oran.bilgi,$htmlfree(%detay),32) }
  if (<div style="width:95%; margin-top: 10px; padding-left:5px; padding-right:5px;"> isin %detay) { sock.ua privmsg $soccer.chan 3 $_tr(%.mac.oran.bilgi) | unset %.mac.oran.bilgi }
  if (float:left; font-size: 14px; padding-top: 20px; font-weight: bold; isin %detay) { sock.ua privmsg $soccer.chan $htmlfree(%detay) }
  if (<span style="font-size: 12px; font-weight: bold;"> isin %detay) { sock.ua privmsg $soccer.chan $htmlfree(%detay) }
  if (*<p>*</p>* iswm %detay) { sock.ua privmsg $soccer.chan $_tr($_trc($htmlfree(%detay))) }
  ;if (<table cellpadding="0" cellspacing="0" width="100%" bgcolor="1f601f"> isin %detay) { sock.ua privmsg $soccer.chan 0,3 $str($chr(160),30)  }
  if (>Maç Sonucu isin $_tr(%detay)) { sock.ua privmsg $soccer.chan 14,1 $(||) 3 $_tr($htmlfree(%detay)) 14 $(||)   | set -e %.sonuc.oran. on }
  if %.sonuc.oran. == on {
    if (<td align="center" height="30" width="33%" bgcolor="#fef4af"> isin %detay) { set -e %.sonuc.oran.oku $instok(%.sonuc.oran.oku,$htmlfree(%detay),0,32) }
    if (<td align="center" width="34%" bgcolor="#fef4af"> isin %detay) { set -e %.sonuc.oran.oku $instok(%.sonuc.oran.oku,$htmlfree(%detay),0,32) }
    if (<td align="center" width="33%" bgcolor="#fef4af"> isin %detay) { set -e %.sonuc.oran.oku $instok(%.sonuc.oran.oku,$htmlfree(%detay),0,32) }
    if (</table> isin %detay) { sock.ua privmsg  $soccer.chan 3,8 1 1 $token(%.sonuc.oran.oku,1,32) 3 X 1 $token(%.sonuc.oran.oku,2,32) 3 2 1 $token(%.sonuc.oran.oku,3,32)  | unset %.sonuc.oran.* }  
  }
  if (Altı / Üstü isin $_tr(%detay)) { sock.ua privmsg  $soccer.chan 14,1 $(||) 3 $_tr($htmlfree(%detay)) 14 $(||)  }
  if (<td align="center" height="30" width="50%" bgcolor="#fef4af"> isin %detay) { set -e %.alt.oran.oku $htmlfree(%detay) }
  if (<td align="center" width="50%" bgcolor="#fef4af"> isin %detay) { sock.ua privmsg $soccer.chan 3,8 Altı 1 %.alt.oran.oku 3 Üstü 1 $htmlfree(%detay)  | unset %.alt.oran.oku }
  ;
  if (İlk Yarı Sonucu isin $_tr(%detay)) { sock.ua privmsg $soccer.chan 14,1 $(||) 3 $_tr($htmlfree(%detay)) 14 $(||)  | set -e %.isonuc.oran. on }
  if %.isonuc.oran. == on {
    if (<td align="center" height="30" width="33%" bgcolor="#fef4af"> isin %detay) { set %.isonuc.oran.oku $instok(%.isonuc.oran.oku,$htmlfree(%detay),0,32) }
    if (<td align="center" width="34%" bgcolor="#fef4af"> isin %detay) { set -e %.isonuc.oran.oku $instok(%.isonuc.oran.oku,$htmlfree(%detay),0,32) }
    if (<td align="center" width="33%" bgcolor="#fef4af"> isin %detay) { set -e %.isonuc.oran.oku $instok(%.isonuc.oran.oku,$htmlfree(%detay),0,32) }
    if (</table> isin %detay) { sock.ua privmsg  $soccer.chan 3,8 1 1 $token(%.isonuc.oran.oku,1,32) 3 X 1 $token(%.isonuc.oran.oku,2,32) 3 2 1 $token(%.isonuc.oran.oku,3,32)  | unset %.isonuc.oran.* }
  }
  if (*ifte*ans* iswm $_tr(%detay)) { sock.ua privmsg $soccer.chan 14,1 $(||) 3 $_tr($htmlfree(%detay)) 14 $(||)  | set -e %.ciftesans.oran. on }
  if %.ciftesans.oran. == on {
    if (<td align="center" height="30" width="33%" bgcolor="#fef4af"> isin %detay) { set -e %.ciftesans.oran.oku $instok(%.ciftesans.oran.oku,$htmlfree(%detay),0,32) }
    if (<td align="center" width="34%" bgcolor="#fef4af"> isin %detay) { set -e %.ciftesans.oran.oku $instok(%.ciftesans.oran.oku,$htmlfree(%detay),0,32) }
    if (<td align="center" width="33%" bgcolor="#fef4af"> isin %detay) { set -e %.ciftesans.oran.oku $instok(%.ciftesans.oran.oku,$htmlfree(%detay),0,32) }
    if (</table> isin %detay) { sock.ua privmsg $soccer.chan 3,8 1-X 1 $token(%.ciftesans.oran.oku,1,32) 3 1-2 1 $token(%.ciftesans.oran.oku,2,32) 3 X-2 1 $token(%.ciftesans.oran.oku,3,32)  | unset %.ciftesans.oran.* }
  }
  if (Toplam Gol isin $_tr(%detay)) { sock.ua privmsg $soccer.chan 14,1 $(||) 3 $_tr($htmlfree(%detay)) 14 $(||)  | set -e %.toplamgol.oran. on }
  if %.toplamgol.oran. == on {
    if (<td align="center" height="30" width="25%" bgcolor="#fef4af"> isin %detay) { set %.toplamgol.oran.oku $instok(%.toplamgol.oran.oku,$htmlfree(%detay),0,32) }
    if (<td align="center" width="25%" bgcolor="#fef4af"> isin %detay) { set %.toplamgol.oran.oku $instok(%.toplamgol.oran.oku,$htmlfree(%detay),0,32) }
    if (</table> isin %detay) { sock.ua privmsg $soccer.chan 3,8 0-1 1 $token(%.toplamgol.oran.oku,1,32) 3 2-3 1 $token(%.toplamgol.oran.oku,2,32) 3 4-6 1 $token(%.toplamgol.oran.oku,3,32) 3 7+ 1 $token(%.toplamgol.oran.oku,4,32)  | unset %.toplamgol.oran.* }
  }
  if (İlk Yarı Maç Sonucu isin $_tr(%detay)) { sock.ua privmsg $soccer.chan 14,1 $(||) 3 $_tr($htmlfree(%detay)) 14 $(||)  | set -e %.ilkson.oran. on }
  if %.ilkson.oran. == on {
    if (<td align="center" height="30" width="11%" bgcolor="#fef4af"> isin %detay) { set -e %.ilkson.oran.oku $instok(%.ilkson.oran.oku,$htmlfree(%detay),0,32) }
    if (<td align="center" width="11%" bgcolor="#fef4af"> isin %detay) { set -e %.ilkson.oran.oku $instok(%.ilkson.oran.oku,$htmlfree(%detay),0,32) }
    if (<td align="center" width="12%" bgcolor="#fef4af"> isin %detay) { set -e %.ilkson.oran.oku $instok(%.ilkson.oran.oku,$htmlfree(%detay),0,32) }
    if (</table> isin %detay) { 
      sock.ua privmsg $soccer.chan 3,8 1/1 1 $token(%.ilkson.oran.oku,1,32) 3 1/X 1 $token(%.ilkson.oran.oku,2,32) 3 1/2 1 $token(%.ilkson.oran.oku,3,32) 3 X/1 1 $token(%.ilkson.oran.oku,4,32) 3 X/X 1 $token(%.ilkson.oran.oku,5,32) 3 X/2 1 $token(%.ilkson.oran.oku,6,32) 3 2/1 1 $token(%.ilkson.oran.oku,7,32) 3 2/X 1 $token(%.ilkson.oran.oku,8,32) 3 2/2 1 $token(%.ilkson.oran.oku,9,32)   
      unset %.ilkson.oran.* 
    }
  }
}
on *:sockopen:skorer.*: {
  sockwrite -n $sockname GET / $+ Soccer/Iddaa.aspx HTTP/1.1 
  sockwrite -n $sockname host: m.skorer.com $+ $crlf $+ $crlf 
  sockwrite -n $sockname $crlf
}
on *:sockread:skorer.*: {
  var %i.s | sockread %i.s
  if ($sockerr) { sock.ua privmsg $soccer.chan Bağlantıda Hata Oluştu Daha Sonra Tekrar Deneyiniz. | return }
  if $regex(%i.s,[0-9]{3}<br />$) { if $htmlfree(%i.s) == $token($sockname,2,46) { set -e %:/im.kod $htmlfree(%i.s) } }
  if %:/im.kod != $null {
    if $regex(ixx,%i.s,/(span class="status"|span class="time"|span class="elapsed")) { if !$regex($regml(ixx,1),elapsed) { set -e %:/im.zmn $_tr($htmlfree(%i.s)) } | else set -e %:/im.zmn 4 $htmlfree(%i.s) }
    if (<td class="Event"> isin %i.s) { set -e %:/im.tkm $_tr($remove($token(%i.s,1,47),<td class="Event">,<br)) - $_tr($remove($token(%i.s,2,47),>,<)) }
    if (<td class="Score"> isin %i.s) {
      if (<span class="score"> isin %i.s) { 
        if ("halfscore" !isin %i.s) { set -e %:/im.skor $remove(%i.s,<td class="Score"><span class="score">,</span>,</td>) }
        else set -e %:/im.skor $remove($token(%i.s,1,47),<td class="Score"><span class="halfscore">,<) 15 $remove($token(%i.s,2,47),span><span class="score">,<)
      }
      elseif (<span class="livescore"> isin %i.s) { 
        if (halfscore !isin %i.s) { set -e %:/im.skor 4 $htmlfree(%i.s) }
        else set -e %:/im.skor $remove($token(%i.s,1,47),<td class="Score"><span class="halfscore">,<) 4 $remove($token(%i.s,2,47),span><span class="livescore">,<)
      }
    }
    if (*<td class="Bet">*,*</td>* iswm %i.s)  { set -e %:/im.oran $addtok(%:/im.oran,$htmlfree(%i.s),32) }
    if (</tr> isin %i.s) && (%:/im.oran != $null) { sock.ua privmsg $soccer.chan 0,1 %:/im.kod 7 %:/im.zmn 3 %:/im.tkm 14 %:/im.skor $str($chr(160),10) 14 1-8 $token(%:/im.oran,1,32) 14 0-8 $token(%:/im.oran,2,32) 14 X-8 $token(%:/im.oran,3,32)  | unset %:/im.* | sockclose $sockname }
  } 
  if (<div data-role="footer" class="FooterContainer"> isin %i.s) { sock.ua privmsg $soccer.chan  15,3  »º» 8Aranan Kodda Maç Bulunamadı.15 «º«   | unset %:/im.* | sockclose $sockname }  
}
on *:sockopen:myskor.*: {
  sockwrite -n $sockname GET /iddaa HTTP/1.1
  sockwrite -n $sockname host: spor.mynet.com $+ $crlf $+ $crlf
  sockwrite -n $sockname $crlf
}
on *:sockread:myskor.*:{
  var %al | sockread %al
  if ($sockerr) { sock.ua privmsg $soccer.chan Bağlantıda Hata Oluştu Daha Sonra Tekrar Deneyiniz. | return }
  if (<div class="dateTime"> isin %al) { set %..:m.date $htmlfree(%al) }
  if $regex(%al,<div class="number">[0-9]{3}</div>) {
    if $htmlfree(%al) == $token($sockname,2,46) { set %..:m.skoral on | sock.ua privmsg $soccer.chan 3,1 Maç Kodu:7 $htmlfree(%al) | sock.ua privmsg $soccer.chan 14 %..:m.date }
  }
  if %..:m.skoral == on {
    if (*<span>*</span> iswm %al) && (<div class="away"> !isin %al) { sock.ua privmsg $soccer.chan 10Ev Sahibi Takım:3 $_tr($htmlfree(%al)) }
    if (*<div class="away"><span>*</span>* iswm %al) { sock.ua privmsg $soccer.chan 10Konuk Takım:3 $_tr($htmlfree(%al)) }
    if (*-*</div>* iswm %al) {
      if (*<a href="/iddaa/canli-sonuclar/* iswm %al) { sock.ua privmsg $soccer.chan 10,1Maç Skor:0 $htmlfree(%al) | inc %..:m.aldi }
      elseif %..:m.aldi >= 1 { sock.ua privmsg $soccer.chan 10,1İlk Yarı:14 $htmlfree(%al) }
      else { sock.ua privmsg $soccer.chan 4,1Maç Henüz Başlamadı. | inc %..:m.aldi }
    }
    if (<span class="card sari"> isin %al) { sock.ua privmsg $soccer.chan Sarı Kart:1,8 $htmlfree(%al) }
    if (<span class="card kirmizi"> isin %al) { sock.ua privmsg $soccer.chan Kırmızı Kart:1,4 $htmlfree(%al) }
    if (<span class="live"> isin %al) { sock.ua privmsg $soccer.chan 3Dakika:1 $htmlfree(%al) }
    ;if (*-*</div>* iswm %al) { sock.ua privmsg $soccer.chan 10,1 İlk Yarı:14 $htmlfree(%al) }
    if (<div class="row"> isin %al) { sockclose $sockname | unset %..:m.* }
  }
  if (powered by isin %al) { sock.ua privmsg $soccer.chan  15,3  »º» 8Aranan Kodda Maç Bulunamadı.15 «º«   | sockclose $sockname | unset %..:m.* }
}
on *:Sockopen:i-aragun.*: {
  if ($sockerr) { sock.ua privmsg $soccer.chan Bağlantıda Hata Oluştu Daha Sonra Tekrar Deneyiniz. | return }
  sockwrite -n $sockname GET /iddaa/ HTTP/1.1
  sockwrite -n $sockname host: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -n $sockname $crlf
}
on *:Sockread:i-aragun.*: {
  var %aa | sockread %aa
  if ($sockerr) { echo -s Hata1 | return }
  if !$regex(%aa,(<|>|[a-z-A-Z])|;) && $regex(%aa,[0-9]) { set -e %:-:ikod $htmlfree(%aa) }
  if (*<p style="width:42%;text-align:* $+ $token($sockname,2,46) $+ *</p>* iswm %aa) { set -eu10 %:-:iac on }
  if (<p style="width:42%;text-align:right; isin %aa) { set -e %:-:itakim1 $_tr($htmlfree(%aa)) }
  if (<p style="width:42%;text-align:left; isin %aa) { set -e %:-:itakim2 $_tr($htmlfree(%aa)) }
  if (<p class="ftScore" isin %aa) { set -e %:-:iskor $htmlfree(%aa) }
  if (<td class="txtlink"> isin %aa) && %:-:iac == on { sock.ua privmsg $soccer.chan 0,3 %:-:ikod 8 %:-:itakim1 14 %:-:iskor 8 %:-:itakim2 1 $_tr($htmlfree(%aa))  | unset %:-:i* | sockclose $sockname }
  if (<a href="/taraftar/kayit/?r=cat"> isin %aa) { sock.ua privmsg $soccer.chan 15,3  »º» 8Aranan Takımın Bugün İçerisinde Maçı Bulunamadı.15 «º«   | unset %:-:i* | sockclose $sockname }
}
on *:Sockopen:soccer~*: {
  if ($sockerr) { sock.ua privmsg $soccer.chan Bağlantıda Hata Oluştu Daha Sonra Tekrar Deneyiniz. | return }
  if $sockname == soccer~c-skorlar {
    sockwrite -n $sockname GET /canli_skorlar.php? HTTP/1.1
    sockwrite -n $sockname host: m.sporx.com 
    sockwrite -n $sockname $crlf
  }
  if $sockname == soccer~c-iddaa {
    sockwrite -n $sockname GET /iddaa.php? HTTP/1.1
    sockwrite -n $sockname host: m.sporx.com 
    sockwrite -n $sockname $crlf
  }
  if $sockname == soccer~lig-puan {
    sockwrite -n $sockname GET /_js/tepe_takimlar.js?ver=nc1354202035 / HTTP/1.1
    sockwrite -n $sockname host: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -n $sockname $crlf
  }
  if $sockname == soccer~yayin-akisi {
    sockwrite -n $sockname GET /tvdebugun.php? HTTP/1.1
    sockwrite -n $sockname host: m.sporx.com 
    sockwrite -n $sockname $crlf
  }
  if $sockname == soccer~iddaa-bulten {
    sockwrite -n $sockname GET /iddaa-bulten HTTP/1.1
    ;sockwrite -n $sockname GET /iddaa/bulten.php HTTP/1.1
    sockwrite -n $sockname host: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -n $sockname $crlf
  }
  if $sockname == soccer~i-favori {
    sockwrite -n $sockname GET /iddaa/ HTTP/1.1
    sockwrite -n $sockname host: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -n $sockname $crlf
  }
  if $sockname == soccer~i-istatistik {
    sockwrite -n $sockname GET /userpages/CouponStats/Topmatches.aspx HTTP/1.1
    sockwrite -n $sockname host: user.mackolik.com
    sockwrite -n $sockname $crlf
  }
}
on *:Sockread:soccer~*: {
  var %uA | sockread %uA
  if ($sockerr) { sock.ua privmsg $soccer.chan Bağlantıda Hata Oluştu Daha Sonra Tekrar Deneyiniz. | return }
  if $sockname == soccer~c-skorlar {
    if (font-weight:bold; color:#FFFFFF isin %uA) { if $htmlfree(%uA) != $null { write c-skor.ua sock.ua privmsg $soccer.chan 1,10 Lig:15 $ifmatch } }
    if (url(/smart/i/canli_sonuc/baslik_bck.png) repeat-x isin %uA) { write c-skor.ua sock.ua privmsg $soccer.chan $chr(160) }
    if (width:15%; text-align:center; font-size:12px isin %uA) { set -e %c.skor:Durum $htmlfree(%uA) }
    if (width:27%; text-align:left; font-size:12px; overflow:hidden isin %uA) { set -e %c.skor:Takim1 $htmlfree(%uA) }
    if (width:10%; text-align:center; font-size:12px;'><a href= isin %uA) { set -e %c.skor:Skor $htmlfree(%uA) }
    if (width:28%; text-align:right; font-size:12px; overflow:hidden isin %uA) { set -e %c.skor:Takim2 $htmlfree(%uA) }
    if (width:20%; text-align:center; font-size:12px isin %uA)  { write c-skor.ua sock.ua privmsg $soccer.chan 1,1 $iif($regex(%c.skor:Durum,'),3 %c.skor:Durum,$iif($regex(%c.skor:Durum,:),0 %c.skor:Durum,4 %c.skor:Durum)) 0,14Takim:1 %c.skor:Takim1 0Skor:8 %c.skor:Skor 0Takim:1 %c.skor:Takim2 0Tarih:1 $htmlfree(%uA) | unset %c.skor:*  } 
    if (<div style='margin-top: 2px; width: 100%; height: 1px; background-color: #D1D1D1;'></div> isin %uA) {
      var %s $lines(c-skor.ua)
      if %s == 0 { sock.ua privmsg $soccer.chan 14,4  »º» 0Şuanda Oynanan Maç Bulunmuyor.14 «º«   | return }
      else sock.ua privmsg $soccer.chan 10Toplam 2 %s 10Satır Yansıtılacak.Tahmini Gösterme Süresi14 $calc(%s / $calc(1000 / $soccerzaman)) 10saniye dir. | .play -s c-skor.ua $soccerzaman
    }
  }
  if $sockname == soccer~c-iddaa {
    if (width:75%; margin-top:6px; color:#0F6210 isin %uA) { write c-iddaa.ua sock.ua privmsg $soccer.chan 1,10Tarih:0 $remove($_tr($htmlfree(%uA)),$(|)) } 
    if (width:62%; margin-top:8px; overflow:hidden; white-space: nowrap isin %uA) { set -e %uA/\cod $_tr($htmlfree(%uA)) }
    if (width:15%; margin-top:8px; text-align:center isin %uA) { set -e %uA/\lig $_tr($htmlfree(%uA)) }
    if (width:8%; margin-top:10px; text-align:center isin %uA) { write c-iddaa.ua sock.ua privmsg $soccer.chan 0,3 $token(%uA/\cod,1,32) 8 $token(%uA/\cod,2-,32) 1LİG:15 %uA/\lig | unset %uA/\* }
    if (<div style="width:100%; height:1px; background-color:#bfbfbf"></div></div> isin %uA) {
      var %i $lines(c-iddaa.ua)
      if %i == 0 { sock.ua privmsg $soccer.chan 15,3  »º» 8İddaa Bülteninde Maç Bulunamadı.15 «º«    | return }
      else sock.ua privmsg $soccer.chan 10Toplam 2 %i 10Satır Yansıtılacak.Tahmini Gösterme Süresi14 $calc(%i / $calc(1000 / $soccerzaman)) 10saniye dir. | .play -s c-iddaa.ua $soccerzaman
    }
  }
  if $sockname == soccer~lig-puan {
    if (*new Array*"/futbol/superlig* iswm %uA) { sock.ua privmsg $soccer.chan 0,14 $remove($token(%uA,3,62),</strong) 8 $remove($token(%uA,6,62),</div) 5 $token($token(%uA,8,62),1,32) 1 $token($remove($token(%uA,8,62),</div),2-,32) 5 $token($token(%uA,10,62),1,32) 1 $token($remove($token(%uA,10,62),</div),2-,32) }
  }
  if $sockname == soccer~yayin-akisi {
    if (margin-left:5px; margin-top: 2px; color: #FFFFFF; isin %uA) { sock.ua privmsg $soccer.chan $htmlfree(%uA) }
    if (width:18%; margin-top:8px; isin %uA) { set -e %_:/y.sa $htmlfree(%uA) }
    if (width:22%; margin-top:8px; isin %uA) { set -e %_:/y.knl $_tr($htmlfree(%uA)) }
    if (width:60%; margin-top:8px; isin %uA) { sock.ua privmsg $soccer.chan 0,10«º«1 %_:/y.sa 0 »º» $str($chr(160),30)  10 %_:/y.knl - $_tr($htmlfree(%uA)) | unset %_:/y.* }
  }
  if $sockname == soccer~iddaa-bulten {
    if (<td align=left><font color='#FFFFFF'><strong> isin %uA) { write i-bulten.ua sock.ua privmsg $soccer.chan 0,1 $(||) 3 $replace($htmlfree(%uA),$(|),$(-)) 0 $(||)  }
    ;if (<td align=left><font color='#FFFFFF'><strong> isin %uA) { write i-bulten.ua sock.ua privmsg $soccer.chan 1,10 $(||) 0 $replace($htmlfree(%uA),$(|),$(-)) 1 $(||)  }
    if (position:relative;height:21px; isin %uA) { set -e %.//bt $htmlfree(%uA) }
    if (*<td >*</td>* iswm %uA) && !$regex(%uA,(<strong>|<a)) { set -e %.//bo $instok(%.//bo,$htmlfree(%uA),0,32) }
    if (<td bgcolor='#FFFFFF'><a href='javascript:;'><img src= isin %uA) { 
      ;echo -s 1,8 $token(%.//bt,1,32) 3 $token(%.//bt,2-,32)   
      ;write i-bulten.ua sock.ua privmsg $soccer.chan 1,8 $token(%.//bt,1,32) 3 $token(%.//bt,2-,32)   1,3 LiG 8 $tit(1) 0 MBS 8 $tit(2) 0 1 8 $tit(3) 0 0 8 $tit(4) 0 2 8 $tit(5) 0 ALTI 8 $tit(6) 0 ÜSTÜ 8 $tit(7) 0 1 8 $tit(8) 0 0 8 $tit(9) 0 2 8 $tit(10) 0 1-0 8 $tit(11) 0 1-2 8 $tit(12) 0 0-2 8 $tit(13) 
      write i-bulten.ua sock.ua privmsg $soccer.chan 1,3 $token(%.//bt,1,32) 8 $_tr($token(%.//bt,2-,32))   3,8 LiG 5 $tit(1) 3 MBS 1 $tit(2) 14MS3 1 1 $tit(3) 3 0 1 $tit(4) 3 2 1 $tit(5) 3 ALTI 1 $tit(6) 3 ÜSTÜ 1 $tit(7) 14İY3 1 1 $tit(8) 3 0 1 $tit(9) 3 2 1 $tit(10) 14ÇŞ3 1-0 1 $tit(11) 3 1-2 1 $tit(12) 3 0-2 1 $tit(13) 
      unset %.//b*  
    }
    if (<div style="margin-left:6px; margin-top:10px; width:810px; text-align:justify"> isin %uA) {
      var %b $lines(i-bulten.ua)
      if %b == 0 { sock.ua privmsg $soccer.chan 15,3  »º» 8İddaa Bülteninde Maç Bulunamadı.15 «º«   | return }
      else sock.ua privmsg $soccer.chan 10Toplam 2 %b 10Satır Yansıtılacak.Tahmini Gösterme Süresi14 $calc(%b / $calc(1000 / $soccerzaman)) 10saniye dir. | .play -s i-bulten.ua $soccerzaman
    }
  }
  if $sockname == soccer~i-favori {
    if (<td height="23" width="40" style='font-size:14px;font-weight:bold;color:#1f601f;'> isin %uA) { set -e %;://id.fav.kod $_tr($htmlfree(%uA)) }
    if (<td style='font-size:13px;' width="280"> isin %ua) { set -e %;://id.fav.takim $_tr($htmlfree(%uA)) }
    if (<td width="60"><font style="color:#1f601f;font-size:14px;font-weight:bold;"> isin %uA) { sock.ua privmsg $soccer.chan 0,3 %;://id.fav.kod 8 %;://id.fav.takim 1 $htmlfree(%uA) | unset %;://id.fav.* }
  }
  if $sockname == soccer~i-istatistik {
    if (*<b>*</b>* iswm %ua) { set -e %//:i.ist.kod $htmlfree(%uA) }
    if (<a class='iddaa-rows-style' isin %uA) { write i-istatistik.ua sock.ua privmsg $soccer.chan 1,10 %//:i.ist.kod 0 $_tr($htmlfree(%uA)) }
    if (<div class="upper-rate"> isin %uA) { set -e %//:i.ist.oran $instok(%//:i.ist.oran,$iif($htmlfree(%uA) != $null,$v1,-),0,11) }
    if (<div class="bottom-rate"> isin %uA) { set -e %//:i.ist.yuzde $instok(%//:i.ist.yuzde,$htmlfree(%uA),0,11) }
    if !$regex(%uA,(<|>|[a-z-A-Z])|;) && $regex(%uA,[0-9]) { set -e %//:i.ist.toplam $instok(%//:i.ist.toplam,$htmlfree(%uA),0,11) }
    if $regex(%uA,</td>) && ($token(%//:i.ist.toplam,0,11) >= 2) { 
      write i-istatistik.ua sock.ua privmsg $soccer.chan 5,1 MS-1 $ist.o(1) $ist.y(1) MS-X $ist.o(2) $ist.y(2) MS-2 $ist.o(3) $ist.y(3) ALT $ist.o(4) $ist.y(4) ÜST $ist.o(5) $ist.y(5) KG VAr $ist.o(6) $ist.y(6) KG YOK $ist.o(7) $ist.y(7) 1,14 Toplam 0 $token(%//:i.ist.toplam,1,11) 1 M-K% 0 $token(%//:i.ist.toplam,2,11)  
      write i-istatistik.ua sock.ua privmsg $soccer.chan -
      unset %//:i.ist.* 
    }
    if (<div class="footer-right-title"> isin %uA) { 
      var %s $lines(i-istatistik.ua)
      if %s == 0 { sock.ua privmsg $soccer.chan 15,3  »º» 8İddaa Bülteninde Maç Bulunamadı.15 «º«   | return }
      else sock.ua privmsg $soccer.chan 10Toplam 2 %s 10Satır Yansıtılacak.Tahmini Gösterme Süresi14 $calc(%s / $calc(1000 / $soccerzaman)) 10saniye dir. | .play -s i-istatistik.ua $soccerzaman
    }
  }
}
;Canli Skorlar Güncelleme
alias mycanli sockclose mycanli | sockopen mycanli spor.mynet.com 80
on *:sockopen:mycanli: {
  sockwrite -n $sockname GET /iddaa HTTP/1.1
  sockwrite -n $sockname host: spor.mynet.com $+ $crlf $+ $crlf
  sockwrite -n $sockname $crlf
}
on *:sockread:mycanli:{
  var %al | sockread %al
  if ($sockerr) { echo -s Skorlar alınırken hata oluştu. | return }
  if $regex(%al,<div class="number">[0-9]{3}</div>) {
    set -e %^:^m.skoral on 
    set -e %^:^m.kod $htmlfree(%al) 
  }
  if %^:^m.skoral == on {
    if (*<span>*</span> iswm %al) && (<div class="away"> !isin %al) { set -e %^:^m.takim1 10 $_tr($htmlfree(%al)) }
    if (*<div class="away"><span>*</span>* iswm %al) { set -e %^:^m.takim2 10 $_tr($htmlfree(%al)) }
    if (*<a href="/iddaa/canli-sonuclar/* iswm %al) { set -e %^:^m.skor 0 $htmlfree(%al) | inc %^:^m.aldi }
    if (<span class="live"> isin %al) { 
      if !$hfind(macveri,$+(%^:^m.takim1,.,%^:^m.takim2,.,%^:^m.skor),1,W).data { 
        hadd -m macveri %^:^m.kod $+(%^:^m.takim1,.,%^:^m.takim2,.,%^:^m.skor) 
        sock.ua privmsg $soccer.chan 3,1 MaçKodu:7 %^:^m.kod 3Dakika:4 $htmlfree(%al) %^:^m.takim1 %^:^m.skor %^:^m.takim2 
      }
    }
    if (<div class="row"> isin %al) { unset %^:^m.* }
  }
  if (powered by isin %al) { sockclose $sockname | unset %%^:^m.* }
}
;---------\
;EVENTS    >
;---------/
on *:start: {
  echo -as *** $soccerfullname
  echo -as ***
  echo -as *** $soccerlogo
  echo -as ***
  echo -as *** 2 Written: By uMuT(Med Cezir) 
  echo -as ***
  echo -as *** 3/soccerbot1 Komutuyla Bağlanır Servera.
}
on *:load:{
  echo -as /*** Yükleme İşlemi Başarıyla Gerçekleştirildi.
  echo -as /*** Ayarlarınızı Yaptıktan Sonra Botu Kullanabilirsiniz.
  echo -as /*** 
  echo -as /*** 
  echo -as /*** Önemli Uyarı:
  echo -as /*** 4 1- Botun çalışma mantığı tamamen kaynak sitelere socket mantığıyla bağlanarak, veri çekmek şeklindedir.
  echo -as /*** Verilerin alındığı sitelerde meydana gelen değişikliklerden veya editörlerin yerine getirmediği bir işlem den Bot yapımcısına bir mesuliyet yüklenemez.
  echo -as /*** 4 2- Soccer Bot un sunmuş olduğu  tüm sayısal veriler, istatistikler ve tahminler sadece bilgilendirme amaçlıdır. 
  echo -as /*** Yer alan bilgiler ve doğrulukları tarafımca garanti edilmemekte olup, bu bilgiler belli bir getirinin sağlanmasına yönelik olarak verilmemektedir. 
  echo -as /*** Bu nedenle yer alan bilgilerdeki hatalardan, eksikliklerden ya da bu bilgilere dayanılarak yapılan işlemlerden doğacak her türlü maddi/manevi zararlardan
  echo -as /*** Her ne şekilde olursa olsun üçüncü kişilerin uğrayabileceği her türlü zararlardan dolayı Bot Yapımcısı sorumlu tutulamaz.
}

Set · 20 Şubat 2013, 19:17

iyi yormuştur kod seni, buna ek ayri bir zamanlayici ile aktif maçları yani oynanan maçları skor durumu vs onlarıda kanala yansıtma olsa oda güzel olurdu , eline sağlık

Med Cezir · 20 Şubat 2013, 19:31

Evet baya uzun bir kodlama oldu, şuanda oturupda böye bir bot yazma kararı alırmıyım asla tabiki, ama parça parça siteleri gezdikce gördügüm özelliklerden şunuda ekliyim bunuda ekliyim diye diye bu şekilde bişe çıktı ortaya. Bayada zevk aldım açıkcası yazdıkcada.

Dediğin gibi bir özellik son ana kadar eklemek aklımda vardı, ama gezdiğim sitelerde istediğim verileri elde edebileceğim sağlam bir kaynak site bulamadım. O nedenlede o tarz bi ekleme yapmadım.

Set · 20 Şubat 2013, 19:35

sporx.com orada olması gerek aklımda oyle bir site var askerden once gözüme çarpmıştı az incelersen istediğini bulursun bence ayri bir güzellik katar fikrimce.

IRC-Dancer · 20 Şubat 2013, 20:01

Güzel bir oluşum eline emeğine sağlık , BAŞARILAR ~~

Med Cezir · 21 Şubat 2013, 03:43

Set Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

sporx.com orada olması gerek aklımda oyle bir site var askerden once gözüme çarpmıştı az incelersen istediğini bulursun bence ayri bir güzellik katar fikrimce.

Evet o siteyi didik didik ettim diyebilirim
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
zaten botun %80 ide oradan bilgi çekiyor, fakat canlı skorları ve gol haberi veren güvenilir sitelerin tamamı java destekli olduğu için sıkıntı var. O yüzden skorları çektiğim sitelerden birinden gelen verileri kayıt ettirmek yolu ile bir düzenleme olabilir ilerleyen zamanda.

q0kh4n · 22 Şubat 2013, 19:26

set ßy $me yaparlar artık bunca emeğe konarlar :/

22 Şubat 2013, 20:14

q0kh4n Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

set ßy $me yaparlar artık bunca emeğe konarlar :/

ona diyecek laf yok coder de koder de çok emek veren umut a tşk ler.

emek hırsızlarınada güle güle kullanmalar ama hırsızlıkdan çok böle bir başarıyıda tşk edmek gerçekden lazım.

Hangman · 23 Şubat 2013, 15:14

Merhaba ben Sohbet.Net 'in güvenlik sorumlusu aynı zamanda da sunucu botlarının işleyişi ve geliştirilmesiyle sorumluyum. Botunu gördüm inceledim ve gercekden cok emek harcanmıs Med Cezir. Öncelikle emeğine sağlık. Senın botunu bende sunucumuz koruma botu S-Bot a göre duzenledim, #iddaa ve #iddaa-canli kanallarında aktif ettim. Kanal giriş bilgilerinde ve botun karsılama mesajlarında sana olan teşekkürlerimizi tüm kullanıcılarımız görmektedir. Ayrıca bende buradan bir daha teşekkür etmek istedim Sohbet.Net yönetimi adına. Güncellemelerinide takip edeceğim.

oguz8787 · 23 Şubat 2013, 18:15

usta emegine yüregine saglik ben bu botu oper olmadan kullanicam acaba timer nasil yapariz
flood dan düsmemesi icin ?

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Futbol Eggdrop Botu	EndLeSsLoVe	Eggdrop, NeoStats, BNC	5	02 Nisan 2010 14:16
İddaa botu lazim acİl	Samii	mIRC Scripting Hazır Kodlar	0	25 Eylül 2009 23:15

Konuyu Toplam 5 Üye okuyor. (0 Kayıtlı üye ve 5 Misafir)

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.