IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   Conference Room (CR) (https://www.ircforumlari.net/conference-room-cr/)
-   -   Root Admin Services Oper Helper Ekle Sil List Kodu (https://www.ircforumlari.net/conference-room-cr/671529-root-admin-services-oper-helper-ekle-sil-list-kodu.html)

Goemon 16 Ocak 2015 09:37

Root Admin Services Oper Helper Ekle Sil List Kodu
 
Sevgili Dostlar Conferenceroom Sunucularda Botunuzda Rahatlıkla Kullanabilceğiniz Kullanışlı Parça Bir Code Daha Kodu Anlatmaya Gerek Yok Resimli Olarakda Örnek Verdim Bakarak Yapcağınızı Ümit Ediyorum.

Code Neye Yarar Root Admin Services İrcop Oper Helper Ekelmeye Silmeye Listelemeye Yarar.

Kodun Kullanım Komut Şekli:

!rootekle niick şifre
!rootsil nick
!rootlist

!adminekle nick şifre
!adminsil nick
!adminlist

!servicesekle nick şifre
!servicessil nick
!serviceslist

!ircopekle nick şifre
!ircopsil nick
!ircoplist

!operekle nick şifre
!opersil nick
!operlist

!helperekle nick şifre
!helpersil nick
!helper list


KIRMIZI Renkte Belirtdiğim #opers Kanalını Kendinize Göre Ayarlıyabilirsiniz.

Code.
Kod:

on *:text:*:#opers:{
  if $regex($1,/^[.!]rootekle$/Si) && !$2 { msg $chan 3[10 $nick 3] 2Nick Girmedin 7Doğru kullanımı 4!rootekle Nick Şifre.. | halt }
  elseif $regex($1,/^[.!]rootekle$/Si) && $2 && !$3 { msg $chan 3[10 $nick 3] 2Şifre girmedin. 7Doğru kullanımı 4!rootekle Nick Şifre.. | halt }
  elseif $regex($1,/^[.!]rootekle\w+$/Si) { msg $chan 2Hatalı Komut kullandınız. Doğru kullanımı: 4!rootekle nick şifre | halt }
  elseif $regex($1,/^[.!]rootekle$/Si) && ($left($2,1) isnum) { msg $chan 4HATA 10Nickler 4Rakamla 2Baslayamaz. 7Nicki Dogru Sekilde Giriniz. | msg $chan 4Doğru Kullanımı: 1!rootekle nick şifre | halt }
  elseif $regex($2,/^[[:cntrl:]]/i) { /msg $chan 4HATA 2Renkli 4veya 2Şekilli 2Yazı Tipi ile Yazamazsınız. Lütfen Sade Şekilde Yazınız! | halt }
  elseif $regex($1,/^[.!]rootekle$/Si) && $2 && $3 && !$4- {
    write root.txt $2
    /as oper $2 add $3 agcsh
    /as oper $2 access add *@*
    msg $chan 4 $2 5Nicki4 $nick 5Tarafından Sunucumuza 4ROOT Admini 5Olarak Eklenmiştir.
    msg $2 4:3[10 $2 3] 4R12ooT 4A12dmin 4O12per 4Pass Şifren:7 $3
    msg $2 10 $token($server,2-,$asc(.)) 5AiLesine 4HoŞ GeLDiN 12RooT Admin 5Görevinizde BaşarıLaR DiLeRiZ.
  }
  if $regex($1,/^[.!]rootsil$/Si) && !$2 { msg $chan 3[10 $nick 3] 2Nick Girmedin 7Doğru kullanımı 4!rootsil Nick | halt }
  elseif $regex($1,/^[.!]rootsil\w+$/Si) { msg $chan 2Hatalı Komut kullandınız. Doğru kullanımı: 4!rootsil nick | halt }
  elseif $regex($1,/^[.!]rootsil$/Si) && ($left($2,1) isnum) { msg $chan 4HATA 10Nickler 4Rakamla 2Baslayamaz. 7Nicki Dogru Sekilde Giriniz. | msg $chan 4Doğru Kullanımı: 1!rootsil nick | halt }
  elseif $regex($2,/^[[:cntrl:]]/i) { /msg $chan 4HATA 2Renkli 4veya 2Şekilli 2Yazı Tipi ile Yazamazsınız. Lütfen Sade Şekilde Yazınız! | halt }
  elseif $regex($1,/^[.!]rootsil$/Si) && $2 && !$3- {
    .write $+(-dl,$readn) root.txt
    /as oper $2 del $3
    /as oper $2 access del *@*
    msg $chan 4:3[10 $2 3] 2Nicki 4Root 2Listesinden silinmişdir.
    msg $2 4:3[10 $2 3] 2Server 4Root 2Listesinden silindiniz.
    msg $2 10 $token($server,2-,$asc(.)) 5AiLesine Yapmış oLduğunuz Hizmetlerden ötürü 12Tşk Ederiz.
  }
  elseif $regex($1,/^[.!]rootlist\w+$/Si) { msg $chan 2Hatalı Komut kullandınız. Doğru kullanımı: 4!rootlist | halt }
  elseif $regex($1,/^[.!]rootlist$/Si) && $2 && !$3 { msg $chan 3[10 $nick 3] 2Hatalı Yazdınız. 7Doğru kullanımı 4!rootlist | halt }
  elseif $regex($1,/^[.!]rootlist$/Si) && ($left($2,1) isnum) { msg $chan 4HATA 10Nickler 4Rakamla 2Baslayamaz. 7Nicki Dogru Sekilde Giriniz. | msg $chan 4Doğru Kullanımı: 1!rootsil | halt }
  elseif $regex($2,/^[[:cntrl:]]/i) { /msg $chan 4HATA 2Renkli 4veya 2Şekilli 2Yazı Tipi ile Yazamazsınız. Lütfen Sade Şekilde Yazınız! | halt }
  elseif $regex($1,/^[.!]rootlist$/Si) && !$2- {
    msg # 2Server Root administrator yönetici listesi, özel pencerenize iletildi 4 $nick $+ .
    msg $nick 5 4Server Root Administrator Yönetici Listesi;
    .play $nick root.txt 0
  }
  if $regex($1,/^[.!]adminekle$/Si) && !$2 { msg $chan 3[10 $nick 3] 2Nick Girmedin 7Doğru kullanımı 4!adminekle Nick Şifre.. | halt }
  elseif $regex($1,/^[.!]adminekle$/Si) && $2 && !$3 { msg $chan 3[10 $nick 3] 2Şifre girmedin. 7Doğru kullanımı 4!adminekle Nick Şifre.. | halt }
  elseif $regex($1,/^[.!]adminekle\w+$/Si) { msg $chan 2Hatalı Komut kullandınız. Doğru kullanımı: 4!adminekle nick şifre | halt }
  elseif $regex($1,/^[.!]adminekle$/Si) && ($left($2,1) isnum) { msg $chan 4HATA 10Nickler 4Rakamla 2Baslayamaz. 7Nicki Dogru Sekilde Giriniz. | msg $chan 4Doğru Kullanımı: 1!adminekle nick şifre | halt }
  elseif $regex($2,/^[[:cntrl:]]/i) { /msg $chan 4HATA 2Renkli 4veya 2Şekilli 2Yazı Tipi ile Yazamazsınız. Lütfen Sade Şekilde Yazınız! | halt }
  elseif $regex($1,/^[.!]adminekle$/Si) && $2 && $3 && !$4- {
    .write admin.txt $2
    /as oper $2 add $3 agsh
    /as oper $2 access add *@*
    msg $chan 4 $2 5Nicki4 $nick 5Tarafından Sunucumuza 4SERVER Admini 5Olarak Eklenmiştir.
    msg $2 4:3[10 $2 3] 4S12erver 4A12dmin 4O12per 4Pass Şifren:7 $3
    msg $2 10 $token($server,2-,$asc(.)) 5AiLesine 4HoŞ GeLDiN 12Server Admin 5Görevinizde BaşarıLaR DiLeRiZ.
  }
  if $regex($1,/^[.!]adminsil$/Si) && !$2 { msg $chan 3[10 $nick 3] 2Nick Girmedin 7Doğru kullanımı 4!adminsil Nick | halt }
  elseif $regex($1,/^[.!]adminsil\w+$/Si) { msg $chan 2Hatalı Komut kullandınız. Doğru kullanımı: 4!adminsil nick | halt }
  elseif $regex($1,/^[.!]adminsil$/Si) && ($left($2,1) isnum) { msg $chan 4HATA 10Nickler 4Rakamla 2Baslayamaz. 7Nicki Dogru Sekilde Giriniz. | msg $chan 4Doğru Kullanımı: 1!adminsil nick | halt }
  elseif $regex($2,/^[[:cntrl:]]/i) { /msg $chan 4HATA 2Renkli 4veya 2Şekilli 2Yazı Tipi ile Yazamazsınız. Lütfen Sade Şekilde Yazınız! | halt }
  elseif $regex($1,/^[.!]adminsil$/Si) && $2 && !$3- {
    .write $+(-dl,$readn) admin.txt $2
    /as oper $2 del $3
    /as oper $2 access add *@*
    /os opercfg $2 add csop  $3
    msg $chan 4:3[10 $2 3] 2Nicki 4Server Admin 2Listesinden silinmişdir.
    msg $2 4:3[10 $2 3] 2Server 4Server Admin 2Listesinden silindiniz.
    msg $2 10 $token($server,2-,$asc(.)) 5AiLesine Yapmış oLduğunuz Hizmetlerden ötürü 12Tşk Ederiz.
  }
  elseif $regex($1,/^[.!]adminlist\w+$/Si) { msg $chan 2Hatalı Komut kullandınız. Doğru kullanımı: 4!adminlist | halt }
  elseif $regex($1,/^[.!]adminlist$/Si) && $2 && !$3 { msg $chan 3[10 $nick 3] 2Hatalı Yazdınız. 7Doğru kullanımı 4!adminlist | halt }
  elseif $regex($1,/^[.!]adminlist$/Si) && ($left($2,1) isnum) { msg $chan 4HATA 10Nickler 4Rakamla 2Baslayamaz. 7Nicki Dogru Sekilde Giriniz. | msg $chan 4Doğru Kullanımı: 1!adminlist | halt }
  elseif $regex($2,/^[[:cntrl:]]/i) { /msg $chan 4HATA 2Renkli 4veya 2Şekilli 2Yazı Tipi ile Yazamazsınız. Lütfen Sade Şekilde Yazınız! | halt }
  elseif $regex($1,/^[.!]adminlist$/Si) && !$2- {
    msg # 2Server Admin yönetici listesi, özel pencerenize iletildi 4 $nick $+ .
    msg $nick 5 4Server Admin Administrator Yönetici Listesi;
    .play $nick admin.txt 0
  }
  if $regex($1,/^[.!]servicesekle$/Si) && !$2 { msg $chan 3[10 $nick 3] 2Nick Girmedin 7Doğru kullanımı 4!servicesekle Nick Şifre.. | halt }
  elseif $regex($1,/^[.!]servicesekle$/Si) && $2 && !$3 { msg $chan 3[10 $nick 3] 2Şifre girmedin. 7Doğru kullanımı 4!servicesekle Nick Şifre.. | halt }
  elseif $regex($1,/^[.!]servicesekle\w+$/Si) { msg $chan 2Hatalı Komut kullandınız. Doğru kullanımı: 4!servicesekle nick şifre | halt }
  elseif $regex($1,/^[.!]servicesekle$/Si) && ($left($2,1) isnum) { msg $chan 4HATA 10Nickler 4Rakamla 2Baslayamaz. 7Nicki Dogru Sekilde Giriniz. | msg $chan 4Doğru Kullanımı: 1!servicesekle nick şifre | halt }
  elseif $regex($2,/^[[:cntrl:]]/i) { /msg $chan 4HATA 2Renkli 4veya 2Şekilli 2Yazı Tipi ile Yazamazsınız. Lütfen Sade Şekilde Yazınız! | halt }
  elseif $regex($1,/^[.!]servicesekle$/Si) && $2 && $3 && !$4- {
    .write services.txt $2
    /as oper $2 add $3 gsh
    /as oper $2 access add *@*
    msg $chan 4 $2 5Nicki4 $nick 5Tarafından Sunucumuza 4Services Admini 5Olarak Eklenmiştir.
    msg $2 4:3[10 $2 3] 4S12ervices 4A12dmin 4O12per 4Pass Şifren:7 $3
    msg $2 10 $token($server,2-,$asc(.)) 5AiLesine 4HoŞ GeLDiN 12Services Admin 5Görevinizde BaşarıLaR DiLeRiZ.
  }
  if $regex($1,/^[.!]servicessil$/Si) && !$2 { msg $chan 3[10 $nick 3] 2Nick Girmedin 7Doğru kullanımı 4!servicessil Nick | halt }
  elseif $regex($1,/^[.!]servicessil\w+$/Si) { msg $chan 2Hatalı Komut kullandınız. Doğru kullanımı: 4!servicessil nick | halt }
  elseif $regex($1,/^[.!]servicessil$/Si) && ($left($2,1) isnum) { msg $chan 4HATA 10Nickler 4Rakamla 2Baslayamaz. 7Nicki Dogru Sekilde Giriniz. | msg $chan 4Doğru Kullanımı: 1!servicessil nick | halt }
  elseif $regex($2,/^[[:cntrl:]]/i) { /msg $chan 4HATA 2Renkli 4veya 2Şekilli 2Yazı Tipi ile Yazamazsınız. Lütfen Sade Şekilde Yazınız! | halt }
  elseif $regex($1,/^[.!]servicessil$/Si) && $2 && !$3- {
    .write $+(-dl,$readn) services.txt $2
    /as oper $2 del $3
    /as oper $2 access add *@*
    msg $chan 4:3[10 $2 3] 2Nicki 4Services Admin 2Listesinden silinmişdir.
    msg $2 4:3[10 $2 3] 2Server 4Services Admin 2Listesinden silindiniz.
    msg $2 10 $token($server,2-,$asc(.)) 5AiLesine Yapmış oLduğunuz Hizmetlerden ötürü 12Tşk Ederiz.
  }
  elseif $regex($1,/^[.!]serviceslist\w+$/Si) { msg $chan 2Hatalı Komut kullandınız. Doğru kullanımı: 4!serviceslist | halt }
  elseif $regex($1,/^[.!]serviceslist$/Si) && $2 && !$3 { msg $chan 3[10 $nick 3] 2Hatalı Yazdınız. 7Doğru kullanımı 4!serviceslist | halt }
  elseif $regex($1,/^[.!]serviceslist$/Si) && ($left($2,1) isnum) { msg $chan 4HATA 10Nickler 4Rakamla 2Baslayamaz. 7Nicki Dogru Sekilde Giriniz. | msg $chan 4Doğru Kullanımı: 1!serviceslist | halt }
  elseif $regex($2,/^[[:cntrl:]]/i) { /msg $chan 4HATA 2Renkli 4veya 2Şekilli 2Yazı Tipi ile Yazamazsınız. Lütfen Sade Şekilde Yazınız! | halt }
  elseif $regex($1,/^[.!]serviceslist$/Si) && !$2- {
    msg # 2Services administrator yönetici listesi, özel pencerenize iletildi 4 $nick $+ .
    msg $nick 54Services Administrator Yönetici Listesi;
    .play $nick services.txt 0
  }
  if $regex($1,/^[.!]ircopekle$/Si) && !$2 { msg $chan 3[10 $nick 3] 2Nick Girmedin 7Doğru kullanımı 4!ircopekle Nick Şifre.. | halt }
  elseif $regex($1,/^[.!]ircopekle$/Si) && $2 && !$3 { msg $chan 3[10 $nick 3] 2Şifre girmedin. 7Doğru kullanımı 4!ircopekle Nick Şifre.. | halt }
  elseif $regex($1,/^[.!]ircopekle\w+$/Si) { msg $chan 2Hatalı Komut kullandınız. Doğru kullanımı: 4!ircopekle nick şifre | halt }
  elseif $regex($1,/^[.!]ircopekle$/Si) && ($left($2,1) isnum) { msg $chan 4HATA 10Nickler 4Rakamla 2Baslayamaz. 7Nicki Dogru Sekilde Giriniz. | msg $chan 4Doğru Kullanımı: 1!ircopekle nick şifre | halt }
  elseif $regex($2,/^[[:cntrl:]]/i) { /msg $chan 4HATA 2Renkli 4veya 2Şekilli 2Yazı Tipi ile Yazamazsınız. Lütfen Sade Şekilde Yazınız! | halt }
  elseif $regex($1,/^[.!]ircopekle$/Si) && $2 && $3 && !$4- {
    .write ircop.txt $2
    /as oper $2 add $3 g
    /as oper $2 access add *@*
    msg $chan 4 $2 5Nicki4 $nick 5Tarafından Sunucumuza 4IRC Operatörü 5Olarak Eklenmiştir.
    msg $2 4:3[10 $2 3] 4IRC 12Operatörü 4O12per 4Pass Şifren:7 $3
    msg $2 10 $token($server,2-,$asc(.)) 5AiLesine 4HoŞ GeLDiN 12IRC Operatörü 5Görevinizde BaşarıLaR DiLeRiZ.
  }
  if $regex($1,/^[.!]ircopsil$/Si) && !$2 { msg $chan 3[10 $nick 3] 2Nick Girmedin 7Doğru kullanımı 4!ircopsil Nick | halt }
  elseif $regex($1,/^[.!]ircopsil\w+$/Si) { msg $chan 2Hatalı Komut kullandınız. Doğru kullanımı: 4!ircopsil nick | halt }
  elseif $regex($1,/^[.!]ircopsil$/Si) && ($left($2,1) isnum) { msg $chan 4HATA 10Nickler 4Rakamla 2Baslayamaz. 7Nicki Dogru Sekilde Giriniz. | msg $chan 4Doğru Kullanımı: 1!ircopsil nick | halt }
  elseif $regex($2,/^[[:cntrl:]]/i) { /msg $chan 4HATA 2Renkli 4veya 2Şekilli 2Yazı Tipi ile Yazamazsınız. Lütfen Sade Şekilde Yazınız! | halt }
  elseif $regex($1,/^[.!]ircopsil$/Si) && $2 && !$3- {
    .write $+(-dl,$readn) ircop.txt $2
    /as oper $2 del $3
    /as oper $2 access add *@*
    msg $chan 4:3[10 $2 3] 2Nicki 4IRC Operatörü2Listesinden silinmişdir.
    msg $2 4:3[10 $2 3] 2Server 4IRC Operatörü 2Listesinden silindiniz.
    msg $2 10 $token($server,2-,$asc(.)) 5AiLesine Yapmış oLduğunuz Hizmetlerden ötürü 12Tşk Ederiz.
  }
  elseif $regex($1,/^[.!]ircoplist\w+$/Si) { msg $chan 2Hatalı Komut kullandınız. Doğru kullanımı: 4!ircoplist | halt }
  elseif $regex($1,/^[.!]ircoplist$/Si) && $2 && !$3 { msg $chan 3[10 $nick 3] 2Hatalı Yazdınız. 7Doğru kullanımı 4!ircoplist | halt }
  elseif $regex($1,/^[.!]ircoplist$/Si) && ($left($2,1) isnum) { msg $chan 4HATA 10Nickler 4Rakamla 2Baslayamaz. 7Nicki Dogru Sekilde Giriniz. | msg $chan 4Doğru Kullanımı: 1!ircoplist | halt }
  elseif $regex($2,/^[[:cntrl:]]/i) { /msg $chan 4HATA 2Renkli 4veya 2Şekilli 2Yazı Tipi ile Yazamazsınız. Lütfen Sade Şekilde Yazınız! | halt }
  elseif $regex($1,/^[.!]ircoplist$/Si) && !$2- {
    msg # 2Services administrator yönetici listesi, özel pencerenize iletildi 4 $nick $+ .
    msg $nick 54Services Administrator Yönetici Listesi;
    .play $nick ircop.txt 0
  }
  if $regex($1,/^[.!]operekle$/Si) && !$2 { msg $chan 3[10 $nick 3] 2Nick Girmedin 7Doğru kullanımı 4!operekle Nick Şifre.. | halt }
  elseif $regex($1,/^[.!]operekle$/Si) && $2 && !$3 { msg $chan 3[10 $nick 3] 2Şifre girmedin. 7Doğru kullanımı 4!operekle Nick Şifre.. | halt }
  elseif $regex($1,/^[.!]operekle\w+$/Si) { msg $chan 2Hatalı Komut kullandınız. Doğru kullanımı: 4!operekle nick şifre | halt }
  elseif $regex($1,/^[.!]operekle$/Si) && ($left($2,1) isnum) { msg $chan 4HATA 10Nickler 4Rakamla 2Baslayamaz. 7Nicki Dogru Sekilde Giriniz. | msg $chan 4Doğru Kullanımı: 1!operekle nick şifre | halt }
  elseif $regex($2,/^[[:cntrl:]]/i) { /msg $chan 4HATA 2Renkli 4veya 2Şekilli 2Yazı Tipi ile Yazamazsınız. Lütfen Sade Şekilde Yazınız! | halt }
  elseif $regex($1,/^[.!]operekle$/Si) && $2 && $3 && !$4- {
    .write oper.txt $2
    /as oper $2 add $3 g
    /as oper $2 access add *@*
    msg $chan 4 $2 5Nicki4 $nick 5Tarafından Sunucumuza 4Oper 5Olarak Eklenmiştir.
    msg $2 4:3[10 $2 3] Oper 4O12per 4Pass Şifren:7 $3
    msg $2 10 $token($server,2-,$asc(.)) 5AiLesine 4HoŞ GeLDiN Oper 5Görevinizde BaşarıLaR DiLeRiZ.
  }
  if $regex($1,/^[.!]opersil$/Si) && !$2 { msg $chan 3[10 $nick 3] 2Nick Girmedin 7Doğru kullanımı 4!opersil Nick | halt }
  elseif $regex($1,/^[.!]opersil\w+$/Si) { msg $chan 2Hatalı Komut kullandınız. Doğru kullanımı: 4!opersil nick | halt }
  elseif $regex($1,/^[.!]opersil$/Si) && ($left($2,1) isnum) { msg $chan 4HATA 10Nickler 4Rakamla 2Baslayamaz. 7Nicki Dogru Sekilde Giriniz. | msg $chan 4Doğru Kullanımı: 1!opersil nick | halt }
  elseif $regex($2,/^[[:cntrl:]]/i) { /msg $chan 4HATA 2Renkli 4veya 2Şekilli 2Yazı Tipi ile Yazamazsınız. Lütfen Sade Şekilde Yazınız! | halt }
  elseif $regex($1,/^[.!]opersil$/Si) && $2 && !$3- {
    .write $+(-dl,$readn) oper.txt $2
    /as oper $2 del $3
    /as oper $2 access add *@*
    msg $chan 4:3[10 $2 3] 2Nicki 4Oper2Listesinden silinmişdir.
    msg $2 4:3[10 $2 3] 2Server 4Oper 2Listesinden silindiniz.
    msg $2 10 $token($server,2-,$asc(.)) 5AiLesine Yapmış oLduğunuz Hizmetlerden ötürü 12Tşk Ederiz.
  }
  elseif $regex($1,/^[.!]operlist\w+$/Si) { msg $chan 2Hatalı Komut kullandınız. Doğru kullanımı: 4!operlist | halt }
  elseif $regex($1,/^[.!]operlist$/Si) && $2 && !$3 { msg $chan 3[10 $nick 3] 2Hatalı Yazdınız. 7Doğru kullanımı 4!operlist | halt }
  elseif $regex($1,/^[.!]operlist$/Si) && ($left($2,1) isnum) { msg $chan 4HATA 10Nickler 4Rakamla 2Baslayamaz. 7Nicki Dogru Sekilde Giriniz. | msg $chan 4Doğru Kullanımı: 1!operlist | halt }
  elseif $regex($2,/^[[:cntrl:]]/i) { /msg $chan 4HATA 2Renkli 4veya 2Şekilli 2Yazı Tipi ile Yazamazsınız. Lütfen Sade Şekilde Yazınız! | halt }
  elseif $regex($1,/^[.!]operlist$/Si) && !$2- {
    msg # 2Server OpeR yönetici listesi, özel pencerenize iletildi 4 $nick $+ .
    msg $nick 5 4Server Root Administrator Yönetici Listesi;
    .play $nick oper.txt 0
  }
  if $regex($1,/^[.!]helperekle$/Si) && !$2 { msg $chan 3[10 $nick 3] 2Nick Girmedin 7Doğru kullanımı 4!helperekle Nick Şifre.. | halt }
  elseif $regex($1,/^[.!]helperekle$/Si) && $2 && !$3 { msg $chan 3[10 $nick 3] 2Şifre girmedin. 7Doğru kullanımı 4!helperekle Nick Şifre.. | halt }
  elseif $regex($1,/^[.!]helperekle\w+$/Si) { msg $chan 2Hatalı Komut kullandınız. Doğru kullanımı: 4!helperekle nick şifre | halt }
  elseif $regex($1,/^[.!]helperekle$/Si) && ($left($2,1) isnum) { msg $chan 4HATA 10Nickler 4Rakamla 2Baslayamaz. 7Nicki Dogru Sekilde Giriniz. | msg $chan 4Doğru Kullanımı: 1!helperekle nick şifre | halt }
  elseif $regex($2,/^[[:cntrl:]]/i) { /msg $chan 4HATA 2Renkli 4veya 2Şekilli 2Yazı Tipi ile Yazamazsınız. Lütfen Sade Şekilde Yazınız! | halt }
  elseif $regex($1,/^[.!]helperekle$/Si) && $2 && $3 && !$4- {
    .write helper.txt $2
    /as oper $2 add $3 h
    /as oper $2 access add *@*
    msg $chan 4 $2 5Nicki4 $nick 5Tarafından Sunucumuza 4HeLpeR 5Olarak Eklenmiştir.
    msg $2 4:3[10 $2 3] HeLper 4O12per 4Pass Şifren:7 $3
    msg $2 10 $token($server,2-,$asc(.)) 5AiLesine 4HoŞ GeLDiN HeLper 5Görevinizde BaşarıLaR DiLeRiZ.
  }
  if $regex($1,/^[.!]helpersil$/Si) && !$2 { msg $chan 3[10 $nick 3] 2Nick Girmedin 7Doğru kullanımı 4!helpersil Nick | halt }
  elseif $regex($1,/^[.!]helpersil\w+$/Si) { msg $chan 2Hatalı Komut kullandınız. Doğru kullanımı: 4!helpersil nick | halt }
  elseif $regex($1,/^[.!]helpersil$/Si) && ($left($2,1) isnum) { msg $chan 4HATA 10Nickler 4Rakamla 2Baslayamaz. 7Nicki Dogru Sekilde Giriniz. | msg $chan 4Doğru Kullanımı: 1!helpersil nick | halt }
  elseif $regex($2,/^[[:cntrl:]]/i) { /msg $chan 4HATA 2Renkli 4veya 2Şekilli 2Yazı Tipi ile Yazamazsınız. Lütfen Sade Şekilde Yazınız! | halt }
  elseif $regex($1,/^[.!]helpersil$/Si) && $2 && !$3- {
    .write $+(-dl,$readn) helper.txt $2
    /as oper $2 del $3
    /as oper $2 access add *@*
    msg $chan 4:3[10 $2 3] 2Nicki 4HeLper2Listesinden silinmişdir.
    msg $2 4:3[10 $2 3] 2Server 4HeLper 2Listesinden silindiniz.
    msg $2 10 $token($server,2-,$asc(.)) 5AiLesine Yapmış oLduğunuz Hizmetlerden ötürü 12Tşk Ederiz.
  }
  elseif $regex($1,/^[.!]helperlist\w+$/Si) { msg $chan 2Hatalı Komut kullandınız. Doğru kullanımı: 4!helperlist | halt }
  elseif $regex($1,/^[.!]helperlist$/Si) && $2 && !$3 { msg $chan 3[10 $nick 3] 2Hatalı Yazdınız. 7Doğru kullanımı 4!helperlist | halt }
  elseif $regex($1,/^[.!]helperlist$/Si) && ($left($2,1) isnum) { msg $chan 4HATA 10Nickler 4Rakamla 2Baslayamaz. 7Nicki Dogru Sekilde Giriniz. | msg $chan 4Doğru Kullanımı: 1!helperlist | halt }
  elseif $regex($2,/^[[:cntrl:]]/i) { /msg $chan 4HATA 2Renkli 4veya 2Şekilli 2Yazı Tipi ile Yazamazsınız. Lütfen Sade Şekilde Yazınız! | halt }
  elseif $regex($1,/^[.!]helperlist$/Si) && !$2- {
    msg # 2Server iRC HeLpeR yönetici listesi, özel pencerenize iletildi 4 $nick $+ .
    msg $nick 5 4Server Root Administrator Yönetici Listesi;
    .play $nick helper.txt 0
  }
}


Örnk ResimLeR

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Goemon 22 Kasım 2015 14:32

Cevap: Root Admin Services Oper Helper Ekle Sil List Kodu
 
Güncellendi.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 02:45.

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net