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")