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

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 31 Aralık 2009, 02:09   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
AciL Yarcım !!!




Merhaba arkadaşlar benim elimde şöle bi kod var.


PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
    set botnick adminnick
    bind join 
- * karsilama
    proc karsilama 
nick uhost hand chan } {
      global 
botnick
      
if {$nick==$botnick} { 
        
putquick "PRIVMSG $chan : 4«« S12unucu 4S12ahibi 1- 4R12oot 4A12dministrator4  »» " 
        
putquick "PRIVMSG $chan :12By4:12nick 12Şu anda 4$chan 12Kanalına Giriş Yaptı4."
        
putquick "PRIVMSG $chan :12Oneri istek ve şikayetlerinizi 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
"
        
putquick "PRIVMSG $chan :4Mail12&4Msn 12adresine iletebilirsiniz4."
        
putquick "PRIVMSG $chan :12Hoş sohbetler dileriz4."
      
}
    } 


Ben kanala join değil de Sunucuya bağlandım da girdim kanallara iletilmesini istiyorum.Ve mümkünde ftp üzerinden bi yazıyla birlikte ses çalmasını istiyorum. ßile arkadaşlar yardımlarını bekliyorum.Tşk'ler.

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 31 Aralık 2009, 07:25   #2
Çevrimdışı
¿
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: AciL Yarcım !!!




By_Xcz Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Merhaba arkadaşlar benim elimde şöle bi kod var.


PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
    set botnick adminnick
    bind join 
- * karsilama
    proc karsilama 
nick uhost hand chan } {
      global 
botnick
      
if {$nick==$botnick} { 
        
putquick "PRIVMSG $chan : 4«« S12unucu 4S12ahibi 1- 4R12oot 4A12dministrator4  »» " 
        
putquick "PRIVMSG $chan :12By4:12nick 12Şu anda 4$chan 12Kanalına Giriş Yaptı4."
        
putquick "PRIVMSG $chan :12Oneri istek ve şikayetlerinizi 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
"
        
putquick "PRIVMSG $chan :4Mail12&4Msn 12adresine iletebilirsiniz4."
        
putquick "PRIVMSG $chan :12Hoş sohbetler dileriz4."
      
}
    } 

Ben kanala join değil de Sunucuya bağlandım da girdim kanallara iletilmesini istiyorum.Ve mümkünde ftp üzerinden bi yazıyla birlikte ses çalmasını istiyorum. ßile arkadaşlar yardımlarını bekliyorum.Tşk'ler.


Anladigim kadariyla;


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
# Nickini yaz. set sahip(nick) "Nickiniz" # Karsilama mesajinda ki iletisim e-mail adresi. set sahip(mail) "
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
" # Global mesaj. set sahip(gmesaj) "Sunucu sahibi (Root administrator) $sahip(nick) su anda online." ################### # Elleme CISS! :d # ################### bind raw * notice dikkatsahip:baglandi proc dikkatsahip:baglandi {from keyword text} { global botnick sahip if {[string match -nocase "*client connecting*" $text]} { set nick [lindex $text 9] if {[string match -nocase $sahip(nick) $nick]} { putquick "os global $sahip(gmesaj)" return 0 } } } bind join - * dikkatsahip:karsila proc dikkatsahip:karsila {nick uhost hand chan} { global botnick sahip if {$nick == $sahip(nick)} { putquick "PRIVMSG $chan :Sunucu sahibi (Root Administrator)" putquick "PRIVMSG $chan :$sahip(nick) su anda $chan kanalina giris yapti." putquick "PRIVMSG $chan :Dilek, oneri ve sikayetlerinizi: $sahip(mail)" putquick "PRIVMSG $chan :E-mail & MSN adresine iletebilirsiniz." putquick "PRIVMSG $chan :Keyifli sohbetler dileriz." } }


Dipnot
:
Botun sunucuya giris ve cikis noticelerini gormesi gerekir, ayrica kanalda karsilamasi icin botunuzun kanallarda bulunmasi sarttir.


