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