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

9Beğeni(ler)

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 04 Mayıs 2021, 11:04   #11
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Değişik Bir istek Kodu




@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Teşekkür ederim fakat denedim olmadı.

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Yazgulu Sohbet
Alt 04 Mayıs 2021, 16:43   #12
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Değişik Bir istek Kodu




Kullanımı /klipara ferdi tayfur huzurum kalmadı

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
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 } var %komut = sockwrite -n $sockname %komut GET $+(/results?search_query=,$hget(youtube,youtube)) HTTP/1.1 %komut Host: $sock($sockname).addr %komut Connection: keep-alive %komut $crlf } on *:sockread:youtube1: { if $sockerr { return } else { if $sock($sockname) { sockread %f if $regex(a,%f,/"title"\:\{"runs"\:\[\{"text"\:"(.+)"\}/i) { noop $regex(b,$regml(a,1),/webCommandMetadata":\{"url":"(.+)"."webPageType":"WEB_PAGE_TYPE_WATCH"/Si) var %a $token($regml(a,1),1,34),%b $token($regml(b,1),$token($regml(b,1),0,34),34) inc -u1 %yu if %yu == 1 { echo -a 0,4 $+ $ghta(%a) 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 ghta { return $replace($1-,â,a,’,',Â,$chr(32),Ş,Ş,°,°,Ç,Ç,Ä°,İ,Å?,Ş,Ü,Ü,ı,ı,ÅŸ,ş,Ç,Ç,ç,ç,ğ,ğ,ş,ş,ü,ü,ı,ı,ö,ö,Ö,Ö,Ä,Ğ,&uuml;,ü,&ccedil;,ç,&ouml;,ö,&rsquo;,') }


Eklenen Resim Ön İzlemesi Bu forumdaki ekleri görübilmek için 25 mesaja sahip olmanız gerekir. Sizin 0 Mesajınız var.

Konu DeLiTiM tarafından (04 Mayıs 2021 Saat 16:46 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Alt 04 Mayıs 2021, 20:01   #13
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Değişik Bir istek Kodu




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:!klip *:#: klipara $2- 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.1 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 $crlf } on *:sockread:youtube1: { if $sockerr { return } else { if $sock($sockname) { sockread %f if $regex(a,%f,/"title"\:\{"runs"\:\[\{"text"\:"(.+)"\}/i) { noop $regex(b,$regml(a,1),/webCommandMetadata":\{"url":"(.+)"."webPageType":"WEB_PAGE_TYPE_WATCH"/Si) var %a $token($regml(a,1),1,34),%b $token($regml(b,1),$token($regml(b,1),0,34),34) inc -u1 %yu if %yu == 1 { msg #sohbet 0,4 $+ $ghta(%a) 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;,') }


 
Alıntı ile Cevapla

Cevapla


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Seçenekler
Stil

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 Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Onaylama Kodu [istek] RmX78 TCL Scriptler 5 04 Ekim 2014 05:45
Giriş Kodu istek AnoXs mIRC Scripting Hazır Kodlar 2 08 Ekim 2009 12:54
istek kodu 1diyar mIRC Scripting Sorunları 39 30 Kasım 2007 22:58
istek kodu hakkında sock bot local mIRC Scripting Sorunları 6 18 Kasım 2007 02:33
Bota !istek kodu eklemek için yardım. OzAn mIRC Scripting Sorunları 7 24 Mart 2006 13:37