Giris - Cıkıs Kanal Komutları

Sadullah

Active member
Kullanıcı
Katılım
22 Ağu 2019
Mesajlar
80
Tepkime puanı
120
Puanları
33
Konum
istanbul
Cinsiyet
Erkek
Kod:
on *:text:*:#takip:{
  if ($regex($1,/((!)komut)/i)) {
    if !$read(yetkilinick.txt,w,$nick) {
      msg $chan 1" $+ $nick $+ " Üzgünüm, Komutu kullanabilmek icin Yetkili Listesinde ekli olman gerekir4!
    }
    else {
      msg $chan Merhaba $nick  kullanabileceginiz Komutlar siralaniyor..
      msg $chan 4~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~
      msg $chan Yasak Ulke Korumasini acip kapatmak icin  » 4[  !ulkekoruma [ac/kapat]  4 ]
      msg $chan Proxy Users Korumasini acip kapatmak icin  » 4[  !proxyuser [ac/kapat]  4 ]
      msg $chan Proxy TXT Korumasini acip kapatmak icin   » 4[  !proxytxt [ac/kapat]  4 ]
      msg $chan Botnet Nick Korumasini acip kapatmak icin   » 4[  !botnick [ac/kapat]  4 ]
      msg $chan Botnet IDENT Korumasini acip kapatmak icin   » 4[  !botident [ac/kapat]  4 ]
      msg $chan Botnet FULLNAME Korumasini acip kapatmak icin   » 4[  !botfullname [ac/kapat]  4 ]
      msg $chan 4~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~
      msg $chan Üstde bulunan Korumalarin Durumunu görmek icin   » 4[  !durum  4 ]
      msg $chan 4~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~
      msg $chan Tüm Korumlara MUAF NICK eklemek icin » 4[  !muafnick ekle/sil Nick bakmak icinse !muafnick list 4 ]
      msg $chan Tüm Korumlara MUAF IDENT eklemek icin » 4[  !muafident ekle/sil IDENT bakmak icinse !muafident list  4 ]
      msg $chan Tüm Korumlara MUAF IP eklemek icin » 4[  !muafip ekle/sil IP bakmak icinse !muafip list 4 ] 
      msg $chan 4~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~
      msg $chan Yasak Ulke Korumasina Ulke eklemek/silmek icinse » 4[  !yasakulke ekle/sil ULKE ISMI bakmak icinse !yasakulke list  4 ]
      msg $chan Bir iki büyük Blacklist Sitelerinde taratmak icinse » 4[  !tara IP  4 ]
      msg $chan 4~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~
    }
  }
  if ($regex($1,/((!|\.)yasakulke)/i)) {
    if !$read(yetkilinick.txt,w,$nick) {
      msg $chan 1" $+ $nick $+ " Üzgünüm, Komutu kullanabilmek icin Yetkili Listesinde ekli olman gerekir4!
    }
    else {
      if $2 == ekle {
        if !$3 { msg # 1,0 Eksik Komut kullanimi. Kullanim: 4,0!yasakulke ekle ULKE  | return }
        if $read(yasakulke.txt,w,$3-) { msg # 1,0 Belirtilen ÜLKE Listede ekli  | return }
        .write yasakulke.txt $3- | msg # 4,0 $3- 1,0Ülkesi Yasakli Listesine eklenmistir. 
      }
      if $2 == sil {
        if !$3 { msg # 1,0 Lütfen Ülke belirtiniz.  | return }
        if !$read(yasakulke.txt,w,$3-) { msg # 1,0 Belirtilen Ülke Yasakli Listesinde bulunmamaktadir.  | return }
        .write $+(-ds,$3-) yasakulke.txt | msg # 4,0 $3- 1,0 Ülkesi Yasaklilar Listesinden 4SILINMISTIR 1,0.  
      }
      if $2 == list {
        if $lines(yasakulke.txt) == 0 { msg # 1,0 Yasakli Ülke Listesi bos durumda.  | return }
        msg # 4,0 Yasakli Ülkeler Listesi: 
        msg # 
        var %:nick = 1 | while %:nick <= $lines(yasakulke.txt) {
          msg # 4,0 %:nick $+ -)1,0 $read(yasakulke.txt,%:nick) 
          inc %:nick
        }
        msg # 
        msg # 1,0 Yasakli Ülke Listesi Sonu
      }
    }
  }
  if ($regex($1,/((!|\.)ulkekoruma)/i)) {
    if !$read(yetkilinick.txt,w,$nick) {
      msg $chan 1" $+ $nick $+ " Üzgünüm, Komutu kullanabilmek icin Yetkili Listesinde ekli olman gerekir4!
    }
    if ($2 == ac) {
      if (%ulkekoruma == AKTIF) { .msg # 0,2 (BILGI) 1 Ülke Korumasu zaten Aktif durumda suan! }
      else { .msg # 0,2 (BILGI) 1 Ülke Korumasi suan 3AKTIF EDILMISTIR!  | set %ulkekoruma AKTIF }
    }
    if ($2 == Kapat) {
      if (%ulkekoruma == DEAKTIF) { .msg # 0,2 (BILGI) 1 Ülke Korumasu zaten Deaktif durumda suan! }
      else { msg # 0,2 (BILGI) 1 Ülke Korumasi suan 4DEAKTIF EDILMISTIR!  | set %proxy DEAKTIF }
    }
  }

  if ($regex($1,/((!|\.)proxyuser)/i)) {
    if !$read(yetkilinick.txt,w,$nick) {
      msg $chan 1" $+ $nick $+ " Üzgünüm, Komutu kullanabilmek icin Yetkili Listesinde ekli olman gerekir4!
    }
    if ($2 == ac) {
      if (%proxyuser == AKTIF) { .msg # 0,2 (BILGI) 1 Proxy Users Korumasu zaten Aktif durumda suan! }
      else { .msg # 0,2 (BILGI) 1 Proxy Users Korumasi suan 3AKTIF EDILMISTIR!  | set %proxyuser AKTIF }
    }
    if ($2 == Kapat) {
      if (%proxyuser == DEAKTIF) { .msg # 0,2 (BILGI) 1 Proxy Users Korumasu zaten Deaktif durumda suan! }
      else { msg # 0,2 (BILGI) 1 Proxy Users Korumasi suan 4DEAKTIF EDILMISTIR!  | set %proxyuser DEAKTIF }
    }
  }

  if ($regex($1,/((!|\.)proxytxt)/i)) {
    if !$read(yetkilinick.txt,w,$nick) {
      msg $chan 1" $+ $nick $+ " Üzgünüm, Komutu kullanabilmek icin Yetkili Listesinde ekli olman gerekir4!
    }
    if ($2 == ac) {
      if (%proxytxt == AKTIF) { .msg # 0,2 (BILGI) 1 Proxy TXT Korumasu zaten Aktif durumda suan! }
      else { .msg # 0,2 (BILGI) 1 Proxy TXT Korumasi suan 3AKTIF EDILMISTIR!  | set %proxytxt AKTIF }
    }
    if ($2 == Kapat) {
      if (%proxytxt == DEAKTIF) { .msg # 0,2 (BILGI) 1 Proxy TXT Korumasu zaten Deaktif durumda suan! }
      else { msg # 0,2 (BILGI) 1 Proxy TXT Korumasi suan 4DEAKTIF EDILMISTIR!  | set %proxytxt DEAKTIF }
    }
  }

  if ($regex($1,/((!|\.)botnick)/i)) {
    if !$read(yetkilinick.txt,w,$nick) {
      msg $chan 1" $+ $nick $+ " Üzgünüm, Komutu kullanabilmek icin Yetkili Listesinde ekli olman gerekir4!
    }
    if ($2 == ac) {
      if (%botnetnick == AKTIF) { .msg # 0,2 (BILGI) 1 Botnet NICK Korumasu zaten Aktif durumda suan! }
      else { .msg # 0,2 (BILGI) 1 Botnet NICK Korumasi suan 3AKTIF EDILMISTIR!  | set %botnetnick AKTIF }
    }
    if ($2 == Kapat) {
      if (%botnetnick == DEAKTIF) { .msg # 0,2 (BILGI) 1 Botnet NICK Korumasu zaten Deaktif durumda suan! }
      else { msg # 0,2 (BILGI) 1 Botnet NICK Korumasi suan 4DEAKTIF EDILMISTIR!  | set %botnetnick DEAKTIF }
    }
  }

  if ($regex($1,/((!|\.)botident)/i)) {
    if !$read(yetkilinick.txt,w,$nick) {
      msg $chan 1" $+ $nick $+ " Üzgünüm, Komutu kullanabilmek icin Yetkili Listesinde ekli olman gerekir4!
    }
    if ($2 == ac) {
      if (%botnetident == AKTIF) { .msg # 0,2 (BILGI) 1 Botnet IDENT Korumasu zaten Aktif durumda suan! }
      else { .msg # 0,2 (BILGI) 1 Botnet IDENT Korumasi suan 3AKTIF EDILMISTIR!  | set %botnetident AKTIF }
    }
    if ($2 == Kapat) {
      if (%botnetident == DEAKTIF) { .msg # 0,2 (BILGI) 1 Botnet IDENT Korumasu zaten Deaktif durumda suan! }
      else { msg # 0,2 (BILGI) 1 Botnet IDENT Korumasi suan 4DEAKTIF EDILMISTIR!  | set %botnetident DEAKTIF }
    }
  }

  if ($regex($1,/((!|\.)botfullname)/i)) {
    if !$read(yetkilinick.txt,w,$nick) {
      msg $chan 1" $+ $nick $+ " Üzgünüm, Komutu kullanabilmek icin Yetkili Listesinde ekli olman gerekir4!
    }
    if ($2 == ac) {
      if (%botnetfullname == AKTIF) { .msg # 0,2 (BILGI) 1 Botnet FULLNAME Korumasu zaten Aktif durumda suan! }
      else { .msg # 0,2 (BILGI) 1 Botnet FULLNAME Korumasi suan 3AKTIF EDILMISTIR!  | set %botnetfullname AKTIF }
    }
    if ($2 == Kapat) {
      if (%botnetfullname == DEAKTIF) { .msg # 0,2 (BILGI) 1 Botnet FULLNAME Korumasu zaten Deaktif durumda suan! }
      else { msg # 0,2 (BILGI) 1 Botnet FULLNAME Korumasi suan 4DEAKTIF EDILMISTIR!  | set %botnetfullname DEAKTIF }
    }
  }
  if ($1 == !durum) {
    if !$read(yetkilinick.txt,w,$nick) {
      msg $chan 1" $+ $nick $+ " Üzgünüm, Komutu kullanabilmek icin Yetkili Listesinde ekli olman gerekir4!
    }
    else {
      .msg # 4,1 $me 0,1 KORUMA DURUMLARI LISTELENIYOR...
      .msg # 
      .msg # 4,1 [0,1 YASAK ULKE KORUMASI] 4,1 ---->> $iif(%ulkekoruma == AKTIF, 3AKTIF  , 4DEAKTIF  ) 
      .msg # 4,1 [0,1 PROXY USER KORUMASI] 4,1 ---->> $iif(%proxyuser == AKTIF, 3AKTIF  , 4DEAKTIF  ) 
      .msg # 4,1 [0,1 PROXY TXT KORUMASI] 4,1 ---->> $iif(%proxytxt == AKTIF, 3AKTIF  , 4DEAKTIF  ) 
      .msg # 4,1 [0,1 BOTNET NICK KORUMASI] 4,1 ---->> 0,1 $iif(%botnetnick == AKTIF, 3AKTIF  , 4DEAKTIF  )
      .msg # 4,1 [0,1 BOTNET IDENT KORUMASI] 4,1 ---->> $iif(%botnetident == AKTIF, 3AKTIF  , 4DEAKTIF  ) 
      .msg # 4,1 [0,1 BOTNET F-NAME KORUMASI] 4,1 ---->> $iif(%botnetfullname == AKTIF, 3AKTIF  , 4DEAKTIF  ) 
      .msg # 
      .msg # 0,1 DURUM SON 
    }
  }
}
yetkilinick.txt eklidir Giris-Cıkıs Gostermeden inderebilirsiniz.
 
Üst
Alt