GE Lua Documentation

  --   --   --if it's not in either table, it's forbidden and we abort parsing
  --   s = s:sub(1, (s:find("%.") or (s:len() + 1)) - 1)
  --   if not (customElectricsEnv[s] or keyworkdWhiteListLookup[s]) then

    if out.pidvid then
      out.pid = out.pidvid:sub(1, 4)
      out.vid = out.pidvid:sub(5, 8)

      out.pid = out.pidvid:sub(1, 4)
      out.vid = out.pidvid:sub(5, 8)
    end

      if info.vendorName then
        if string.lower(string.sub(name, 1, string.len(info.vendorName))) == string.lower(info.vendorName) then
          name = string.sub(name, string.len(info.vendorName) + 1)

        if string.lower(string.sub(name, 1, string.len(info.vendorName))) == string.lower(info.vendorName) then
          name = string.sub(name, string.len(info.vendorName) + 1)
          name = name:gsub("^%s+", "") -- strip whitespaces

  if levelPath:find('main.level.json') and not FS:fileExists(levelPath) then
    local newName = levelPath:sub(0, levelPath:find('main.level.json') - 1)
    if FS:directoryExists(newName) then

  campaign.previews = {
    imageExistsDefault(campaign.sourcePath..'/'..campaign.sourcePath:sub(index)..'.jpg')
  }

    if not pos2 then
      im.Text(label:sub(pos1))
      break

    elseif pos1 < pos2 then
      im.Text(label:sub(pos1, pos2 - 1))
      im.SameLine()

    local pos3 = pos2 + highlightLowerLen
    im.TextColored(matchColor, label:sub(pos2, pos3))
    im.SameLine()

    if match:find(t..": ") ~= nil then
      return t, string.sub(match, #t+3)
    end

    if match:find(t..":") ~= nil then
      return t, string.sub(match, #t+2)
    end

    if string.startswith(path, "/vehicles/") and not string.startswith(path, "/vehicles/mod_info") then
    vehicles[string.sub(path, 20)] = 1
    end

      local tmp = e:gsub(filename, "")
      if tmp:sub(1,1) ~= "/" then tmp = "/"..tmp end
      filesInZIP[#filesInZIP+1] = tmp

                local needManualAction = true
                if string.sub(oldFilepath,1,11) == "/mods/repo/" then
                  zip:close()

    local path, filename, ext = path.split(v)
    local infofile = path .. string.sub(filename, 0, -string.len(ext)-2) .. '.json'
    local data = jsonReadFile(infofile)

      local tmp = e:gsub(mods[modname].unpackedPath, "")
      if tmp:sub(1,1) ~= "/" then tmp = "/"..tmp end
      mountedFilesChange[i] = {filename = tmp, type = reason }

    if zipPath:startswith(mods[modname].unpackedPath) then
      zipPath = string.sub(zipPath, string.len(mods[modname].unpackedPath) + 1)
      if string.startswith(zipPath, '/') then

      if string.startswith(zipPath, '/') then
        zipPath = string.sub(zipPath, 2)
      end

  if string.startswith(realPath, userPath) then
    local modPath = realPath:sub(string.len(userPath))
    modPath = modPath:gsub("\\", "/")

    if zipPos then
      modPath = modPath:sub(1, zipPos + 3)
    else

  if slashPos then
    nameString = nameString:sub(slashPos + 1)
  end

                                    local stringend = ", "
                                    txtstring = string.sub(txtstring, 1, #txtstring - #stringend)
                                  end

        local _, file, _ = path.split(filePath)
        local fileName = file:sub(1, -5)
        if not factoryBlackList[fileName] then

        local v = deviceJbeamData[device.name][k]
        if k:sub(1, 12) == "deformGroups" then --check for magic prefix
          local delim = "_" --underscore is used as the delim (eg "deformGroups_turbo")

    if note_field_freeform ~= rallyUtil.autofill_blocker then
      local last_char = note_field_freeform:sub(-1)
      if note_field_freeform == '' then

    -- Get the last character of the note
    local lastChar = note:sub(-1)

    if rallyUtil.hasPunctuation(lastChar) then
      note = string.sub(note, 1, -2)
      lastChar = note:sub(-1)

      note = string.sub(note, 1, -2)
      lastChar = note:sub(-1)
    end

    local filename = filepath:match("[^/]*.lua$")
    local name = filename:sub(0, #filename - 4)
    local enabled = false

  return laneConfig:sub(1, leftIdx-1), laneConfig:sub(leftIdx, rightIdx), laneConfig:sub(rightIdx+1, numOfLanes)
end

  return laneConfig:sub(1, leftIdx-1), laneConfig:sub(leftIdx, rightIdx), laneConfig:sub(rightIdx+1, numOfLanes)
end

  return laneConfig:sub(1, leftIdx-1), laneConfig:sub(leftIdx, rightIdx), laneConfig:sub(rightIdx+1, numOfLanes)
end

                local i = string.find(k, '\0')
                local n1id = string.sub(k, 1, i-1)
                local sqDist = positions[n1id]:squaredDistance(ego.pos)

                  target = n1id
                  targetLink = string.sub(k, i+1, #k)
                end

      end
      local relPath = filepath:sub(#modDir + #modname + 2)
      table.insert(mods[modname].files, relPath)

    for _, fileName in pairs(self.files) do
      local fnShort = string.sub(fileName, string.len(trackFilePath) + 1)
      fnShort = string.sub(fnShort, 1, string.len(fnShort) - string.len(trackFileExt))

      local fnShort = string.sub(fileName, string.len(trackFilePath) + 1)
      fnShort = string.sub(fnShort, 1, string.len(fnShort) - string.len(trackFileExt))
      if im.Selectable1(fnShort, fnShort==self.fnShort) then

  if self.fileName and self.fileName ~= "" then
    local fnShort = string.sub(self.fileName, string.len(trackFilePath) + 1)
    self.fnShort = string.sub(fnShort, 1, string.len(fnShort) - string.len(trackFileExt))

    local fnShort = string.sub(self.fileName, string.len(trackFilePath) + 1)
    self.fnShort = string.sub(fnShort, 1, string.len(fnShort) - string.len(trackFileExt))
  end

      local start = math.max(1, i - 2)
      table.insert(parts, 1, integerPart:sub(start, i))
    end

    -- Validate event name format: must start with lowercase and be camelCase
    local firstChar = event.name:sub(1, 1)
    if firstChar:upper() == firstChar then

    local switchOrder = {"right", "front", "left", "back"}
    local startsWithTop = string.sub(orthographicView, 1, 3) == "top"

      if startsWithTop and y == -1 then
        local view = string.sub(orthographicView, 4)
        M.setOrthographicView(view)

    local _, fn, e = path.split(file)
    local name = fn:sub(1, #fn - #e - 1)
    local read = loadJSON(name)

    local _, fn, e = path.split(file)
    previews[i] = fn:sub(1, #fn - #e - 1)
  end

    local _, fn, e = path.split(file)
    previews[i] = fn:sub(1, #fn - #e - 1)
  end

  end
  if string.sub(args.level, string.len(args.level)) ~= "/" then
    args.level = args.level .. "/"

  local i = string.find(id, delim)
  return string.sub(id, 1, i-1), string.sub(id, i+1, #id)
end

  local i = string.find(id, delim)
  return string.sub(id, 1, i-1), string.sub(id, i+1, #id)
end

      if arg1:startswith('beamng:') then
        onSchemeCommand(arg1:sub(8), true) -- strip 'beamng:'
        break

  for k, v in pairs(jbeamData) do
    if k:sub(1, #"configuration_") == "configuration_" then
      tableMergeRecursive(configData, v)

    local anchorName = anchorNames[i]
    if anchorName:sub(1, 9) == anchorPrefixStrWithDot then
      table.clear(tmpParts) -- Clear the reusable table.

    local infend = si + 6
    if sub(s, si, infend) == "1#INF00" then
      return math.huge, infend + 1

      local pm = byte(s, si - 1)
      jsonError(string.format("Invalid number: '%s'", sub(s, si - ((pm == 45 or pm == 43) and 1 or 0), infend)), si)
    end

    end
    r = tonumber(sub(s, si, i - 1))
    if r == nil then

      local pm = byte(s, si - 1)
      jsonError(string.format("Invalid number: '%s'", sub(s, si - ((pm == 45 or pm == 43) and 1 or 0), i-1)), si)
    end

  if ch == 34 then -- "
    return sub(s, si1, i - 2), i
  end

    i = i - 1
    key = sub(s, si, i)

              table.insert(allFiles,{
                name = string.sub(filename,1,-11),
                file = f

          local fn_short = string.sub(filename, string.len(trackFilePath) + 1)
          fn_short = string.sub(fn_short, 1, string.len(fn_short) - string.len(trackFileExt))

          local fn_short = string.sub(filename, string.len(trackFilePath) + 1)
          fn_short = string.sub(fn_short, 1, string.len(fn_short) - string.len(trackFileExt))
          if im.Button(fn_short) then

      for _, substate in pairs(item.substates) do
        if string.sub(M.state.currentUIState, 1, #substate) == substate then
          M.state.activeItem = item.id

  -- -- remove leading slash from state
  -- if type(state) == "string" and string.sub(state, 1, 1) == "/" then
  --   state = string.sub(state, 2)

  -- if type(state) == "string" and string.sub(state, 1, 1) == "/" then
  --   state = string.sub(state, 2)
  -- end

  -- -- TODO: popup check is a hack for now. maybe we can check popup state from lua instead
  -- if not opened or M.state.currentUIState == state or (type(state) == "string" and string.sub(state, 1, 5) == "popup") then
  --   return

  local state = gearStateLookup[string.sub(electrics.values.gear or "", 1, 1)] or 0
  if electrics.values.ignitionLevel <= 0 then

  end
  return decoded,fin,opcode,encoded_bak:sub(bytes+1),mask
end

    if #data > 2 then
      reason = data:sub(3)
    end

    modePrefix = "S"
  elseif string.sub(automaticHandling.mode, 1, 1) == "M" then
    modePrefix = "M"

  local manualModeIndex
  if string.sub(automaticHandling.mode, 1, 1) == "M" then
    manualModeIndex = string.sub(automaticHandling.mode, 2)

  if string.sub(automaticHandling.mode, 1, 1) == "M" then
    manualModeIndex = string.sub(automaticHandling.mode, 2)
  end

  for i = 1, modeCount do
    local mode = modes:sub(i, i)
    if automaticHandling.availableModeLookup[mode] then

    if string.startswith(data, 'beamng:') then
        commandhandler.onSchemeCommand(data:sub(8))
    end

                console.warn( 'THREE.Vector2: .sub() now only accepts one argument. Use .subVectors( a, b ) instead.' );
                return this.subVectors( v, w );

                console.warn( 'THREE.Vector3: .sub() now only accepts one argument. Use .subVectors( a, b ) instead.' );
                return this.subVectors( v, w );

                return this.sub( v1 );

                return this.sub( v1.copy( normal ).multiplyScalar( 2 * this.dot( normal ) ) );

                console.warn( 'THREE.Vector4: .sub() now only accepts one argument. Use .subVectors( a, b ) instead.' );
                return this.subVectors( v, w );

                this.min.copy( center ).sub( halfSize );
                this.max.copy( center ).add( halfSize );

            this.min.sub( vector );
            this.max.add( vector );

                var clampedPoint = v1.copy( point ).clamp( this.min, this.max );
                return clampedPoint.sub( point ).length();

                target.sub( this.center ).normalize();
                target.multiplyScalar( this.radius ).add( this.center );

            this.direction.copy( v ).sub( this.origin ).normalize();

                segCenter.copy( v0 ).add( v1 ).multiplyScalar( 0.5 );
                segDir.copy( v1 ).sub( v0 ).normalize();
                diff.copy( this.origin ).sub( segCenter );

                segDir.copy( v1 ).sub( v0 ).normalize();
                diff.copy( this.origin ).sub( segCenter );

                    vector3.setFromMatrixPosition( light.target.matrixWorld );
                    uniforms.direction.sub( vector3 );
                    uniforms.direction.transformDirection( viewMatrix );

                    vector3.setFromMatrixPosition( light.target.matrixWorld );
                    uniforms.direction.sub( vector3 );
                    uniforms.direction.transformDirection( viewMatrix );

            var vec = pt2.clone().sub( pt1 );
            return vec.normalize();

            point.copy( this.v2 ).sub( this.v1 );
            point.multiplyScalar( t ).add( this.v1 );

        var tangent = this.v2.clone().sub( this.v1 );

            point.copy( this.v2 ).sub( this.v1 );
            point.multiplyScalar( t ).add( this.v1 );

                this.ray.origin.setFromMatrixPosition( camera.matrixWorld );
                this.ray.direction.set( coords.x, coords.y, 0.5 ).unproject( camera ).sub( this.ray.origin ).normalize();

                var halfSize = v1.copy( size ).multiplyScalar( 0.5 );
                this.min.copy( center ).sub( halfSize );
                this.max.copy( center ).add( halfSize );

            this.min.sub( vector );
            this.max.add( vector );

                var clampedPoint = v1.copy( point ).clamp( this.min, this.max );
                return clampedPoint.sub( point ).length();

            this.cone.lookAt( vector2.sub( vector ) );

        if key ~= "fieldName" and string.startswith(key, "fieldName") then
          table.insert(ret, {label = string.sub(key, 10), fieldName = elem[key], elemLabel = elem.label})
        end

    local _, fn, ext = path.split(room.file, true)
    local name = generateObjectNameForClass('Prefab', string.format("%s - %d - ", string.sub(fn, 1, string.len(fn) - string.len(ext)-1), i))
    local scenetreeObject = spawnPrefab(name , self.mgr.savedDir .. room.file, "0 0 0", "0 0 1 0", "1 1 1", false)

    local dir, filename, ext = path.split(files[i])
    local fileNameNoExt = string.sub(filename, 1, -6)
    local inventoryId = tonumber(fileNameNoExt)

    for _, wp in ipairs(scenario.lapConfig) do
      if wp:sub(1,12) ~= '__generated_' then -- only process non-generated WPs
        if scenario.nodes[wp] == nil then

      if type(entry) == 'string' then
        if not tableContains(triggers, entry) and not tableContains(waypoints, entry) and entry:sub(1,12) ~= '__generated_' then
          log('E', logTag, 'Lapconfig entry is Invalid! It should be either a Trigger or Waypoint: '..entry)

    --log('D', logTag, "got '" .. tostring(data) .. "' from "..tostring(ip) .. ":" .. tostring(listenPort))
    if(data:sub(0, 6) == 'beamng') then -- new device trying to connect
      local args = split(data, '|')

function Pcd:addField(name, size, type)
  type = string.sub(type, 1, 1):upper()
  local n = #self.fields + 1

local function reInitOnFileChange(filename)
  local requireFilename = string.sub(filename, 1, string.len(filename) - 4)
  log("I","flowgraphManager","Reloading Node: " .. tostring(requireFilename))

  -- check basic nodes
  if filename:sub(1, string.len(nodePath)) == nodePath then
    reInitOnFileChange(filename)

  -- check custom nodes
  if filename:sub(string.len(filename)-7,string.len(filename)) == 'Node.lua' then
    for _,manager in ipairs(managers) do

      local dirname, fn, e = path.split(filename)
      local path = dirname:sub(string.len(nodePath) + 1)
      local pathArgs = split(path, '/')

      end
      local moduleName = string.sub(fn, 1, string.len(fn) - 4)
      local requireFilename = string.sub(filename, 1, string.len(filename) - 4)

      local moduleName = string.sub(fn, 1, string.len(fn) - 4)
      local requireFilename = string.sub(filename, 1, string.len(filename) - 4)

      local dirname, fn, e = path.splitWithoutExt(filename, true)
      local path = dirname:sub(string.len(stateTemplatePath) + 1)
      if path ~= "" then

        local moduleName = fn
        --local requireFilename = string.sub(filename, 1, string.len(filename) - 4)
        local stateData = {}

local function handleMSModes(desiredMode)
  local firstLetter = desiredMode:sub(1, 1)
  if firstLetter == "S" then

  elseif firstLetter == "M" then
    local gearIndex = desiredMode:sub(2, desiredMode:len())
    desiredMode = "M"

      --get the base this mode relates to
      local modeBaseName = impulseMode.modeName:sub(1, modeNameLength - 1)
      --we need to actually have the base mode for this to work

  while s <= #str do
    while str:sub(e, e) ~= "," and e <= #str do
      e = e + 1

    end
    wps[i] = str:sub(s, e - 1)
    e = e + 1

      scenarioData.sourceFile = scenarioFilename
      scenarioData.official = isOfficialContentVPath(string.sub(scenarioFilename, 0))
      scenarioData.levelName = string.gsub(scenarioFilename, "(.*/)(.*)/scenarios/(.*)%.json", "%2")

        if string.startswith(p, scenarioData.directory) then
          local imageFilename = string.sub(p, string.len(scenarioData.directory) + 2, string.len(p) - 4)
          local foundClash = false

  im.Text("Activity: "..(self.mgr.activity and "yes" or "no"))
  im.TextColored(self.mgr.activity and colorEnabled or colorDisabled, self.mgr.activity and ("..."..self.mgr.activity.id:sub(-15)) or "(standalone)")
end

  for _, file in ipairs(files) do
    local aConds = require(file:sub(0, -5))

    if particleDataName then
      stringList = stringList:sub(last+1)
      local particleData = scenetree.findObject(particleDataName)

    if particleDataName then
      stringList = stringList:sub(last+1)
    else

  local first, last, _ = string.find(particles, "(" .. particle:getName() .. ")")
  local newParticles = string.sub(particles, 1, first-1)
  newParticles = newParticles .. string.sub(particles, last+1)

  local newParticles = string.sub(particles, 1, first-1)
  newParticles = newParticles .. string.sub(particles, last+1)
  newParticles = cleanTabs(newParticles)

  for j=1,#msg,64 do
    local chunk = msg:sub(j,j+63)
    assert(#chunk==64,#chunk)

  end
  if string.sub(args.level, string.len(args.level)) ~= '/' then args.level = args.level .. '/' end -- make sure there is always a trailing slash in the level

    if string.startswith(actionName, prefix) then
      actionName = string.sub(actionName, 1+string.len(prefix))
    else

    end
    r = tonumber(sub(s, seridx + 1, i - 1))
  end

  seridx = strs + strlen
  return sub(s, strs, seridx-1), byte(s, seridx), seridx
end

  local dir = vdata.vehicleDirectory
  if string.sub(dir, -1) ~= '/' then dir = dir .. '/' end

  __index = function(tbl, key)
    local val = varWrapper.vars['$' .. key:sub(5)]
    if type(val) == "table" then return val.val else return val end

  --strip leading "$=" from expression and replace all occurences of "$" with "_" (as these are used for lua variable names)
  expr = expr:sub(3):gsub('%$', 'var_')

  --strip leading "$=" from expression and replace all occurences of "$" with "_" (as these are used for lua variable names)
  expr = expr:sub(3):gsub('%$', 'var_')

    __index = function(tbl, key)
      local val = varWrapper.vars['$' .. key:sub(5)]
      if type(val) == "table" then return val.val else return val end

  --strip leading "$=" from expression and replace all occurences of "$" with "_" (as these are used for lua variable names)
  expr = expr:sub(3):gsub('%$', 'var_')

  for _, file in ipairs(files) do
    local aConds = require(file:sub(0,-5))

    local dir, fileName, fileExt = path.split(decalColorTexturePath)
    name = string.sub(fileName, 1, #fileName - (#fileExt + 1))
  end

    local _, siteName = path.split(site)
    if name == string.sub(siteName, 0, -12) then
      return site

  for i = 1, #col do
    local char = col:sub(i, i):byte()
    if char < 65 or char > 90 then

    if attributeName:endswith("Reputation") then
      local orgId = attributeName:sub(1, -11)
      career_career.interactWithOrganization(orgId)

local function _isTextureCookerFilepath(filepath)
  if not string.sub(filepath, -4) == ".png" then return false end
  return string.match(filepath, "%.color%.png$") or string.match(filepath, "%.normal%.png$") or string.match(filepath, "%.data%.png$")

  if not FS:fileExists(filepath) then
    if filepath:sub(1, 1) == '@' then
      local filepathIn = filepath

    elseif _isTextureCookerFilepath(filepath) then
      filepath = string.sub(filepath, 1, -5) .. ".dds"
    else

  local dir, filename, ext = path.splitWithoutExt(filepath)
  if filename:endswith(".dds") then filename = filename:sub(1, -5) end

		end)
		return string.sub(s, 2)
	end

	lo('?? for_file:'..fname) --..':'..tostring(#data)..':'..#v..':'..jdata)
	fout:write(string.sub(jdata, 2, #jdata-1))
	fout:close()

--					if #atkn == 2 then
			local scorner = string.sub(dobj.dae,1,ind-1)..'_Sco_'..string.sub(dobj.dae,ind+4)
				lo('?? if_SC:'..scorner..':'..tostring(ddae[scorner]))

--					if #atkn == 2 then
			local scorner = string.sub(dobj.dae,1,ind-1)..'_Sco_'..string.sub(dobj.dae,ind+4)
				lo('?? if_SC:'..scorner..':'..tostring(ddae[scorner]))

	jdata = jdata:gsub('},{', '}\r\n{')
	outputFile:write(string.sub(jdata, 2, #jdata-1))
		lo('?? jDATA:'..#list,true) --..':'..dirname..'/items.level.json'..':'..jdata, true)

			local outputFile = io.open(dname..fname, "w")
			outputFile:write(cnt..'\r\n'..string.sub(jdata, 2, #jdata-1))
			outputFile:close()

      local dir, _, _ = path.split(file)
      local spotId = level .."/".. string.sub(dir, #levelSpotsDir+1, -2)
      -- main data

    return ColorF(v.r / 255, v.g / 255, v.b / 255, v.a / 255)
  elseif type(v) == 'string' and string.len(v) > 7 and v:sub(1,1) == '#' then
    v = v:gsub("#","")

    v = v:gsub("#","")
    return ColorF(tonumber("0x"..v:sub(1,2)) / 255, tonumber("0x"..v:sub(3,4)) / 255, tonumber("0x"..v:sub(5,6)) / 255, tonumber("0x"..v:sub(7,8)) / 255)
  end

    v = v:gsub("#","")
    return ColorF(tonumber("0x"..v:sub(1,2)) / 255, tonumber("0x"..v:sub(3,4)) / 255, tonumber("0x"..v:sub(5,6)) / 255, tonumber("0x"..v:sub(7,8)) / 255)
  end

    v = v:gsub("#","")
    return ColorF(tonumber("0x"..v:sub(1,2)) / 255, tonumber("0x"..v:sub(3,4)) / 255, tonumber("0x"..v:sub(5,6)) / 255, tonumber("0x"..v:sub(7,8)) / 255)
  end

    v = v:gsub("#","")
    return ColorF(tonumber("0x"..v:sub(1,2)) / 255, tonumber("0x"..v:sub(3,4)) / 255, tonumber("0x"..v:sub(5,6)) / 255, tonumber("0x"..v:sub(7,8)) / 255)
  end

  if tostring(slashed[1]):len() > 4096 then
    logs[logsTail] = {t,lvl,origin,tostring(slashed[1]):sub(1,4096)} --trim so we save memory and don't stress other part of code
  else

      if tostring(slashed[i]):len() > 4096 then
        logs[logsTail] = {t,lvl,origin,tostring(slashed[i]):sub(1,4096)} --trim so we save memory and don't stress other part of code
      else

              if v ~= 2 and im.GetContentRegionAvailWidth() < txtwidth then
                im.TextColored(lcol,string.format("%s", tostring(v):sub(1,256) ))
                txtwidth = txtwidth * (1/fontConsoleFact[0])

                  while(bt:len() > chunkSize and chunk:len() < 2048) do
                    chunk = chunk..bt:sub(1,chunkSize).."\n"
                    bt = bt:sub(chunkSize+1)

                    chunk = chunk..bt:sub(1,chunkSize).."\n"
                    bt = bt:sub(chunkSize+1)
                  end

                --table.insert(console_log_buffer, {'r', tostring(res)})
                if type(res)=="string" and res:sub(1,7)== "Error: " then
                  log("E", "exec", res)

  strI = strI..", "..vobj:getJBeamFilename()
  if vobj.partConfig:sub(1,1) == "{" or vobj.partConfig:sub(1,1) == "[" then
    strI = strI..", *custom*"

  strI = strI..", "..vobj:getJBeamFilename()
  if vobj.partConfig:sub(1,1) == "{" or vobj.partConfig:sub(1,1) == "[" then
    strI = strI..", *custom*"

    if #a == 2 then
      b1 = asciitbl[string.byte(string.sub(a,1,1))]
      b2 = asciitbl[string.byte(string.sub(a,2,2))]

      b1 = asciitbl[string.byte(string.sub(a,1,1))]
      b2 = asciitbl[string.byte(string.sub(a,2,2))]
      int = b1 * 45 + b2

      cpty_ec_bits = cpty_ec_bits + size_ecblock_bytes * 8
      datablocks[#datablocks + 1] = string.sub(data, pos * 8 + 1,( pos + size_datablock_bytes)*8)
      local tmp_tab = calculate_error_correction(datablocks[#datablocks],size_ecblock_bytes)

      if pos < #datablocks[i] then
        arranged_data = arranged_data .. string.sub(datablocks[i],pos, pos + 7)
      end

      if pos < #ecblocks[i] then
        arranged_ec = arranged_ec .. string.sub(ecblocks[i],pos, pos + 7)
      end

  for i=1,7 do
    bit = string.sub(ec_mask_type,i,i)
    fill_matrix_position(matrix, bit, 9, #matrix - i + 1)

  for i=8,9 do
    bit = string.sub(ec_mask_type,i,i)
    fill_matrix_position(matrix,bit,9,17-i)

  for i=10,15 do
    bit = string.sub(ec_mask_type,i,i)
    fill_matrix_position(matrix,bit,9,16 - i)

  for i=1,6 do
    bit = string.sub(ec_mask_type,i,i)
    fill_matrix_position(matrix,bit,i,9)

  end
  bit = string.sub(ec_mask_type,7,7)
  fill_matrix_position(matrix,bit,8,9)

  for i=8,15 do
    bit = string.sub(ec_mask_type,i,i)
    fill_matrix_position(matrix,bit,#matrix - 15 + i,9)

  for i=1,#bitstring do
    bit = string.sub(bitstring,i,i)
    x = start_x + math.fmod(i - 1,3)

  for i=1,#bitstring do
    bit = string.sub(bitstring,i,i)
    x = start_x + math.floor( (i - 1) / 3 )

      _y = positions[i][2]
      m = get_pixel_with_mask(mask,_x,_y,string.sub(byte,i,i))
      if debugging then

  for i = 1, modeCount do
    local mode = modes:sub(i, i)
    if automaticHandling.availableModeLookup[mode] then

  elseif tpe == 'string' or tpe == 'bool' or tpe == 'boolean' then
    return (tostring(value):sub(0, 10) .. (tostring(value):len() > 10 and "..." or ""))
  elseif tpe == 'number' then

  fileCache = {}
  if currentPath:sub(1,1) ~= "/" then currentPath = "/" .. currentPath end
  if currentPath:sub(-1) ~= "/" then currentPath = currentPath.."/" end

  if currentPath:sub(1,1) ~= "/" then currentPath = "/" .. currentPath end
  if currentPath:sub(-1) ~= "/" then currentPath = currentPath.."/" end
  currentPath = currentPath:gsub("/+", "/")   -- Reducing multiple slashes to avoid trimmed list names

    local s = FS:stat(fn)
    s.name = string.sub(fn, pathLen)
    s.name = string.gsub(s.name, "/(.*)", "%1") -- strip leading /

        if lastSep then
          parentFolder = currentPath:sub(1, currentPath:len()-lastSep+1 )
        end

    local rdnNumber = math.random(1, #randomStringChars)
    res = res .. string.sub(randomStringChars, rdnNumber, rdnNumber)
  end

    local _, filename, extension = path.split(layerData.decalColorTexturePath)
    colorMapTextureString = string.sub(filename, 1, #filename - (#extension + 1))
  elseif layerData.type == M.layerTypes.textureFill then

    if filename ~= "" then
      colorMapTextureString = string.sub(filename, 1, #filename - (#extension + 1))
    end

    if filename ~= "" then
      normalMapTextureString = string.sub(filename, 1, #filename - (#extension + 1))
    end

    if filename ~= "" then
      metallicMapTextureString = string.sub(filename, 1, #filename - (#extension + 1))
    end

    if filename ~= "" then
      roughnessMapTextureString = string.sub(filename, 1, #filename - (#extension + 1))
    end

    if filename ~= "" then
      alphaMapTextureString = string.sub(filename, 1, #filename - (#extension + 1))
    end

    while string.endswith(missionData.description, "\n") do
      missionData.description = string.sub(missionData.description, 1, -2)
    end

  --dump(missionId)
  missionId = string.sub(missionDir, #missionsDir+1)
  missionData.id = missionId

      local missionDir, _, _ = path.split(missionInfo)
      missionDir = string.sub(missionDir,0,-2)
      local missionData = loadMission(missionDir)

  for _, file in ipairs(files) do
    local gen = require(file:sub(0,-5))
    gen.generate = gen.generate or nop

  local function f_nul()
    if sub(json, pos, pos+2) == 'ull' then
      pos = pos+3

  local function f_fls()
    if sub(json, pos, pos+3) == 'alse' then
      pos = pos+4

  local function f_tru()
    if sub(json, pos, pos+2) == 'rue' then
      pos = pos+3

        end
        str = str .. sub(json, pos, jsonlen)
        if pos2 == jsonlen+2 then

    end
    str = str .. sub(json, pos, newpos-1)
    pos = newpos+1

    local pos2 = (pos-1) + n
    local str = sub(json, pos, pos2)
    while pos2 > jsonlen and jsonlen ~= 0 do

      pos2 = pos2 - (jsonlen - (pos-1))
      str = str .. sub(json, pos, pos2)
    end

  for _, anchorName in ipairs(anchorNames) do
    if anchorName:sub(1, 5) == anchorPrefixStrWithDot then
      local parts = {}

      local dirname, fn, e = path.splitWithoutExt(filename, true)
      local path = dirname:sub(string.len(stateTemplatePath) + 1)

        local moduleName = fn
        --local requireFilename = string.sub(filename, 1, string.len(filename) - 4)
        local lectionData = {}

      if not pos2 then
        im.Text(label:sub(pos1))
        break

      elseif pos1 < pos2 then
        im.Text(label:sub(pos1, pos2 - 1))
        im.SameLine()

      local pos3 = pos2 + highlightLowerLen
      im.TextColored(matchColor, label:sub(pos2, pos3))
      im.SameLine()

  for s in actionData:gmatch("[^\n]+") do
    table.insert(lines, s:sub(1, toolTipMaxWidth)) -- limit width
  end

  --print("guessing function name")
  if type(info.source) == "string" and info.source:sub(1,1) == "@" then
    local file, err = io_open(info.source:sub(2), "r")

  if type(info.source) == "string" and info.source:sub(1,1) == "@" then
    local file, err = io_open(info.source:sub(2), "r")
    if not file then

      if _M.max_string_output_len > 0 and stringlen > _M.max_string_output_len then
        self:add_f("%s%s = string[%d/%d]: %q (more...)\n", prefix, name, _M.max_string_output_len, stringlen, string.sub(tostring(value), 1, _M.max_string_output_len))
      else

        local source = info.source
        if source:sub(2,7) == "string" then
          source = source:sub(9)    -- uno m�s, por el espacio que viene (string "Baragent.Main", por ejemplo)

        if source:sub(2,7) == "string" then
          source = source:sub(9)    -- uno m�s, por el espacio que viene (string "Baragent.Main", por ejemplo)
        end

      local function_name = m_user_known_functions[info.func] or m_known_functions[info.func] or info.name
      if source:sub(2, 7) == "string" then
        source = source:sub(9)

      if source:sub(2, 7) == "string" then
        source = source:sub(9)
      end

      local function_type = (info.namewhat == "") and "function" or info.namewhat
      if info.source and info.source:sub(1, 1) == "@" then
        dumper:add_f("\n(%d) %s:%d %s (%s)", level_to_show, info.source:sub(2), info.currentline, function_name, function_type)

      if info.source and info.source:sub(1, 1) == "@" then
        dumper:add_f("\n(%d) %s:%d %s (%s)", level_to_show, info.source:sub(2), info.currentline, function_name, function_type)
      elseif info.source and info.source:sub(1,1) == '#' then

        dumper:add_f("\n(%d) %s:%d %s (%s)", level_to_show, info.source:sub(2), info.currentline, function_name, function_type)
      elseif info.source and info.source:sub(1,1) == '#' then
        dumper:add_f("\n(%d) Lua %s '%s' at template '%s:%d'%s", level_to_show, function_type, function_name, info.source:sub(2), info.currentline, was_guessed and " (best guess)" or "")

      elseif info.source and info.source:sub(1,1) == '#' then
        dumper:add_f("\n(%d) Lua %s '%s' at template '%s:%d'%s", level_to_show, function_type, function_name, info.source:sub(2), info.currentline, was_guessed and " (best guess)" or "")
      else

      else
        dumper:add_f("\n(%d) %s:%d: %s", level_to_show, source:sub(2, -3), info.currentline, function_name)
      end

      local function_name = m_user_known_functions[info.func] or m_known_functions[info.func] or info.name
      if source:sub(2, 7) == "string" then
        source = source:sub(9)

      if source:sub(2, 7) == "string" then
        source = source:sub(9)
      end

      local function_type = (info.namewhat == "") and "function" or info.namewhat
      if info.source and info.source:sub(1, 1) == "@" then
        dumper:add_f("(%d) Lua %s '%s' at file '%s:%d'%s\n", level_to_show, function_type, function_name, info.source:sub(2), info.currentline, was_guessed and " (best guess)" or "")

      if info.source and info.source:sub(1, 1) == "@" then
        dumper:add_f("(%d) Lua %s '%s' at file '%s:%d'%s\n", level_to_show, function_type, function_name, info.source:sub(2), info.currentline, was_guessed and " (best guess)" or "")
      elseif info.source and info.source:sub(1,1) == '#' then

        dumper:add_f("(%d) Lua %s '%s' at file '%s:%d'%s\n", level_to_show, function_type, function_name, info.source:sub(2), info.currentline, was_guessed and " (best guess)" or "")
      elseif info.source and info.source:sub(1,1) == '#' then
        dumper:add_f("(%d) Lua %s '%s' at template '%s:%d'%s\n", level_to_show, function_type, function_name, info.source:sub(2), info.currentline, was_guessed and " (best guess)" or "")

      elseif info.source and info.source:sub(1,1) == '#' then
        dumper:add_f("(%d) Lua %s '%s' at template '%s:%d'%s\n", level_to_show, function_type, function_name, info.source:sub(2), info.currentline, was_guessed and " (best guess)" or "")
      else

  for k, v in pairs(jbeamData) do
    if k:sub(1, #"configuration_") == "configuration_" then
      tableMergeRecursive(configData, v)

  -- local maps = {"_color", "_colorPalette"}
  local dirPath = string.sub(texturesExport_DirectoryPath, -1) == "/" and texturesExport_DirectoryPath or texturesExport_DirectoryPath .. "/"

  if string.len(defVal) > 100 then
    defVal = string.sub(defVal, 1, 100) .. "..."
  end

      sourceFile = fgMgr.savedDir .. name .. '.json'
      if string.sub(sourceFile, 1, 1) ~= '/' then
        sourceFile = '/' .. sourceFile

  local infoDir, _, _ = path.split(filePath)
  branch.dir = string.sub(infoDir, 1, -1)  -- Remove trailing '/'
  branch.id = ""

  local folders = {'domains'}
  for folder in string.gmatch(string.sub(infoDir, #branchesDir, -2), "[^/]+") do
      table.insert(folders, folder)

  local folders = {'domains'}
  for folder in string.gmatch(string.sub(infoDir, #branchesDir, -2), "[^/]+") do
      table.insert(folders, folder)

      local _, file, _ = path.split(filePath)
      local fileName = file:sub(1, -5)
      local extensionPath = "gameplayInterfaceModules/" .. fileName

--			lo('?? for_INST:'..tostring(k.parent.attr.name))
		local s = string.sub(k.attr.url,2)
		if dgeo[s] then

--				U.dump(k.attr,'?? for_ATTR:'..tostring(k.attr.semantic))
			dsem[k.attr['source']:sub(2)] = k.attr.semantic
		end

--			lo('?? kid_name:'..i..':'..tostring(k.name)..':'..tostring(k.attr.semantic))
			dsem[k.attr['source']:sub(2)] = k.attr.semantic
		end

  if string.sub(path, 1, size) == newPathNotSetString then
    return false

  for hash, asset in pairs(assetsByHash) do
    if string.sub(asset.targetPath, 1, size) == newPathNotSetString then
      return false

        for i=1, #v2.displayObjects  do
          local char = priceStr:sub(i, i)
          -- force 9/10 in US signs

      local len = str:byte(i)
      array[#array + 1] = str:sub(i + 1, i + len)
      i = i + len + 1

        local _, fileNameWithExt, _ = path.split(file)
        local fileName = fileNameWithExt:sub(1, -5)
        local storageFactoryPath = "energyStorage/" .. fileName

local string, io = assert( string ), assert( io )
local V = string.sub( assert( _VERSION ), -4 )
local _G = assert( _G )

  for i = 1, p do
    if string.sub( s, i, i ) == "\n" then
      lno = lno + 1

  for i = sol, #s do
    if string.sub( s, i, i ) == "\n" then
      eol = i - 1

  end
  return string.sub( s, sol, eol ), lno, sol
end

  if #line > clen then
    line = string.sub( line, 1, clen ) .. "..."
  end

    local _,lno = string.gsub( s, "\n", "\n" )
    if string.sub( s, -1, -1 ) ~= "\n" then lno = lno + 1 end
    local msg = ": parse error at "

function epnf.parsestring( g, str, ... )
  local s = string.sub( str, 1, 20 )
  if #s < #str then s = s .. "..." end

      local _, file, _ = path.split(filePath)
      local fileName = file:sub(1, -5)
      local extensionPath = "gameplay/statisticModules/" .. fileName

    activityType = "scenario"
    activityDetail = "/fg"..missionId:sub(levelFolder:len()+1):gsub("/","@")
  elseif scenario_scenarios and scenario_scenarios.getScenario() then

  local _, fn, e = path.split(file)
  return fn:sub(1, #fn - #dynDecalsExtension)
end

  local function f_nul()
    if sub(json, pos, pos+2) == 'ull' then
      pos = pos+3

  local function f_fls()
    if sub(json, pos, pos+3) == 'alse' then
      pos = pos+4

  local function f_tru()
    if sub(json, pos, pos+2) == 'rue' then
      pos = pos+3

    local str = sub(json, pos, tmppos)
    pos = newpos

    modePrefix = "S"
  elseif string.sub(automaticHandling.mode, 1, 1) == "M" then
    modePrefix = "M"

  local manualModeIndex
  if string.sub(automaticHandling.mode, 1, 1) == "M" then
    manualModeIndex = string.sub(automaticHandling.mode, 2)

  if string.sub(automaticHandling.mode, 1, 1) == "M" then
    manualModeIndex = string.sub(automaticHandling.mode, 2)
  end

    if string.find(automaticHandling.mode, "M") then
      local gearIndex = tonumber(string.sub(automaticHandling.mode, 2))
      gearRatio = gearbox.gearRatios[gearIndex]

    if string.find(automaticHandling.mode, "M") then
      local gearIndex = tonumber(string.sub(automaticHandling.mode, 2))
      gearRatio = gearbox.gearRatios[gearIndex]

  local isManualMode = string.sub(automaticHandling.mode, 1, 1) == "M"
  --enforce things like L and M modes

  for i = 1, modeCount do
    local mode = modes:sub(i, i)
    if automaticHandling.availableModeLookup[mode] then

  local manualModeIndex
  if string.sub(automaticHandling.mode, 1, 1) == "M" then
    manualModeIndex = string.sub(automaticHandling.mode, 2)

  if string.sub(automaticHandling.mode, 1, 1) == "M" then
    manualModeIndex = string.sub(automaticHandling.mode, 2)
  end

  for i = 1, modeCount do
    local mode = modes:sub(i, i)
    if automaticHandling.availableModeLookup[mode] then

    end
  elseif dataType == 'string' and configData:sub(1, 1) == '{' then
    local res, newConfigData = preprocessPartConfig(deserialize(configData))

  -- notify the vehicle selector that the vehicle has been saved and clear the cache
  local configWithoutFilename = string.sub(filename, #(playerVehicleData.vehicleDirectory or "") + 1)
  configWithoutFilename = configWithoutFilename:gsub("%.pc$", "")

  for _, file in pairs(files) do
    local basename = string.sub(file, string.len(playerVehicle.vehicleDirectory) + 1, -1)
    table.insert(result,

      fileName = basename,
      name = string.sub(basename,0, -4),
      official = isOfficialConfig(basename),

    M.state.levelName = M.state.levelName:gsub("_", " ")
    M.state.levelName = string.gsub(" "..M.state.levelName, "%W%l", string.upper):sub(2)
    msgFormat()

    local lineStart = 1
    if line:sub(1,1) == ":" then
        local space = line:find(" ")

        local space = line:find(" ")
        prefix = line:sub(2, space-1)
        lineStart = space

    if trailToken then
        trailing = line:sub(trailToken + 1)
        lineStop = trailToken - 2

    local randindex = random(1, #nick)
    local randchar = sub(nick, randindex, randindex)
    local b = byte(randchar)

    -- Get the halves before and after the changed character
    local first = sub(nick, 1, randindex - 1)
    local last = sub(nick, randindex + 1, #nick)

    local first = sub(nick, 1, randindex - 1)
    local last = sub(nick, randindex + 1, #nick)
    nick = first..char(b)..last  -- Insert the new charachter

      -- is it a node material?
      if valuePart:sub(1,3) == "NM_" then
        ival = particles.getMaterialIDByName(materials, valuePart:sub(4))

      if valuePart:sub(1,3) == "NM_" then
        ival = particles.getMaterialIDByName(materials, valuePart:sub(4))
        --log('D', "jbeam.replaceSpecialValues", "replaced "..valuePart.." with "..ival)

  -- the directory needs a leading and trailing slash
  if vehicleDir:sub(1, 1) ~= '/' then
    vehicleDir = '/' .. vehicleDir

  end
  if vehicleDir:sub(-1, -1) ~= '/' then
    vehicleDir = vehicleDir .. '/'

  for _, file in ipairs(files) do
    local aConds = require(file:sub(0,-5))
    for key, value in pairs(aConds) do

  if slashPos then
    nameString = nameString:sub(slashPos + 1)
  end

  if slashPos then
    nameString = nameString:sub(slashPos + 1)
  end

    local dir, filename, ext = path.split(file)
    local fontName = string.sub(filename, 1, #filename - #fontAtlasJsonExtension)
    local success = false

    local path, filename, ext = path.split(fontPath)
    local fontName = string.sub(filename, 1, #filename - (#ext + 1))
    if not tableContains(generatedFontAtlases, fontName) then

  else
    local _,level,_ = path.split(path.split(levelPath):sub(1, -2))
    M.level = level

    if txt:len() > 16 then
      im.Text(txt:sub(1,16).."...")
    else

function replace_char(pos, str, r)
  return str:sub(1, pos-1) .. r .. str:sub(pos+1)
end

function replace_char(pos, str, r)
  return str:sub(1, pos-1) .. r .. str:sub(pos+1)
end

function isPlayerVehConfig(vpath)
  local osSep = package.config:sub(1,1)
  if not shipping_build and FS:getGamePath() == FS:getUserPath() then return false end --make sure you don't delete official config

    local k = math.random(1, sl)
    res = res .. string.sub(ascii, k, k)
  end

        for v in string.gmatch(translationString, "{{%a+}}") do
          self:createPin('in', 'string', v:sub(3, -3), nil, '')
        end

        if key ~= "fieldName" and string.startswith(key, "fieldName") then
          table.insert(ret, {label = string.sub(key, 10), fieldName = elem[key], elemLabel = elem.label})
        end

      else
        shortId = clickedMission.id:sub(f+1,t)
      end

              table.insert(files, f)
              local dir, filename, ext =path.split(string.sub(f, 2+string.len(lastShownMission.missionFolder)))
              if dir then

  if slashPos then
    nameString = nameString:sub(slashPos + 1)
  end

        return function()
            local chunk = string.sub(s, i, i+_M.BLOCKSIZE-1)
            i = i + _M.BLOCKSIZE

  if j then
    local m = _G[string.sub(funName, 1, j - 1)]
    if type(m) == "table" then

    if type(m) == "table" then
      f = m[string.sub(funName, j + 1)]
    end

          local baseName = decalSpline.name or "Decal Spline"
          local uniqueName = baseName .. " - " .. string.sub(spline.id, 1, 8)
          setNameJumpTable[decalSplineLink.getToolPrefixStr()](spline.id, uniqueName)

  local previewFile = m.previewFile
  if previewFile:sub(1, 1) == "/" then
      previewFile = previewFile:sub(2)

  if previewFile:sub(1, 1) == "/" then
      previewFile = previewFile:sub(2)
  end

    if minimapImage:startswith("/") then
      minimapImage = minimapImage:sub(2)
    end

      if slashPos then
        controllerName = controllerName:sub(slashPos + 1)
      end

      -- is it a node material?
      if valuePart:sub(1,3) == "NM_" then
        ival = particles.getMaterialIDByName(materials, valuePart:sub(4))

      if valuePart:sub(1,3) == "NM_" then
        ival = particles.getMaterialIDByName(materials, valuePart:sub(4))
        --log('D', "jbeam.replaceSpecialValues", "replaced "..valuePart.." with "..ival)

      elseif sectionName:match('^scale') and type(section) == "number" then
        modsScalers[sectionName:sub(6, #sectionName)] = {modVal = section, partPath = partName}
      end

        let delta = new THREE.Vector3;
        this._boundingBox.clampPoint(this._controls.target, delta).setZ(0).sub(this._controls.target);
        this._controls.target.add(delta);

function C:work()
  self.pinOut.value.value = string.sub(self.pinIn.value.value, self.data.from, self.data.to)
end

--            local s = dataString:tostring()
--                lo('?? ss:'..string.sub(s, 1, 100))
--[[

                    local c=0
                    for i=1,8 do c=c+(x:sub(i,i)=='1' and 2^(8-i) or 0) end
                        return string.char(c)

--            local s = ffi.string(dataString:get()) --res)
--                lo('?? ss:'..string.sub(res, 1, 100))

    while s > 0 do
        local c = sub(view, s, s)
        if c == " " or c == "\t" or c == "\0" or c == "\x0B" then

local function escaped(view, s)
    if s > 1 and sub(view, s - 1, s - 1) == "\\" then
        if s > 2 and sub(view, s - 2, s - 2) == "\\" then

    if s > 1 and sub(view, s - 1, s - 1) == "\\" then
        if s > 2 and sub(view, s - 2, s - 2) == "\\" then
            return false, 1

    local file, location = path, vars and var.template_location
    if sub(file, 1)  == "/" then file = sub(file, 2) end
    if location and location ~= "" then

    local file, location = path, vars and var.template_location
    if sub(file, 1)  == "/" then file = sub(file, 2) end
    if location and location ~= "" then

    if location and location ~= "" then
        if sub(location, -1) == "/" then location = sub(location, 1, -2) end
        local res = capture(concat{ location, '/', file})

    if location and location ~= "" then
        if sub(location, -1) == "/" then location = sub(location, 1, -2) end
        local res = capture(concat{ location, '/', file})

    local root = vars and (var.template_root or var.document_root) or prefix
    if sub(root, -1) == "/" then root = sub(root, 1, -2) end
    return readfile(concat{ root, "/", file }) or path

    local root = vars and (var.template_root or var.document_root) or prefix
    if sub(root, -1) == "/" then root = sub(root, 1, -2) end
    return readfile(concat{ root, "/", file }) or path

    while s do
        local t, p = sub(view, s + 1, s + 1), s + 2
        if t == "{" then

                    c[j] = "___[#___+1]=[=[\n"
                    c[j+1] = sub(view, i, s - 1 - w)
                    c[j+2] = "]=]\n"

                    c[j] = "___[#___+1]=template.escape("
                    c[j+1] = trim(sub(view, p, e - 1))
                    c[j+2] = ")\n"

                    c[j] = "___[#___+1]=[=[\n"
                    c[j+1] = sub(view, i, s - 1 - w)
                    c[j+2] = "]=]\n"

                    c[j] = "___[#___+1]=template.output("
                    c[j+1] = trim(sub(view, p, e - 1))
                    c[j+2] = ")\n"

                        c[j] = "___[#___+1]=[=[\n"
                        c[j+1] = sub(view, i, s - 1 - w)
                        c[j+2] = "]=]\n"

                    local n = e + 2
                    if sub(view, n, n) == "\n" then
                        n = n + 1

                        c[j] = "___[#___+1]=[=[\n"
                        c[j+1] = sub(view, i, r)
                        c[j+2] = "]=]\n"

                    end
                    c[j] = trim(sub(view, p, e - 1))
                    c[j+1] = "\n"

                    c[j] = "___[#___+1]=[=[\n"
                    c[j+1] = sub(view, i, s - 1 - w)
                    c[j+2] = "]=]\n"

                else
                    local f = sub(view, p, e - 1)
                    local x = find(f, ",", 2, true)

                        c[j] = "___[#___+1]=include([=["
                        c[j+1] = trim(sub(f, 1, x - 1))
                        c[j+2] = "]=],"

                        c[j+2] = "]=],"
                        c[j+3] = trim(sub(f, x + 1))
                        c[j+4] = ")\n"

                    c[j] = "___[#___+1]=[=[\n"
                    c[j+1] = sub(view, i, s - 1 - w)
                    c[j+2] = "]=]\n"

                    c[j] = "___[#___+1]=include("
                    c[j+1] = trim(sub(view, p, e - 1))
                    c[j+2] = ")\n"

            if e then
                local x, y = find(view, sub(view, s, e + 1), e + 2, true)
                if x then

                            c[j] = "___[#___+1]=[=[\n"
                            c[j+1] = sub(view, i, s - 1 - w)
                            c[j+2] = "]=]\n"

                        x = x - 1
                        if sub(view, y, y) == "\n" then
                            y = y + 1

                        end
                        local b = trim(sub(view, p, e - 1))
                        if b == "verbatim" or b == "raw" then

                                c[j] = "___[#___+1]=[=[\n"
                                c[j+1] = sub(view, i, s - 1 - w)
                                c[j+2] = "]=]\n"

                            c[j] = "___[#___+1]=[=["
                            c[j+1] = sub(view, e + 2, x)
                            c[j+2] = "]=]\n"

                        else
                            if sub(view, x, x) == "\n" then
                                x = x - 1

                                c[j] = "___[#___+1]=[=[\n"
                                c[j+1] = sub(view, i, r)
                                c[j+2] = "]=]\n"

                            c[j+2] = '"]=include[=['
                            c[j+3] = sub(view, e + 2, x)
                            c[j+4] = "]=]\n"

                    c[j] = "___[#___+1]=[=[\n"
                    c[j+1] = sub(view, i, s - 1 - w)
                    c[j+2] = "]=]\n"

                    e = e + 2
                    if sub(view, e, e) == "\n" then
                        e = e + 1

    end
    s = sub(view, i)
    if s and s ~= "" then

            local isRaceJson = string.sub(raceFile,#raceFile-9,#raceFile) == '.race.json'

    local infend = si + 6
    if sub(s, si, infend) == "1#INF00" then
      return math.huge, infend + 1

      local pm = byte(s, si - 1)
      jsonError(string.format("Invalid number: '%s'", sub(s, si - ((pm == 45 or pm == 43) and 1 or 0), infend)), si)
    end

    end
    r = tonumber(sub(s, si, i - 1))
    if r == nil then

      local pm = byte(s, si - 1)
      jsonError(string.format("Invalid number: '%s'", sub(s, si - ((pm == 45 or pm == 43) and 1 or 0), i-1)), si)
    end

  if ch == 34 then -- "
    return sub(s, si1, i - 2), i
  end

    i = i - 1
    key = sub(s, si, i)

  local dir, fn, ext = path.split(file, true)
  fn = fn:sub(0,fn:len()-ext:len()-1)

    if txt:len() > 10 then
      im.Text(txt:sub(1,10).."...")
    else

    if not ni then break end
    local text = string.sub(s, i, ni - 1)
    if not string.find(text, "^%s*$") then

  end
  local text = string.sub(s, i)
  if not string.find(text, "^%s*$") then

  while i*5 < #word do
    local w = string.sub(word, 1+ i*5, 5+i*5)

local function strEnds(s, suffix)
  return s and suffix and s:sub(-#suffix) == suffix
end

    if title then
      title = title:sub(2, -2)
      t[title] = t[title] or {}

      key = key:gsub(' ', "")
      value = value:sub(2, -2)
      t[titleS][key] = value

    if key:endswith("Reputation") then
      local orgId = key:sub(1, -11)
      local organization = freeroam_organizations.getOrganization(orgId)

    else
      local newPath = string.sub(folders[i], oldNameLength + 2)
      newPath = newName .. newPath

    return color(v.r, v.g, v.b, v.a)
  elseif type(v) == 'string' and string.len(v) > 7 and v:sub(1,1) == '#' then
    v = v:gsub("#","")

    v = v:gsub("#","")
    return color(tonumber("0x"..v:sub(1,2)), tonumber("0x"..v:sub(3,4)), tonumber("0x"..v:sub(5,6)), tonumber("0x"..v:sub(7,8)))
  elseif v == nil then

    v = v:gsub("#","")
    return color(tonumber("0x"..v:sub(1,2)), tonumber("0x"..v:sub(3,4)), tonumber("0x"..v:sub(5,6)), tonumber("0x"..v:sub(7,8)))
  elseif v == nil then

    v = v:gsub("#","")
    return color(tonumber("0x"..v:sub(1,2)), tonumber("0x"..v:sub(3,4)), tonumber("0x"..v:sub(5,6)), tonumber("0x"..v:sub(7,8)))
  elseif v == nil then

    v = v:gsub("#","")
    return color(tonumber("0x"..v:sub(1,2)), tonumber("0x"..v:sub(3,4)), tonumber("0x"..v:sub(5,6)), tonumber("0x"..v:sub(7,8)))
  elseif v == nil then

function string.startswith(String,Start)
  return string.sub(String,1,string.len(Start))==Start
end

function string.endswith(String,End)
  return End=='' or string.sub(String,-string.len(End))==End
end

  local result = str:gsub("([A-Z])", " %1")
  return string.upper(result:sub(1, 1)) .. result:sub(2)
end

  local result = str:gsub("([A-Z])", " %1")
  return string.upper(result:sub(1, 1)) .. result:sub(2)
end

  for k, expectedType in ipairs(expectedTypes) do
    local isOptional = expectedType:sub(0,9) == "optional:"
    local sanitizedExpectedType = isOptional and expectedType:sub(10, #expectedType) or expectedType

    local isOptional = expectedType:sub(0,9) == "optional:"
    local sanitizedExpectedType = isOptional and expectedType:sub(10, #expectedType) or expectedType
    local actualType = type(data[k])

  while true do
    if filename == "" or string.sub(filename, -1) == "/" then
      break

    end
    filename = string.sub(filename, 1, -2)
  end

  for _, lvlPath in ipairs(FS:findFiles('/levels/', '*', 0, false, true)) do
    table.insert(ret, string.lower(lvlPath:sub(9)))
  end

    if string.len(line) > 0 then
      local firstChar = string.sub(line, 1, 1)
      if firstChar ~= '#' and firstChar ~= ';' and firstChar ~= '/' then

		end
		if (str:sub(i, i + (delimiter:len() - 1)) == delimiter) then
			endPoint = i - 1;

			endPoint = i - 1;
			table.insert(result, str:sub(startPoint, endPoint));
			startPoint = i + (delimiter:len());

			endPoint = str:len();
			table.insert(result, str:sub(startPoint, endPoint));
		end

    if rootNode and rootNode.materials and #rootNode.materials > 0 then
      local entity = { deps = { material = {}}, provides = { shape = shapeInfoFn:sub(1, -13) }}
      for _, m in pairs(rootNode.materials) do

  for k, v in ipairs(vizHelper) do
    vizHelper[k] = string.sub(v, string.len(artPath) + 1)
  end

      local s = d.source
      if s:sub(1,1) == '@' then s = s:sub(2) end
      if not s:find(extPath) and s ~= 'lua/ge/extensions/core/jobsystem.lua' and s ~= 'lua/common/luaCore.lua' and s ~= '=[C]' then

      local s = d.source
      if s:sub(1,1) == '@' then s = s:sub(2) end
      if not s:find(extPath) and s ~= 'lua/ge/extensions/core/jobsystem.lua' and s ~= 'lua/common/luaCore.lua' and s ~= '=[C]' then

      extPath = extName
      if string.sub(extPath, 1, 1) == '/' then -- strip leading '/' if present
        extPath = string.gsub(extPath, "/(.*)", "%1")

  if string.sub(extPath, 1, 1) == '/' then
    extPath = string.gsub(extPath, "/(.*)", "%1") -- strip leading '/' if present

  for _,luaFilename in pairs(luaFiles) do
    load(luaFilename:sub(1,-5))  -- strip '.lua'
  end

      -- without it, vehicle extensions like custom_input would come out as custom/input which is wrong
      loadAtRoot(file:sub(1,-5), "")
    end

          -- grab specified root
          root = string.sub(extName, 1, string.find(extName, "_") - 1)
        end

    for k, func in pairs(m) do
      if string.sub(k, 1, 2) == 'on' and type(func) == 'function' then
        if not hookLists[k] then hookLists[k] = {} end

  elseif fieldTypeName == "TypeCommand" then
    if imgui.Button(fieldValue:sub(1,20)) then
      editor.newTextEditorInstance(self.selectedIds, fieldName)

        local src = f
        local dst = dir1 .. filename:sub(1, -4) .. 'cdae'
        local dstData = '' -- dir1 .. filename:sub(1, -4) .. 'meshes.json' -- do not use this feature for now

        local dst = dir1 .. filename:sub(1, -4) .. 'cdae'
        local dstData = '' -- dir1 .. filename:sub(1, -4) .. 'meshes.json' -- do not use this feature for now
        local cacheFilename = nil

    local dir, fileName, fileExt = path.split(api.getDecalTexturePath("color"))
    newBrushName = string.sub(fileName, 1, #fileName - (#fileExt + 1))
    im.OpenPopup("SaveBrushPopup")

    if im.InputText(string.format("##%s_%s", guiId, "decalLayerFontCharacter"), editor.getTempCharPtr(api.getDecalLayerFontCharacter()), nil, im.InputTextFlags_AutoSelectAll) then
      api.setDecalLayerFontCharacter(string.sub(editor.getTempCharPtr(), 1, 1))
    end

    local currentSaveSlot, currentSavePath = career_saveSystem.getCurrentSaveSlot()
    imgui.Text((string.sub(currentSavePath, string.len(career_saveSystem.getSaveRootDirectory())+2, -1)))
    imgui.Separator()

  --print(string.format("/  Splitting '%10s' into long: '%5s', side: '%5s' .", wheelName, long, side))
  long = long and long:sub(1, 1) or long
  side = side and side:sub(1, 1) or side

  long = long and long:sub(1, 1) or long
  side = side and side:sub(1, 1) or side
  --print(string.format("\\_ Splitting '%10s' into long: '%5s', side: '%5s' .", wheelName, long, side))

  if not mission then
    mission = gameplay_missions_missions.getMissionById(string.sub(missionId, 1, -3))
  end

  if type(k) == "number" then return true end
  if string.sub(k, 1, k.len("__")) == "__" then return false end
  return true

  if lastSeparator then
    return path:sub(1, lastSeparator)
  end

    for k, func in pairs(node) do
      if string.sub(k, 1, 2) == 'on' and type(func) == 'function' then
        self.hookExists[k] = true

  for _, v in pairs(loadedControllers) do
    if v.typeName:sub(1, #path) == path then
      table.insert(controllers, v)

            local filename = data.filepath
            extensions.tech_openDriveExporter.export(filename:sub(1, -(#".xodr" + 1)))
            exportedFilename = FS:virtual2Native(filename)

            local filename = data.filepath
            extensions.tech_openStreetMapExporter.export(filename:sub(1, -(#".osm" + 1)))
            osmExportedFilename = FS:virtual2Native(filename)

            sumo_filename = filename
            extensions.tech_sumoExporter.export(sumo_filename:sub(1, -(#".xml" + 1)))
            sumoExportedFilename = FS:virtual2Native(sumo_filename)

  for _, anchorName in ipairs(obj:getAnchorNames()) do -- Check if any anchor points have the nail prefix.
    if anchorName:sub(1, 5) == anchorPrefixStr .. '.' then
      return true

  if im.InputText("##MaterialNameInput", terrainMtlCopyProxy.nameInput, nil, im.flags(im.InputTextFlags_CharsNoBlank)) then
    local firstChar = tonumber(string.sub(ffi.string(terrainMtlCopyProxy.nameInput), 1, 1))
    if firstChar and type(firstChar) == "number" then

  local _, _, ext = path.split(fileName)
  local fileNameNoExt = string.sub(fileName, 1, -(ext:len() + 1))
  if not FS:fileExists(fileNameNoExt .. "png") and not FS:fileExists(fileNameNoExt .. "dds") then

        if not pos2 then
          M.Text(label:sub(pos1))
          break

        elseif pos1 < pos2 then
          M.Text(label:sub(pos1, pos2 - 1))
          M.SameLine()

        local pos3 = pos2 + highlightLowerLen
        M.TextColored(matchColor, label:sub(pos2, pos3))
        M.SameLine()

      if file.type == "image" then
        local textureName = string.sub(file.fileName, 1, #file.fileName-2)
        local textureType = string.sub(file.fileName, -2)

        local textureName = string.sub(file.fileName, 1, #file.fileName-2)
        local textureType = string.sub(file.fileName, -2)
        if string.sub(textureType,1,1) == "_" then

        local textureType = string.sub(file.fileName, -2)
        if string.sub(textureType,1,1) == "_" then
          textureType = string.sub(textureType,2,2)

        if string.sub(textureType,1,1) == "_" then
          textureType = string.sub(textureType,2,2)
          if textureType == "n" or textureType == "d" or textureType == "s" then

        -- TODO: check if filetype is present
        fileName = string.sub(fileName, 1, #fileName - #fileType)
        -- Remove the `.` from the filetype

        -- Remove the `.` from the filetype
        fileType = #fileType > 0 and string.lower(string.sub(fileType, 2)) or fileType

              -- TODO: check if filetype is present
              fileName = string.sub(fileName, 1, #fileName - #fileType)
              -- Remove the `.` from the filetype

              -- Remove the `.` from the filetype
              fileType = #fileType > 0 and string.lower(string.sub(fileType, 2)) or fileType

  local filename = string.match(filepath, "[^/]*$")
  local fileDir = string.sub(filepath, 1, #filepath - #filename)
  local dir = getDirByPath(fileDir, root, true)

    local simpleFileType = string.lower(string.match(filename, "[^.]*$"))
    local fileNameNoExt = string.sub(filename, 1, #filename - (#filetype+1))
    local file = newFile(dir, dir.path..filename, fileNameNoExt, filetype, simpleFileType)

      if levelName and string.lower(levelName) == string.lower(var.levelName) then
        levelFilepath = string.sub(levelFilepath, 1, #levelFilepath - #filename)
        dir = getDirByPath(levelFilepath, var.root)

      elseif artFilepath then
        artFilepath = string.sub(artFilepath, 1, #artFilepath - #filename)
        dir = getDirByPath(artFilepath, var.commonArt)

  for color, orderList in pairs(rootWork) do
    if string.sub(color.name, 1, 2) == 'on' then
      if self.hookList[color.name] == nil then

  if withoutExtension then
    filename = string.sub(filename, 1, #filename - 4)
  end

      if not pos2 then
        imgui.TextColored(textColor, text:sub(pos1))
        break

      elseif pos1 < pos2 then
        imgui.TextColored(textColor, text:sub(pos1, pos2 - 1))
        imgui.SameLine()

      local pos3 = pos2 + highlightLowerLen
      imgui.TextColored(textHighlightColor, text:sub(pos2, pos3))
      imgui.SameLine()

  local levelDir = path.dirname(levelPath)
  if string.sub(levelDir, -1) ~= '/' then
    levelDir = levelDir.."/"

        if not i then break end
        local message = string.sub(mbox_s, j, i-1)
        table.insert(mbox, message)

  -- collapse anything below bindings that has less than 4 items
  return path:sub(1,10) == '/bindings/' and tableSize(item) < 4
end

        info.vidpid = filename:upper()
        vendorId = filename:upper():sub(5, 8)
      else

      else
        vendorId = info.vidpid:upper():sub(5, 8)
      end

  for k, v in pairs(jbeamData) do
    if k:sub(1, #"modes") == "modes" then
      tableMergeRecursive(modeData, v)

    if k:sub(1, #"enabledModes") == "enabledModes" then
      for _, modeKey in pairs(v) do

          im.PushStyleColor2(im.Col_Text, logColor)
          local textSize = im.CalcTextSize(logItem.message:sub(1, 1000) or "", nil, nil, im.GetColumnWidth(2) - im.GetStyle().ItemSpacing.x)
          if im.Selectable1(" " .. (logItem.logLevel or "") .. "##" .. i, selected == i, im.SelectableFlags_SpanAllColumns, im.ImVec2(0, textSize.y + 5)) then

          -- Add [IGNORED] prefix for ignored items
          local displayMessage = logItem.message:sub(1, 1000) or ""
          if isIgnored then

    if first>textStart and self._call.text then
      local text = sub(xml,textStart,first-1)
      if options.stripWhitespace then

      local scenetreeObject = spawnPrefab("prefab_temp_" .. filename ..os.time(), f, "0 0 0 ", "0 0 1", "1 1 1")
      local short = f:sub(levelPartLength)
      local dirInLevel, _,_ = path.splitWithoutExt(short)

  for _, file in pairs(FS:findFiles(materialSettings.directory, "*.dds", -1, true, false)) do
    local fileWithoutExtension = string.sub(file, 1, string.len(file) - 4)
    local textureType = string.sub(fileWithoutExtension, string.len(fileWithoutExtension) - 1, string.len(fileWithoutExtension))

    local fileWithoutExtension = string.sub(file, 1, string.len(file) - 4)
    local textureType = string.sub(fileWithoutExtension, string.len(fileWithoutExtension) - 1, string.len(fileWithoutExtension))
    local path = {}

    local path = {}
    for str in string.gmatch(string.sub(fileWithoutExtension, 1, string.len(fileWithoutExtension) - 2), "([^'/']+)") do
      table.insert( path, str )

   else -- glow map
      local texType = string.sub(fileWithoutExtension, string.len(fileWithoutExtension) - 4, string.len(fileWithoutExtension))
      if texType == "decal" then

        local path = {}
        for str in string.gmatch(string.sub(fileWithoutExtension, 1, string.len(fileWithoutExtension) - 6), "([^'/']+)") do
          table.insert( path, str )

  if editor.uiIconImageButton(editor.icons.undo, im.ImVec2(16,16), style.buttonColorBase, nil, nil, "resetMaterialButton") then
    local materialLetter = string.sub(materials.matNames[materialSettings.selectedMaterial[0]+1],14,14)
    tb.materialUtil.resetMaterialsToDefault(materialLetter)

    local mat = tb.getPieceInfo(index, sub).materialInfo.centerMesh or 'track_editor_A_center'
    mat = string.sub(mat, 0, 15)
    materialSettings.selectedMaterial[0] = indexOf(materials.matNames,mat)-1

    local mat = tb.getIntersection(name).centerMat or 'track_editor_A_center'
    mat = string.sub(mat, 0, 15)
    materialSettings.selectedMaterial[0] = indexOf(materials.matNames,mat)-1

local function applyInputs(leverState, parkButtonState)
  local gear = string.sub(electrics.values.gear or "", 1, 1)

local function updateHardwareState(dt)
  local state = gearStateLookup[string.sub(electrics.values.gear or "", 1, 1)] or 0
  if electrics.values.ignitionLevel <= 0 then

    -- TODO: clear up hack with filepaths (issue when loading a FG as a mission)
    local path = dirname:sub(string.len(customNodePath) + string.find(dirname, customNodePath, 1, true))
    local pathArgs = split(path, '/')

    end
    local moduleName = string.sub(fn, 1, string.len(fn) - 4)
    local requireFilename = string.sub(filename, 1, string.len(filename) - 4)

    local moduleName = string.sub(fn, 1, string.len(fn) - 4)
    local requireFilename = string.sub(filename, 1, string.len(filename) - 4)
    local status, node = pcall(rerequire, requireFilename)

  if slashPos then
    nameString = nameString:sub(slashPos + 1)
  end

  for i = 1, string.len(text) do
    local c = string.sub(text, i, i)
    if c == ' ' then

        for dx = 1, string.len(cl[dy]) do
          local cf = string.sub(cl[dy], dx, dx)
          if cf ~= ' ' then

  local str = hashStringSHA1(s)
  return str:sub(1, 16)
end

  if thepath:sub(-1) == "/" then
    thepath = thepath:sub(1, -2)

  if thepath:sub(-1) == "/" then
    thepath = thepath:sub(1, -2)
  end

  if dirname:sub(-1) == "/" then
    dirname = dirname:sub(1, -2)

  if dirname:sub(-1) == "/" then
    dirname = dirname:sub(1, -2)
  end

  local hash = hashStringSHA1(randomStr)
  return string.sub(hash, 1, 8)
end

  if slashPos then
    nameString = nameString:sub(slashPos + 1)
  end

  { // this state is used to display top/info-bar in menus
    path: "/menu.:sub(.*)?",
    name: "menu",

    if dir and filename and ext and string.lower(ext) == "pc" then
      local pcfn = filename:sub(1, #filename - 3)
      res.configs[pcfn] = { Configuration = pcfn}

    for _, filename in ipairs(jfiles) do
      if string.lower(filename:sub(-18)) == '.paintlibrary.json' then
        table.insert(filesPaints, filename)

        table.insert(filesPaints, filename)
      elseif string.lower(filename:sub(-5)) == '.json' then
        table.insert(filesJson, filename)

        table.insert(filesJson, filename)
      elseif string.lower(filename:sub(-3)) == '.pc' then
        table.insert(filesPC, filename)

        table.insert(filesPC, filename)
      elseif string.lower(filename:sub(-4)) == '.png' or string.lower(filename:sub(-4)) == '.jpg' then
        filesImages[filename] = true

        table.insert(filesPC, filename)
      elseif string.lower(filename:sub(-4)) == '.png' or string.lower(filename:sub(-4)) == '.jpg' then
        filesImages[filename] = true

    for _, filename in ipairs(jfiles) do
      if string.lower(filename:sub(-18)) == '.paintlibrary.json' then
        table.insert(filesPaints, filename)

        table.insert(filesAll, filename)
      elseif string.lower(filename:sub(-5)) == '.json' then
        table.insert(filesJson, filename)

        table.insert(filesAll, filename)
      elseif string.lower(filename:sub(-3)) == '.pc' then
        table.insert(filesPC, filename)

        table.insert(filesAll, filename)
      elseif string.lower(filename:sub(-4)) == '.png' or string.lower(filename:sub(-4)) == '.jpg' then
        filesImages[filename] = true

        table.insert(filesAll, filename)
      elseif string.lower(filename:sub(-4)) == '.png' or string.lower(filename:sub(-4)) == '.jpg' then
        filesImages[filename] = true

  local vehicleDirectory = path or '/vehicles/' .. model .. '/'
  if string.sub(vehicleDirectory, -1) ~= '/' then vehicleDirectory = vehicleDirectory .. '/' end
  local res = FS:findFiles(vehicleDirectory, '*.jbeam', -1, false, false) -- recursive search

    return 'BeamNG - Official'
  elseif string.sub(path, -3) == '.pc' then
    return 'Custom'

    local fLower = string.lower(filename)
    if string.sub(fLower, -5) == '.json'
    or string.sub(fLower, -6) == '.jbeam'

    if string.sub(fLower, -5) == '.json'
    or string.sub(fLower, -6) == '.jbeam'
    or string.sub(fLower, -3) == '.pc'

    or string.sub(fLower, -6) == '.jbeam'
    or string.sub(fLower, -3) == '.pc'
    or string.sub(fLower, -4) == '.jpg'

    or string.sub(fLower, -3) == '.pc'
    or string.sub(fLower, -4) == '.jpg'
    or string.sub(fLower, -4) == '.png' then

    or string.sub(fLower, -4) == '.jpg'
    or string.sub(fLower, -4) == '.png' then
      anyCacheFileModified = true

    if string.len(k) > 31 then
      local newk = string.sub(k, 1, 30)
      log('E', 'ge.environment.reloadGroundModels', 'Ground model name too long: "' .. tostring(k) .. '" is longer than the supported 31 characters. It will be cut to "' .. tostring(newk) .. '")')

    local _, fn, _ = path.split(file)
    local name = string.sub(fn, 1, -5)
    if name ~= "veMain" then

    local _, fn, _ = path.split(file)
    local name = string.sub(fn, 1, -5)
    if name ~= "veMain" then

    local _, fn, _ = path.split(file)
    local name = string.sub(fn, 1, -5)
    if name ~= "veMain" then

        result[partId] = getCondition(partId)
        --log("I", "partCondition.getConditions", string.format("Got condition for partId %25s: ", partId) .. string.sub(serialize(result[partId]), 1, 100))
      end,

        local dataString = jsonEncodePretty(data)
        dataString = dataString:sub(3, dataString:len() - 2)
        setClipboard(dataString)

          if type(v3) == "number" and str_byte(k3, 1) == 36 then
            local actualK3 = k3:sub(3) --remove the magic chars at the beginning to get the actual KEY, this can potentially lead to issues if k3 omits the second magic char
            local existingValue = target[sectionKey][actualK3]

    if not pos2 then
      im.Text(label:sub(pos1))
      break

    elseif pos1 < pos2 then
      im.Text(label:sub(pos1, pos2 - 1))
      im.SameLine()

    local pos3 = pos2 + highlightLowerLen
    im.TextColored(matchColor, label:sub(pos2, pos3))
    im.SameLine()

            end
          until response:sub(#response-3) == '\r\n\r\n'
          read_io:stop(loop)

    if index == 1 then
      local short = string.sub(name,length+1,string.len(name))
      local underscoreIndex = string.find(short,"_")

      if underscoreIndex and underscoreIndex >= 0 then
        local rdId = tonumber(string.sub(short,1,underscoreIndex-1))
        if not idId then

        if not idId then
          local obj = scenetree.findObject(string.sub(short,1,underscoreIndex-1))
          if obj then

        end
        local rdIdx = tonumber(string.sub(short,underscoreIndex+1,string.len(short)))
        return rdId, rdIdx

local function patt_error (s, i)
  local msg = (#s < i + 20) and s:sub(i)
                             or s:sub(i,i+20) .. "..."

  local msg = (#s < i + 20) and s:sub(i)
                             or s:sub(i,i+20) .. "..."
  msg = ("pattern error near '%s'"):format(msg)

  local e = #c + i
  if s:sub(i, e - 1) == c then return e else return nil end
end

  if hex:len() == 3 then
    return {(tonumber("0x"..hex:sub(1,1))*17)/255, (tonumber("0x"..hex:sub(2,2))*17)/255, (tonumber("0x"..hex:sub(3,3))*17)/255, 1}
  else

  if hex:len() == 3 then
    return {(tonumber("0x"..hex:sub(1,1))*17)/255, (tonumber("0x"..hex:sub(2,2))*17)/255, (tonumber("0x"..hex:sub(3,3))*17)/255, 1}
  else

  if hex:len() == 3 then
    return {(tonumber("0x"..hex:sub(1,1))*17)/255, (tonumber("0x"..hex:sub(2,2))*17)/255, (tonumber("0x"..hex:sub(3,3))*17)/255, 1}
  else

  else
    return {tonumber("0x"..hex:sub(1,2))/255, tonumber("0x"..hex:sub(3,4))/255, tonumber("0x"..hex:sub(5,6))/255, 1}
  end

  else
    return {tonumber("0x"..hex:sub(1,2))/255, tonumber("0x"..hex:sub(3,4))/255, tonumber("0x"..hex:sub(5,6))/255, 1}
  end

  else
    return {tonumber("0x"..hex:sub(1,2))/255, tonumber("0x"..hex:sub(3,4))/255, tonumber("0x"..hex:sub(5,6))/255, 1}
  end

  if hex:len() == 3 then
    return (tonumber("0x"..hex:sub(1,1))*17)/255, (tonumber("0x"..hex:sub(2,2))*17)/255, (tonumber("0x"..hex:sub(3,3))*17)/255
  else

  if hex:len() == 3 then
    return (tonumber("0x"..hex:sub(1,1))*17)/255, (tonumber("0x"..hex:sub(2,2))*17)/255, (tonumber("0x"..hex:sub(3,3))*17)/255
  else

  if hex:len() == 3 then
    return (tonumber("0x"..hex:sub(1,1))*17)/255, (tonumber("0x"..hex:sub(2,2))*17)/255, (tonumber("0x"..hex:sub(3,3))*17)/255
  else

  else
    return tonumber("0x"..hex:sub(1,2))/255, tonumber("0x"..hex:sub(3,4))/255, tonumber("0x"..hex:sub(5,6))/255
  end

  else
    return tonumber("0x"..hex:sub(1,2))/255, tonumber("0x"..hex:sub(3,4))/255, tonumber("0x"..hex:sub(5,6))/255
  end

  else
    return tonumber("0x"..hex:sub(1,2))/255, tonumber("0x"..hex:sub(3,4))/255, tonumber("0x"..hex:sub(5,6))/255
  end