易语言TCP沾包拆包

一般我就说自己用ETCP，或者Hpsocket 自带的配套模式。但有些人就是不想用，只能写个例子给他。
只是简单例子，如果有什么不妥当的地方，欢迎修改。
使用的通讯组件为易语言自带的客户端组件和服务端组件，测试沾包模式，可以自己看到，包沾到一起了，需要自己拆开使用。