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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   bağlantı menüsü (https://www.ircforumlari.net/mirc-scripting-sorunlari/527522-baglanti-menusu.html)

KaraLahana 30 Mart 2013 14:48

bağlantı menüsü
 
Kod:

dialog baglan {
  title "Sunucu.com"
  size -1 -1 133 100
  option dbu
  box "", 1, 3 -1 128 78
  edit "", 2, 56 8 70 12, autohs
  edit "", 3, 56 26 70 12, autohs
  edit "", 4, 56 41 70 12, autohs
  text " Nickiniz", 5, 6 10 36 8
  text " Yedek Nickiniz", 6, 6 27 44 8
  text " IRC Sunucu", 7, 7 44 44 8
  edit "", 8, 56 60 70 12, autohs
  text " IRC Sifre", 9, 6 61 43 8
  button "« « BAGLAN » »", 10, 25 80 90 16, ok cancel
}
On *:DIALOG:baglan:*:*: {
  if ($devent == init) {
    idset 19
    did -a $dname 2 $me
    did -a $dname 3 $anick
    did -a $dname 4 %server
    did -a $dname 8 %nicksifre
    mdx MarkDialog $dname
    mdx SetFont 1,2,3,4,5,6,7,8,9,10 -11 700 Tahoma
  }
  if ($devent == sclick) {
    if ($did == 10) && $did(8) { .nick $did(2)  | .anick $did(3) | set %server $did(4) | set %nicksifre $did(8) | /dialog -c baglan baglan | server $+(%server,:,6667) %nicksifre }
    elseif ($did == 10) && !$did(8) { .nick $did(2)  | .anick $did(3) | set %server $did(4) | dialog -c baglan baglan | server $+(%server,:,6667)  }
  }
}

selam arkadaşlar yukarıda bulunan bir bağlantı menüsü var bu menüye IRC Sunucu ve IRC Sifresi var bu 2sini kaldırabilirmiyiz ve IRC Sunucusu yerine nick şifresini girmek için bir şey koyabilirmiyiz şifreyi girince kanaldaki nick şifresi girilmiş olsun.sonra kanala girince de tekrar şifreyi sorma butonu çıkmaması şekilde ayarlabilirmiyiz teşekkür ederim yardımcı olacak arkadaşa.

JohnGalt 30 Mart 2013 17:29

Cevap: bağlantı menüsü
 
Şifre girildikten sonra tekrar şifre sormaması için şifre sorma panelini neyin tetiklediğini de görmek gerekiyor. Muhtemelen on *:notice eventidir. Onu da paylaşırsan daha doğru şekilde yardım verilebilir.

Ayrıca IRC Sunucu ve IRC Sifresi diyorsun ama IRC şifresi dediği şey zaten nick şifresi için bir kısım.

Kod:

dialog baglan {
  title "Sunucu.com"
  size -1 -1 133 82
  option dbu
  box "", 1, 3 -1 128 60
  edit "", 2, 56 8 70 12, autohs
  edit "", 3, 56 26 70 12, autohs
  text " Nickiniz", 5, 6 10 36 8
  text " Yedek Nickiniz", 6, 6 27 44 8
  edit "", 8, 56 42 70 12, autohs
  text "Nick Sifre", 9, 6 44 43 8
  button "« « BAGLAN » »", 10, 24 62 90 16, ok cancel
}
On *:DIALOG:baglan:*:*: {
  if ($devent == init) {
    idset 19
    did -a $dname 2 $me
    did -a $dname 3 $anick
    did -a $dname 8 %nicksifre
    mdx MarkDialog $dname
    mdx SetFont 1,2,3,5,6,8,9,10 -11 700 Tahoma
  }
  if ($devent == sclick) {
    if ($did == 10) && $did(8) { .nick $did(2)  | .anick $did(3) | set %nicksifre $did(8) | /dialog -c baglan baglan | server $+($server,:,6667) %nicksifre }
    elseif ($did == 10) && !$did(8) { .nick $did(2)  | .anick $did(3) | dialog -c baglan baglan | server $+($server,:,6667)  }
  }
}

Bu şekilde değiştirebilirsin.

KaraLahana 30 Mart 2013 23:22

Cevap: bağlantı menüsü
 
kardeş öncelikle remotede on *:notice kodunu aradım remotede hiç çıkmadı öyle bir kod sonrasında ise bu verdiğin kodu koydum sonra nıck yazdım bağlan diyince alt o yapınca çıkan panel çıkıyor

KiLLed 31 Mart 2013 11:51

Cevap: bağlantı menüsü
 
alt + o değil alt + r yapın remotelerde identify kelimesini arayın noticede büyük ihtimal
identify kelimesi geçer.

KaraLahana 31 Mart 2013 13:43

Cevap: bağlantı menüsü
 
Hayır alt r ile remotede on *:notice aradım ben diğer JohnGalt arkadasın verdiği kodu koydum sonra nıckı yazıp bağlan diyince alt o açılıyor
Buda nick şifresini giren kutucuk kodu identify

Kod:

dialog idpass {
  title "Sectiginiz Nick Sifreli"
  size -1 -1 240 95
  box "Nick Sifresi Giriniz",1,5 5 230 85
  edit "",2,35 25 173 22,autohs,pass
  button "Tamam",3,37 55 75 25,ok,disable flat
  button "Nick Degis",4,132 55 75 25, flat
}
on 1:dialog:idpass:*:*:{
  if ($devent == edit) {
    if ($did == 2) { set %idpass $did(2).text | did -e $dname 3 }
  }
  if ($devent == sclick) {
    if ($did == 3) {
      if %idpass == $null || %idpass == "" { /!.timer -m 1 1 YANLIS SİFRE :: | halt }
      else { ns identify %idpass | echo -a %Sunucu 10*** Nick Sifreniz Girilmistir }
      unset %idintel
    }
    if ($did == 4) { dialog -x idpass | /nick $$?="Yeni Nick?" }
  }
  if ($devent == init) { idset 19 }
}
on 1:dialog:key:*:*: {
  if ($devent == sclick) {
    if ($did == 3) { dialog -m idpass idpass | dialog -c key key }
  }
}
on 1:Notice:*:?:{
  if (%nickpass == on) {
    if ($nick == nickserv) {
      if (*nickserv* iswm $1- && *identify* iswm $1-) { dialog -m idpass idpass }
    }
  }
  if (%nickpass != on) {
    if ($nick == nickserv) {
      if (*nickserv* iswm $1- && *identify* iswm $1-) { dialog -m idpass idpass | halt }
      if (*identify* iswm $1- && *<password>* iswm $1-) { dialog -m idpass idpass }
    }
  }
  if (*incorrect* iswm $1- && $nick == nickserv) { dialog -m idpass idpass }
  if (*gecersiz* iswm $1- && $nick == nickserv) { dialog -m idpass idpass }
}
on 1:ACTIVE:*:{
  if ($dialog(idpass)) { dialog -v idpass }
}


KiLLed 31 Mart 2013 14:33

Cevap: bağlantı menüsü
 
[BOX="+i"]dialog idpass {
title "Sectiginiz Nick Sifreli"
size -1 -1 240 95
box "Nick Sifresi Giriniz",1,5 5 230 85
edit "",2,35 25 173 22,autohs,pass
button "Tamam",3,37 55 75 25,ok,disable flat
button "Nick Degis",4,132 55 75 25, flat
}
on 1:dialog:idpass:*:*:{
if ($devent == edit) {
if ($did == 2) { set %idpass $did(2).text | did -e $dname 3 }
}
if ($devent == sclick) {
if ($did == 3) {
if %idpass == $null || %idpass == "" { /!.timer -m 1 1 YANLIS SİFRE :: | halt }
else { ns identify %idpass | echo -a %Sunucu 10*** Nick Sifreniz Girilmistir }
unset %idintel
}
if ($did == 4) { dialog -x idpass | /nick $$?="Yeni Nick?" }
}
if ($devent == init) { idset 19 }
}
on 1:dialog:key:*:*: {
if ($devent == sclick) {
if ($did == 3) { dialog -m idpass idpass | dialog -c key key }
}
}
#idpass off
on 1:Notice:*:?:{
if (%nickpass == on) {
if ($nick == nickserv) {
if (*nickserv* iswm $1- && *identify* iswm $1-) { dialog -m idpass idpass }
}
}
if (%nickpass != on) {
if ($nick == nickserv) {
if (*nickserv* iswm $1- && *identify* iswm $1-) { dialog -m idpass idpass | halt }
if (*identify* iswm $1- && *<password>* iswm $1-) { dialog -m idpass idpass }
}
}
if (*incorrect* iswm $1- && $nick == nickserv) { dialog -m idpass idpass }
if (*gecersiz* iswm $1- && $nick == nickserv) { dialog -m idpass idpass }
}
on 1:ACTIVE:*:{
if ($dialog(idpass)) { dialog -v idpass }
}
#idpass end
[/BOX]
eskisini sil bu verdiğim şekilde ekle
yukarda johnGalt ın verdiği koduda aynen ekle
bu şekilde şuan nick şifre diyaloğu kapalı
açmak için
/enable #idpass
kapatmak için
/disable #idpass
komutlarını uygulaya bilirsin

KaraLahana 31 Mart 2013 15:17

Cevap: bağlantı menüsü
 
Sizin verdiğiniz kodu koydum diğerini sildim JohnGalt'un verdiği koduda koydum sonra nick yazıp bağlan diyince bağlanmıyor alt o yu açıyor.

JohnGalt 31 Mart 2013 17:13

Cevap: bağlantı menüsü
 
Haklısın, ilk verdiğim kodda bir yanlışlık yapmışım. Ondan dolayı da server bilgisi alamadığı için tekrar alt+o kısmını açması normal.

Kod:

dialog baglan {
  title "Sunucu.com"
  size -1 -1 133 82
  option dbu
  box "", 1, 3 -1 128 60
  edit "", 2, 56 8 70 12, autohs
  edit "", 3, 56 26 70 12, autohs
  text " Nickiniz", 5, 6 10 36 8
  text " Yedek Nickiniz", 6, 6 27 44 8
  edit "", 8, 56 42 70 12, autohs
  text "Nick Sifre", 9, 6 44 43 8
  button "« « BAGLAN » »", 10, 24 62 90 16, ok cancel
}
On *:DIALOG:baglan:*:*: {
  if ($devent == init) {
    idset 19
    did -a $dname 2 $me
    did -a $dname 3 $anick
    did -a $dname 8 %nicksifre
    mdx MarkDialog $dname
    mdx SetFont 1,2,3,5,6,8,9,10 -11 700 Tahoma
  }
  if ($devent == sclick) {
    if ($did == 10) && $did(8) { .nick $did(2)  | .anick $did(3) | set %nicksifre $did(8) | /dialog -c baglan baglan | server irc.sunucun.com 6667 %nicksifre }
    elseif ($did == 10) && !$did(8) { .nick $did(2)  | .anick $did(3) | dialog -c baglan baglan | server irc.sunucun.com 6667 }
  }
}

Server seçimi istemediğine göre muhtemelen tek server kullanıyorsundur. Kırmızı ile belirttiğim yere bağlanmak istediğin server adresini yazarsın, sorunun hallolmuş olur.

İlk yanlışlığım için de kusura bakmayın artık. =)

