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

>
+
Etiketlenen Kullanıcılar

10Beğeni(ler)

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 23 Aralık 2012, 01:24   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Eggdrop yansıtma




Şöyle bir şeyle ugrastık hiç yapamadık. Bana yardımcı olabilir misiniz lütfen.

Opers kanalında operler

!kline nick <Sebep>

şeklinde kullanıcıyı atıcaklar ve sebepleri #x kanalına yansıyacak bunu nasıl yapabilirim ?

Şimdiden teşekürler

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet bizimmekan
Alt 24 Aralık 2012, 04:30   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Eggdrop yansıtma




Yardım edicek yok mu

 
Alıntı ile Cevapla

Alt 24 Aralık 2012, 05:30   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Eggdrop yansıtma




Rhall Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Yardım edicek yok mu

PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
bind pub - !kill uzaklas
#Komut algılama
proc uzaklas {nick uhand host chan text} {
if {![
isop $nick $chan]} {return 0}
putquick "privmsg $chan : $text Basariyla Banlandi $nick"
putquick "kill $text"




#Opers kanalinda op olan operler kullanabilir. Yalniz #x kanalina değilde opers kanalina yansitabilir. Sen dene kodlari ne gibi sıkıntı varsa uğraşiriz.

 
Alıntı ile Cevapla

Alt 24 Aralık 2012, 22:18   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Eggdrop yansıtma




Çok teşekkür ederm. Şu şekilde mi işlev örnek vereyim > !kill Ahmet Sunucu kurallarına uymadığından banlandı. #Opers kanalına bu neden mi yazıcak ?

 
Alıntı ile Cevapla

Alt 25 Aralık 2012, 03:24   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Eggdrop yansıtma




Rhall Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Çok teşekkür ederm. Şu şekilde mi işlev örnek vereyim > !kill Ahmet Sunucu kurallarına uymadığından banlandı. #Opers kanalına bu neden mi yazıcak ?

Botu hangi kanala sokarsanız oraya yazar sen dene, olumlu veya olumsuz sonuclari buraya yazarsin.

 
Alıntı ile Cevapla

Alt 25 Aralık 2012, 10:24   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Eggdrop yansıtma




çalışıp çalışmadığını bilmiyorum denemedim...deneyin sorun varsa burda aldığınız hatayı belirtin.gerekeni yaparız.

!kill nick sebep komutunu hangi kanalda kullanmak istiyorsanız bota telnet/dcc üzerinden .chanset #kanal +killkanal komutuyla aktif etmelisiniz.

set kill(yansıtma) "#kanal-adi" kısmınada hangi kanala killlerin yansıtılmasını istiyorsanız o kanal adını girin kodu bota yüklemeden evvel*.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
namespace eval ::kill {} set kill(semb) "!" set kill(yansitma) "#kanal-adi" setudef flag killkanal bind pub -|- $kill(semb)kill ::kill::at proc ::kill::at {nick host hand chan text} { global botnick if {![channel get $chan killkanal]} { return } set knick [lindex $text 0] set sebep [split $text] if {$sebep == ""} { puthelp "notice $nick lütfen bir sebep belirtin. kullanimi: $kill(semb)kill nick sebep" return 0 } if {[regexp -nocase $botnick $knick]} { putserv "notice $nick yok artık LeBron James $nick :p" return 0 } putnow "kill $knick $sebep" putserv "privmsg $kill(yansitma) $nick tarafindan $knick 'e kill atildi saat : [clock format [clock seconds] -format %H:%M:%S] sebep : $sebep" } }


 
Alıntı ile Cevapla

Alt 25 Aralık 2012, 17:13   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Eggdrop yansıtma




