IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Oto şifre tanıtma (https://www.ircforumlari.net/mirc-scripting-sorunlari/338997-oto-sifre-tanitma.html)

Oto şifre tanıtma

on *:notice:*:?: {
if ($nick == NickServ) {
if (Bu kayitli ve sifre korumali bir nick'tir isin $1-) { msg NickServ identify şifre }
}
}

Şu kod var elimde buna benzer bir kod yapabilirmisiniz. Örneğin farklı 10 adet nickim var ve şifreleride farklı nicklere geçtiğimde oto olarak şifrelerini tanıtsa

Cevap: Oto şifre tanıtma

Kod:

alias setup.otoidentify { dialog -m otoidentify otoidentify }

on *:LOAD:{

  echo -a 4Otomatik İdentifyi yüklediğiniz için teşekkür ederiz...

}

dialog otoidentify {

  title "Otomatik Nick İdentify"

  size -1 -1 194 263

  option pixels

  icon icon\key.ico, 0

  box "Nickler", 14, 5 109 180 80

  list 15, 12 125 163 78, disable

  text "&Nick:", 16, 12 29 31 20

  edit "", 17, 58 31 114 20, autohs

  text "&Şifre:", 18, 12 51 33 20

  edit "", 19, 58 53 114 20, pass autohs

  button "&Nick Ekle", 20, 11 80 53 20, flat

  button "&Nick Sil", 21, 66 80 53 20, flat

  check "&Otomatik İdentify Açık", 22, 33 204 134 20, flat

  box "Otomatik Nick İdentify", 2, 5 11 180 96

  button "&Tamam", 3, 123 80 53 20, flat cancel

}

on *:dialog:otoidentify:sclick:1:/run [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

on 1:dialog:otoidentify:init:*: {

  var %ctr = 1 | while (%ctr <= $numtok(%AutoID.nicks,32)) { did -a $dname 15 $Gettok(%AutoID.nicks,%ctr,32) | inc %ctr }

  if (%var == on) { did -c otoidentify 22 | did -e otoidentify 15,17,19,20 }

}

on 1:dialog:otoidentify:sclick:*: {

  if ($did == 15) { did -ra $dname 17 $did(15).seltext | did -ra $dname 19 $Gettok(%AutoID.pass,$findtok(%AutoID.nicks,$did(15).seltext,32),32) | did -e $dname 21 }

  if ($did == 20) { set %AutoID.nicks [ %AutoID.nicks ] $did(17) | set %AutoID.pass [ %AutoID.pass ] $did(19) | did -a $dname 15 $did(17) | did -ra $dname 17,19 }

  if ($did == 21) { set %AutoID.nicks $deltok(%AutoID.nicks,$findtok(%AutoID.nicks,$did(17),32),32) | set %AutoID.pass $deltok(%AutoID.pass,$findtok(%AutoID.pass,$did(19),32),32) | did -d $dname 15 $did(15).sel | did -ra $dname 17,19 | did -b $dname 21 }

  if ($did == 22) { if ($did(22).state == 1) { set %var on | set %AutoID $true | did -e otoidentify 15,17,19,20 } | else { set %var off | set %AutoID $false | did -b otoidentify 15,17,19,20 } }

}

on *:NOTICE:*:?: {

  if ($nick == NickServ) && (*NickServ identify* iswm $strip($1-)) && ($istok(%AutoID.nicks,$me,32) == $true) && (%AutoID == $true) { echo -a $logo Nickiniz identify ediliyor $me $+  | .identify $Gettok(%AutoID.pass,$findtok(%AutoID.nicks,$me,32),32) }

}

yapımcısını bilmiyorum en çok kullanılan otoidentify dialogudur.

Cevap: Oto şifre tanıtma

Alıntı:

fener1907 Nickli Üyeden Alıntı (Mesaj 1040439914)

alias setup.otoidentify { dialog -m otoidentify otoidentify }
on *:LOAD:{
echo -a 4Otomatik İdentifyi yüklediğiniz için teşekkür ederiz...
}
dialog otoidentify {
title "Otomatik Nick İdentify"
size -1 -1 194 263
option pixels
icon icon\key.ico, 0
box "Nickler", 14, 5 109 180 80
list 15, 12 125 163 78, disable
text "&Nick:", 16, 12 29 31 20
edit "", 17, 58 31 114 20, autohs
text "&Şifre:", 18, 12 51 33 20
edit "", 19, 58 53 114 20, pass autohs
button "&Nick Ekle", 20, 11 80 53 20, flat
button "&Nick Sil", 21, 66 80 53 20, flat
check "&Otomatik İdentify Açık", 22, 33 204 134 20, flat
box "Otomatik Nick İdentify", 2, 5 11 180 96
button "&Tamam", 3, 123 80 53 20, flat cancel
}
on *:dialog:otoidentify:sclick:1:/run [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
on 1:dialog:otoidentify:init:*: {
var %ctr = 1 | while (%ctr <= $numtok(%AutoID.nicks,32)) { did -a $dname 15 $Gettok(%AutoID.nicks,%ctr,32) | inc %ctr }
if (%var == on) { did -c otoidentify 22 | did -e otoidentify 15,17,19,20 }
}
on 1:dialog:otoidentify:sclick:*: {
if ($did == 15) { did -ra $dname 17 $did(15).seltext | did -ra $dname 19 $Gettok(%AutoID.pass,$findtok(%AutoID.nicks,$did(1 5).seltext,32),32) | did -e $dname 21 }
if ($did == 20) { set %AutoID.nicks [ %AutoID.nicks ] $did(17) | set %AutoID.pass [ %AutoID.pass ] $did(19) | did -a $dname 15 $did(17) | did -ra $dname 17,19 }
if ($did == 21) { set %AutoID.nicks $deltok(%AutoID.nicks,$findtok(%AutoID.nicks,$did( 17),32),32) | set %AutoID.pass $deltok(%AutoID.pass,$findtok(%AutoID.pass,$did(19 ),32),32) | did -d $dname 15 $did(15).sel | did -ra $dname 17,19 | did -b $dname 21 }
if ($did == 22) { if ($did(22).state == 1) { set %var on | set %AutoID $true | did -e otoidentify 15,17,19,20 } | else { set %var off | set %AutoID $false | did -b otoidentify 15,17,19,20 } }
}
on *:NOTICE:*:?: {
if ($nick == NickServ) && (*NickServ identify* iswm $strip($1-)) && ($istok(%AutoID.nicks,$me,32) == $true) && (%AutoID == $true) { echo -a $logo Nickiniz identify ediliyor $me $+ | .identify $Gettok(%AutoID.pass,$findtok(%AutoID.nicks,$me,32 ),32) }
}

yapımcısını bilmiyorum en çok kullanılan otoidentify dialogudur.

* Geçersiz parametre: $did (Satır 89, script22.mrc) diye hata veriyor.Bi de nick ve şifre girip tamam diyorum ama sunucuya bağlanınca identify etmiyor?
siyah olan satır 89. satıra denk geliyor.

Cevap: Oto şifre tanıtma

}
ON *:connect: {
nick Nickiniz
nickserv identify password
}

Kırmızılari degiştir.
hangi Sunucuya girersen gir oto nick gire ve oto şifre girer Birazdaha basit bir kod bu

Cevap: Oto şifre tanıtma

}
ON *:connect: {
nick Nickiniz
nickserv identify password
}
}
sondakinide ekle

Cevap: Oto şifre tanıtma

Alıntı:

SuRGuN Nickli Üyeden Alıntı (Mesaj 1040979722)

}
ON *:connect: {
nick Nickiniz
nickserv identify password
}
}
sondakinide ekle