Konu ¿ tarafından (31 Aralık 2009 Saat 07:33 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Alt 31 Aralık 2009, 07:40   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: AciL Yarcım !!!




"Namesis" Çok saolasin arkadaşım ßen o sorunu varolan kendi kodumla çözdüm de acaba bu bnm kendi vermiş oldum koda ses ekliyebilirmiyim mesela kanala girince o yazı çıkıyor ya aynı anda ses de çalsın istiyorum eğer bi bilgin varsa yardımcı olabilirmisin diğer arkadaşlardan bilen varsa sizlkerinde yardımını bekliyorum tşkler.

----------

"Namesis" arkadaşım snn vermiş oldun koduda denemek istiyorum ama pek anlıyamadım
şimdi ben Sunucuya girdim zaman Turkiye nickli botun bunları demesini istiyorum bnm de nickim Kadavra kodu o şekilde ayarlayız yollarsan çok çok sewinirim şimdiden tşk ederim .

 
Alıntı ile Cevapla

Alt 31 Aralık 2009, 07:46   #4
Çevrimdışı
¿
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: AciL Yarcım !!!




By_Xcz Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
"Namesis" Çok saolasin arkadaşım ßen o sorunu varolan kendi kodumla çözdüm de acaba bu bnm kendi vermiş oldum koda ses ekliyebilirmiyim mesela kanala girince o yazı çıkıyor ya aynı anda ses de çalsın istiyorum eğer bi bilgin varsa yardımcı olabilirmisin diğer arkadaşlardan bilen varsa sizlkerinde yardımını bekliyorum tşkler.

----------

"Namesis" arkadaşım snn vermiş oldun koduda denemek istiyorum ama pek anlıyamadım
şimdi ben Sunucuya girdim zaman Turkiye nickli botun bunları demesini istiyorum bnm de nickim Kadavra kodu o şekilde ayarlayız yollarsan çok çok sewinirim şimdiden tşk ederim .

Ses olayi olmaz, ancak kendi sunucunun mIRC'ine eklersen olabilir. Mesela notify'e ekleyebilirsin nickini ve ses'de eklersin istedigini yapmis olursun.

Yazdigim code'de degistirmen gereken kisimlar;


# Nickini yaz.
set sahip(nick) "Nickiniz"

# Karsilama mesajinda ki iletisim e-mail adresi.
set sahip(mail) "
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
"


# Global mesaj.
set sahip(gmesaj) "Sunucu sahibi (Root administrator) $sahip(nick) su anda online."


yesil renkli olan kisimlarda degisiklik yap digerlerini elleme.

 
Alıntı ile Cevapla

Alt 31 Aralık 2009, 08:05   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: AciL Yarcım !!!




"Namesis" çok saolasin arkadaşım.senide yordum sabah sabah kusuruma bakma
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
) bir şey daha sormak istiyorum şimdi ben root admin sunucu bnm değil böle root adminlere özel nicke özel ne biliyim şekil gibi değişik özel tcl ler veya başka kodlar varmı aklına ne gelirse

 
Alıntı ile Cevapla

