mIRC Scripting - Tekil Mesaj gösterimi

Goemon · #1 23 Ağustos 2015, 10:33

Merhaba SevgiLi mİRCScripting.NET Forum Üyeleri

ConferenceRoom Sunucusunda Serverin Motd Listesini Görmeye Yarıyan Parça Kodlardır.Komutumuz ve CodeLeR Hakkında Siz CR Sevenlerine Açık Bir Şekilde Burda Sizlere Anlatmaya Çalışacam.

Evet Arkadaşlar Birinci Codemiz Text Eventi Yani Botunuza Ekliyerek Kullana Bilirsiniz.Tabiki Codeyi Siz Değil Yöneticiler Kullana Bilcek.
Codeyi Kullana Bilmeniz İçin Bir #Opers Kanalında Bulunmanız Gerekiyor.
İki Yönetici Olmanız Gerekiyor.

Not: KIRMIZI Renkte Belirtdiğim #Opers Kanallarını Kendinize Göre Ayarlıya Bilirsiniz.

Komutu Kullanma Komutu: !motdlist

Code 1

Kod:

on *:text:*:#opers: {
  if $regex($1,/^(!|.)motdlist/i) {
    if *@* $+ $token($server,2-,$asc(.)) $+ * !iswm $address($nick,2) { msg $chan 4HATA 2Komutu Kullanma Yetkiniz Yok! | halt }
    if ($2) { msg $chan 4HATA 2Yanlış Komut Kullandınız. Komutun Doğru Kullanımı: 1!motdlist | halt }
    set -e %bt.chan $chan | set -e %bt.nick $nick | msg $chan  4MotdListesi Sıralanıyor | enable #motdlist | as client z-default list   | .timer 1 1 .disable #motdlist | .timer 1 2  msg $chan 4MotdListesi  Sıralandı :12 %bt.nick 
  }
}
#motdlist off
on *:snotice:*: { 
  if (*client * motd append* iswm $1-) { 
    if $regex($2,/^(append|--)$/i) { halt }
    msg %bt.chan $gettok($6-,1,33)
  }
}
#motdlist end

Evet Arkadaşlar İkinci Codemiz İnput Eventi Yani Codeyi Kendi Scriptimize Ekliyerek Biz Kullana Biliriz.
Codeyi Kullana Bilmeniz İçin Bir #Opers Kanalında Bulunmanız Gerekiyor.
İki Yönetici Olmanız Gerekiyor.
Üç Sizden Başkası Kullanamaz Yani.

Komutu Kullanma Komutu: !motdlist

Code 2

Kod:

on *:input:#opers {
  if $regex($1,/^(!|.)motdlist/i) {
    if *@* $+ $token($server,2-,$asc(.)) $+ * !iswm $address($nick,2) { msg $chan 4HATA 2Komutu Kullanma Yetkiniz Yok! | halt }
    if ($2) { msg $chan 4HATA 2Yanlış Komut Kullandınız. Komutun Doğru Kullanımı: 1!motdlist | halt }
    set -e %bt.chan $chan | set -e %bt.nick $nick | msg $chan  4MotdListesi Sıralanıyor | enable #motdlist | as client z-default list    | .timer 1 1 .disable #motdlist | .timer 1 2  msg $chan 4MotdListesi   Sıralandı :12 %bt.nick 
  }
}
#motdlist off
on *:snotice:*: { 
  if (*client * motd append* iswm $1-) { 
    if $regex($2,/^(append|--)$/i) { halt }
    msg %bt.chan $gettok($6-,1,33)
  }
}
#motdlist end

Evet Arkadaşlar Üçüncü Codemiz Yine İnput Eventi Yani Codeyi Kendi Scriptimize Ekliyerek Biz Kullana Biliriz.
Not: Birinci ve İkinci Codemizde Bilgiler Kanala Yansıtılıyor Üçüncü Codemizde ise Kanal Yerine ECHOLatıyoruz Bilgileri.
Codeyi Kullana Bilmeniz İçin Bir #Opers Kanalında Bulunmanız Gerekiyor.
İki Yönetici Olmanız Gerekiyor.
Üç Sizden Başkası Kullanamaz Yani.

