ForumTEK.Net - IRC Forumu   online kpss kursu


  ForumTEK.Net - IRC Forumu IF - mIRC Scripting Hazır Kodlar


Like Tree1Teşekkürler;
  • 1 Post By Toprak

Yeni Konu  

 
LinkBack Seçenekler Stil
Prev önceki Mesaj   sonraki Mesaj Next
Alt 27 Ocak 2015, 23:02   #1
Bir umuttur yaşamak
 
Toprak - ait Kullanıcı Resmi (Avatar)
 
Üyelik tarihi: 09 Eylül 1991
Bulunduğu yer: Konya
Mesajlar: 323
WEB Sitesi: https://www.teklan.com.tr/
IRC Sunucusu: irc.teklan.com.tr
İlgi Alanı: mIRC Scripting
Alınan Beğeni: 211
Standart !diziler <[şuan|bugün]>

Kod:
alias dizi { set %dgf $iif($1,$1-,echo -a) | sockclose dizi | sockopen dizi diziler.com 80
  %dgf 7•14 TV'de bugünkü diziler... | %dgf 14 $+ $str(×,20) 
}
on *:sockread:dizi:{ var %a | sockread %a 
  if $regex(%a,schedule-slide current") { 
    sockmark dizi sc 
  }
  if $sock(dizi).mark && $regex(%a,schedule-list-) {
    if $regex(%a,ch-time") { %dgf 7•14  $drs(%cdizi) - $drs($nohtml(%a)) | unset %cdizi }
    else {  set %cdizi $nohtml(%a) }
  }
}
alias drs return $replace($1-,Ç,Ç,İ,İ,Å?,Ş,Ü,Ü,ı,ı,ÅŸ,ş,Ç,Ç,ç,ç,ÄŸ,ğ,ÅŸ,ş,ü,ü,ı,ı,ö,ö,Ö,Ö,Ä,Ğ,Å,Ş)

on *:text:!diziler*:#:{
  if $1 == !diziler {
    if $2 == bugün { if !$sock(dizi) { dizi msg # } | else { msg # Biraz bekleyiniz. } }
    elseif $2 == şuan { if !$sock(diziler) { diziler msg # } | else { msg # Biraz bekleyiniz. } }
    elseif !$2 { if !$sock(diziler) { diziler msg # } | if !$sock(dizi) { .timerdizi 1 1 dizi msg # } }
    else { msg # Hatalı kullanım! Doğru kullanım: "!diziler <[şuan|bugün]>" }
  }
}
on *:sockopen:dizi*: var %s sockwrite -tn $sockname | %s GET / HTTP/1.1 | %s host: www.diziler.com | %s $crlf 

alias diziler { set %dgf $iif($1,$1-,echo -a) | sockclose diziler | sockopen diziler diziler.com 80
  %dgf 7•14 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 $drs($remove($nohtml($1-),&nbsp;))
  %dgf 7•14 $gettok(%x,1,$asc(-)) - $+ $gettok(%x,2,$asc(-)) | if (!%x) %dgf 7•14Şu anda yayınlanan dizi yok.
}
alias noHTML return $regsubex($1, /<[^>]+(?:>|$)|^[^<>]+>/g, $null)
Botun eklendiği mIRC'te /dizi komutuyla o gün yayınlanacak dizileri, /diziler komutuyla o anda yayınlanan dizileri görebilirsiniz.

Kanalda !diziler komutuyla hem o an yayınlanan dizileri hemde o gün yayınlanacak dizileri, !diziler şuan komutuyla o an yayınlanan dizileri, !diziler bugün komutuyla o gün yayınlanacak dizileri görebilirsiniz, bu komutlar botun eklendiği mIRC'te çalışmaz.

Kodu remoteye (alt+r) boş bir sayfaya ekleyiniz.





Ölmek için doğmuştur ya insan; O yüzden her yağmur sonrası Toprak kokusunu sever.
 Toprak isimli Üye şimdilik offline konumundadır   Alıntı

Yeni Konu  

Etiketler
&ltşuan|bugün&gt, <şuan|bugün>, diziler


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

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


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Şuan Dinlediğin Parça Nedir ? Painfully Forum Oyunları 24 09 Mart 2019 13:16
Şuan Neye İhtiyacınız Var ? Painfully Forum Oyunları 20 06 Mart 2019 13:08
Şuan ki ruh halinizi anlatan resim ? Painfully Forum Oyunları 15 24 Şubat 2019 22:57
Şuan Dinlediğiniz Şarkının İçinden Bir Cümle Painfully Forum Oyunları 9 27 Eylül 2016 01:06
C'de Diziler(Arrays) Code C ve C++ 0 12 Ekim 2015 21:46

web hosting web hosting
 buy vds
 vps buy  instagram  facebook  twitter  online arkadaş  Domain al  Domain Sat  Alan adı al  online kpss  online hemşirelik kpss kursu  online memurluk kpss kursu  online ags  online ders  online ales  online ön lisans kursu  online dgs kursu  online ön lisans kpss kursu  Satılık Alan adı 

Powered by vBulletin®
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.