!burç <burcunuz> (Yeni sistem) - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Bozkurt · 21 Aralık 2014, 21:53

Feragat Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Geçen sene bir arkadaşın isteği üzerine bende yapmıştım bir burç kodu. Bir kaç burc'u denedim çalışıyor. Eğer işine yararsa kullanabilirsin.
- Sen veya diğer kullanıcılar !burç BurçAdı yaparak kullanabilirsiniz. İyi forumlar.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

alias -l fltr { if $isid { return /^[.!]bur[cçÇ]\s(?:ko[Ççc]|bo[gğĞ]a|[İiı]k[İiı]zler|yenge[cÇç]|aslan|ba[Şşs]ak|teraz[İıi]|akrep|yay|o[Ğğg]lak|kova|bal[iİı]k)$/Si }
  else { set -e %brc $replace($lower($1),ç,c,ğ,g,Ğ,g,ı,i,İ,i,ş,s,Ş,s,Ç,c) | set -e %k_ $2 
var %rd $r(111,999999) | sockopen $+(burc,%rd) 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 | sockmark $+(burc,%rd) %brc } }
on *:sockopen:burc*:var %b sockwrite -n $sockname | %b GET /gunluk-burclar/ $+ $sock($sockname).mark $+ -burcu/ HTTP/1.1 | %b host: $sock($sockname).addr | %b $crlf 
on *:sockread:burc*:var %a | sockread %a | if $regex(%a,/(?:<p>.+(<\/p><p>)?<\/p>\z)/) { tokenize 46 $regsubex(b,%a,/\x3C.+\x3E/UgS,) | msg %k_ 2 $* } 
on *:sockclose:burc*:msg %k_ 4Kaynak: 5
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
on *:input:#deney:if !$regex($1,^\/) { if $regex($1-,$fltr) { fltr $2 # } }
on $*:text:$($fltr):#deney:fltr $2 #

bu kodu denedim ama calışmıyor. malesef :s

Feragat · 21 Aralık 2014, 22:05

SiyahkaLem Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

bu kodu denedim ama calışmıyor. malesef :s

Kanal kısımlarını düzenlediğinden emin ol #deney olarak geçiyor kodda. Ayrıca boş bir remote sayfasına eklemeni tavsiye ederim.

Kod'u şuan Version 6.21 mIRC'te denedim. Her hangi bir sorun gözükmüyor.

Sonuç:

Kod: Kodu kopyalamak için üzerine çift tıklayın!

[22:02] <Feragat> !burc oğlak
[22:02] <Feragat>  Ä°natÃ§Ä±lÄ±ÄŸÄ±nÄ±zÄ±n baskÄ±n olduÄŸu bir gÃ¼n geÃ§ireceksiniz
[22:02] <Feragat>  BazÄ± kararlarÄ± vermeden Ã¶nce, geÃ§miÅŸin pÃ¼rÃ¼zlerinden kurtulmalÄ±sÄ±nÄ±z
[22:02] <Feragat>  TakÄ±ntÄ±larÄ±nÄ±zÄ±n sizi olumsuz etkilemesine izin verirseniz, hedeflerin gecikmesine neden oluyorsunuz
[22:03] <Feragat> Kaynak: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
başak
[22:03] <Feragat>  Ã–zel hayatÄ±nÄ±zda bazÄ± problemler var
[22:03] <Feragat>  Bencilce davranmanÄ±z, iliÅŸkinizde onarÄ±lamayacak yaralara sebep olabilir
[22:03] <Feragat>  SevdiÄŸinize karÅŸÄ± daha anlayÄ±ÅŸlÄ± olmaya Ã§alÄ±ÅŸÄ±n
[22:03] <Feragat>  Ãœzerinize aldÄ±ÄŸÄ±nÄ±z bir iÅŸi baÅŸaramayacaÄŸÄ±nÄ±za dair bir endiÅŸeniz var
[22:03] <Feragat>  Ä°ÅŸ konusunda Ã¶nÃ¼nÃ¼ze Ã§Ä±kan fÄ±rsatlarÄ± iyi deÄŸerlendirmeniz gereken bir dÃ¶nem
[22:03] <Feragat>  Ã‡alÄ±ÅŸmalarÄ±nÄ±zda doÄŸru bir yol izleyerek amaÃ§larÄ±nÄ±za ulaÅŸabilirsiniz
[22:03] <Feragat>  Maddi sÄ±kÄ±ntÄ±larÄ±nÄ±zÄ±n bazÄ±larÄ±ndan kurtulmanÄ±z mÃ¼mkÃ¼n
[22:03] <Feragat>  KolesterollÃ¼ besinlerden uzak durun
[22:03] <Feragat> Kaynak: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
type="text/javascript" src="https://code.jquery.com/jquery-1.12.0.min.js">   
   
       3
oFLidu, Bozkurt, Goemon bunu beğendi 
        Beğen
                    
 
 
    Tümü · 3
Beğen 3
 
  oFLidu
Bozkurt
Goemon
 
 
  
                __________________
 The Ghost of Christmas Past... 
 
 mircscripting.net

Bozkurt · 22 Aralık 2014, 16:18

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Eyvallah saolasın calıştı emegine saglık.

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
!burc Burcunuz Yeni	DaDaS	mIRC Scripting Hazır Kodlar	14	11 Ekim 2013 11:32
Firefox'tan yeni sistem!	Deep	Bilgisayar Donanımı	0	30 Mart 2012 18:44

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.

Canlı Akış 0

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

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.

Canlı Akış 0

Reaksiyonlar