KaraLahana 31 Mart 2013 17:27

Cevap: bağlantı menüsü
 
Estağfurullah Kodu koydum çalışdı birde KiLLed arkadaşımın vermiş olduğu kodunuda koydum identify olanı sonra bağlantı menusune nick yazdım şifre yazdım kayıtlı bir nick ile sonra bağlan dedim bağlandı nick şifresini tanıdı ama statüde bir de şunu yazdı * /dialog: Geçersiz parametre

şu sekilde çıkardı

-NickServ- Bu kayitli ve sifre korumali bir nick'tir. Eger sizinse /msg NickServ IDENTIFY sifreniz yaziniz. Aksi takdirde lutfen baska bir nick seciniz.
-
-NickServ- Eger 1 dakika icinde degistirmezseniz, nickiniz degistirilecektir.
-
-NickServ- Password accepted - Sifre kabul edildi.
-
-NickServ- [ Authed ] - Nick rumuzu ile sisteme tanitildiniz.Sunucu.Com hos sohbetler diler.
-
* /dialog: Geçersiz parametre

JohnGalt 31 Mart 2013 17:38

Cevap: bağlantı menüsü
 
Onun nedeni arkadaşın verdiği kodda senin mIRC'inde olmayan bir diyalogdan aldığı veriler ile çalışıyor olması. İncelediğimde bazı variablesleri oluşturacak hiçbir komut yok mesela. O nedenle hata alıyor olabilirsin.

