IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası - Güncel İddaa (Canlı Maç Takibi) Remotesi

- mIRC Parça Kodlar (https://www.ircforumlari.net/mirc-parca-kodlar/)

- - Güncel İddaa (Canlı Maç Takibi) Remotesi (https://www.ircforumlari.net/mirc-parca-kodlar/965942-guncel-iddaa-canli-mac-takibi-remotesi.html)

Güncel İddaa (Canlı Maç Takibi) Remotesi

Komut: /iddaa
İşlev: com object ile web üzerindeki verileri çeker.

Kod:

alias htmlfree { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,,$chr(9)) | return %x }

alias iddaa {

  var %cek $+(iddaa,$r(1,9999)) | .comopen %cek Msxml2.ServerXMLHTTP.6.0

  noop $com(%cek, open, 2, bstr, GET, bstr, $+(
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
noop $com(%cek, send, 1) $com(%cek, responseText, 2)

  var %y1 $len($com(%cek).result)

  if %y1 > 4141 { var %y $mid($com(%cek).result,1,4141) } 

  else { var %i $mid($com(%cek).result,1,4141) }

  .comclose %cek | var %q $token($htmlfree(%i),0,63) ,%u 1

  while %u <= %q {

    echo -s 12Kod:1 $token($token($htmlfree(%i),%u,63),1,42) 12Dakika:1 $token($token($htmlfree(%i),%u,63),2,42) 12Ev Sah:1 $token($token($htmlfree(%i),%u,63),3,42) 12Dep:1 $token($token($htmlfree(%i),%u,63),4,42) 12Skor:4 $token($token($htmlfree(%i),%u,63),5,42)

    inc %u

  }

}

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]