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 Sorunlarý (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Deðiþik Bir istek Kodu (https://www.ircforumlari.net/mirc-scripting-sorunlari/783719-degisik-bir-istek-kodu.html)

Tinba 24 Ocak 2018 17:46

Deðiþik Bir istek Kodu
 
Merhaba irc Gönül vermiþ Coder Arkadaþ lar oluru varmý Bilmiyorum Ama User !istek Þarkýcý Þarký ismi Yaptýðý Zaman Bot Youtube Linki verebilirmi Mesala !istek Ferdi Tayfur : Huzurum Kalmadý Bot Bunun Youtube Linkini Verecek Þimdiden Emeðe Gecen Herkese Teþekkür Ederim

esekherif 24 Ocak 2018 17:48

Cevap: Deðiþik Bir istek Kodu
 
Huzurum Kalmadý gerçekten güzel þarkýdýr.

Tinba 24 Ocak 2018 18:25

Cevap: Deðiþik Bir istek Kodu
 
Alýntý:

esekherif Nickli Üyeden Alýntý (Mesaj 1041901001)
Huzurum Kalmadý gerçekten güzel þarkýdýr.

Evet Birde Kodu Bulabilsem :) Huzurum Yerine Gelecek; )

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazýlan mesaj 18:25 -->-> Daha önceki mesaj 17:50 --

Yardýmcý olacak Bir Arkadaþýmýz Yokmu Arkadaþlar Yardýmcý olursanýz memnun olurum

Tinba 25 Ocak 2018 10:53

Cevap: Deðiþik Bir istek Kodu
 
Cevap Verecek Bir Arkadaþýmýz Yok Galiba

DeLiTiM 25 Ocak 2018 12:57

Cevap: Deðiþik Bir istek Kodu
 
Alýntý:

Tinba Nickli Üyeden Alýntý (Mesaj 1041900998)
Merhaba irc Gönül vermiþ Coder Arkadaþ lar oluru varmý Bilmiyorum Ama User !istek Þarkýcý Þarký ismi Yaptýðý Zaman Bot Youtube Linki verebilirmi Mesala !istek Ferdi Tayfur : Huzurum Kalmadý Bot Bunun Youtube Linkini Verecek Þimdiden Emeðe Gecen Herkese Teþekkür Ederim

