diff --git a/.Floppies/A2OSX.BUILD.po b/.Floppies/A2OSX.BUILD.po
index 9e14b66f..ed61063a 100644
Binary files a/.Floppies/A2OSX.BUILD.po and b/.Floppies/A2OSX.BUILD.po differ
diff --git a/.Floppies/A2OSX.SRC.po b/.Floppies/A2OSX.SRC.po
index e28d96cd..a356700e 100644
Binary files a/.Floppies/A2OSX.SRC.po and b/.Floppies/A2OSX.SRC.po differ
diff --git a/LIB/LIBTCPIP.S.SKT.txt b/LIB/LIBTCPIP.S.SKT.txt
index 3bdc1d9a..1ba37c3d 100644
--- a/LIB/LIBTCPIP.S.SKT.txt
+++ b/LIB/LIBTCPIP.S.SKT.txt
@@ -6,7 +6,7 @@ AUTO 4,1
 * # SKT.Socket
 * Create a new socket
 * ## C
-* `hSOCKET socket(int type, int protocol);`
+* `hSOCKET socket(short int type, int protocol);`
 * ## ASM
 * **In:**
 * `>PUSHW protocol`
@@ -16,6 +16,27 @@ AUTO 4,1
 * CC: A = hSOCKET
 * CS: A = EC
 *\--------------------------------------
+SKT.Socket		pha
+				>PULLW TmpDWord			save protocol
+				
+				plx
+				jmp (J.SKT.Socket,x)
+				
+SKT.Socket.RAW
+SKT.Socket.DGRAM
+				ldy #S.FD.SSOCK+S.SOCKET
+				.HS 2C					BIT ABS
+SKT.Socket.STREAM
+SKT.Socket.SEQPACKET
+				ldy #S.FD.SSOCK+S.SOCKET+S.TCB
+				lda #0
+				>SYSCALL GetMemPtr
+				bcs .9
+				>STYA ZPPtrSKT
+				
+				
+				
+.9				rts				
 */--------------------------------------
 * # SKT.bind
 * Create a new socket
@@ -75,6 +96,7 @@ SKT.connect.SEQPACKET
 * CC: A = hSOCKET
 * CS: A = EC
 *\--------------------------------------
+SKT.listen
 */--------------------------------------
 * # SKT.New
 * Create a new socket
diff --git a/LIB/LIBTCPIP.S.txt b/LIB/LIBTCPIP.S.txt
index e1f28606..051a5b86 100644
--- a/LIB/LIBTCPIP.S.txt
+++ b/LIB/LIBTCPIP.S.txt
@@ -124,6 +124,10 @@ J.TCP.IN		.DA TCP.IN.JMP.CLOSED
 				.DA TCP.IN.JMP.FINWT2
 				.DA TCP.IN.JMP.CLOSING
 				.DA TCP.IN.JMP.TIMEWT
+J.SKT.Socket	.DA SKT.Socket.RAW
+				.DA SKT.Socket.DGRAM
+				.DA SKT.Socket.STREAM
+				.DA SKT.Socket.SEQPACKET
 J.SKT.connect	.DA SKT.connect.RAW
 				.DA SKT.connect.DGRAM
 				.DA SKT.connect.STREAM