alias ci { dialog -m ci ci }
dialog ci {
title "Channel Identify"
size -1 -1 140 196
option dbu
edit "", 1, 16 20 70 10, autohs
edit "", 2, 16 48 70 10, autohs
edit "", 3, 16 76 70 10, autohs
edit "", 4, 16 103 70 10, autohs
edit "", 5, 16 130 70 10, autohs
edit "", 6, 16 159 70 10, autohs
button "On", 7, 15 177 32 12
button "Off", 8, 54 177 32 12
button "Ok", 9, 96 177 32 12, ok
button "Identify", 10, 96 32 32 12
button "Identify", 11, 96 87 32 12
button "Identify", 12, 96 142 32 12
text "Chan", 13, 45 9 12 8
text "Pass", 14, 45 35 12 8
text "Chan", 15, 45 64 12 8
text "Pass", 16, 45 90 12 8
text "Pass", 17, 45 145 12 8
text "Chan", 18, 45 117 12 8
}
alias cia { dialog -m cia cia }
dialog cia {
title "About"
size -1 -1 120 135
option dbu
box "About", 1, 5 4 109 39
text "Addon : Channel Identify", 2, 11 15 97 8
text "Version : v3 Beta", 3, 11 28 97 8
box "About Author", 4, 5 44 109 84
text "Author : br0nx", 5, 11 54 97 8
text "Author Chan : #scr1pt1ng", 6, 11 70 97 8
text "Author Serv : irc.krstarica.com", 7, 11 85 97 8
text "Author Email : br0nx.20@inbox.com", 8, 11 100 97 8
text "Addon Address : br0nx.20.forumer.com", 9, 11 115 97 8
}
on *:dialog:ci:init:*: {
did -a ci 1 %1.chan
did -a ci 2 %1.pass
did -a ci 3 %2.chan
did -a ci 4 %2.pass
did -a ci 5 %3.chan
did -a ci 6 %3.pass
}
alias 1.chan {
set %1.chan $did(1)
%1.chan
}
alias 1.pass {
set %1.pass $did(2)
%1.pass
}
alias 2.chan {
set %2.chan $did(3)
%2.chan
}
alias 2.pass {
set %2.pass $did(4)
%2.pass
}
alias 3.chan {
set %3.chan $did(5)
%3.chan
}
alias 3.pass {
set %3.pass $did(6)
%3.pass
}
on *:dialog:ci:sclick:7: {
set %1.chan $did(1)
set %1.pass $did(2)
set %2.chan $did(3)
set %2.pass $did(4)
set %3.chan $did(5)
set %3.pass $did(6)
}
on *:dialog:ci:sclick:8: {
unset %1.chan $did(1)
unset %1.pass $did(2)
unset %2.chan $did(3)
unset %2.pass $did(4)
unset %3.chan $did(5)
unset %3.pass $did(6)
}
on *:dialog:ci:sclick:9: {
}
on *:dialog:ci:sclick:10: {
set %1.chan $did(1)
set %1.pass $did(2)
chanserv identify %1.chan %1.pass
}
on *:dialog:ci:sclick:11: {
set %2.chan $did(3)
set %2.pass $did(4)
chanserv identify %2.chan %2.pass
}
on *:dialog:ci:sclick:12: {
set %3.chan $did(5)
set %3.pass $did(6)
chanserv identify %3.chan %3.pass
}
on *:connect: {
{ chanserv identify %1.chan %1.pass }
{ chanserv identify %2.chan %2.pass }
{ chanserv identify %3.chan %3.pass }
}
menu * {
-
.Channel Identify:ci
.Channel Identify About:cia
-
}