Merhabalar;
Ýstemiþ olduðun code'yi geliþtirerek kullana bilirsin..
************ olan yerlere ne yazman gerektiðini bilirsin =)
ayrýca bunu kullana bilmen için ssl kurman gerekmektedir.
Gerekli seyler: mIRC SSL oto onay gereklidir. [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Bulabilirsiniz. ve mIRC 6.35 ustu surumlerde calisir.

Kullanýmý: /klipara Ferdi Tayfur Huzurum Kalmadý

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

alias youtube {
  if $sock(youtube1) {
    sockclose $ifmatch
  }
  sockopen -e youtube1
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
443
}
on *:sockopen:youtube1: {
  if $sockerr {
    echo -a 12Baðlantý hatasý $sock($sockname).wsmsg
    return
  }
  sockwrite -nt $sockname GET $+(/results?search_query=,$hget(youtube,youtube)) HTTP/1.0
  sockwrite -nt $sockname Accept: */*
  sockwrite -nt $sockname Host:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
sockwrite -nt $sockname
}
on *:sockread:youtube1: {
  if $sockerr {
    return
  }
  else {
    if $sock($sockname) {
      sockread %f
      if *h3 class="yt-lockup-title "><a hre* iswm %f {
        inc -u1 %yu
        if %yu == 1 {
          echo -a 0,4 $+ $ghta($htmlfree($gettok(%f,12,34))) 11,1 Parçanýn 4YouTube11,1 klibi için týklayýnýz. 12 $+ $+(https://
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
sockclose $sockname
        }
      }
    }
  }
}
alias ytb {
  var %m 1
  %retyb = $1-
  while %m <= $numtok(%retyb,32) {
    if
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
isin $gettok(%retyb,%m,32) || .com isin $gettok(%retyb,%m,32) || .net isin $gettok(%retyb,%m,32) || .org isin $gettok(%retyb,%m,32) {
      %retyb = $deltok(%retyb,%m,32)
    }
    inc %m
  }
  if - isin %retyb {
    return $+(",$replace($remove(%retyb,",1,2,3,4,5,6,7,8,9,0),-,",$chr(32),+,ý,i,ü,u,ö,o,ð,g,ç,c,þ,s),")
  }
  else {
    return $replace($remove(%retyb,",1,2,3,4,5,6,7,8,9,0),$chr(32),+,ý,i,ü,u,ö,o,ð,g,ç,c,þ,s)
  }
}
alias klipara {
  if $hget(youtube,ytb) {
    hdel youtube ytb
  }
  hadd -m youtube youtube $ytb($1-)
  youtube
}
alias htmlfree { 
  var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;) 
  return %x 
}
alias ghta {
  return $replace($1-,â,a,’,',Â,$chr(32),Åž,Þ,°,°,Ç,Ç,Ä°,Ý,Å?,Þ,Ãœ,Ü,ı,ý,ÅŸ,þ,Ç,Ç,ç,ç,ÄŸ,ð,ÅŸ,þ,ü,ü,ı,ý,ö,ö,Ö,Ö,Ä,Ð,&uuml;,ü,&ccedil;,ç,&ouml;,ö,&rsquo;,')
}


Tinba 25 Ocak 2018 13:06

Cevap: Deðiþik Bir istek Kodu
 
Peki Bunu Bota nasýl Editlerim Acaba ?

Alper 03 Þubat 2018 14:23

Cevap: Deðiþik Bir istek Kodu
 
Alýntý:

Tinba Nickli Üyeden Alýntý (Mesaj 1041901308)
Peki Bunu Bota nasýl Editlerim Acaba ?

Kodu en alta eklersen botta çalýþtýrabilirsin. Ekran görüntüsü ekledim örnek kullaným.

Kod:

on $*:text:/^[.!]l[Ýiý]nkara/Si:#: {
  %ytbc = $chan
  klipara $2-
}

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

GoldKey 14 Temmuz 2018 13:43

Cevap: Deðiþik Bir istek Kodu
 
Kod gercekten güzel þunu söyle yapamayýzmý em link versin emde indirme linki versin bunu mobillerde görsün ama mobillerde görünmüyor cod teþekürler

Umud1990 03 Mayýs 2021 07:08

Cevap: Deðiþik Bir istek Kodu
 
Alýntý:

DeLiTiM Nickli Üyeden Alýntý (Mesaj 1041901306)
Merhabalar;
Ýstemiþ olduðun code'yi geliþtirerek kullana bilirsin..
************ olan yerlere ne yazman gerektiðini bilirsin =)
ayrýca bunu kullana bilmen için ssl kurman gerekmektedir.
Gerekli seyler: mIRC SSL oto onay gereklidir. [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Bulabilirsiniz. ve mIRC 6.35 ustu surumlerde calisir.

Kullanýmý: /klipara Ferdi Tayfur Huzurum Kalmadý

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

alias youtube {
  if $sock(youtube1) {
    sockclose $ifmatch
  }
  sockopen -e youtube1
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
443
}
on *:sockopen:youtube1: {
  if $sockerr {
    echo -a 12Baðlantý hatasý $sock($sockname).wsmsg
    return
  }
  sockwrite -nt $sockname GET $+(/results?search_query=,$hget(youtube,youtube)) HTTP/1.0
  sockwrite -nt $sockname Accept: */*
  sockwrite -nt $sockname Host:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
sockwrite -nt $sockname
}
on *:sockread:youtube1: {
  if $sockerr {
    return
  }
  else {
    if $sock($sockname) {
      sockread %f
      if *h3 class="yt-lockup-title "><a hre* iswm %f {
        inc -u1 %yu
        if %yu == 1 {
          echo -a 0,4 $+ $ghta($htmlfree($gettok(%f,12,34))) 11,1 Parçanýn 4YouTube11,1 klibi için týklayýnýz. 12 $+ $+(https://
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
sockclose $sockname
        }
      }
    }
  }
}
alias ytb {
  var %m 1
  %retyb = $1-
  while %m <= $numtok(%retyb,32) {
    if
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
isin $gettok(%retyb,%m,32) || .com isin $gettok(%retyb,%m,32) || .net isin $gettok(%retyb,%m,32) || .org isin $gettok(%retyb,%m,32) {
      %retyb = $deltok(%retyb,%m,32)
    }
    inc %m
  }
  if - isin %retyb {
    return $+(",$replace($remove(%retyb,",1,2,3,4,5,6,7,8,9,0),-,",$chr(32),+,ý,i,ü,u,ö,o,ð,g,ç,c,þ,s),")
  }
  else {
    return $replace($remove(%retyb,",1,2,3,4,5,6,7,8,9,0),$chr(32),+,ý,i,ü,u,ö,o,ð,g,ç,c,þ,s)
  }
}
alias klipara {
  if $hget(youtube,ytb) {
    hdel youtube ytb
  }
  hadd -m youtube youtube $ytb($1-)
  youtube
}
alias htmlfree { 
  var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;) 
  return %x 
}
alias ghta {
  return $replace($1-,â,a,’,',Â,$chr(32),Åž,Þ,°,°,Ç,Ç,Ä°,Ý,Å?,Þ,Ãœ,Ü,ı,ý,ÅŸ,þ,Ç,Ç,ç,ç,ÄŸ,ð,ÅŸ,þ,ü,ü,ı,ý,ö,ö,Ö,Ö,Ä,Ð,&uuml;,ü,&ccedil;,ç,&ouml;,ö,&rsquo;,')
}


12Baðlantý hatasý [0] Bilinmeyen Hata
12Baðlantý hatasý [0] Bilinmeyen Hata

Böyle bi hata ile karþýlaþýyorum.



************ olan kýsýmlarý yt web adresi ile deðiþtiriyorum.

YouMyCure 03 Mayýs 2021 19:38

Cevap: Deðiþik Bir istek Kodu
 
Alýntý:

Umud1990 Nickli Üyeden Alýntý (Mesaj 1042482492)
12Baðlantý hatasý [0] Bilinmeyen Hata
12Baðlantý hatasý [0] Bilinmeyen Hata

Böyle bi hata ile karþýlaþýyorum.



************ olan kýsýmlarý yt web adresi ile deðiþtiriyorum.

2018 de yapýlmýþ bir kod youtube defalarca güncelleme geçirdi çalýþmamasý gayet normal güncellenmesi gerek
bu post sana yardýmcý olur :)

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


Tüm Zamanlar GMT +3 Olarak Ayarlanmýþ. Þuanki Zaman: 05:57.

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net