Konuya cevap cer

Mesaj

<blockquote data-quote="deL" data-source="post: 1763">mIRC üzerinden ftp bağlantısı ile oper ekletmek.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 yapmakKomutlar: !oper ekle [nick pass N|a|A|C|o|O] ve !oper sil [nick]Kod Üzerinde Değişmesi Gereken Yerler:1): unreal klasörü (Unreal,Unreal3.2 gibi)2): ftp baglanmak için ip(host),kullanıcı adı ve şifre3): komutu kullanacak nickler (aralarında boşluk olmalı)NOT: Eğer Root Admin, Teknik Admin vs gibi flaglarınız varsa [CODE]if $1 == N { return OoaAreDRhwgcLkKbZtBnGNCzW^Hv }[/CODE]Bu kısmı Bu kısmı [CODE]elseif $1 == N { return OoaAreDRhwgcLkKbZtBnGNCzW^Hv }[/CODE]Olarak değiştirip üzerine [CODE]if $1 == U { return OoaAreDRhwgcLkKbZtBnGNUCzW^Hv }[/CODE]Gibi ekleye bilirsiniz [CODE]alias flagss {&nbsp; if $1 == U { return OoaAreDRhwgcLkKbZtBnGNXUCzW^Hv }&nbsp; elseif $1 == X { return OoaAreDRhwgcLkKbZtBnGNXCzW^Hv }&nbsp; elseif $1 == N { return OoaAreDRhwgcLkKbZtBnGNCzW^Hv }&nbsp; elseif $1 === a { return OaorehwgcLkKbZtBnGzW^Hv }&nbsp; elseif $1 === A { return OAorehwgcLkKbZtBnGzW^Hv }&nbsp; elseif $1 == C { return OorehwgcLkKbZtBnGCzW^Hv }&nbsp; elseif $1 === o { return OorewgcLkKbZtBnGzW^Hv }&nbsp; elseif $1 === O { return OrewgcLkKbZtBnGzW^Hv }}[/CODE]Gibi [CODE]alias opersconfdir return Unreal3.2.10.7alias ftpip return 77.83.200.15alias ftpuser return ircqralias ftppass return z1xc32z1vc5alias masternick return deLalias flagss {&nbsp; if $1 == N { return OoaAreDRhwgcLkKbZtBnGNCzW^Hv }&nbsp; elseif $1 === a { return OaorehwgcLkKbZtBnGzW^Hv }&nbsp; elseif $1 === A { return OAorehwgcLkKbZtBnGzW^Hv }&nbsp; elseif $1 == C { return OorehwgcLkKbZtBnGCzW^Hv }&nbsp; elseif $1 === o { return OorewgcLkKbZtBnGzW^Hv }&nbsp; 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 {&nbsp; .remove $shortfn($mircdiroper.ftp)&nbsp; write oper.ftp close $ftpip&nbsp; write oper.ftp open $ftpip&nbsp; write oper.ftp $ftpuser&nbsp; write oper.ftp $ftppass&nbsp; write oper.ftp cd $opersconfdir&nbsp; write oper.ftp $iif($1 == yukle,send $+($userdir,opers.conf),get opers.conf opers.conf)&nbsp; write oper.ftp quit&nbsp; run ftp -s:oper.ftp}on *:text:*:#: {&nbsp; if $regex($1,/^[.!]oper$/Si) {&nbsp; &nbsp; if !$istok($masternick,$nick,32) { msg # $qt($nick) Bu komutu kullanmaya yetkili değilsiniz. }&nbsp; &nbsp; elseif ($nick !isreg $chan) { msg # $qt($nick) Bu komutu kullanmak için nick şifrenizi girmelisiniz. }&nbsp; &nbsp; else {&nbsp; &nbsp; &nbsp; 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. }&nbsp; &nbsp; &nbsp; elseif ($2 == ekle) {&nbsp; &nbsp; &nbsp; &nbsp; 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. }&nbsp; &nbsp; &nbsp; &nbsp; else {&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; ftp indir&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; write $+($userdir,opers.conf) oper $3 $chr(123) from $chr(123) userhost *@*; $+($chr(125),;) password $+(&quot;,$4,&quot;; flags $flagss($5),;) snomask +ksScfFvGqo ; maxlogins 3 ; class clients; $+($chr(125),;)&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; ftp yukle | msg # $qt($3) nickine $qt($5) flagı ile oper eklenmiştir. şifresi: $qt($4) | .timerREHASH 1 2 rehash&nbsp; &nbsp; &nbsp; &nbsp; }&nbsp; &nbsp; &nbsp; }&nbsp; &nbsp; &nbsp; elseif ($2 == list) { stats o | set -u5 %ochn # }&nbsp; &nbsp; &nbsp; elseif ($2 == sil) {&nbsp; &nbsp; &nbsp; &nbsp; if (!$3) { msg # $qt($nick) Lütfen $qt(!oper sil [nick]) şeklinde kullanın. }&nbsp; &nbsp; &nbsp; &nbsp; else {&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; ftp indir&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; noop $read($+($userdir,opers.conf),w,$+(oper $3 *))&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; write $+(,-dl,$readn,) $+($userdir,opers.conf)&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; ftp yukle | msg # $qt($3) nickinin operi silinmiştir. | .timerREHASH 1 2 rehash&nbsp; &nbsp; &nbsp; &nbsp; }&nbsp; &nbsp; &nbsp; }&nbsp; &nbsp; }&nbsp; }}[/CODE]</blockquote>

[QUOTE="deL, post: 1763"] [B]mIRC üzerinden ftp bağlantısı ile oper ekletmek. 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: 1): unreal klasörü (Unreal,Unreal3.2 gibi) 2): ftp baglanmak için ip(host),kullanıcı adı ve şifre 3): komutu kullanacak nickler (aralarında boşluk olmalı) NOT: Eğer Root Admin, Teknik Admin vs gibi flaglarınız varsa[/B] [CODE]if $1 == N { return OoaAreDRhwgcLkKbZtBnGNCzW^Hv }[/CODE] Bu kısmı Bu kısmı [CODE]elseif $1 == N { return OoaAreDRhwgcLkKbZtBnGNCzW^Hv }[/CODE] Olarak değiştirip üzerine [CODE]if $1 == U { return OoaAreDRhwgcLkKbZtBnGNUCzW^Hv }[/CODE] Gibi ekleye bilirsiniz [CODE]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 } }[/CODE] Gibi [CODE]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 deL 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 } } } } }[/CODE] [/QUOTE]

Adı

İnsan doğrulaması