Oto Nick identify Addonu
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 |
alias nickidentify { ; if (!$dialog(nickidentify)) { .remote on | var %d = $dialog(nickidentify,nickidentify,-4) } if (!$dialog(nickidentify)) { .remote on | dialog -m nickidentify nickidentify } else { halt } } dialog nickidentify { title "HelpOper Nick Şifrenizi Giriniz" size -1 -1 130 40 option dbu box "", 5, 1 -1 126 38 button "&İdentify Et", 1, 90 8 35 12,flat ok edit "", 2, 20 9 69 11, pass autohs Button " -=-Nick Değiş-=- ", 3, 23 23 60 12 8 } on *:dialog:nickidentify:sclick:3: { dialog -x nickidentify | nickd } on 1:DIALOG:nickidentify:init:0: { did -f nickidentify 2 } on 1:DIALOG:nickidentify:*:*: { if ($devent == sclick) { if ($did == 1) { /yap } } } alias yap { if ($did(2) == $null) { .echo -a 4Lütfen şifrenizi giriniz..! %Logo | dialog -x nickidentify nickidentify | /Nickidentify } else { /privmsg NickServ identify $did(2) } } on *:NOTiCE:*NickServ identify*:?:{ if ($nick == NickServ) { dialog -m nickidentify nickidentify } } ------------------------ alias nickd { ; if (!$dialog(nickd)) { .remote on | var %d = $dialog(nickd,nickd,-4) } if (!$dialog(nickd)) { .remote on | dialog -m nickd nickd } else { halt } } dialog nickd { title "HelpOper Yeni Nick" size -1 -1 120 32 option dbu box "", 5, 2 1 115 25 button "Tamam", 2, 79 12 35 12, flat ok edit "", 4, 5 13 69 10, text autos text "Lütfen Nick Seçiniz:", 1, 15 5 62 8 } on *:dialog:nickd:sclick:2: { Nick $did(4) } on 1:DIALOG:nickd:init:0: { did -f nickd 4 } -- |