to_lua

function to_lua($data, $forHTML = false, $layer = "") {
      $space = $layer."    ";
      if ($forHTML) {
        $lua_table = $layer."{<br/>";
      }
      else {
        $lua_table = "{";
        $space = "";
      }

      foreach ($data as $index => $value) {
            if ($forHTML) {
                $lua_table .= $space.(is_numeric($index) ? "[$index] = " : "[\"$index\"] = ");
            }
            else {
                $lua_table .= (is_numeric($index) ? "[".$index."]=" : "[\"".$index."\"]=");
            }
            if (is_array($value) or is_object($value)) {
              $lua_table .= to_lua($value, $forHTML, $space);
            }
            elseif (is_bool($value)) {
              $lua_table .= ($value ? "true" : "false");
            }
            elseif (is_numeric($value)) {
              $lua_table .= $value;
            }
            else {
              $lua_table .= "\"".$value."\"";
            }
            $lua_table .= ",";
            if ($forHTML) {
                $lua_table .= "<br/>";
            }
      }
      $lua_table .= $layer."}";
      return $lua_table;
}