.gir kanal komutu hakkinda - Sayfa 2 - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Heartbroken · 30 Ağustos 2015, 18:19

Kod da Yazım Hatası Yok.
Botu .restart edip deneyin.

Cevap vermiyorsa bota Bağlanın .
.tcl info pa
Komutu Tcl sürümünü verir.

Yada Shell üzerinde önce
tclsh sonra info patchlevel
Aynı işi Görür.

Yada Shell üzerinde Direk
echo 'puts [info patchlevel]' | /usr/local/bin/tclsh8.5
yada tcl sürümü Herneyse işte ,
8.5 yerine O Konulmalı.

Komutu Uygularken,
Hata Alınmadığını Kontrol edin.

alphae · 30 Ağustos 2015, 18:27

bu ozelde

Duygu çıkış yaptı (Client exited).
<nnn> .gir**oyun
<nnn> .gir**#test

bu oda yaptigim komut
cambaz (Client exited).
<SessizMavi>
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
<nnn> .gir**oyun

.eggdrop -nm die baslatim hata yok..

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

Kod da Yazım Hatası Yok.
Botu .restart edip deneyin.

Cevap vermiyorsa bota Bağlanın .
.tcl info pa
Komutu Tcl sürümünü verir.

Yada Shell üzerinde önce
tclsh sonra info patchlevel
Aynı işi Görür.

Yada Shell üzerinde Direk
echo 'puts [info patchlevel]' | /usr/local/bin/tclsh8.5
yada tcl sürümü Herneyse işte ,
8.5 yerine O Konulmalı.

Komutu Uygularken,
Hata Alınmadığını Kontrol edin.

alphae · 30 Ağustos 2015, 18:28

[18:26] Tcl error [girpub]: syntax error in expression "$hedef ni $::cici": extra tokens at end of expression

ozelde .gir oyun dedim

ve kanalda .gir oyun dedim

[18:26] Tcl error [girmsg]: syntax error in expression "$hedef ni $::cici": extra tokens at end of expression

Heartbroken · 30 Ağustos 2015, 18:37

Tcl sürümünüzü Söylemediniz.
Özellikle Belirttim Bu koddaki
Tcl Komutları 8.5 ve üstü
Sürümlerce Desteklenir.

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Yazım Hatası Yok Kod da,

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

set komut ".gir"

set cici "Okanal Bukanal Şukanal"

bind pub - $komut girpub
bind msg - $komut girmsg

