string JSON_TYP(string type)
{
    if (type == JSON_INVALID) { return "invalid"; }
    if (type == JSON_OBJECT) { return "object"; }
    if (type == JSON_ARRAY) { return "array"; }
    if (type == JSON_NUMBER) { return "number"; }
    if (type == JSON_STRING) { return "string"; }
    if (type == JSON_NULL) { return "null"; }
    if (type == JSON_TRUE) { return "true"; }
    if (type == JSON_FALSE) { return "false"; }
    if (type == JSON_DELETE) { return "delete"; }
    return "error";
}
default
{
    state_entry()
    {
        list TEST = [
        "moduletype", <1,1,1>, //Dieses JSON-Objekt ist eine 'Strided'- Liste aus Name/Wert- Paaren (Name: "moduletype", Wert: <1,1,1>)
        "tier", "bla", //(Name: "tier", Wert: "bla")
        "shield", 3.0 //(Name: "shield", Wert: 3.0)
        ];
        string JSON = llList2Json(JSON_OBJECT, TEST); //Mit llList2Json wird der JSON-String erzeugt.
        
        vector EintragMODULETYPE = (vector)llJsonGetValue(JSON, ["moduletype"]); //mit llJsonGetValue liest man die Werte wieder aus, unter Angabe des Namens (hier: "moduletype").
        llOwnerSay("EintragMODULETYPE = " + (string)EintragMODULETYPE);
        llOwnerSay("EintragMODULETYPE Datentyp = " + JSON_TYP(llJsonValueType(JSON, ["moduletype"]))); //llJsonValueType gibt den Datentyp der jeweiligen JSON-Elemente an

        string EintragTIER = llJsonGetValue(JSON, ["tier"]);
        llOwnerSay("EintragTIER = " + (string)EintragTIER);
        llOwnerSay("EintragTIER Datentyp = " + JSON_TYP(llJsonValueType(JSON, ["tier"])));

        float EintragSHIELD = (float)llJsonGetValue(JSON, ["shield"]);
        llOwnerSay("EintragSHIELD = " + (string)EintragSHIELD);
        llOwnerSay("EintragSHIELD Datentyp = " + JSON_TYP(llJsonValueType(JSON, ["shield"])));
    }
}