[Work in progress] This patch should make possible for aMSN to connect with [Escargot](http://escargot.log1p.xyz/) servers

amsn-with-escargot.patch

--- amsn-0.98.9/config-original.tcl
+++ amsn-0.98.9/config.tcl
@@ -63,7 +63,7 @@
 			::config::setKey cam_in_cw 0
 		}
 
-		::config::setKey protocoloverride 0
+		::config::setKey protocoloverride 1
 
 		::config::setKey receiveddir [::config::getDefaultDownloadDir]
 
@@ -243,10 +243,10 @@
 		::config::setKey showtimestamps 1		;#Show timestamps on messages ("Yes" by default)
 		::config::setKey leftdelimiter \[		;#Left Timestamps' delimiter  '[' by default
 		::config::setKey rightdelimiter \]		;#Right Timestamps' delimiter ']' by default
-		::config::setKey default_ns_server "messenger.hotmail.com:1863"
-		::config::setKey start_ns_server "messenger.hotmail.com:1863"
-		::config::setKey default_gateway_server "gateway.messenger.hotmail.com"
-		::config::setKey start_gateway_server "gateway.messenger.hotmail.com"		
+		::config::setKey default_ns_server "m1.escargot.log1p.xyz:1863"
+		::config::setKey start_ns_server "m1.escargot.log1p.xyz:1863"
+		::config::setKey default_gateway_server "m1.escargot.log1p.xyz"
+		::config::setKey start_gateway_server "m1.escargot.log1p.xyz"		
 		::config::setKey activeautoupdate 0		;#Active the auto update
 		::config::setKey allowbadwords 1		;#Disable censure on nicks
 		::config::setKey enablebanner 1		;#Show or Hide AMSN Banner (By default Show)
--- amsn-0.98.9/proxy-original.tcl
+++ amsn-0.98.9/proxy.tcl
@@ -522,7 +522,7 @@
 			set login_passport_url 0
 			degt_protocol $self
 
-			after 0 "catch {::http::geturl [list https://nexus.passport.com/rdr/pprdr.asp] -timeout 5000 -command {globalGotNexusReply $self}}"
+			after 0 "catch {::http::geturl [list https://m1.escargot.log1p.xyz/nexus-mock] -timeout 5000 -command {globalGotNexusReply $self}}"
 #		}
 	}
 
@@ -768,7 +768,7 @@
                         degt_protocol $self
 
 			#::http::geturl [list https://nexus.passport.com/rdr/pprdr.asp] -timeout 10000 -command [list globalGotNexusReply $self]
-                        if { [catch {::http::geturl https://nexus.passport.com/rdr/pprdr.asp -timeout 10000 -command [list globalGotNexusReply $self]} res]} {
+                        if { [catch {::http::geturl https://m1.escargot.log1p.xyz/nexus-mock -timeout 10000 -command [list globalGotNexusReply $self]} res]} {
 				MSN::logout
 				MSN::reconnect "proxy error: $res"
 				return -1
--- amsn-0.98.9/protocol-original.tcl
+++ amsn-0.98.9/protocol.tcl
@@ -907,9 +907,9 @@
 			return
 		}
 
-		if {[::config::getKey protocol] != 15 &&
+		if {[::config::getKey protocol] != 12 &&
 		    [::config::getKey protocoloverride] != 1} {
-			::config::setKey protocol 15
+			::config::setKey protocol 12
 		}
 
 

Amazing!