Kodun Başındaki Ayraç Muhtemelen remotede Üstten Bir Koda Ait. Yani Kodla Alakasız.
verdiğiniz Ayracıda Eklerseniz,Ve Altına Kod eklediginizde Mirc Hata verecektir.

En doğru Şu Şekilde Olmalıdır, Tek Satırda Yazmak İstersek;

Kod:

ON *:connect: { .Nick Nickiniz | .identify Nickşifreniz. }

Cevap: Oto şifre tanıtma

on *:connect:{ setname 2Yasamak 4Direnmektir.! | identify şifren }

bende de böyle :D

kod + seçenek |

yazarak çoğaltabilirsin.

Cevap: Oto şifre tanıtma

on *:notice:*NickServ IDENTIFY*:?: {
if ($nick == NickServ) {
if $me == nick1 { .msg NickServ identify nick1şifre }
if $me == nick2 { .msg NickServ identify nick2şifre }
if $me == nick3 { .msg NickServ identify nick3şifre }
if $me == nick4 { .msg NickServ identify nick4şifre }
if $me == nick5 { .msg NickServ identify nick5şifre }
}
}
}

Kırmızı yerler nıcklerın. karsısındakı mavi yerlerede şifrelerini yazz bu sekılde cogaltabılırsın ;)

Cevap: Oto şifre tanıtma

bütün nicklerinin şifresi aynı ise şunu remotene eklemen yeterli

on *:connect: { .identify şifren }