ConferenceRoom;Operlere Flag listesi Kodu.

[Goemon]

Merhaba SevgiLi mİRCScripting.NET Forum Üyeleri

Merhaba Arkadaşlar ConferenceRoom Sunucusunda Yetkili Bir Yöneticinin Flagını Öğrenmeye Yarıyan Parça Kod Çalışmasıdır.Komutumuz ve CodeLeR Hakkında Siz CR Sevenlerine Açık Bir Şekilde 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.
Üç Nicki Rakamla veya Renkli Yazıyla Yazarsanız Code Size Hata Yaptınız Diye Hata Uyarısı VerecektiR.

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

Kullanma Komutu: !flaglist Nick Gibi

Code 1

on *:text:*:#opers: {
  if $regex($1,/^(!|.)flaglist/i) { 
    if (*@* $+ $token($server,2-,$asc(.)) $+ * !iswm $address($nick,2)) {  msg $chan 4HATA 2Komutu Kullanma Yetkiniz Yok! | halt }
    if !$2 { msg $chan 4HATA 2Nick Girmediniz!. Komutun Doğru Kullanımı: 1!flaglist <Nick> | halt }
    elseif $3 { msg $chan 4HATA 2Nick Girmediniz!. Komutun Doğru Kullanımı: 1!flaglist <Nick> | halt }
    elseif $regex($2,/^[[:digit:]]/i) { msg $chan 4HATA 2Nickler 4Rakamla 2Başlayamaz. Lütfen Nicki Doğru Giriniz | halt }
    elseif $regex($2,/^[[:cntrl:]]/i) { msg $chan 4HATA  2Renkli veya Şekilli Yazı Tipi ile Bilgi Alamazsınız. Lütfen SadeŞekilde Sorgulayın! | halt }
    /set %oper.nck $2 | enable #operflag | /as oper $2 flag list | .timer 1 1 .disable #operflag
  }
}

#operflag off
on *:snotice:*: { 
  if (*Success -- Operator* iswm $1-) { 
  msg #opers 5Sorgu Başarılı.  | msg #opers  4Yetkili 1IRC4Op:7 %oper.nck 4Flag  List:2 $7  }
  elseif (*Failure -- Operator* iswm $1-) {
    msg #opers 4HATA1 %oper.nck 4Yetkili Değil.
  }
}
#operflag 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.
Üç Nicki Rakamla veya Renkli Yazıyla Yazarsanız Code Size Hata Yaptınız Diye Hata Uyarısı VerecektiR.
Dört Sizden Başkası Kullanamaz Yani.

Kullanma Komutu: !flaglist Nick Gibi

Code 2

on *:input:#opers: {
  if $regex($1,/^(!|.)flaglist/i) { 
    if (*@* $+ $token($server,2-,$asc(.)) $+ * !iswm $address($nick,2)) {  msg $chan 4HATA 2Komutu Kullanma Yetkiniz Yok! | halt }
    if !$2 { msg $chan 4HATA 2Nick Girmediniz!. Komutun Doğru Kullanımı: 1!flaglist <Nick> | halt }
    elseif $3 { msg $chan 4HATA 2Nick Girmediniz!. Komutun Doğru Kullanımı: 1!flaglist <Nick> | halt }
    elseif $regex($2,/^[[:digit:]]/i) { msg $chan 4HATA 2Nickler 4Rakamla 2Başlayamaz. Lütfen Nicki Doğru Giriniz | halt }
    elseif $regex($2,/^[[:cntrl:]]/i) { msg $chan 4HATA  2Renkli veya Şekilli Yazı Tipi ile Bilgi Alamazsınız. Lütfen SadeŞekilde Sorgulayın! | halt }
    /set %oper.nck $2 | enable #operflag | /as oper $2 flag list | .timer 1 1 .disable #operflag
  }
}

#operflag off
on *:snotice:*: { 
  if (*Success -- Operator* iswm $1-) { 
  msg #opers 5Sorgu Başarılı.  | msg #opers  4Yetkili 1IRC4Op:7 %oper.nck 4Flag  List:2 $7  }
  elseif (*Failure -- Operator* iswm $1-) {
    msg #opers 4HATA %oper.nck Yetkili Değil.
  }
}
#operflag 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.
Üç Nicki Rakamla veya Renkli Yazıyla Yazarsanız Code Size Hata Yaptınız Diye Hata Uyarısı VerecektiR.
Dört Sizden Başkası Kullanamaz Yani.

Kullanma Komutu: !flaglist Nick Gibi

Code 3

on *:input:#opers: {
  if $regex($1,/^(!|.)flaglist/i) { 
    if (*@* $+ $token($server,2-,$asc(.)) $+ * !iswm $address($nick,2)) {  echo -a 4HATA 2Komutu Kullanma Yetkiniz Yok! | halt }
    if !$2 { echo -a 4HATA 2Nick Girmediniz!. Komutun Doğru Kullanımı: 1!flaglist <Nick> | halt }
    elseif $3 { echo -a 4HATA 2Nick Girmediniz!. Komutun Doğru Kullanımı: 1!flaglist <Nick> | halt }
    elseif $regex($2,/^[[:digit:]]/i) { echo -a 4HATA 2Nickler 4Rakamla 2Başlayamaz. Lütfen Nicki Doğru Giriniz | halt }
    elseif $regex($2,/^[[:cntrl:]]/i) { echo -a 4HATA  2Renkli veya Şekilli Yazı Tipi ile Bilgi Alamazsınız. Lütfen SadeŞekilde Sorgulayın! | halt }
    /set %oper.nck $2 | enable #operflag | /as oper $2 flag list | .timer 1 1 .disable #operflag
  }
}