Komutu Kullanma Komutu: !motdlist

Code 3

Kod:

on *:input:#opers {
  if $regex($1,/^(!|.)motdlist/i) {
    if *@* $+ $token($server,2-,$asc(.)) $+ * !iswm $address($nick,2) { echo -a 4HATA 2Komutu Kullanma Yetkiniz Yok! | halt }
    if ($2) { echo -a 4HATA 2Yanlış Komut Kullandınız. Komutun Doğru Kullanımı: 1/motdlist | halt }
    echo -a 4MotdListesi Sıralanıyor | enable #motdlist | as client  z-default list   | .timer 1 1 .disable #motdlist | .timer 1 2  echo -a  4MotdListesi  Sıralandı :12 %bt.nick 
  }
}
#motdlist off
on *:snotice:*: { 
  if (*client * motd append* iswm $1-) { 
    if $regex($2,/^(append|--)$/i) { halt }
    echo -a $gettok($6-,1,33)
  }
}
#motdlist end

Evet Arkadaşlar Dördüncü Codemiz Aliasla Alakalı Yani Codeyi Kendi Scriptimize Ekliyerek Biz Kullana Biliriz.
Codeyi Kullana Bilmeniz İçin Her Hangi Bir Kanal Yada Yer Gerekmiyor Komutu İster Özelde İster Kanalda Yaza Bilirsiniz.
Birincisi Yönetici Olmanız Gerekiyor.
İkincisi Sizden Başkası Kullanamaz Yani.
Üç Sorgulama Yaptığınızda Bilgiler Size ECHO Olarak Yansıtılacaktır.

Komutu Kullanma Komutu: /motdlist

Code 4

Kod:

alias motdlist {
  if ($1) { echo -a 4HATA 2Yanlış Komut Kullandınız. Komutun Doğru Kullanımı: 1/motd | halt }
  echo -a 4MotdListesi Sıralanıyor | enable #motdlist | as client  z-default list   | .timer 1 1 .disable #motdlist | .timer 1 2  echo -a  4MotdListesi  Sıralandı :12 $me 
}
#motdlist off
on *:snotice:*: { 
  if (*client * motd append* iswm $1-) { 
    if $regex($2,/^(append|--)$/i) { halt }
    echo -a $gettok($6-,1,33)
  }
}
#motdlist end

Evet Arkadaşlar Beşinci Codemiz Ef Tuşlarıyla Alakalı Yani Codeyi Kendi Scriptimize Ekliyerek Biz Kullana Biliriz.
Codeyi Kullana Bilmeniz İçin Her Hangi Bir Kanal Yada Yer Gerekmiyor F12 (Ef Oniki Tuşuna Bastığımızda Kod İşlem Yapacaktır Zaten.)
Birincisi Yönetici Olmanız Gerekiyor.
ikincisi Sizden Başkası Kullanamaz Yani.
Üçüncüsü Sorgulama Yaptığınızda Bilgiler Size ECHO Olarak Yansıtılacaktır.

Komutu Kullanma Komutu: F12 Tuşuna Basarak Kullana Bilirsiniz.

Code 5 Aliases Bölümüne Eklencek

Kod:

F12 echo -a 4MotdListesi Sıralanıyor | enable #motdlist | as  client z-default list   | .timer 1 1 .disable #motdlist | .timer 1 2   echo -a 4MotdListesi  Sıralandı :12 $me

Kod:

#motdlist off
on *:snotice:*: { 
  if (*client * motd append* iswm $1-) { 
    if $regex($2,/^(append|--)$/i) { halt }
    echo -a $gettok($6-,1,33)
  }
}
#motdlist end

VeYaaaaaa

Eğer F12 Tuşum Yada F1 den F12 Ye Kadar Aliases de Ekli Çalışmalarınız Var İse Ozaman İkinci İhtimali Devreye Geçirebiliriz Ctrl + F12 Tuşu
Birincisi Yönetici Olmanız Gerekiyor.
ikincisi Ctrl ve F12 Tuşuna Basarak Kodu İşlem Yapcaktır.
Üçüncüsü Sizden Başkası Kullanamaz Yani.
Dördüncüsü Sorgulama Yaptığınızda Bilgiler Size ECHO Olarak Yansıtılacaktır.

