#心跳包脚本示例

# “netp” 通道连接标志,0-未连接,1-连接成功
connFlag = 0
# “netp” 通道接收到数据的时间
recvTime = 0

# “netp” 通道心跳数据
space = [0x20]
beatData = "heartbeat" + space + "data"

connStr = "netp connected\r\n"

# “netp” 通道连接成功
CONN SOCK netp
	connFlag=1
	recvTime=SYSTIME
	SEND(UART, uart0, connStr)
END

# “socka" 通道断开连接
DISCONN SOCK netp
	connFlag=0
	SEND(UART, uart0, "netp disconnected\r\n")
END

RECV SOCK netp
	recvTime=SYSTIME
	OUTPUT=INPUT
	RETURN(TRUE)
END

TIMER HeartBeat 1000
	t=SYSTIME
	t=t-recvTime
	IF (connFlag == 1)
		IF (t > 30000)
			SEND(SOCK, netp, beatData)
			recvTime=SYSTIME
		END
	END
END