alias diziler { set %dgf $iif($1,$1-,echo -a) | sockclose diziler | sockopen diziler diziler.com 80 }
on *:sockopen:diziler:{
  var %s sockwrite -tn $sockname | %s GET / HTTP/1.1 | %s host: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
TV'de şuan yayınlanan diziler... | %dgf 14 $+ $str(×,20) 
}
on *:sockread:diziler:{ var %a | sockread %a | if tv-now"> isin %a { var %a $replace(%a,/li><li>,½) | tokenize $asc(½) %a | drf $* } }
alias drf { 
  var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), $&
    %x = $replace($remove(%x,&nbsp;),Ç,Ç,Ä°,İ,Å?,Ş,Ãœ,Ü,ı,ı,ÅŸ,ş,Ç,Ç,ç,ç,ÄŸ,ğ,ÅŸ,ş,ü,ü,ı,ı,ö,ö,Ö,Ö,Ä,Ğ,Å,Ş) 
  %dgf 7•14 $gettok(%x,1,$asc(-)) - $+ $gettok(%x,2,$asc(-)) | if (!%x) %dgf 7•14Şu anda yayınlanan dizi yok.
}

on *:text:!diziler:#:if !$sock(diziler) { diziler msg # } | else { msg # Biraz bekleyiniz. }

on *:connect:.timerdiziler 0 1800 diziler msg #diziler