Think about it, it`s easy, good.....
It`s easy:
News
Future :)
;Made By Fedu`
;Fixed Some Problems :)
; This auto-login was made for the Undernet Servers so on the other servers it may not work.
; You can modify it to work on the other servers but that`s all.
menu menubar, status, channel {
X Auto-Login: /dialog -md AutoLogin AtuoLogin
}
dialog AutoLogin {
title "AutoLogin"
size -1 -1 130 115
option dbu
box "Auto-Login",1,5 2 120 109
box "Auto-Login",13,5 2 120 38,
box "Auto-Login",16,5 2 120 29
button "Auto-Login On",2,10 10 40 10,
button "Auto-Login Off",3,10 20 40 10,
button "Check Status"8,60 15 40 10,
Text "UserName and PassWord",4,10 32 110 10,
button "UserName" ,5,10 42 30 10,
button "PassWord" ,6,50 42 30 10,
button "UserName and PassWord" ,7,10 54 75 10,
Text "Click on ChanServ if you are not on undernet servers. Click on invisible to hide your IP(Mode +X)" 9,10 65 110 20,
button "Login Now" 10,10 87 30 10
button "Invisible" 12,45 87 30 10
button "ChanServ" 14, 80 87 30 10
button "OK", 11, 90 98 30 10, ok
text "By Fedu`",15, 10 100 50 7,
}
on 1:Dialog:AutoLogin:sclick:2: {
/set %auto-login on | /writeini a-log.ini Status AutoLogin On
}
on 1:dialog:AutoLogin:sclick:3: {
/set %Auto-Login off | /writeini a-log.ini Status AutoLogin Off
}
on 1:dialog:AutoLogin:sclick:8: /run a-log.ini
on 1:dialog:AutoLogin:sclick:5: {
/writeini a-log.ini Username UserName $?="Username ?"
}
on 1:dialog:AutoLogin:sclick:6: {
/writeini a-log.ini PassWord PassWord $?="PassWord ?"
}
on 1:dialog:AutoLogin:sclick:7: {
/writeini a-log.ini Username UserName $?="Username ?"
/writeini a-log.ini PassWord PassWord $?="PassWord ?"
}
on 1:dialog:AutoLogin:sclick:10: {
/msg X@Channels.undernet.org login $readini(a-log.ini, username, username) $readini(a-log.ini, password, password)
}
on 1:dialog:AutoLogin:sclick:12: /mode $me +x
on 1:dialog:AutoLogin:sclick:14: /writeini a-log.ini ChanServ ChanServ $?"Enter the chanserv (Ex: X@channels.undernet.org)"
on *:connect: if %auto-login == on { /msg $readini(a-log.ini, ChanServ, ChanServ) login $readini(a-log.ini, Username, Username ) $readini(a-log.ini, Password, Password) }
;*** AutoMode +x ***;
#modex on
on 1:notice:AUTENTIFICARE REUSITA ca *:?:{
if ($nick == X) {
mode $me +x
}
}
on 1:notice:AUTHENTICATION SUCCESSFUL as *:?:{
if ($nick == X) {
mode $me +x
}
}