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

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 29 Mart 2006, 23:27   #1
viruS
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Vizyondaki Film'ler




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias sinema { if $sock(sinema) { sockclose sinema } | sockopen sinema sinema.com 80 | msg #sinema * Sinema.com: Vizyondaki filmler alınmaya çalışılıyor. | if $window(msg #sinema) { clear @Sinema.com } } alias -l htmlfree { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;) | return %x } alias -l sinemay { msg #sinema $1- } on *:sockopen:sinema:{ var %c = sockwrite -n $sockname | %c GET /filmler.aspx?Status=4 HTTP/1.1 | %c Host: sinema.com $+ $crlf $+ $crlf } on *:sockread:sinema:{ if ($sockerr) { msg #sinema * Sinema.com: Vizyondaki filmleri alırken hata oluştu. Lütfen tekrar deneyiniz. | halt } else { var %- | sockread %- | if (*<td width="271" class="red" valign="top"><a href="film_ozetbilgiler.aspx* iswm %-) || (*<td width="391"><a href="film_ozetbilgiler.aspx?FilmID=*"><img src="images/but_git.gif"* iswm %-) || ($count(%-,$chr(9)) == 13) { sinemay $+($iif(*red* iswm $v1,04,03),$remove($htmlfree(%-),$chr(9),)) } elseif (*<img src="images/but_os.gif"* iswm %-) { msg #sinema 05Devamı ve daha fazla bilgi için:12 $+(,
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
elseif (*HTML*:*Erhan İDİZ* iswm %-) { if $sock(sinema) { sockclose sinema } | if $window(msg #sinema) { msg #sinema } } } } on *:text:!filmler:#sinema: { sinema }

Bunu kanala yansıtma şeklinde düzeltim ufak tefek eksiklikleri var onlarida benim iyileri düzeltip verir insallah bunuda sizlerle paylaşmak istedim fakat MaeLStRom insallah birşey demez , ilk ve tek paylaşmadığı kodu buymus iyi günlerde kullanın ..

Deep Not : #Sinema kanalında herhangi bir nickin !filmler yazması lazım.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias sinema { if $sock(sinema) { sockclose sinema } | sockopen sinema sinema.com 80 | msg #sinema * Sinema.com: Vizyondaki filmler alınmaya çalışılıyor. | if $window(msg #sinema) { clear @Sinema.com } } alias -l htmlfree { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;) | return %x } alias -l sinemay { msg #sinema $1- } on *:sockopen:sinema:{ var %c = sockwrite -n $sockname | %c GET /filmler.aspx?Status=4 HTTP/1.1 | %c Host: sinema.com $+ $crlf $+ $crlf } on *:sockread:sinema:{ if ($sockerr) { msg #sinema * Sinema.com: Vizyondaki filmleri alırken hata oluştu. Lütfen tekrar deneyiniz. | halt } else { var %- | sockread %- | if (*<td width="271" class="red" valign="top"><a href="film_ozetbilgiler.aspx* iswm %-) || (*<td width="391"><a href="film_ozetbilgiler.aspx?FilmID=*"><img src="images/but_git.gif"* iswm %-) || ($count(%-,$chr(9)) == 13) { sinemay $+($iif(*red* iswm $v1,04,03),$remove($htmlfree(%-),$chr(9),)) } elseif (*<img src="images/but_os.gif"* iswm %-) { msg #sinema 05Devamı ve daha fazla bilgi için:12 $+(,
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
elseif (*HTML*:*Erhan İDİZ* iswm %-) { if $sock(sinema) { sockclose sinema } | if $window(msg #sinema) { msg #sinema } } } } on *:text:!filmler:#sinema: { sinema }

Bunu kanala yansıtma şeklinde düzeltim ufak tefek eksiklikleri var onlarida benim iyileri düzeltip verir insallah bunuda sizlerle paylaşmak istedim fakat MaeLStRom insallah birşey demez , ilk ve tek paylaşmadığı kodu buymus iyi günlerde kullanın ..

Deep Not : #Sinema kanalında herhangi bir nickin !filmler yazması lazım.
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Sohbet
Cevapla

Etiketler
filmler, mirc, mirc download, mirc indir, vizyondaki


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
Vizyondaki yeni filmler. Lee Sinema Dünyası 294 16 Şubat 2021 19:00
Vizyondaki Filmler [sinema.com] el33t mIRC Scripting Hazır Kodlar 24 01 Ocak 2011 01:13
Vizyondaki " İzlemeye Değmez " 10 Film Hangileri? Kralice Sinema Dünyası 0 01 Temmuz 2008 13:45
Vizyondaki bazı filmler Sükût Sinema Dünyası 4 20 Kasım 2007 21:19