Typos Under Cover Connection connects you to a second server using alternate information without messing with your mirc settings. Updated(See below) It also allows temporary disabling of your performs, On *:Connect:'s or Auto-Join Channels for the "Under Cover Connection"
When opened, the script displays a dialog where you set the Full Name, Email Address, Nickname, Alternate Nick, Server and port.
After filling out all the info and selecting whether or not you want the performs, the On *:Connect:'s or the Auto-Join Channel's to be disabled for this connection you just hit connect. The script connects you to the selected server with the alternate credentials that will not affect anything set in mircs options.
Enjoy
Another snippet I made by request that I thought I would share.
Updated
The dialog has been redone to not have a bunch of empty space.
Added two new disable options. Disable On :Connetc:'s and Disable Auto-Join Channels.
Added and edit box to enter the port #.
Made it so the connect button just connects, not closees the dialog too.
Added a close button and made the dialog on the desktop so it can be minimized.
Added a disconnect button.
Made the connect button reuse the server window it already opened if it has opened one yet. If you close the server window it opened and then hit connect in the dialog it will open a new one and associate itself with that.
Made the script run a timer which watches for a ' Connect retry #' or '* Disconnected' notice in the status window its associated with. If it spots one it re sends the special server command that uses the alternate credentials to reconnect. I had to do this because there is no way to make the server window use the alternate credentials when it reconnects or retries a connection.
Please remember, you must leave the dialog open!
Closing the dialog will result in your alternate credentials no longer being stored for use and the timer that watches for disconnections and connection retries will be turned off.
;Begin Typos UnderCover Connection
menu nicklist,channel,status,query {
-
<[Typo's UnderCover Connection]>:dialog $iif($dialog(undercover) == UnderCover,-ev,-mdo) UnderCover UnderCover
-
}
dialog UnderCover {
title "UnderCover Connection"
size -1 -1 91 122
option dbu
button "Connect", 1, 1 99 35 10
edit "", 2, 36 14 55 10, autohs
edit "", 3, 36 24 55 10, autohs
edit "", 4, 36 34 55 10, autohs
edit "", 5, 36 44 55 10, autohs
text "Fill out the temporary info you want to use for the new connection.", 6, 2 0 87 14, center
text "Full Name", 7, 4 16 27 8
text "Email Address", 8, 0 26 35 7
text "Nickname", 9, 4 36 24 8
text "Alternate Nick", 10, 0 46 35 7
edit "IRC.", 11, 5 63 55 10, autohs
text "Server", 12, 23 54 18 8
check "Disable Performs.", 13, 9 73 53 10
check "Disable On *:Connect:'s.", 14, 9 81 73 10
check "Disable Auto-Join Channels.", 15, 9 89 79 10
button "Close", 16, 55 111 35 10, default ok cancel
text "Port", 17, 70 54 11 8
edit "6667", 18, 65 63 20 10, autohs center
button "Disonnect", 19, 1 111 35 10
}
alias filterundercover {
window -h @Undercover
filter -gcsw $+ $iif(%typosundercoverline != $null,r $v1 $+ - $+ $line(Status Window,0)) @Undercover /.+*s(?:Disconnected.*|Connect retry #.+)/i
if ($filtered > 0) {
server - $+ %typosundercoverparam %typosundercovercommand
set %typosundercoverline $line(Status Window,0)
}
window -c @Undercover
}
on *:dialog:UnderCover:sclick:1:{
set %typosundercovercommand $did(11) $did(18) -i $did(4) $did(5) $did(3) $did(2)
if ($did(13).state == 1) { set %typosundercoverparam p }
if ($did(14).state == 1) { set %typosundercoverparam %typosundercoverparam $+ c }
if ($did(15).state == 1) { set %typosundercoverparam %typosundercoverparam $+ o }
set %typosundercovercommand $did(11) $did(18) -i $did(4) $did(5) $did(3) $did(2)
if (%typosundercovercid != $null) && ($scid(%typosundercovercid) == %typosundercovercid) { scid $v2 server - $+ %typosundercoverparam %typosundercovercommand }
else { server -m $+ %typosundercoverparam %typosundercovercommand }
if (%typosundercovercid == $null) || ($scid(%typosundercovercid) != %typosundercovercid) { set %typosundercovercid $activecid }
.timertyposundercover -om 0 75 $iif($scid(%typosundercovercid) == %typosundercovercid,scid $v2 filterundercover)
}
on *:dialog:UnderCover:sclick:19:{ if (%typosundercovercid != $null) { scid $v1 disconnect | .timertyposundercover off } }
on *:dialog:undercover:close:0:{
unset %typosundercover*
.timertyposundercover off
}
;End Typos UnderCover Connection
Ok i ll make this fast since its 5:09 AM ;x.Looks alot better then the first especially the lay out of it maybe the letter are a lil to close to the edge and the edit fields as well (small stuff).I did notice how ever that if yo uleft the fields black an pushed connect it tried to connect to IRC. should prolly dumby proof it lol.Also maybe at LEAST a server saver to save the servers you been to the other info doesnt matter its temp.Everything else seems to work just fine connects to the server specified with the info specified and is alot more user friendly then openin the mIRC options everytime you wan to change into.I think a few ppl will like this an thin its useful.\"Rate it or Hate it?\"...7/10.Another nice update Typo ;p.`-.-´