Komutu Kullanma Komutu: Ctrl ve F12 Tuşuna Basarak Kullana Bilirsiniz.

Code 6 Aliases Bölümüne Eklencek

Kod:

CF12 echo -a 4MotdListesi Sıralanıyor | enable #motdlist | as  client z-default list   | .timer 1 1 .disable #motdlist | .timer 1 2   echo -a 4MotdListesi  Sıralandı :12 $me

Kod:

#motdlist off
on *:snotice:*: { 
  if (*client * motd append* iswm $1-) { 
    if $regex($2,/^(append|--)$/i) { halt }
    echo -a $gettok($6-,1,33)
  }
}
#motdlist end

Evet Arkadaşlar Yedinci Codemiz Aliasla Alakalı Yani Codeyi Kendi Scriptimize Ekliyerek Biz Kullana Biliriz.
Codeyi Kullana Bilmeniz İçin Her Hangi Bir Kanal Yada Yer Gerekmiyor Komutu İster Özelde İster Kanalda Yaza Bilirsiniz.
Birincisi Yönetici Olmanız Gerekiyor.
İkincisi Sizden Başkası Kullanamaz Yani.
Üç Sorgulama Yaptığınızda Bilgiler Size ECHO Olarak Yansıtılacaktır.

Komutu Kullanma Komutu: /motd

Code 7

Kod:

alias motd {
  if $1 { echo -a 4HATA 2Nick Girmediniz!. Komutun Doğru Kullanımı: 1/motd | halt }
  set -e %bt.nick $me
  echo -a 4MotdListesi Sıralanıyor 
  enable #motdlist 
  as client z-default list  
  .timer 1 1 .disable #motdlist 
  .timer 1 2  echo -a 4MotdListesi Sıralandı :12 %bt.nick 
}

#motdlist off
on *:snotice:*: { 
  if (*client * motd append* iswm $1-) { 
    if $regex($2,/^(append|--)$/i) { halt }
    echo -a 2 $gettok($6-,1,33)
  }
}
#motdlist end

Evet Arkadaşlar Sekizinci Codemiz Aliasla Alakalı Yani Codeyi Kendi Scriptimize Ekliyerek Biz Kullana Biliriz.
Codeyi Kullana Bilmeniz İçin Her Hangi Bir Kanal Yada Yer Gerekmiyor Komutu İster Özelde İster Kanalda Yaza Bilirsiniz.
Birincisi Yönetici Olmanız Gerekiyor.
İkincisi Sizden Başkası Kullanamaz Yani.
Üç Sorgulama Yaptığınızda Bilgiler Size ECHO Olarak Yansıtılacaktır.

Komutu Kullanma Komutu: /motd ident-adı Gibi

Code 8

Kod:

alias motd {
  if ($2) { echo -a 4HATA 2Yanlış Komut Kullandınız. Komutun Doğru Kullanımı: 1/motd | halt }
  echo -a 4MotdListesi Sıralanıyor 
  enable #motdlist 
  as client $1 list  
  .timer 1 1 .disable #motdlist 
  .timer 1 2  echo -a 4MotdListesi Sıralandı :12 $me 
}

#motdlist off
on *:snotice:*: { 
  if (*client * motd append* iswm $1-) { 
    if $regex($2,/^(append|--)$/i) { halt }
    echo -a 2 $gettok($6-,1,33)
  }
  if (*That client class doesn't exist* iswm $1-) {
    echo -a 2Böyle Bir İdent Yok 
  }
}
#motdlist end

Yine Kendi Scripitinize Ekliyerek ve Komutu Yazarak Kullana Bilirsiniz.
Komut: /as client z-default list

Not: Öğrenmek İstediğiniz İdentin Bilgilerine Bu Komutlada Baka Bilirsiniz.

Örnek: /as client mIRC list identi Gibi.

Kod:

on *:snotice:*: { 
  if (*client * motd append* iswm $1-) { 
    if $regex($2,/^(append|--)$/i) { halt }
    echo -a 2 $gettok($6-,1,33)
  }
}