proc girpub {n u h c a} {
        set knl [lindex [split $a] 0]
        if {![string length $knl]} {
              putserv "PRIVMSG $c :Hatalı Kullanım. $::komut Kanal-Adı şeklinde Olmalı."
              return
        }
        
        if {[string equal {#} [string index $knl 0]]} {
               set hedef [string range $knl 1 end]
        } else { 
               set hedef $knl
        }
        foreach hmm [split $::cici " "] {
         if {![string match -nocase $hedef $hmm]} {
              putserv "PRIVMSG $c :$knl Kanalı yasaklı listemde. Red edildi."
              return
         } else {
         # .gir Komutunu kullananı sajoinler.
             putquick "SAJOIN $n #$hedef"
         # Botu O kanala sokar.
         # channel add #$hedef
         }
    }
}

proc girmsg {n u h a} {
          set knl [lindex [split $a] 0]
        if {![string length $knl]} {
              putserv "PRIVMSG $n :Hatalı Kullanım. $::komut Kanal-Adı şeklinde Olmalı."
              return
        }
        
        if {[string equal {#} [string index $knl 0]]} {
               set hedef [string range $knl 1 end]
        } else { 
               set hedef $knl
        }
        
       
        foreach hmm [split $::cici " "] {
         if {![string match -nocase $hedef $hmm]} {
              putserv "PRIVMSG $c :$knl Kanalı yasaklı listemde. Red edildi."
              return
         } else {
         # .gir Komutunu kullananı sajoinler.
             putquick "SAJOIN $n #$hedef"
         # Botu O kanala sokar.
         # channel add #$hedef
         }
    }
}

Böyle deneyin.

alphae · 30 Ağustos 2015, 18:43

kod yazim hatasi var örnek botun ozelinde veya kanalda .gir oyun dediginde
bot bu hatayi ekrana veriyor ./eggdrop -nm bot.conf bu sekilde calistirdim
.gir demedigin surece altaki hatayi vermiyor

[18:26] Tcl error [girpub]: syntax error in expression "$hedef ni $::cici": extra tokens at end of expression

Heartbroken · 30 Ağustos 2015, 18:45

Yazım Hatası Değil O
Sizdeki Tcl sürümü
ni in Komutlarını Tanımıyor.
Ki Bunlar 8.5 ve üstündeki
Tcl sürümlerince Destekleniyor.

Yazım Hatası Olmadığını
Göstermek için O Tcl Paste
Linkini verdim.
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Hatalar Üstte Kırmızı Büyük harflerle
ERROR olarak Belirtiliyor.

if {$hedef ni $::cici} {
Satırları :
if {[lsearch $::cici $hedef] >= 0} {
Olarak değişebilirsiniz.
Bunu 8.4'te destekliyor.

alphae · 30 Ağustos 2015, 18:54

8.5.0 kurdum onu gormuyor..

Heartbroken · 30 Ağustos 2015, 19:29

8.4 Tarih oldu.
Windows XP yada 98'in
Konumu Neyse Tcl8.4'lerin
Durumu Aynı.

Tedavülden kalktı.
Artık üretilmiyor.Desteklenmiyor.

Sorun Sanırım Shellcilerin,
Hala 10 yıl Evvel yazılmış
Oto kurulumları ve Oradan ,
Buradan Buldukları eski Dosyaları
Kullanmaları.

8.5.0 Bile Çok Çok eski.
8.4 Resmen Antika.

Win8 yada 10 Varken şimdi
Kim XP yada Win98 Kullanıyor?

Kim şimdiki Bilmem kaç Çekirdekli,
Bilmem kaç Gb Ram'li PC'sini
Bırakırda 10 Yıl evvelki Hurdayı
Kullanır?

8.6.4 varken , bilmem Kaç
Yıl evvel Çıkmış Birşeyi niye
Kullanmak isteyesiniz ki ?
Parayla da Değil ,
Beleş Sonuçta.

Yeni ,Son birkaç Yıl İçinde
Yazılmış bir Script Kullanmaya
Kalksanız çoğu çalışmayacaktır.
Birkaç Script Yazarı Hariç,
Hemen Tümü Yeni
Tcl sürümlerini takip eder.
O'nun getirdiklerini Kullanır.

libtcl8.5.so ve tcl.h
Tam dizinini Göstermelisiniz.
./configure --with-tcllib=/usr/local/lib/libtcl8.5.so --with-tclinc=/usr/local/include/tcl.h
gibi.
Sizde Nerdeyseler Öyle.

No_FeaR · 30 Ağustos 2015, 21:38

Ben XP Kullanıyorum ;p

alphae · 30 Ağustos 2015, 21:54

oot@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] [~/tcl8.5.0/unix]# make install
Installing libtcl8.5.so to /usr/local/lib/
Installing tclsh as /usr/local/bin/tclsh8.5
Installing tclConfig.sh to /usr/local/lib/
Installing libtclstub8.5.a to /usr/local/lib/
Installing message catalogs
Creating msgs
Installing header files
Installing library files to /usr/local/lib/tcl8.5
Installing library http1.0 directory
Installing package http 2.5.3 as a Tcl Module
Installing library opt0.4 directory
Installing package msgcat 1.4.2 as a Tcl Module
Installing package tcltest 2.3.0 as a Tcl Module
Installing package platform 1.0.3 as a Tcl Module
Installing package platform::shell 1.1.3 as a Tcl Module
Installing library encoding directory
Installing and cross-linking top-level (.1) docs
Installing and cross-linking C API (.3) docs
Installing and cross-linking command (.n) docs

kurdum yeniden tcl ve alta egdrop kuruyorum hata.

libtcl8.5.so ve tcl.h
Tam dizinini Göstermelisiniz.
./configure --with-tcllib=/usr/local/lib/libtcl8.5.so --with-tclinc=/usr/local/include/tcl.h
gibi.
Sizde Nerdeyseler Öyle.

ayni sekilde yaptim hata mesaji

./eggdrop: error while loading shared libraries: libtcl8.5.so: cannot open shared object file: No such file or directory
make: *** [modules] Error 127

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

Yazım Hatası Değil O
Sizdeki Tcl sürümü
ni in Komutlarını Tanımıyor.
Ki Bunlar 8.5 ve üstündeki
Tcl sürümlerince Destekleniyor.

Yazım Hatası Olmadığını
Göstermek için O Tcl Paste
Linkini verdim.
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Hatalar Üstte Kırmızı Büyük harflerle
ERROR olarak Belirtiliyor.

if {$hedef ni $::cici} {
Satırları :
if {[lsearch $::cici $hedef] >= 0} {
Olarak değişebilirsiniz.
Bunu 8.4'te destekliyor.

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Chanserv Kanal List Komutu ve Kodu	Goemon	Conference Room (CR)	1	22 Kasım 2015 13:58
Register Komutu Bekleme Süresinde Komutu Uygulayanı #Kanal'a Sajoinlendirme.	SeYH_SaMiL	Anope	9	04 Nisan 2011 17:58
Kanal Listesi Hakkinda	DjSummeR	mIRC Scripting Sorunları	2	18 Şubat 2011 17:47
!uyar Komutu istenilen Kanal Dahilinde Yollama	AgReSsivVe	mIRC Scripting Sorunları	4	26 Nisan 2008 20:30
/who #kanal komutu hakkında yardım	Luke	mIRC Scripting Sorunları	2	13 Ekim 2006 18:39

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

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.