mIRC Scripting  


Geri dön   mIRC Scripting > IRCd Sistemleri > ConferenceRoom

ConferenceRoom Conferenceroom hakkında yenilikler, korumalar, sistem sorunları, bilinmeyenler ve niceleri...

Cevapla
 
LinkBack Seçenekler
  #1  
Alt 05 Şubat 2014, 23:22
Avatar Yok

mS Puan: 311
mS Derece: Goemon MeraklıGoemon MeraklıGoemon MeraklıGoemon Meraklı
 
Üyelik tarihi: 05 Ekim 2012
Mesajlar: 91
Konular: 70
Eklentiler: 0
Alınan Teşekkür: 5
Yapılan Teşekkür: 28
Arrow ConferenceRoom; Sunucular için Root Admin Services iRCop Oper Helper Ekleme Kodu.

Evet Arkadaşlar bu akşam hiç üşenmedim sizler için bir kod daha yazıp paylaşayım dedim bana regex hakkında yardımcı olduğu için Feragat a Tşk ederim evet bu kod ne işe yarar diyeceksiniz kodun amacı aslında belli conferenceroom sunucularda komutla değilde bota ekleyip rahatlıkla kullanabilceğiniz bir koddur bu kodu kullanabilmeniz için yetkilerinizin tamamen açık olması lazım.

kodun kullanımı:

!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


evet arkadaşlar kodun kullanım şekli böyledir diğer hariçinde farklı yazar iseniz çalışmıyacakdır yada tepki vermiyecekdir kod umarım işinizi görür kod alıntı değildir bu saatde paylaştıysam bilinki alın teri bir tşk kürü çok görmeyin da

not: isterseniz geliştirebilirsiniz hatda kodu ben yazdımda diyebilirsiniz




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 Resim



resim 2


Konu Goemon tarafından (05 Şubat 2014 Saat 23:23 ) değiştirilmiştir.
Alıntı ile Cevapla
Sponsored Links
Cevapla

Etiketler
admin, conferenceroom, ekleme, helper, için, ircop, kodu, oper, root, services, sunucular

Seçenekler

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Açık
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Conferenceroom; Accesliste bakma kodu Goemon ConferenceRoom 0 07 Ocak 2014 12:58
CR Services Bot Oluşturma Ekle Goemon ConferenceRoom 1 06 Ocak 2014 22:39
oper admin ban kick sorunu reu Help - Yardım 0 28 Ağustos 2012 07:51
aop ve oper için ortak kod WeiLSiDe Help - Yardım 3 24 Ağustos 2009 03:05
/ara <veri> (clone,notify,ircop,helper,yetkili,away) vs. L4roXyL Showcase - Hazır kodlar 1 14 Temmuz 2009 01:55


Yasal Uyarı

    5651 sayılı yasada belirtilen "Yer Sağlayıcı" olarak hizmet sunmaktadır. İlgili yasaya göre site yönetiminin tüm içerikleri kontrol etme yükümlülüğü yoktur. Bu sebep ile sitemiz, uyarıları dikkate alarak yasa dışı paylaşımlar hakkında gerekli işlemleri yapmaktadır. Oluşabilecek yasal sorumluluklar üyelerimize aittir. Gerekli şikayet bildirimleri yapabilmek için "burayı" tıklayarak gerekli alanları doldurup yapabilirsiniz.
mIRCScripting © 2015



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