Merhaba Arkadaşlar Bu Codelerde Siz CR Sevenleri İçin Kolayca Oper Şifrenizi Değiştirmeye Yarayan Çalışmadır Tamamen Hangisini Kullanmak İsterseniz Onu Kullanın Derim İster Botunuzda Kullanın İster Kendi Scriptinizde. Not: Bunları Kullana Bilmeniz İçin Yönetici Ekli Olmalısınız ve As Komutlarınızın açık Olması Şart. KIRMIZI Renkte Belirtdiğim
#Opers Kanallarını Kendinize Göre Değişebilirsiniz.
Bu Code Text Eventi İle Yazıldı Yani Botunuza Ekleyip Bir Başkalarının Bu Komutu Kullanmasına Müsade Verebilirsiniz. Kullanma Komutu: !operpass Nick Yenişifre Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias oper_pass return /^(!|.)operpass/i
on $*:text:$($oper_pass):#opers {
if (*@* $+ $token($server,2-,$asc(.)) $+ * !iswm $address($nick,2)) { /msg $chan 4HATA 2Komutu Kullanma Yetkiniz Yok! | halt }
if (!$2) { /msg $chan 4HATA 1Nick Girmediniz!. Komutun Doğru Kullanımı: 4!operpass <Nick Şifre> | halt }
elseif $regex($2,/^[[:digit:]]/i) { /msg $chan 4HATA 1Nickler Rakamla Başlayamaz. Lütfen Nicki Doğru Giriniz | halt }
elseif $regex($2,/^[[:cntrl:]]/i) { /msg $chan 4HATA 1Renkli veya Şekilli Yazı Tipi ile Şifre Değişemezsiniz. Lütfen Sade Şekilde Sorgulayın! | halt }
elseif (!$3) { /msg $chan 4HATA 1Şifre Girmediniz!. Komutun Doğru Kullanımı: 4!operpass <Nick Şifre> | halt }
/set %oper.nck $2 | /set %oper.pss $3 | /enable #operpass | /as oper $2 password $3
}
#operpass off
on *:snotice:*: {
if (*Success -- Password set* iswm $1-) {
/msg #opers 2Oper Şifresi Başarıyla Değiştirildi. | msg #opers 4Yetkili 1IRC4Op:7 %oper.nck 4Yeni Operpassı:2 %oper.pss }
elseif (*Failure -- Operator* iswm $1-) {
/msg #opers 4HATA 2Oper Şifresi Değiştirilemedi. 10 %oper.nck 2Yetkili Değil.
}
/disable #operpass
}
#operpass end
Bu Code
İnput Eventi ile Yazıldı Kendi Scriptinize Ekliyerek Sadece Siz Kullana Bilirsiniz.
Kullanma Komutu: !operpass Nick Yenişifre Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:input:#opers {
if $regex($1,/^(!|.)operpass/i) {
if (*@* $+ $token($server,2-,$asc(.)) $+ * !iswm $address($nick,2)) { /msg $chan 4HATA 2Komutu Kullanma Yetkiniz Yok! | halt }
if (!$2) { /msg $chan 4HATA 1Nick Girmediniz!. Komutun Doğru Kullanımı: 4!operpass <Nick Şifre> | halt }
elseif $regex($2,/^[[:digit:]]/i) { /msg $chan 4HATA 1Nickler Rakamla Başlayamaz. Lütfen Nicki Doğru Giriniz | halt }
elseif $regex($2,/^[[:cntrl:]]/i) { /msg $chan 4HATA 1Renkli veya Şekilli Yazı Tipi ile Şifre Değişemezsiniz. Lütfen Sade Şekilde Sorgulayın! | halt }
elseif (!$3) { /msg $chan 4HATA 1Şifre Girmediniz!. Komutun Doğru Kullanımı: 4!operpass <Nick Şifre> | halt }
/set %oper.nck $2 | /set %oper.pss $3 | /enable #operpass | /as oper $2 password $3
}
}
#operpass off
on *:snotice:*: {
if (*Success -- Password set* iswm $1-) {
/msg #opers 2Oper Şifresi Başarıyla Değiştirildi. | msg #opers 4Yetkili 1IRC4Op:7 %oper.nck 4Yeni Operpassı:2 %oper.pss }
elseif (*Failure -- Operator* iswm $1-) {
/msg #opers 4HATA 2Oper Şifresi Değiştirilemedi. 10 %oper.nck 2Yetkili Değil.
}
/disable #operpass
}
#operpass end
Bu Code de
İnput Eventi İle Yazıldı Ayriyeten Kanal Yerine Değilse
ECHO Kullanarak Sadece Sizin Göre Bilmeniz Açısından Bu Şekilde Yazıldı.Kendi Scriptinizde Kullana Bilirsiniz.
Kullanma Komutu: !operpass Nick Yenişifre Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:input:#opers {
if $regex($1,/^(!|.)operpass/i) {
if (*@* $+ $token($server,2-,$asc(.)) $+ * !iswm $address($nick,2)) { echo -a 4HATA 2Komutu Kullanma Yetkiniz Yok! | halt }
if (!$2) { echo -a 4HATA 1Nick Girmediniz!. Komutun Doğru Kullanımı: 4!operpass <Nick Şifre> | halt }
elseif $regex($2,/^[[:digit:]]/i) { echo -a 4HATA 1Nickler Rakamla Başlayamaz. Lütfen Nicki Doğru Giriniz | halt }
elseif $regex($2,/^[[:cntrl:]]/i) { echo -a 4HATA 1Renkli veya Şekilli Yazı Tipi ile Şifre Değişemezsiniz. Lütfen Sade Şekilde Sorgulayın! | halt }
elseif (!$3) { echo -a 4HATA 1Şifre Girmediniz!. Komutun Doğru Kullanımı: 4!operpass <Nick Şifre> | halt }
/set %oper.nck $2 | /set %oper.pss $3 | /enable #operpass | /as oper $2 password $3
}
}
#operpass off
on *:snotice:*: {
if (*Success -- Password set* iswm $1-) {
echo -a 2Oper Şifresi Başarıyla Değiştirildi. | echo -a 4Yetkili 1IRC4Op:7 %oper.nck 4Yeni Operpassı:2 %oper.pss }
elseif (*Failure -- Operator* iswm $1-) {
echo -a 4HATA 2Oper Şifresi Değiştirilemedi. 10 %oper.nck 2Yetkili Değil.
}
/disable #operpass
}
#operpass end
Olmuşken
Alias Çalışmasıda Olsun Dedim Bundada Aynı
ECHO Komutunu Uygulatarak Sadece Sizlere Göstermesini İstedim Kendi Scriptinizde Kullana Bilirsiniz.
Kullanma Komutu: /operpass Nick Yenişifre Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias operpass {
if !$1 { echo -a 4HATA 2Eksik Komut Kullandınız! 4Doğru Kullanımı: 1/operpass Nick Yenişifre | halt }
if !$2 { echo -a 4HATA 2Eksik Komut Kullandınız! 12Şifreyi Yazmayı Unutdunuz! 4Doğru Kullanımı: 1/operpass Nick Yenişifre | halt }
elseif $regex($1,/[[:digit:]]/i) { echo -a 4HATA 2Nickinizi Renkli Yazı veya Rakam Yazarak Kullanamazsınız. | echo -a 4Doğru Kullanımı: 1/operpass Nick Yenişifre | halt }
elseif $regex($2,/[[:digit:]]/i) { echo -a 4HATA 2Şifrenizi Renkli Yazı veya Renkli Rakam Yazarak Kullanamazsınız. | echo -a 4Doğru Kullanımı: 1/operpass Nick Yenişifre | halt }
elseif $3 { echo -a 4HATA 2Fazla Komut Kullandınız! 4Doğru Kullanımı: 1/operpass Nick Yenişifre | halt }
set %opernck $1
set %operpss $2
enable #operpass
as oper $1 password $2
}
#operpass off
on *:snotice:*: {
if (*Success -- Password set* iswm $1-) {
echo -a 2Oper Şifresi Başarıyla Değiştirildi.
echo -a 4Yetkili 1IRC4Op:7 %opernck 4Yeni Operpassı:2 %operpss
}
elseif (*Failure -- Operator* iswm $1-) {
echo -a 4HATA 2Oper Şifresi Değiştirilemedi. 10 %opernck 2Yetkili Değil.
}
/disable #operpass
}
#operpass end
Arkadaşlar
Ef Tuşlarını mIRC Scriptinizin
ALT + R Yaptığınızda Solda En Başta
Aliases Başlığı Var Oraya EF Aliyaslarını Ekleyin ve
Snotice Eventinide
Remoteye Ekleyin Sorunsuz Çalışacaktır ve Kendi Scriptinizde Kullana Bilirsiniz bunuda Buda Diğerleri Gibi
ECHO Komutuyla Yazıldı.
Kullanma Komutu: F1 Tuşuna Basarak Kutucuklarda Sizden İstenilenleri Yazınız. Kullanma Komutu: CTRL + F1 Tuşlarına Basarakda Sizden Yapılmasını İstenilenleri Yazınız. Kullanma Komutu: Shift + F41Tuşlarına Basarakda Sizden İstenilenleri Yazınız. Kod: Kodu kopyalamak için üzerine çift tıklayın!
F1 set -e %oper.nck $$?="Oparpası Değişecek Yöneticinin Nickini Yaz. Örn: Goemon:" | set -e %oper.pss $$?="Yöneticinin Yeni Operpass Şifresini Yaz. Örn: 123654789 Gibi:" | enable #operpass | as oper %oper.nck password %oper.pss
CF1 set -e %oper.nck $$?="Oparpası Değişecek Yöneticinin Nickini Yaz. Örn: Goemon:" | set -e %oper.pss $$?="Yöneticinin Yeni Operpass Şifresini Yaz. Örn: 123654789 Gibi:" | enable #operpass | as oper %oper.nck password %oper.pss
SF1 set -e %oper.nck $$?="Oparpası Değişecek Yöneticinin Nickini Yaz. Örn: Goemon:" | set -e %oper.pss $$?="Yöneticinin Yeni Operpass Şifresini Yaz. Örn: 123654789 Gibi:" | enable #operpass | as oper %oper.nck password %oper.pss
#operpass off
on *:snotice:*: {
if (*Success -- Password set* iswm $1-) {
echo -a 2Oper Şifresi Başarıyla Değiştirildi.
echo -a 4Yetkili 1IRC4Op:7 %oper.nck 4Yeni Operpassı:2 %oper.pss
}
elseif (*Failure -- Operator* iswm $1-) {
echo -a 4HATA 2Oper Şifresi Değiştirilemedi. 10 %oper.nck 2Yetkili Değil.
}
/disable #operpass
}
#operpass end
Arkadaşlar Bu
Snotice Kodunu Remotenize Ekleyin Ekledikden Sonra Bu Komutu Yazın.
Kullanma Komutu: /as oper Goemon password 987456321 Gibi
Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:snotice:*: {
if (*Success -- Password set* iswm $1-) {
echo -a 2Oper Şifresi Başarıyla Değiştirildi.
echo -a 4Yeni Operpasınız 3Aktif2leştirilmiştir.
}
elseif (*Failure -- Operator * does not exist* iswm $1-) {
echo -a 4HATA 2Oper Şifresi Değiştirilemedi. 10 $4 2Yetkili Değil.
}
}
26 Kasım 2015, 22:36
Benzer Konular 
Normal
