Private Sub AppStart
Serial1.Initialize(115200)
mtimer.Initialize("mtimer_Tick",1000)
mtimer.Enabled=True
Log("AppStart")
'Connecting to WIFI Router
'mywifi.Connect2("XXX","XXX")
mywifi.Connect2("XXX","XXX")
If mywifi.IsConnected Then
Log("Router Connected!!")
Else
Log("Not able to connect Router!!")
Return
End If
mqttclient.Initialize(client.Stream,Array As Byte(148,xxx,xxx,xxx),1883,"esp","Mqtt_MessageArrived", "Mqtt_Disconnected")