!şifre şifre ile bota kendini tanıtma - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Rules · 31 Ocak 2014, 10:54

Arkadaşlar foruma bi kaç gündür bakıyorumda aradıgım bir kod var bulamadım. yardımcı olurmusunuz acaba.

Kanal koruma botuma bi kod eklemek istiyorum kodun içeriği ise şöyle

Botumun özeline ben !şifreal on/off on yaptıgımda aoplarım botun özeline !şifreekle 123
dediğinde bot kendisi için şifre belirliyen aopun nickini ve şifresini txt dosyasına kayd etsin şifreniz alındı diye rapor versin aopa. ve ben !şifreal off yaptıgımda ise şifrekayd etme olayını bitirsin herhangi biri şifre girmek istese bile şifre alıp kayd etmesin.
Ve kendisi için şifre belirliyen aop botun özelinde !şifregir şifresini girdiği zaman şifre doğru ise şifreyi giren aopun özeline şifrenizi doğru bir şekilde girdiniz diye mesaj atsın.
bu kod hakkında bana yardımcı olabilirmisiniz rica etsem

IRC-Dancer · 31 Ocak 2014, 17:10

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
;--- Not Olan kısımları : Şifre İle değiştir.İstediğinin aynısı.

Rules · 31 Ocak 2014, 17:49

IRC-Dancer Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
;--- Not Olan kısımları : Şifre İle değiştir.İstediğinin aynısı.

hayır hocam istediğim bu değil bunda on/off yok ve bi aop botun özelinde kendi şifresini girince herhangi kıyaslama yapmazki şifre doğrumu değilmi diye ben şifre doğru ise işlem yaptırmayı düşünüyorum çünkü

Med Cezir · 31 Ocak 2014, 17:54

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:text:*:?:{
  if $regex($1,/[!.](s|ş)ifre/i) {
    if $regex($2,/(on|off)/i) {  if $nick == yorgunsero { if $regml(1) == on { msg $nick Şifre girme özelliği açıldı.  | set -e %sifreoz. on } | if $regml(1) == off { msg $nick Şifre girme özelliği kapatıldı. | unset %sifreoz. } } | else msg $nick Bu komutu kullanabilecek yetkiye sahip değilsin }
    if $2 == ekle && $3 && $nick isop #kanal { if %sifreoz. == on {  msg $nick $nick şifreniz $3 olarak belirlendi. | write sifreler.txt $nick $+ $chr(32) $3 } | else msg $nick Şifre girme özelliği kapalı durumda. }
    if $2 == gir && $3 && $nick isop #kanal  { if $read(sifreler.txt,w,$nick $+ $chr(32) $+ $3) { msg $nick Şifrenizi doğru bir şekilde girdiniz } | else msg $nick Yanlış şifre girildi. }
  }
}

Komutlar:
!sifre on/off : Açıp kapatmak için
!sifre ekle şifre : Sifrenin dosyaya kayıt edilmesi için.
!sifre gir sifre : Sifrenin tanıtılması için.

NOT:Kırmızı kısımlar kendine göre ayarlanacaktır.

Rules · 31 Ocak 2014, 18:04

Med Cezir Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:text:*:?:{
  if $regex($1,/[!.](s|ş)ifre/i) {
    if $regex($2,/(on|off)/i) {  if $nick == yorgunsero { if $regml(1) == on { msg $nick Şifre girme özelliği açıldı.  | set -e %sifreoz. on } | if $regml(1) == off { msg $nick Şifre girme özelliği kapatıldı. | unset %sifreoz. } } | else msg $nick Bu komutu kullanabilecek yetkiye sahip değilsin }
    if $2 == ekle && $3 && $nick isop #kanal { if %sifreoz. == on {  msg $nick $nick şifreniz $3 olarak belirlendi. | write sifreler.txt $nick $+ $chr(32) $3 } | else msg $nick Şifre girme özelliği kapalı durumda. }
    if $2 == gir && $3 && $nick isop #kanal  { if $read(sifreler.txt,w,$nick $+ $chr(32) $+ $3) { msg $nick Şifrenizi doğru bir şekilde girdiniz } | else msg $nick Yanlış şifre girildi. }
  }
}

Komutlar:
!sifre on/off : Açıp kapatmak için
!sifre ekle şifre : Sifrenin dosyaya kayıt edilmesi için.
!sifre gir sifre : Sifrenin tanıtılması için.

NOT:Kırmızı kısımlar kendine göre ayarlanacaktır.

hocam şifre ekleme olayını özelde ve belirlediğim kanalda denemedim almadı :S

Med Cezir · 31 Ocak 2014, 18:09

Bütün komutlar sadece özelde uygulanabilir. Ekle ve gir komutlarında komutu uygulayanın belirttiğin kanalda op olması gerekir.

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Şifre Yöntemleri ve Şifre Güvenliği	CeSaRCripS	Güvenlik Açıkları	0	22 Nisan 2013 18:47
EGGDROP - Tcl scriptleri bota yükleme,tanıtma..	Heartbroken	IRCd Makaleler	12	06 Haziran 2012 13:42
Oto şifre tanıtma	Kay	mIRC Scripting Sorunları	8	17 Ocak 2012 00:37
oto şifre tanıtma kodu yokmu ya	aldanis	mIRC Scripting Sorunları	1	15 Haziran 2010 14:21

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.