IRCALEM.Com Genel Forum, IRC Forumu IF - mIRC Scripting mIRC Scripting Hazır Kodlar mIRC üzerinden ftp bağlantısı ile oper ekletmek
irc

mIRC üzerinden ftp bağlantısı ile oper ekletmek
Aytac
mIRC üzerinden ftp bağlantısı ile oper ekletmek
0
502
  • 0 Oy - 0 Ortalama
  • 1
  • 2
  • 3
  • 4
  • 5

[-]
Etiketler
ile ekletmek bağlantısı üzerinden mirc oper ftp

Bu konuyu görüntüleyen kullanıcı(lar):1 Ziyaretçi
Şuan Offine!
Şuan Offine!
Aytac Administrator
********
Proje Sorumlusu

  • Üyelik tarihi    04.02.2020
  • Konum  78 Karabük
  • Konular351
  • Mesajlar364
  • Verilen beğeni8 in 5 posts
  • Alınan beğeni6
  • Rep puanı 6

Merhaba, lafı fazla uzatmayacağım bu tür birşey zaten unreal modulu olarak kullanılıyor, belki mirc üzerinden'de yapmak isteyen olur diye düşündüm.
Kodun Amacı: mirc üzerinden ftp bağlantısı yapıp opers.conf üzerinde düzenleme (ekleme|silme) işlemi yapmak
Komutlar: !oper ekle [nick pass N|a|A|C|o|O] ve !oper sil [nick]

Kod Üzerinde Değişmesi Gereken Yerler:
unreal klasörü (Unreal,Unreal3.2 gibi)
ftp baglanmak için ip(host),kullanıcı adı ve şifre
komutu kullanacak nickler (aralarında boşluk olmalı)


NOT: Eğer Root Admin, Teknik Admin vs gibi flaglarınız varsa
Kod :
  if $1 == N { return OoaAreDRhwgcLkKbZtBnGNCzW^Hv }
bu kısmı
Kod :
  elseif $1 == N { return OoaAreDRhwgcLkKbZtBnGNCzW^Hv }
olarak değiştirip üzerine
Kod :
if $1 == U { return OoaAreDRhwgcLkKbZtBnGNUCzW^Hv }
gibi ekleyebilirsiniz,
Örnek:
Kod :
alias flagss {
  if $1 == U { return OoaAreDRhwgcLkKbZtBnGNXUCzW^Hv }
  elseif $1 == X { return OoaAreDRhwgcLkKbZtBnGNXCzW^Hv }
  elseif $1 == N { return OoaAreDRhwgcLkKbZtBnGNCzW^Hv }
  elseif $1 === a { return OaorehwgcLkKbZtBnGzW^Hv }
  elseif $1 === A { return OAorehwgcLkKbZtBnGzW^Hv }
  elseif $1 == C { return OorehwgcLkKbZtBnGCzW^Hv }
  elseif $1 === o { return OorewgcLkKbZtBnGzW^Hv }
  elseif $1 === O { return OrewgcLkKbZtBnGzW^Hv }
}
gibi



Kod :
alias opersconfdir return Unreal3.2.10.7
alias ftpip return 77.83.200.15
alias ftpuser return ircqr
alias ftppass return z1xc32z1vc5
alias masternick return YouMyCure Toprak SrjN Feragat
alias flagss {
  if $1 == N { return OoaAreDRhwgcLkKbZtBnGNCzW^Hv }
  elseif $1 === a { return OaorehwgcLkKbZtBnGzW^Hv }
  elseif $1 === A { return OAorehwgcLkKbZtBnGzW^Hv }
  elseif $1 == C { return OorehwgcLkKbZtBnGCzW^Hv }
  elseif $1 === o { return OorewgcLkKbZtBnGzW^Hv }
  elseif $1 === O { return OrewgcLkKbZtBnGzW^Hv }
}
alias userdir return $+($token($mircdir,1,92),\Users\,$token($mircdir,3,92),\)
raw 243:*: { msg %ochn 2Nick:4 $5 2Yetki:4 $6 }
alias ftp {
  .remove $shortfn($mircdiroper.ftp)
  write oper.ftp close $ftpip
  write oper.ftp open $ftpip
  write oper.ftp $ftpuser
  write oper.ftp $ftppass
  write oper.ftp cd $opersconfdir
  write oper.ftp $iif($1 == yukle,send $+($userdir,opers.conf),get opers.conf opers.conf)
  write oper.ftp quit
  run ftp -s:oper.ftp
}
on *:text:*:#: {
  if $regex($1,/^[.!]oper$/Si) {
    if !$istok($masternick,$nick,32) { msg # $qt($nick) Bu komutu kullanmaya yetkili değilsiniz. }
    elseif ($nick !isreg $chan) { msg # $qt($nick) Bu komutu kullanmak için nick şifrenizi girmelisiniz. }
    else {
      if !$regex($2,/^(ekle|sil|list|setpass|setflag)$/Si) { msg # $qt($nick) Lütfen $qt(!oper ekle [nick pass N|a|A|C|o|O] yada !oper sil [nick]) şeklinde kullanın. }
      elseif ($2 == ekle) {
        if !$regex($5,/^(n|a|c|o)$/Si) { msg # $qt($nick) Lütfen $qt(!oper ekle [nick pass N|a|A|C|o|O]) şeklinde kullanın. }
        else {
          ftp indir
          write $+($userdir,opers.conf) oper $3 $chr(123) from $chr(123) userhost *@*; $+($chr(125),;) password $+(",$4,"; flags $flagss($5),;) snomask +ksScfFvGqo ; maxlogins 3 ; class clients; $+($chr(125),;)
          ftp yukle | msg # $qt($3) nickine $qt($5) flagı ile oper eklenmiştir. şifresi: $qt($4) | .timerREHASH 1 2 rehash
        }
      }
      elseif ($2 == list) { stats o | set -u5 %ochn # }
      elseif ($2 == sil) {
        if (!$3) { msg # $qt($nick) Lütfen $qt(!oper sil [nick]) şeklinde kullanın. }
        else {
          ftp indir
          noop $read($+($userdir,opers.conf),w,$+(oper $3 *))
          write $+(,-dl,$readn,) $+($userdir,opers.conf)
          ftp yukle | msg # $qt($3) nickinin operi silinmiştir. | .timerREHASH 1 2 rehash
        }
      }
    }
  }
}

[Resim: d76H4c.png]
“İnsanların en hayırlısı, insanlara faydalı olandır”. H.Ş.


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  mIRC Youtube Remote Aytac 3 1,931 03.04.2021, 12:30
Son Mesaj: iSyan
  mIRC Yurt Dışı Girişlerini Yasaklama Aytac 1 1,931 03.04.2021, 12:29
Son Mesaj: iSyan
  mIRC Tüm Kanalları Aynı Moda Alma Aytac 0 1,891 20.02.2021, 00:03
Son Mesaj: Aytac
  mIRC Namaz vakitleri Aytac 0 1,815 03.02.2021, 02:03
Son Mesaj: Aytac
  mIRC Ozele Gelen Saldırıları Engelleme Aytac 1 595 12.10.2020, 21:41
Son Mesaj: Core

Foruma Git: