Cevap: !youtube indirme addonu
Kod:
alias _ych return #DJ
;-- burayý kafana gore duzenle, duzenlettir
on *:text:*:#:{
if ($chan == $_ych) {
if ($chr(64) isin $1 && yt isin $1) {
_yt $2-
msg $_ych ok, 1sn.
}
}
}
alias _yt { %yts.s = $replace($2-,$chr(32),+,&,%26) | sockclose ytsearch | sockopen ytsearch
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
80 }
on *:sockopen:ytsearch:{
sockwrite -nt $sockname GET /results?search_query= $+ %yts.s HTTP/1.1
sockwrite -nt $sockname Host:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.1 (KHTML, like Gecko) Chrome/21.0.1180.60 Safari/537.1
sockwrite -nt $sockname $crlf
}
on *:sockread:ytsearch:{
var %_a | sockread %_a
if ($regex(%_a,/<a aria-hidden="true" href="\/watch\?v=(.*)"/$i) == 1) { yclink $remove($token($regml(1),1,32),") | sockclose $sockname | halt }
if (*No Videos found* iswm %yts.temp) { sockclose ytsearch | unset %yts.* | halt }
if (*start search results* iswm %yts.temp) { %yts.searchres = 0 }
}
alias trchra return $replace($1-,Ö,ö,Ç,ç,Ä°,i,ö,ö,ç,ç,ü,ü,ÅŸ,þ,ı,ý,Åž,þ,ÄŸ,ð,Ãœ,ü,Äž,ð,$chr(39),-)
alias _html {
var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/gi,$null,%x), %x = $remove(%x, , )
return %x
}
alias yclink {
if (!$sock(spor)) {
var %yclink $1-,%yclink2 $remove(%yclink,
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
set -eu10 %_vp $left(%yclink2,11)
sockopen spor
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
80
sockmark spor msg $_ych
}
}
On *:sockopen:spor:{
Sockwrite -n $sockname GET $+(/a/itemInfo/?video_id=,%_vp,&ac=
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
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:spor:{
var %_w | sockread %_w
if $regex(%_w,/("h": "(.*)")/i) { var %_ha = $remove($regml(1),"h",:,") }
if $regex(%_w,/("title": "(.*)")/i) { var %_tit = $remove($regml(1),"title",:,") }
if $regex(%_w,/("image": "(.*)")/i) {
var %_img = $remove($regml(1),"image",:,")
$sock($sockname).mark 6• [You0,4tube] - 2Þarký ADI : $trchra($gettok(%_tit,1,44))
$sock($sockname).mark 6• [You0,4tube] - 5Þarký Resmi : $replace($gettok(%_img,1,44),http//,http://)
$sock($sockname).mark 6• [You0,4tube] - 5Dinlemek için :12
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
1 1 sockclose spor
}
Coderini hatýrlamýyorum fakat güzel bi çalýþmaydý ve en son çalýþýr haldeydi kullanýmý ise @yt Tarkan - ÖP gibi sevgili @ [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] |
