B4R::Array* rJson::getArray(B4R::B4RString* key,B4R::Object* o)
{
JsonArray data = obj[(char*)key->data].as<JsonArray>();
B4R::Array* arr = (B4R::Array*)o->data.PointerField;
double d[(int)arr->length];
int a = 0;
for(JsonVariant v : data) {
d[a++] = v.as<double>();
::Serial.printf("%3.6f \r\n",d[a-1]);
}
arr->wrap(d,(unsigned int)2);
o = (B4R::Object*)arr;
return arr;
}