| baglantı
dialog oper {
title "oper girişi"
size -1 -1 98 101
option dbu
icon 1, 1 1 96 21, images/icon.jpg
text "Nick", 2, 4 30 25 8
edit "", 3, 36 29 59 10
text "Şifre", 4, 3 47 25 8
edit "", 5, 36 44 59 10, pass return autohs autovs
text "Oper Şifresi", 6, 3 62 25 8
edit "", 7, 36 60 59 10, pass return autohs autovs
button "baglan", 8, 31 80 37 12, ok
}
on *:dialog:oper:*:*:{
if ($devent == init) {
did -ra $dname 3 $me
}
if ($devent == sclick) {
if ($did == 8) { set %xxx $did(5) | .nick $did(3) | set %osifre $did(7) | server irc.xxx.net }
}
}
on *:connect:{
if (%xxx != $null) { .msg nickserv identify %xxx | oper %nickin %osifre | unset %xxx }
}
bu kodda acaba bir hata varmı ?
|