| Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
| Cevap: Oto Nick İdentine İnce Ayar
| | Alıntı: | #baglanti on
on 1:start:{ .bagLanti }
aLias bagLanti { .diaLog -m bagLanti bagLanti }
diaLog bagLanti {
titLe " RapStar mIRC Bağlantı Menüsü© "
size -1 -1 203 133
option dbu
text "Nick:", 1, 3 12 25 8
text "YedekNick:", 2, 3 21 26 8
text "E-mail:", 3, 3 30 25 8
box "Bağlantı Menüsü", 4, 1 1 129 54
edit "", 5, 37 9 90 10
edit "", 6, 37 29 90 10
edit "", 7, 37 19 90 10
text "Fullname: ", 10, 3 39 25 8
edit "", 11, 37 39 90 10, autohs
box "Otomatik Tanımlar", 12, 131 1 68 85
text "Otomatik Giris", 13, 134 8 38 8
text "1.Kanal", 14, 134 18 25 8
edit "", 15, 162 17 33 10
text "2.Kanal", 16, 134 27 25 8
edit "", 17, 162 27 33 10
text "3.Kanal", 18, 134 37 25 8
edit "", 19, 162 37 33 10
text "Otomatik Nick Tanıtım", 20, 134 50 61 8
text "Nick", 21, 134 60 25 8
edit "", 22, 161 59 31 10, autohs
text "Sifre", 23, 135 70 25 8
edit "", 24, 161 69 31 10, pass autohs
box "Server", 26, 2 58 127 28
edit "MyNet", 30, 8 69 117 12, disable
button "Sohbete Gir", 34, 50 110 107 15
button "Kaydet ve Kapat", 35, 25 90 67 15, ok
button "İptal", 36, 110 90 62 15, canceL
}
on 1:diaLog:bagLanti:init:*:{
did -a bagLanti 5 $me
did -a bagLanti 7 $anick
did -a bagLanti 6 $emaiL
did -a bagLanti 11 $fuLLname
}
on 1:diaLog:bagLanti:scLick:34:{
if ($did(22) != $null) { /nick $did(22) }
else { /nick $did(5) }
.set %one $did(15)
.set %two $did(17)
.set %three $did(19)
.set %nick $did(22)
.set %sifre $did(24)
.set %AnaNick $did(5)
.diaLog -x bagLanti bagLanti
.server %server
}
on 1:diaLog:bagLanti:scLick:27:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mircalem.com }
on 1:diaLog:bagLanti:scLick:28:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mircalem.com }
on 1:diaLog:bagLanti:scLick:29:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mircalem.com }
on 1:diaLog:bagLanti:scLick:30:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mircalem.com }
on 1:diaLog:bagLanti:scLick:31:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mircalem.com }
on 1:diaLog:bagLanti:scLick:32:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mircalem.com }
on 1:dialog:baglanti:sclick:34: { set %ufuk $did(22) }
on *:connect:{
if (%sifre == $null) { haltdef }
else {
.timer 1 2 .ns identify %sifre | echo -a 10Nick Sifreniz giriLiyor
}
if (%one != $null) { /j %one }
if (%two != $null) { /j %two }
if (%three != $null) { /j %three }
}
on *:disconnect:{ .unset %sifre | unset %one | unset %two | unset %three }
|
Kırmızı bölgedeki düzenlemeyle, Otomatik Nick Tanımında eğer nick verisi varsa o nicke göre hareket edicek, yoksa bağlantı menüsündeki nicki kullanıcaktır.
İyi forumlar.
|