Merhaba Arkadaşlar
ConferenceRoom sunucularındaki
Kayıtlı Kanallar Hakkında Bilgi Almaya Yarıyan Kısa Kodlar.
Kendi Scriptinize Ekliyerek ECHO'latarak Kullana Bilirsiniz ve Çıkan Sonuçları Sadece Siz Görürsünüz. Kod: Kodu kopyalamak için üzerine çift tıklayın!
menu status,channel,query {
Kayıtlı Kanalları Listele:enable #kanallist | cs list * | timer 1 1 disable #kanallist
}
#kanallist off
on *:notice:*:*:{
if ($nick == Chanserv) {
if (*Listing all channels matching* iswm $1-) { echo -a 4Kayıtlı Kanal Listesi SıralanıyoR. }
elseif (*-* iswm $1-) { echo -a 4Kanal Adı:1 $2 1- 4Kanal Sahibi:10 $gettok($gettok($3,1,40),1,41) }
elseif (*Listing complete; * channels(s) matching * found.* iswm $1-) { echo -a 2Sistemde 1 $3 2Tane Kayıtlı Kanal Var. }
}
}
#kanallist end
Sonuç: Kod: Kodu kopyalamak için üzerine çift tıklayın!
4Kayıtlı Kanal Listesi SıralanıyoR.
4Kanal Adı:1 #bilgi 1- 4Kanal Sahibi:10 Poyraz
4Kanal Adı:1 #deneme 1- 4Kanal Sahibi:10 Goemon
4Kanal Adı:1 #Root 1- 4Kanal Sahibi:10 Poyraz
4Kanal Adı:1 #yönetim 1- 4Kanal Sahibi:10 Goemon
4Kanal Adı:1 #opers 1- 4Kanal Sahibi:10 Goemon
4Kanal Adı:1 #kontrol 1- 4Kanal Sahibi:10 Poyraz
4Kanal Adı:1 #buLmaca 1- 4Kanal Sahibi:10 Poyraz
4Kanal Adı:1 #dj 1- 4Kanal Sahibi:10 Goemon
4Kanal Adı:1 #radyo 1- 4Kanal Sahibi:10 Poyraz
4Kanal Adı:1 #test 1- 4Kanal Sahibi:10 Poyraz
4Kanal Adı:1 #Oyun 1- 4Kanal Sahibi:10 Poyraz
4Kanal Adı:1 #yarisma 1- 4Kanal Sahibi:10 Poyraz
4Kanal Adı:1 #hasret 1- 4Kanal Sahibi:10 Poyraz
4Kanal Adı:1 #operhelp 1- 4Kanal Sahibi:10 VoLTRaN
4Kanal Adı:1 #keLime 1- 4Kanal Sahibi:10 Poyraz
Arkadaşlar Kayıtlı Kanalları Bulunduğunuz Kanaldakilere Yansıta Bilirsiniz.Kendi Scriptinize Ekliyerek Kullana Bilirsiniz. Kod: Kodu kopyalamak için üzerine çift tıklayın!
menu status,channel,query {
Kayıtlı Kanalları Listele:enable #kanallist | cs list * | timer 1 1 disable #kanallist
}
#kanallist off
on *:notice:*:*:{
if ($nick == Chanserv) {
if (*Listing all channels matching* iswm $1-) { msg $active 4Kayıtlı Kanal Listesi SıralanıyoR. }
elseif (*-* iswm $1-) { msg $active 4Kanal Adı:1 $2 1- 4Kanal Sahibi:10 $gettok($gettok($3,1,40),1,41) }
elseif (*Listing complete; * channels(s) matching * found.* iswm $1-) { msg $active 2Sistemde 1 $3 2Tane Kayıtlı Kanal Var. }
}
}
#kanallist end
Çıkan SONUÇ: Kod: Kodu kopyalamak için üzerine çift tıklayın!
[09:51] <01Goemon> 4Kayıtlı Kanal Listesi SıralanıyoR.
[09:51] <01Goemon> 4Kanal Adı:1 #bilgi 1- 4Kanal Sahibi:10 Poyraz
[09:51] <01Goemon> 4Kanal Adı:1 #Root 1- 4Kanal Sahibi:10 Poyraz
[09:51] <01Goemon> 4Kanal Adı:1 #deneme 1- 4Kanal Sahibi:10 Goemon
[09:51] <01Goemon> 4Kanal Adı:1 #opers 1- 4Kanal Sahibi:10 Goemon
[09:51] <01Goemon> 4Kanal Adı:1 #yönetim 1- 4Kanal Sahibi:10 Goemon
[09:51] <01Goemon> 4Kanal Adı:1 #kontrol 1- 4Kanal Sahibi:10 Goemon
[09:51] <01Goemon> 4Kanal Adı:1 #buLmaca 1- 4Kanal Sahibi:10 Poyraz
[09:51] <01Goemon> 4Kanal Adı:1 #dj 1- 4Kanal Sahibi:10 Goemon
[09:51] <01Goemon> 4Kanal Adı:1 #radyo 1- 4Kanal Sahibi:10 Poyraz
[09:51] <01Goemon> 4Kanal Adı:1 #Oyun 1- 4Kanal Sahibi:10 Poyraz
[09:51] <01Goemon> 4Kanal Adı:1 #test 1- 4Kanal Sahibi:10 Poyraz
[09:51] <01Goemon> 4Kanal Adı:1 #operhelp 1- 4Kanal Sahibi:10 VoLTRaN
[09:51] <01Goemon> 4Kanal Adı:1 #hasret 1- 4Kanal Sahibi:10 Poyraz
[09:51] <01Goemon> 4Kanal Adı:1 #yarisma 1- 4Kanal Sahibi:10 Poyraz
[09:51] <01Goemon> 4Kanal Adı:1 #keLime 1- 4Kanal Sahibi:10 Poyraz
[09:51] <01Goemon> 2Sistemde 1 15 2Tane Kayıtlı Kanal Var.
Sevgili Arkadaşlar KIRMIZI Renkte Yazan #Opers Kanallarını Kendinize Göre Düzenliyebilirsiniz. Code Bir TEXT Eventi Botunuza Ekliyerek Kullana Bilirsiniz.
Kullanma Komutu: !kanallist Gibi Code 1 Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#opers: {
if $regex($1,/^(!|.)kanallist/i) {
if (*@* $+ $token($server,2-,$asc(.)) $+ * !iswm $address($nick,2)) { msg $chan 4HATA 2Komutu Kullanma Yetkiniz Yok! | halt }
elseif ($2) { msg $chan 4HATA 2Eksik Komut Kullandınız! Doğru Kullanımı: 1!kanallist | halt }
enable #kanallist
cs list *
timer 1 3 /disable #kanallist
}
}
#kanallist off
on *:notice:*:*:{
if ($nick == Chanserv) {
if (*Listing all channels matching* iswm $1-) { msg #opers 4Kayıtlı Kanal Listesi SıralanıyoR. }
elseif (*-* iswm $1-) { msg #opers 4Kanal Adı:1 $2 1- 4Kanal Sahibi:10 $gettok($gettok($3,1,40),1,41) }
elseif (*Listing complete; * channels(s) matching * found.* iswm $1-) { msg #opers 2Sistemde 1 $3 2Tane Kayıtlı Kanal Var. }
}
}
#kanallist end
Code İki İNPUT Eventiyle Alakalı Kendi Scriptinize Ekliyerek Kendiniz de Kullana Bilirsiniz.
Kullanma Komutu: !kanallist Gibi Code 2 Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:input:#opers: {
if $regex($1,/^(!|.)kanallist/i) {
if (*@* $+ $token($server,2-,$asc(.)) $+ * !iswm $address($nick,2)) { msg $chan 4HATA 2Komutu Kullanma Yetkiniz Yok! | halt }
elseif ($2) { msg $chan 4HATA 2Eksik Komut Kullandınız! Doğru Kullanımı: 1!kanallist | halt }
enable #kanallist
cs list *
timer 1 3 /disable #kanallist
}
}
#kanallist off
on *:notice:*:*:{
if ($nick == Chanserv) {
if (*Listing all channels matching* iswm $1-) { msg #opers 4Kayıtlı Kanal Listesi SıralanıyoR. }
elseif (*-* iswm $1-) { msg #opers 4Kanal Adı:1 $2 1- 4Kanal Sahibi:10 $gettok($gettok($3,1,40),1,41) }
elseif (*Listing complete; * channels(s) matching * found.* iswm $1-) { msg #opers 2Sistemde 1 $3 2Tane Kayıtlı Kanal Var. }
}
}
#kanallist end
Code Üç İNPUT Eventiyle Alakalı Kendi Scriptinize Ekliyerek Sonuçları
ECHO'latarak Kendiniz de Kullana Bilirsiniz.
Kullanma Komutu: !kanallist Gibi Code 3 Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:input:#opers: {
if $regex($1,/^(!|.)kanallist/i) {
if (*@* $+ $token($server,2-,$asc(.)) $+ * !iswm $address($nick,2)) { msg $chan 4HATA 2Komutu Kullanma Yetkiniz Yok! | halt }
elseif ($2) { msg $chan 4HATA 2Eksik Komut Kullandınız! Doğru Kullanımı: 1!kanallist | halt }
enable #kanallist
cs list *
timer 1 3 /disable #kanallist
}
}
#kanallist off
on *:notice:*:*:{
if ($nick == Chanserv) {
if (*Listing all channels matching* iswm $1-) { echo -a 4Kayıtlı Kanal Listesi SıralanıyoR. }
elseif (*-* iswm $1-) { echo -a 4Kanal Adı:1 $2 1- 4Kanal Sahibi:10 $gettok($gettok($3,1,40),1,41) }
elseif (*Listing complete; * channels(s) matching * found.* iswm $1-) { echo -a 2Sistemde 1 $3 2Tane Kayıtlı Kanal Var. }
}
}
#kanallist end
Code Dört Ef Tuşlarıyla Alakalı
Code Dördü
mIRC Scriptinizde ALT + R Tuşlarına Basarak Açtığınızda
Aliases Kısmına Ekliyeceksiniz.
Code Dördün
Snoticeli Olan Kodunuda Remoteye Ekliyeceksiniz.
Kullanma Komutu: F4 Tuşuna Basarak Sizden Yapılmasını İstenilenleri Yazınız. Yada Kullanma Komutu: CTRL + F4 Tuşlarına Basarakda Sizden Yapılmasını İstenilenleri Yazınız. Ve Yahutda Kullanma Komutu: Shift + F4 Tuşlarına Basarakda Sizden İstenilenleri Yazınız. Code 4 Aliases Kısmına Ekleyin Kod: Kodu kopyalamak için üzerine çift tıklayın!
F4 /enable #kanallist | cs list * | .timer 1 3 /disable #kanallist
Kod: Kodu kopyalamak için üzerine çift tıklayın!
CF4 /enable #kanallist | cs list * | .timer 1 3 /disable #kanallist
Kod: Kodu kopyalamak için üzerine çift tıklayın!
SF4 /enable #kanallist | cs list * | .timer 1 3 /disable #kanallist
REMOTE ye Ekleyin Bu Kodu. Kod: Kodu kopyalamak için üzerine çift tıklayın!
#kanallist off
on *:notice:*:*:{
if ($nick == Chanserv) {
if (*Listing all channels matching* iswm $1-) { echo -a 4Kayıtlı Kanal Listesi SıralanıyoR. }
elseif (*-* iswm $1-) { echo -a 4Kanal Adı:1 $2 1- 4Kanal Sahibi:10 $gettok($gettok($3,1,40),1,41) }
elseif (*Listing complete; * channels(s) matching * found.* iswm $1-) { echo -a 2Sistemde 1 $3 2Tane Kayıtlı Kanal Var. }
}
}
#kanallist end
Code 5 ALİAS la Alakalı Kendi Scriptinize Ekliyerek Kullana Bilirsiniz.
İster
ECHO Olarak Siz Görün.İsterseniz Kanala Yansıtın.İstediğiniz Şekilde Kullana Bilirsiniz.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. Kullanma Komutu: /kanallist Code 5 SONUÇ: ECHO Sadece Siz Görürsünüz. Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias kanallist {
if $1 { echo -a 4HATA 2Eksik Komut Kullandınız! Doğru Kullanımı: 1/kanallist | halt }
enable #kanallist
cs list *
timer 1 3 /disable #kanallist
}
#kanallist off
on *:notice:*:*:{
if ($nick == Chanserv) {
if (*Listing all channels matching* iswm $1-) { echo -a 4Kayıtlı Kanal Listesi SıralanıyoR. }
elseif (*-* iswm $1-) { echo -a 4Kanal Adı:1 $2 1- 4Kanal Sahibi:10 $gettok($gettok($3,1,40),1,41) }
elseif (*Listing complete; * channels(s) matching * found.* iswm $1-) { echo -a 2Sistemde 1 $3 2Tane Kayıtlı Kanal Var. }
}
}
#kanallist end
Code 5 SONUÇ: CHANNEL Kanala Yansıtılır Kullanma Komutu: /kanallist Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias kanallist {
if $1 { echo -a 4HATA 2Eksik Komut Kullandınız! Doğru Kullanımı: 1/kanallist | halt }
enable #kanallist
cs list *
timer 1 3 /disable #kanallist
}
#kanallist off
on *:notice:*:*:{
if ($nick == Chanserv) {
if (*Listing all channels matching* iswm $1-) { msg $active 4Kayıtlı Kanal Listesi SıralanıyoR. }
elseif (*-* iswm $1-) { msg $active 4Kanal Adı:1 $2 1- 4Kanal Sahibi:10 $gettok($gettok($3,1,40),1,41) }
elseif (*Listing complete; * channels(s) matching * found.* iswm $1-) { msg $active 2Sistemde 1 $3 2Tane Kayıtlı Kanal Var. }
}
}
#kanallist end
Not: $active yazan yer o anki bulunduğunuz kanalı temsil ederek sonuçu o kanala yansıtır.lakin sabit kanal belirlemek isterseniz
$active yazan yeri silerek
#opers gibi yazarak da sonuç ala bilirsiniz.
ÖRNEK: Belirlediğimiz #opers Kanalına Sonuçları Yansıtacaz. Kullanma Komutu: /kanallist Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias kanallist {
if $1 { echo -a 4HATA 2Eksik Komut Kullandınız! Doğru Kullanımı: 1/kanallist | halt }
enable #kanallist
cs list *
timer 1 3 /disable #kanallist
}
#kanallist off
on *:notice:*:*:{
if ($nick == Chanserv) {
if (*Listing all channels matching* iswm $1-) { msg #opers 4Kayıtlı Kanal Listesi SıralanıyoR. }
elseif (*-* iswm $1-) { msg #opers 4Kanal Adı:1 $2 1- 4Kanal Sahibi:10 $gettok($gettok($3,1,40),1,41) }
elseif (*Listing complete; * channels(s) matching * found.* iswm $1-) { msg #opers 2Sistemde 1 $3 2Tane Kayıtlı Kanal Var. }
}
}
#kanallist end
27 Temmuz 2015, 21:37
Benzer Konular 
Normal
