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

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

- - Dialog kodlama hakkında.. (https://www.ircforumlari.net/mirc-scripting-sorunlari/32219-dialog-kodlama-hakkinda.html)

Dialog kodlama hakkında..

Kod:

dialog giris {

  title "Giriş Asistanı"

  size -1 -1 205 119

  option dbu

  box "Bağlantı", 1, 5 35 187 50

  text "Nickiniz:", 2, 22 48 33 8

  text "Identiniz:", 3, 23 61 25 8

  text "Şifreniz:", 4, 23 73 25 8

  edit "", 5, 55 46 50 10, center

  edit "", 6, 55 59 50 10, center

  edit "", 7, 55 72 50 10, center

  button "BAĞLAN!", 8, 122 49 50 25, default flat multi ok 

  text "Gerekli bilgileri doldurarak, bağlan butonuna tıklayınız.", 10, 34 95 133 27

}

on 1:dialog:giris:edit:*:{

  if ($did == 5) { .nick $did(5)  }

  if ($did == 6) { .emailaddr $did(6) }

  if ($did == 7) { .set %şifre $did(7) }

}

On 1:dialog:giris:CLOSE:0:{ server irc.ircforumlari.net 6667 %şifre }

CR server için böyle bir dialog oluşturdum. Dialog'a girilen bilgilerle, dialog close olduktan sonra /server irc.... işlemini uygulattım. Ama burada yapmak istediğim bir olay var. Dialog'da herhangi bir işlem veya bir kutucuğun boş kaldığı gibi durumlarda, uyarı vermek ve giriş olayını iptal etmek istedim. Bu konuda yardımcı olursanız sevinirim...

Cevap: Dialog kodlama hakkında..

alias hata { .return $input($1-,ohud,Hata!) }
dialog giris {
title "Giriş Asistanı"
size -1 -1 205 119
option dbu
box "Bağlantı", 1, 5 35 187 50
text "Nickiniz:", 2, 22 48 33 8
text "Identiniz:", 3, 23 61 25 8
text "Şifreniz:", 4, 23 73 25 8
edit "", 5, 55 46 50 10, center
edit "", 6, 55 59 50 10, center
edit "", 7, 55 72 50 10, center
button "BAĞLAN!", 8, 122 49 50 25, default flat multi
text "Gerekli bilgileri doldurarak, bağlan butonuna tıklayınız.", 10, 34 95 133 27
}
on 1:dialog:giris:sclick:8:{
if ($did(5) == $null) {
.hata Nicki Boş bırakmayın
.halt
}
else {
.nick $did(5)
}
if ($did(6) == $null) {
.hata E-mail'i Boş Bırakmayın
.halt
}
else {
.emailaddr $did(6)
}
if ($did(5) == $null) {
.hata Şifreyi Boş Bırakmayın
.halt
}
else {
.set %şifre $did(7)
}
server irc.ircforumlari.net 6667 %şifre
}

Cevap: Dialog kodlama hakkında..

Kod:

on *:dialog:giris:sclick:8: { if !$did(5) || !$did(6) || !$did(7) { echo -s Boş Bölüm Birakmayiniz! | halt } }

Kod:

dialog giris {

  title "Giriş Asistanı"

  size -1 -1 205 119

  option dbu

  box "Bağlantı", 1, 5 35 187 50

  text "Nickiniz:", 2, 22 48 33 8

  text "Identiniz:", 3, 23 61 25 8

  text "Şifreniz:", 4, 23 73 25 8

  edit "", 5, 55 46 50 10, center

  edit "", 6, 55 59 50 10, center

  edit "", 7, 55 72 50 10, center

  button "BAĞLAN!", 8, 122 49 50 25, default flat multi ok 

  text "Gerekli bilgileri doldurarak, bağlan butonuna tıklayınız.", 10, 34 95 133 27

}

on 1:dialog:giris:edit:*:{

  if ($did == 5) { .nick $did(5)  }

  if ($did == 6) { .emailaddr $did(6) }

  if ($did == 7) { .set %şifre $did(7) }

}

On 1:dialog:giris:CLOSE:0:{ server irc.ircforumlari.net 6667 %şifre }