Dim p As JSONParser
ToastMessageShow(data, False)
p.Initialize(data) '(File.ReadString(File.DirAssets, "1.txt"))
Dim list1 As List
list1.Initialize
list1 = p.NextArray <<<<<<<<<<<<<<<<<<<< error here
Dim map1 As Map
map1 = list1.Get(0)
Log(map1)
'Dim data As String
data = map1.Get("$DEVICENAME$")
ToastMessageShow(data, False)