sabah kalkar kalkmaz yazınca böyle yamuk olmuş.dışarı çıkmam lazımdı şimdi döndüm eksikleri giderdim.biraz renk ekledim alladım pulladım.ama gene denemedim bende oper bot yok bu haliyle deneyin.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
namespace eval kill { foreach p [array names kill *] { catch {unset kill($p)} } variable kill array set kill { yansitma #kanal-adi-girin semb "!" renk1 \00314 renk2 \00303 } setudef flag killkanal bind pub -|- $kill(semb)kill ::kill::at proc ::kill::at {nick host hand chan text} { variable kill knick global botnick if {![channel get $chan killkanal]} { return } set knick [lindex $text 0] set sebep [lrange $text 1 end] if {$sebep == ""} { puthelp "notice $nick $kill(renk1) lütfen bir sebep belirtin. kullanimi:$kill(renk2) $kill(semb)kill nick sebep" return 0 } if {[regexp -nocase $botnick $knick]} { putserv "notice $nick $kill(renk1) yok artık LeBron James $nick $kill(renk2) :p" return 0 } putnow "kill $knick $sebep" } putserv "privmsg $kill(yansitma) $kill(renk1) $nick $kill(renk2) tarafindan $kill(renk1) $knick $kill(renk2)'e kill atildi " putserv "privmsg $kill(yansitma) $kill(renk1) saat :$kill(renk2) [clock format [clock seconds] -format %H:%M:%S] $kill(renk1) sebep : $kill(renk2) $sebep" } putlog "telasa mehal yok...asais berkemal..."


 
Alıntı ile Cevapla

Alt 25 Aralık 2012, 19:30   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Eggdrop yansıtma




Hata veriyor
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
Can't read "knick": no such veriable while executing "putserv "privmsg $kill(yansitma) $kill(renk1) $nick $kill(renk2) tarafindan $kill(renk1) $knick $kill(renk2) ' e kill atildi "" (in namespace eval ": :kill" script line 35) invoked from within "namespace eval kill { foreach p [array names kill *] { catch {unset kill ($p) } } veriable kill array set kill { yansitma #kanal ..."


 
Alıntı ile Cevapla

Alt 25 Aralık 2012, 20:54   #9
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Eggdrop yansıtma




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
set kline(oper) "#Opers" set kline(logs) "#Operlog" set kline(komut) "!kline" bind pub - $kline(komut) kline:ekle proc kline:ekle {nick uhost handle chan text} { global botnick kline set person [lindex $text 0] set reason [lrange $text 1 end] if {[string match -nocase "$kline(oper)" $chan]} { if {[string match -nocase "" $person] || [string match -nocase "" $reason]} {putquick "PRIVMSG $kline(kanal) :İstediğiniz bir kullanıcıya kline atmak için komutu doğru kullanınız. Kullanımı: <$kline(komut) nick sebep>";return} putquick "KLINE $person $reason" putquick "PRIVMSG $kline(logs) :› Bilgi: $person nickli kullanıcıya $nick tarafından ($reason) sebebi ile kline atılmıştır." } } putlog "Kline TCL - Written By CLubber"


 
Alıntı ile Cevapla

Alt 25 Aralık 2012, 21:24   #10
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Eggdrop yansıtma




ech nasıl atlamışım.şimdi tamam bu kez denedim.tesisatçıyı getirdim eve bir petek patlamış su akıtıyordu değiştirdik ev battı :Ğ

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
# killin yansıtılacağı kanalı #deneme yerine yazmalısınız # !kill komutu hangi kanal/larda kullanmak istiyorsanız, # .chanset #kanal +killkanal ile seçmelisiniz. namespace eval kill { foreach p [array names kill *] { catch {unset kill($p)} } variable kill array set kill { yansitma #deneme semb "!" renk1 \00314 renk2 \00303 } variable knick {} variable sebep {} setudef flag killkanal bind pub -|- $kill(semb)kill ::kill::at proc ::kill::at {nick host hand chan text} { variable kill global botnick if {![channel get $chan killkanal]} { return } set knick [lindex $text 0] set sebep [lrange $text 1 end] if {$sebep == ""} { puthelp "notice $nick $kill(renk1) lütfen bir sebep belirtin. kullanimi:$kill(renk2) $kill(semb)kill nick sebep" return 0 } if {$knick == ""} { puthelp "notice $nick $kill(renk1) nick girmediniz. kullanimi:$kill(renk2) $kill(semb)kill nick sebep" return 0 } if {[regexp -nocase $botnick $knick]} { putserv "notice $nick $kill(renk1) yok artık LeBron James $nick $kill(renk2) :p" return 0 } putnow "kill $knick $sebep" } putserv "privmsg $kill(yansitma) $kill(renk1) $nick $kill(renk2) tarafindan $kill(renk1) $knick $kill(renk2)'e kill atildi " putserv "privmsg $kill(yansitma) $kill(renk1) saat :$kill(renk2) [clock format [clock seconds] -format %H:%M:%S] $kill(renk1) sebep : $kill(renk2) $sebep" } putlog "telasa mehal yok...asais berkemal..."

CLubber'ınkide bu yukardaki aynı işi görür.kulağınızı göstermenin iki farklı yolu (bugün mazoistliğim üstümde olduğu için acılı yolu seçtim sadece.):p

not CLubber'ın verdiği kodda bi karışıklık olmuş:
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
if {[string match -nocase "$kline(kanal)" $chan]} {

yerine
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
if {[string match -nocase "$kline(oper)" $chan]} {

oper yerine kanal olarak yazılmış onu değişirseniz sorun çıkmaz.
bide privmsg $kline(kanal) yerine de aynı değişiklik yapılmalı.kanal yerine oper gelecek yani.

 
Alıntı ile Cevapla

Cevapla

Etiketler
eggdrop, yansıtma


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


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
echo yansıtma sahr mIRC Scripting Sorunları 6 04 Mart 2011 03:41
özeli yansıtma aldanis mIRC Scripting Sorunları 1 15 Haziran 2010 12:49
EGGDROP Bottan WEB e yansıtma?? Black Eggdrop, NeoStats, BNC 0 19 Aralık 2007 23:35
Kanal Yansıtma. µGµR mIRC Scripting Sorunları 3 23 Eylül 2007 18:16