#operflag off
on *:snotice:*: { 
  if (*Success -- Operator* iswm $1-) { 
  echo -a 5Sorgu Başarılı.  | echo -a  4Yetkili 1IRC4Op:7 %oper.nck 4Flag  List:2 $7  }
  elseif (*Failure -- Operator* iswm $1-) {
    echo -a 4HATA %oper.nck Yetkili Değil.
  }
}
#operflag 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.
ikincisi Nicki Rakamla veya Renkli Yazıyla Yazarsanız Code Size Hata Yaptınız Diye Hata Uyarısı VerecektiR.
Üçüncüsü Sizden Başkası Kullanamaz Yani.
Dört Sorgulama Yaptığınızda Bilgiler Size ECHO Olarak Yansıtılacaktır.

Kullanma Komutu: /flaglist Nick Gibi

Code 4

alias flaglist {
  if !$1 { echo -a 4HATA 2Nick Girmediniz!. Komutun Doğru Kullanımı: 1/flaglist <Nick> | halt }
  if $2 { echo -a 4HATA 2Nick Girmediniz!. Komutun Doğru Kullanımı: 1/flaglist <Nick> | halt }
  elseif $regex($1,/^[[:digit:]]/i) { echo -a 4HATA 2Nickler 4Rakamla 2Başlayamaz. Lütfen Nicki Doğru Giriniz | halt }
  elseif $regex($1,/^[[:cntrl:]]/i) { echo -a 4HATA  2Renkli veya Şekilli Yazı Tipi ile Bilgi Alamazsınız. Lütfen SadeŞekilde Sorgulayın! | halt }
  set %oper.nck $1 | enable #operflag | /as oper $1 flag list | .timer 1 1 .disable #operflag
}

#operflag off
on *:snotice:*: { 
  if (*Success -- Operator* iswm $1-) { 
  echo -a 5Sorgu Başarılı.  | echo -a 4Yetkili 1IRC4Op:7 %oper.nck 4Flag  List:2 $7  }
  elseif (*Failure -- Operator* iswm $1-) {
    echo -a 4HATA1 %oper.nck 4Yetkili Değil.
  }
}
#operflag 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 F1 (Ef Bir Tuşuna Bastığımızda Kod İşlem Yapacaktır Zaten.)
Birincisi Yönetici Olmanız Gerekiyor.
ikincisi Bilgi Almak İstediğiniz Nicki Maus İle Seçin ve F1 Tuşuna Basın.
Üçüncüsü Sizden Başkası Kullanamaz Yani.
Dört Sorgulama Yaptığınızda Bilgiler Size ECHO Olarak Yansıtılacaktır.

Kullanma Komutu: F1 Tuşuna Basarak Kullana Bilirsiniz.

Code 5 Aliases Bölümüne Eklencek

F1 set %oper.nck $$1 | enable #operflag | /as oper $$1 flag list | .timer 1 1 .disable #operflag

Code 5

#operflag off
on *:snotice:*: { 
  if (*Success -- Operator* iswm $1-) { 
  echo -a 5Sorgu Başarılı.  | echo -a 4Yetkili 1IRC4Op:7 %oper.nck 4Flag  List:2 $7  }
  elseif (*Failure -- Operator* iswm $1-) {
    echo -a 4HATA1 %oper.nck 4Yetkili Değil.
  }
}
#operflag end

VeYaaaaaa

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

Kullanma Komutu: Ctrl ve F1 Tuşuna Aynı Anda Basarak Kullana Bilirsiniz.

Code 5 Aliases Bölümüne Eklencek

CF1 set %oper.nck $$1 | enable #operflag | /as oper $$1 flag list | .timer 1 1 .disable #operflag

Code 5

#operflag off
on *:snotice:*: { 
  if (*Success -- Operator* iswm $1-) { 
  echo -a 5Sorgu Başarılı.  | echo -a 4Yetkili 1IRC4Op:7 %oper.nck 4Flag  List:2 $7  }
  elseif (*Failure -- Operator* iswm $1-) {
    echo -a 4HATA1 %oper.nck 4Yetkili Değil.
  }
}
#operflag end

Arkadaşlar Son Snoticeli Kod Eventimizde Kendi Scriptimize Ekliyerek Yöneticiysek Eğer Komutu Yazarak Bilgi Ala Biliriz.Ve Kod Bize Sonucu Direk ECHO Olarak Gösterecektir.

Kullanma Komutu: /as oper goemon flag list Gibi

Code 6

on *:snotice:*: { 
  if (*Success -- Operator* iswm $1-) { 
  echo -a 5Sorgu Başarılı.  | echo -a 4Yetkili 1IRC4Op:7 $4 4Flag  List:2 $7  }
  elseif (*Failure -- Operator* iswm $1-) {
    echo -a 4HATA1 $4 4Yetkili Değil.
  }
}

Not: 22/01/2015 Tarihinde Tarafımca Güncellenmiştir.

Resimli Bir Örnek