Alt 31 Aralık 2009, 08:26   #6
Çevrimdışı
¿
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: AciL Yarcım !!!




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
# Nickini yaz. set sahip(nick1) "Nick1" set sahip(nick2) "Nick2" set sahip(nick3) "Nick3" set sahip(nick4) "Nick4" set sahip(nick5) "Nick5" # Karsilama mesajinda ki iletisim e-mail adresi. set sahip(mail) "
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
" # Global mesaj. set sahip(gmesaj1) "Sunucu sahibi (Root administrator) $sahip(nick1) su anda online." set sahip(gmesaj2) "Sunucu teknik admini olan $sahip(nick2) su anda online." set sahip(gmesaj3) "Sunucu server admini olan $sahip(nick3) su anda online." set sahip(gmesaj4) "Sunucu services admini olan $sahip(nick4) su anda online." set sahip(gmesaj5) "Sunucu ircoperatoru olan $sahip(nick5) su anda online." ################### # Elleme CISS! :d # ################### bind raw * notice dikkatsahip:baglandi proc dikkatsahip:baglandi {from keyword text} { global botnick sahip if {[string match -nocase "*client connecting*" $text]} { set nick [lindex $text 9] if {[string match -nocase $sahip(nick1) $nick]} { putquick "os global $sahip(gmesaj1)"; return 0 } if {[string match -nocase $sahip(nick2) $nick]} { putquick "os global $sahip(gmesaj2)"; return 0 } if {[string match -nocase $sahip(nick3) $nick]} { putquick "os global $sahip(gmesaj3)"; return 0 } if {[string match -nocase $sahip(nick4) $nick]} { putquick "os global $sahip(gmesaj4)"; return 0 } if {[string match -nocase $sahip(nick5) $nick]} { putquick "os global $sahip(gmesaj5)"; return 0 } } } bind join - * dikkatsahip:karsila proc dikkatsahip:karsila {nick uhost hand chan} { global botnick sahip if {$nick == $sahip(nick1)} { putquick "PRIVMSG $chan :Sunucu sahibi (Root Administrator)" putquick "PRIVMSG $chan :$sahip(nick1) su anda $chan kanalina giris yapti." putquick "PRIVMSG $chan :Dilek, oneri ve sikayetlerinizi: $sahip(mail)" putquick "PRIVMSG $chan :E-mail & MSN adresine iletebilirsiniz." putquick "PRIVMSG $chan :Keyifli sohbetler dileriz." } if {$nick == $sahip(nick2)} { putquick "PRIVMSG $chan :Sunucu teknik admin (Technical Administrator)" putquick "PRIVMSG $chan :$sahip(nick2) su anda $chan kanalina giris yapti." putquick "PRIVMSG $chan :Dilek, oneri ve sikayetlerinizi: $sahip(mail)" putquick "PRIVMSG $chan :E-mail & MSN adresine iletebilirsiniz." putquick "PRIVMSG $chan :Keyifli sohbetler dileriz." } if {$nick == $sahip(nick3)} { putquick "PRIVMSG $chan :Sunucu server admin (Server Administrator)" putquick "PRIVMSG $chan :$sahip(nick3) su anda $chan kanalina giris yapti." putquick "PRIVMSG $chan :Dilek, oneri ve sikayetlerinizi: $sahip(mail)" putquick "PRIVMSG $chan :E-mail & MSN adresine iletebilirsiniz." putquick "PRIVMSG $chan :Keyifli sohbetler dileriz." } if {$nick == $sahip(nick4)} { putquick "PRIVMSG $chan :Sunucu services admin (Services Administrator)" putquick "PRIVMSG $chan :$sahip(nick4) su anda $chan kanalina giris yapti." putquick "PRIVMSG $chan :Dilek, oneri ve sikayetlerinizi: $sahip(mail)" putquick "PRIVMSG $chan :E-mail & MSN adresine iletebilirsiniz." putquick "PRIVMSG $chan :Keyifli sohbetler dileriz." } if {$nick == $sahip(nick5)} { putquick "PRIVMSG $chan :Sunucu ircoperator (IRCop)" putquick "PRIVMSG $chan :$sahip(nick5) su anda $chan kanalina giris yapti." putquick "PRIVMSG $chan :Dilek, oneri ve sikayetlerinizi: $sahip(mail)" putquick "PRIVMSG $chan :E-mail & MSN adresine iletebilirsiniz." putquick "PRIVMSG $chan :Keyifli sohbetler dileriz." } }

gibi cogaltabilirsin, kullanimi sana kalmis. Istersen 50 tane nick icin yapabilirsin.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

Alt 31 Aralık 2009, 08:36   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: AciL Yarcım !!!




bana özel olsun
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)) boşwer öbürlerini tşkler yinede bilmiyordum onu not defterine atıyım.
peki

Alıntı:
"Namesis" çok saolasin arkadaşım.senide yordum sabah sabah kusuruma bakma
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
) bir şey daha sormak istiyorum şimdi ben root admin sunucu bnm değil böle root adminlere özel nicke özel ne biliyim şekil gibi değişik özel tcl ler veya başka kodlar varmı aklına ne gelirse

ßunla ilgili bildiklerin varmı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

Alt 31 Aralık 2009, 09:33   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: AciL Yarcım !!!




By_Xcz Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
bana özel olsun
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)) boşwer öbürlerini tşkler yinede bilmiyordum onu not defterine atıyım.
peki



ßunla ilgili bildiklerin varmı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Bu biraz geniş bir istek. Forum içerisinde gözünüze çarpan birşeyler muhakkak vardır. Biraz araştırırsanız güzel şeyler bulabilirsiniz.

 
Alıntı ile Cevapla

Alt 04 Ocak 2010, 23:15   #9
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: AciL Yarcım !!!




biliyorum geniş bi istek olduğunu -Siber55- arkadaşım ama arlına gelen bir şeyler bilen arkadaşlar varsa burda paylaşırlarsaçok sewinirim tşkler.

 
Alıntı ile Cevapla

Cevapla

Etiketler
yarcim, yarcım


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
AciL Yarcım mIRC kuLLanamıyorumm. lestrol mIRC Scripting Sorunları 6 28 Ocak 2010 15:32