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

alphae · 31 Ağustos 2015, 00:32

hayir .gir oyun .gir yarisma bole olsun isitiyorum

alphae · 31 Ağustos 2015, 00:37

tek bosluk verdim vurgul verdim olmadi.

.gir oyun dedim giriyor
.gir yarisma dedim girmedi
.gir test girmedi

Heartbroken · 31 Ağustos 2015, 00:47

set cici Ayarındaki Kanal
Adlarını :
set cici [list oyun yarışma help]
Gibi girip Deneyiniz.

Ve Kodun sizdeki
Şimdiki Halini Bir gösterirseniz.
Ben Saklamadım Çünkü.

alphae · 31 Ağustos 2015, 00:50

hepsine birden girmesini istemiyorum .gir oyun dediginde sadece oyuna girsin
.gir yarisma dediginde sadece yarismaya

sizin verdiginiz kod ile .gir oyun diyorum oyuna giriyor ardindan
.gir yarisma diyorum girmiyor ilk .gir yarisma diyorum girmiyor

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

cici Ayarında arada bir
Boşlukla girilmeli ,
Siz Tek Komutla Hepsine mi
Girilsin istemiştiniz ki ?

Öyle ise:
putquick "SAJOIN $n #$hedef"
Satırlarını:
putquick "SAJOIN $n #[join $::cici {,#}]"
Olarak Değişin.

Cicilerden Herhangi Biri
Yazılsa Hepsine Birden Sokar.

Yani : .gir oyun Dense
#oyun #yarisma #kelime #sohbet ...
Hepsine birden Sajoin Edilir.

rascoLn · 31 Ağustos 2015, 00:50

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

bind pub - .gir joinchan

set kanallar "oyun radyo istanbul zurna ankara"

proc joinchan { n u h c a } {
if { [lsearch -exact $::kanallar [string map {"#" ""} [lindex $a 0]]] > -1 } {
putquick "SAJOIN $n #$a"
}
}

alphae · 31 Ağustos 2015, 00:57

anlatamadim derdimi

tek tek alsin belirledim 8 oda var .gir sohbet dediginde sohbet girsin
.gir yarisma dediginde orya girsin toplu girmesini istemiyorum
istiyorum ki gir oyun dediginde giriyor .gir yarisma dedigindede girsin

ilk aldim kod calsiyor basdaki oyunu goruyor diger odalari gormuyor.

[00:53] <%umut> .gir kelime
[00:53] <Duygu> kelime Kanalı yasaklı listemde. Red edildi.

.gir oyun
0:56] *** You were forced to join #oyun
[00:56] *** Notice -- Duygu used SAJOIN to make umut join #oyun

Heartbroken · 31 Ağustos 2015, 00:59

Şu Kullandığınız Bottaki
Kodu Bir Postalayıverin.

alphae · 31 Ağustos 2015, 01:00

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

Şu Kullandığınız Bottaki
Kodu Bir Postalayıverin.

altaki kod calisiyor ama sadece oyunu goruyor diger odayi gormuyor
.gir yarisma diyorum girmiyor .gir oyun diyince giriyor..

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


set komut ".gir"

 
set cici "oyun kelime test sohbet yarisma"

 
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

         }

    }

}

Heartbroken · 31 Ağustos 2015, 01:04

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

 set komut ".gir"

set cici [list oyun kelime test sohbet yarisma]

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
        }
         if {[lsearch -nocase $::cici $hedef] eq -1} {
              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
        }
        
       
         if {[lsearch -nocase $::cici $hedef] eq -1} {
              putserv "PRIVMSG $n :$knl Kanalı yasaklı listemde. Red edildi."
              return
         } else {
         # .gir Komutunu kullananı sajoinler.
             putquick "SAJOIN $n #$hedef"
         # Botu O kanala sokar.
         # channel add #$hedef
         }
}

deneyin Şimdi.

alphae · 31 Ağustos 2015, 01:09

hata veriyor

[01:07:45] missing close-brace
while executing
"proc girmsg {n u h a} {
set knl [lindex [split $a] 0]
if {![string length $knl]} {
putserv "PRIVMSG $n :Hatalı Kullan..."
(file "scripts/a.tcl" line 31)
invoked from within
"source scripts/a.tcl"
(file "duygu.conf" line 128)
[01:07:45] * CONFIG FILE NOT LOADED (NOT FOUND, OR ERROR)

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.