Dilersen benim yazdığım bir diyalog vardı, onu deneyebilirsin;

Kod:

dialog sifre {
  title "Nick/Şifre Paneli"
  size -1 -1 100 60
  option dbu
  box $me Nicki Şifrelidir;, 1, 5 3 90 35
  text "Şifre Gir:", 2, 10 13 30 8
  text "Yeni Nick:", 3, 10 24 30 8
  edit "", 4, 40 12 50 10, pass
  edit "", 5, 40 23 50 10
  button "Tamam", 6, 10 43 37 12, default
  button "İptal", 7, 55 43 37 12, cancel
}
dialog sifre1 {
  title "Şifre Paneli"
  size -1 -1 100 60
  option dbu
  box , 1, 5 3 90 35
  text "Şifre Gir:", 2, 10 25 30 8
  text "Yanlış Şifre! Tekrar deneyiniz;", 3, 10 11 80 8, center
  edit "", 4, 40 24 50 10, pass
  button "Tamam", 6, 10 43 37 12, ok
  button "İptal", 7, 55 43 37 12, cancel
}
on *:notice:*:*:{
  if $nick == NickServ {
    if $regex($1-,/^Gecersiz\ssifre\.$/) { dialog -m sifre1 sifre1 }
    if $regex($1-,/^Bu\skayitli\sve\ssifre/) { .timeridentify 1 3 dialog -m sifre sifre }
    if $regex($1-,/Sifre\skabul\sedildi\./) { .timeridentify off }
  }
}
on *:dialog:sifre:sclick:6:{
  if ($did(4) && !$did(5)) { .identify $did(4) | /dialog -c sifre sifre }
  if ($did(5) && !$did(4)) { .nick $did(5) | /dialog -c sifre sifre }
  if ($did(4) && $did(5)) {
    $iif($input(Sadece Şifre Veya Sadece Yeni Nick Yazınız!,ohud,Hata!),did -r $dname 4-5)
  }
}
on *:dialog:sifre1:sclick:6:{
  if $did(4) { .identify $did(4) }
}



Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 05:36.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk