mIRC Scripting

mIRC Scripting (https://www.mircscripting.net/)
-   ConferenceRoom (https://www.mircscripting.net/conferenceroom/)
-   -   CR de Chanserv Kanal List Komutu ve Kodu (https://www.mircscripting.net/conferenceroom/832-cr-de-chanserv-kanal-list-komutu-ve-kodu.html)

Goemon 27 Temmuz 2015 21:36
CR de Chanserv Kanal List Komutu ve Kodu
 
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:
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:
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:
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:
[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.

Goemon 29 Ağustos 2015 09:07
CR de Chanserv Kanal List Komutu ve Kodu
 
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:
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:
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:
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

Goemon 29 Ağustos 2015 09:33
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:
F4 /enable #kanallist | cs list * | .timer 1 3 /disable #kanallist
Kod:
CF4 /enable #kanallist | cs list * | .timer 1 3 /disable #kanallist
Kod:
SF4 /enable #kanallist | cs list * | .timer 1 3 /disable #kanallist
REMOTE ye Ekleyin Bu Kodu.

Kod:
#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

Goemon 29 Ağustos 2015 09:45
CR de Chanserv Kanal List Komutu ve Kodu
 
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. :)

Kullanma Komutu: /kanallist

Code 5 SONUÇ: ECHO Sadece Siz Görürsünüz.
Kod:
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:
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:
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


++ mIRCScripting.net hakkında kısaca:

mS; "Gayri resmi mIRC" kullanıcı ve tasarımcı topluluğudur.
2009 yılında kurulan mS; tasarımcı ve geliştiricileri bir araya getiren etkileşim ve iletişim sağlayan bir platformdur.
mS; tasarım, programlama, geliştirme, düzenleme vb. pek çok konu etrafında bir araya gelmiş "mIRC" meraklısı bir çok insan tarafından yaratılan içeriğiyle; kullanıcı dostu, özgün elit, nitelikli kişi ve konularla hizmet sunan mIRC Scripting platformudur.

Özgün içerikten onay almaksızın içeriği yaratan kullanıcılarımız tamamen yada kısmen sorumludur, aynı zamanda söz konusu içerik mS yetkilileri izni olmaksızın, kaynak gösterilse dahi(!) kopyalanamaz ve/ya paylaşılamaz.   Site/içerik hakkında görüş, öneri ve şikayetleriniz için sikayet[at]mircscripting[dot]net e-posta ve ya İletişim adresinden bizlere ulaştırabilirsiniz.



mIRC mIRC Orjinal mIRC İndir mIRC Download mIRC Tutorials mIRC Socket mIRC Commands mIRC Komutlar mIRC Yükle mIRC Dersler mIRC Hazır Kodlar mIRC Classentifier mIRC DLL mIRC Dialog mIRC IRC mIRC FTP mIRC Telnet mIRC Help
mIRC Yardım mIRC Iconlar mIRC Com Object mIRC Binary Files mIRC Picture Windows mIRC Unicode mIRC Forum mIRC Hazır Kodlar mIRC Kod mIRC Script mIRC File Handling mIRC Scripting Language mIRC Scripting Dili mIRC Scripting Info
mIRC Scripting Tutorials



User Alert System provided by Advanced User Tagging v3.1.3 (Lite) - vBulletin Mods & Addons Copyright © 2026 DragonByte Technologies Ltd. Runs best on HiVelocity Hosting.

1 2 13 14 16 17 18 19 21 22 23 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 49 50 51 52 54 55 56 57 58 59 60 61 62 63 67 68 69 70 71 72 73 74 75 76

SEO by vBSEO 3.6.1