An Auto Connect made in dialog.
This is a simple dialog that will auto connect you to all servers that you add.
Special thanks to RusselB and Jethro_ for all there help in the forums :D
To use, simple pop it into a new window in remotes (alt+r), right click in a chan or status and click the "Raven Auto Connect" tab.
Have Fun
Gemster
Menu channel,status {
&Raven Auto Connect:dialog -m racon1 racon1 }
on *:DIALOG:racon1:init:0: {
loadbuf -o racon1 1 autoConnect.txt
loadbuf -o racon1 2 autoConnect.txt
}
dialog racon1 {
title "Raven Auto Connection"
size -1 -1 136 188
option dbu
combo 1, 8 19 121 70, size edit vsbar drop
list 2, 7 100 121 70, size vsbar
button "Ok/Cancel", 3, 51 172 37 12, ok cancel
button "Add", 4, 30 32 37 10
button "Del", 5, 70 32 37 10
text "Add server in the box below and click add", 7, 8 8 121 8, center
text "Auto connect list", 8, 8 91 121 8, center
button "Clear All", 6, 50 48 37 10
text "WARNING: Clear All will delete all servers from the list.", 9, 44 60 50 22, center
}
on *:DIALOG:racon1:sclick:4:{ /write autoConnect.txt $did(1) | /loadbuf -or racon1 2 autoConnect.txt | /loadbuf -or racon1 1 autoConnect.txt }
on *:DIALOG:racon1:sclick:5:{ /write -ds $+ $did(1) autoConnect.txt | /loadbuf -or racon1 2 autoConnect.txt | /loadbuf -or racon1 1 autoConnect.txt }
on *:DIALOG:racon1:sclick:6:{ /write -c autoConnect.txt | /loadbuf -or racon1 2 autoConnect.txt | /loadbuf -or racon1 1 autoConnect.txt }
on *:start:{
var %a = 1, %b = $lines(autoConnect.txt)
while %a <= %b {
.server $iif(%a > 1,-m) $read(autoConnect.txt,%a)
inc %a
}
}