IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   mIRC Uzerinden Futbol Maci Izleyin. (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/701917-mirc-uzerinden-futbol-maci-izleyin.html)

SuLh 21 Eylül 2015 18:29

mIRC Uzerinden Futbol Maci Izleyin.
 
Bu kod ile mIRC uzerinden hangi maclar oldugunu, tarih ve saatini ogrenebilir. Ve dilerseniz izleyebilirsiniz. Cok kapsamli yapmadigim icin reklamlari ayirmaya ugrasmadim.

Kod:

alias mac { write -c maclink.txt | $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Link),window -ne @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Link) | sockclose maclink | $iif(!$sock(maclink),sockopen maclink $regsubex(0111011101110111011101110010111001110011011100000110111101110010011101000110001001101111011100110111001100101110011000100110100101111010, /([01]{1,8})(?=(?:[01]{8})*$)/g, $chr($base(\t, 2, 10)))) 80 }
on *:sockopen:maclink: {
  var %:s sockwrite -n maclink
  %:s GET /home.html HTTP/1.1
  %:s Host: $regsubex(01110011011100000110111101110010011101000110001001101111011100110111001100101110011000100110100101111010, /([01]{1,8})(?=(?:[01]{8})*$)/g, $chr($base(\t, 2, 10)))
  %:s Connection: keep-alive
  %:s Cache-Control: max-age=0
  %:s Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8
  %:s User-Agent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/39.0.2171.65 Safari/537.36
  %:s $crlf
  unset %saymac
}
on *:sockread:maclink: {
  var %:a
  sockread %:a

  if ("karsilasma"><a href isin %:a) {
    $iif($regex($htmlfree(%:a),/(iptv|lig tv)/Si),return)
    echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]link Mac: $htmlfree(%:a)
  }
  if (<div class="tarih"><span> isin %:a) {
    $iif($regex($htmlfree(%:a),/(iptv|lig tv)/Si),return)
    if (tarih*7/24 iswm %:a) { return }
    echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]link Tarih: $htmlfree(%:a)
  }
  if (<div class="saat"><span> isin %:a) {
    $iif($regex($htmlfree(%:a),/(iptv|lig tv|7/24)/Si),return)
    echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]link Saat: $htmlfree(%:a)
  }
  if (href="channel isin %:a) {
    $iif(!%saymac,set %saymac 1)
    $iif($regex($htmlfree(%:a),/(iptv|lig tv|7/24)/Si),return)
    if (ch1.html isin $gettok(%:a,4,$asc("))) { echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]link Link: $gettok(%:a,4,$asc(")) ---- Maçı izlemek için 4 /izle tr yapiniz. (TR MACLARI) }
    else {
      echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]link Link: $gettok(%:a,4,$asc(")) ---- Maçı izlemek için 4 /izle %saymac yapiniz.
    }
    echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]link -
    write maclink.txt $replace($gettok(%:a,4,$asc(")),channel,$regsubex(01110011011100000110111101110010011101000110001001101111011100110111001100101110011000100110100101111010, /([01]{1,8})(?=(?:[01]{8})*$)/g, $chr($base(\t, 2, 10))) $+ /channel)
    inc %saymac
  }
}

alias izle {
  if $regex($1,/^[a-z]/Si) { echo -a Lutfen sayi giriniz. | return }
  if !$read(maclink.txt,$1) { echo -a Yanlis bir numara girdiniz. | return }
  if $1 == tr { set %link [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]. $+ $regsubex(01110011011100000110111101110010011101000110001001101111011100110111001100101110011000100110100101111010, /([01]{1,8})(?=(?:[01]{8})*$)/g, $chr($base(\t, 2, 10))) $+ /channel/ch1.html | macbs | return }
  set %link $read(maclink.txt,$1)
  macbs
}

alias macbs {
  if !$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]izle) {
    write -c macizle.html
    write macizle.html <html> $&
      <head><title>Mac izle</title></head> $&
      <body bgcolor="black"> $&
      <iframe width="600" height="480" src="
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
frameborder="0" allowfullscreen></iframe> $&
      </body> $&
      </html>
    .timeryou 1 2 macizle
  }
}

alias macizle {
  if !$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]izle) {
    window -pdk0ow0 +btle @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]izle 3000 3000 620 500
    noop $dll(nHTMLn_2.95.dll,attach,$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]izle).hwnd)
    noop $dll(nHTMLn_2.95.dll,navigate,$mircdirmacizle.html)
  }
}

on *:exit: {
  write -c maclink.txt
}


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

Not: Mac izlemek icin nHTMLn_2.95.dll 'nin scriptinizin ana klasorunde bulunmasi gereklidir.
Not: Kullanimi:

Kod:

/mac
seklindedir. @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Link penceresinden maclarin numarasini ogrenip;
/izle Macnumarasi
seklinde yaparak izleyebilirsiniz.

Ornek:

Kod:

Link: channel/ch1.html ---- Maçı izlemek için /izle tr yapiniz. (TR MACLARI)
-
Mac: Porto Vs Benfica Benfica maçını izle
Tarih: 20.09.2015
Saat: 21:15
Link: channel/ch9.html ---- Maçı izlemek için /izle 2 yapiniz.
-
Mac: Barcelona Levante maçını izle
Tarih: 20.09.2015
Saat: 21:30
Link: channel/ch9.html ---- Maçı izlemek için /izle 3 yapiniz.
-
Mac: Napoli Lazio maçını izle
Tarih: 20.09.2015
Saat: 21:45
Link: channel/ch11.html ---- Maçı izlemek için /izle 4 yapiniz.
-
Mac: Marsilya Lyon maçını izle
Tarih: 20.09.2015
Saat: 22:00
Link: channel/ch10.html ---- Maçı izlemek için /izle 5 yapiniz.
-



Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 05:34.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk