Sifre Girme Dialogu
Sifre Girme Dialogu kodu
kod:
dialog idpass {
title \\\\"Seçti?iniz Nick ?ifreli\\\\"
size -1 -1 240 95
box \\\\"Nick ?ifresi 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 De?i?\\\\",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 || %idintel == \\\\"\\\\" { .timer -m 1 1 YANLI? ??FRE :: | halt }
else { ns identify %idpass | echo -a 11,1 Nick ?ifreniz Girilmi?tir }
unset %idintel
}
if ($did == 4) { dialog -x idpass | /nick $$?=\\\\"Yeni Nick?\\\\" }
}
}
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-) { ident }
}
}
if (%nickpass != on) {
if ($nick == nickserv) {
if (*nickserv* iswm $1- && *identify* iswm $1-) { F12 | halt }
if (*identify* iswm $1- && *<password>* iswm $1-) { F12 }
}
}
if (*incorrect* iswm $1- && $nick == nickserv) { F12 }
if (*gecersiz* iswm $1- && $nick == nickserv) { F12 }
}
on 1:ACTIVE:*:{
if ($dialog(idpass)) { dialog -v idpass }
}
alias f12 { /dialog -m idpass idpass }

_____

Kodu Remoteye Ekliyorsunuz