Bağlantı Menüsü
#aciLis on
on 1:start:{ .bagLanti }
aLias bagLanti { .diaLog -m bagLanti bagLanti }
diaLog bagLanti {
titLe \\\\\\\\"~MircHelp.Gen.Tr © \\\\\\\\"
size -1 -1 204 163
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 74
edit \\\\\\\\"\\\\\\\\", 5, 37 9 50 10
edit \\\\\\\\"\\\\\\\\", 6, 37 29 50 10
edit \\\\\\\\"\\\\\\\\", 7, 37 19 50 10
text \\\\\\\\"Ident:\\\\\\\\", 8, 3 39 25 7
edit \\\\\\\\"\\\\\\\\", 9, 37 39 50 10
text \\\\\\\\"Realname: \\\\\\\\", 10, 3 49 25 8
edit \\\\\\\\"\\\\\\\\", 11, 37 49 50 10
box \\\\\\\\"Ekstra Baglantı Menüsü\\\\\\\\", 12, 131 1 68 95
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 Tanitim\\\\\\\\", 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
text \\\\\\\\"Baska Servere Gir\\\\\\\\", 25, 6 129 53 8
box \\\\\\\\"Serverler\\\\\\\\", 26, 2 77 127 78
button \\\\\\\\"KELEBEK\\\\\\\\", 30, 47 99 37 12
button \\\\\\\\"Zurna\\\\\\\\", 28, 47 85 37 12
button \\\\\\\\"Sohbet\\\\\\\\", 29, 6 99 37 12
button \\\\\\\\"mIRC\\\\\\\\", 27, 6 85 37 12
button \\\\\\\\"MircHelp\\\\\\\\", 31, 6 113 37 12
button \\\\\\\\"MyChat\\\\\\\\", 32, 47 113 37 12
edit \\\\\\\\"\\\\\\\\", 33, 64 128 50 10
button \\\\\\\\"Sohbete Gir\\\\\\\\", 34, 50 141 37 12
button \\\\\\\\"Tamam\\\\\\\\", 35, 141 97 37 28, ok
button \\\\\\\\"Kapat\\\\\\\\", 36, 141 130 37 25, canceL
}

on 1:diaLog:bagLanti:init:*:{
did -a bagLanti 5 $me
did -a bagLanti 7 $anick
did -a bagLanti 6 $emaiL
did -a bagLanti 9 $nick
did -a bagLanti 11 $fuLLname

}

on 1:diaLog:bagLanti:scLick:34:{
.set %one $did(15)
.set %two $did(17)
.set %three $did(19)
.set %nick $did(22)
.set %sifre $did(24)
.set %server $did(33)
.diaLog -x bagLanti bagLanti
.server %server

}

on 1:diaLog:bagLanti:scLick:27:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mIRCHelp.Gen.Tr }
on 1:diaLog:bagLanti:scLick:28:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mIRCHelp.Gen.Tr }
on 1:diaLog:bagLanti:scLick:29:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mIRCHelp.Gen.Tr }
on 1:diaLog:bagLanti:scLick:30:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mIRCHelp.Gen.Tr }
on 1:diaLog:bagLanti:scLick:31:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mIRCHelp.Gen.Tr }
on 1:diaLog:bagLanti:scLick:32:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mIRCHelp.Gen.Tr }

on *:connect:{ .ns identify %sifre | echo -a Nick Sifreniz giriLiyor | .join %one | .join %two | .join %three }
on *:disconnect:{ .unset %sifre | unset %one | unset %two | unset %three }
#aciLis end