print("TESTINGGG")
local whitein = rs.getBundledInput("back", colors.white)
if whitein == "1" then
  rs.setBundledOutput("back", colors.red)
end

когда нажимаю на рычаг ничего не происходит хотя когда перехожу в режим луа на компе то он выдаёт (1 при включенном рычаге) и (0 при выключенном)

что я делаю не так и как оно вообще должно работать?

if not monitor then

error("monitor not found")

end

local image = paintutils.loadImage("code/image.nft")

monitor.clear()

monitor.setTextScale(0.5)

monitor.setCursorPos(2, 2)

monitor.setTextColor(2)

paintutils.drawImage(image, 1, 3)

в итоге мне выдает нужную мне картинку в терминал а не на монитор монитор точно подключен 
не знаю что делать и у кого спросить помогите пожалуйста

Где создаётся:

table.insert(Scripts.ExecutableForFrame,{Script = script,objectThatCalls = objectThatCalls})

Где используется:

...
    for i,v in  pairs(ExecutableForFrame) do
        print(v.objectThatCalls)
        if v.objectThatCalls then
            System.call(v.Script.Update,v.objectThatCalls,OE)
        end
    end
...

Но..

...
    for i,v in  pairs(ExecutableForFrame) do
        print(v.objectThatCalls.Scale)
        if v.objectThatCalls then
...

Тут я вообще в замешательстве, всё везде существует но всё ровно ругается.

Полный код

local function draw()
        local width = panelWidth
        gpu.setBackground(colors.black)
        gpu.fill(0,0,w,h," ")
        --Map draw logic
        local offset = 2
        for y=cntY-range,cntY+range,1 do
            for x=cntX-range,cntX+range,1 do
                gpu.setForeground(colors.white)
                gpu.setBackground(colors.black)
                dx,dy = x*2+offset-(cntX-range)*2,y*2+offset-(cntY-range)*2
                if map[y][x].top == true then
                    gpu.set(dx, dy,"# ")
                else
                    gpu.set(dx, dy,"##")
                end
                dx,dy = x*2+offset-(cntX-range)*2,y*2+1+offset-(cntY-range)*2
                local s = ""
                local sC = colors.white
                if y == cntY and x == cntX then
                    s = plrS
                    sC = colors.yellow
                elseif map[y][x].dark == true then
                    s = "#"
                    sC = colors.gray
                end
                if map[y][x].dark == false  or (y == cntY and x == cntX) then
                    if map[y][x].type == "shop" then
                        s = shpS
                        sC = colors.lime
                    elseif map[y][x].type == "portal" then
                        s = prtS
                        sC = colors.cyan
                    elseif map[y][x].type == "lava" then
                        s = lavS
                        sC = colors.red
                    elseif map[y][x].type == "ushop" then
                        s = ushS
                        sC = colors.blue
                    elseif map[y][x].type == "oshop" then
                        s = oshS
                        sC = colors.yellow
                    end
                end
                if map[y][x].left == true then
                    gpu.set(dx,dy," ")
                    gpu.setForeground(sC)
                    gpu.set(dx+1,dy,s)
                else
                    gpu.set(dx,dy,"#")
                    gpu.setForeground(sC)
                    gpu.set(dx+1,dy,s)
                end
            end
        end
        -- Coins, Food, Water level
        --FOOD
        gpu.setBackground(colors.brown)
        gpu.fill(0,h,w,1," ")
        gpu.set(1,h,"Food level: "..tostring(food))
        gpu.setForeground(colors.white)
        --Water
        gpu.setBackground(colors.cyan)
        gpu.fill(0,h-1,w,1," ")
        gpu.set(1,h-1,"Water level: "..tostring(water*10))
        gpu.setForeground(colors.white)
        --Coins
        gpu.setBackground(colors.orange)
        gpu.fill(0,h-2,w,1," ")
        gpu.set(1,h-2,"Coins: "..tostring(coins))
        gpu.setForeground(colors.white)
        --Shop menu display
        gpu.setBackground(colors.black)
        gpu.setForeground(colors.white)
        if map[cntY][cntX].type == "shop" then
            dx,dy = w-width,1
            gpu.setForeground(colors.lime)
            gpu.set(dx,dy,"Shop menu")
            for i=1,#shop_items,1 do
                gpu.setForeground(colors.white)
                dx,dy = w-width,i*2
                gpu.set(dx,dy,shop_items[i].name)
                if coins < shop_items[i].price then
                    gpu.setForeground(colors.red)
                end
                dx,dy = w-width,i*2+1
                gpu.set(dx,dy,tostring(shop_items[i].price))
            end
        end
        if map[cntY][cntX].type == "ushop" then
            dx,dy = w-width,1
            gpu.setForeground(colors.blue)
            gpu.set(dx,dy,"Upgrades")
            for i=1,#upgrades,1 do
                gpu.setForeground(colors.white)
                dx,dy = w-width,i*2
                gpu.set(dx,dy,upgrades[i].name..":"..tostring(upgrades[i].level))
                if coins < upgrades[i].price then
                    gpu.setForeground(colors.red)
                end
                dx,dy = w-width,i*2+1
                if upgrades[i].level >= upgrades[i].max_level then
                    gpu.setForeground(colors.yellow)
                    gpu.set(dx,dy,"Max LVL") 
                else
                    gpu.set(dx,dy,tostring(upgrades[i].price))
                end
            end
        end
        if map[cntY][cntX].type == "oshop" then
            dx,dy = w-width,1
            gpu.setForeground(colors.yellow)
            gpu.set(dx,dy,"Upgrades")
            for i=1,#once_upgrades,1 do
                gpu.setForeground(colors.white)
                dx,dy = w-width,i*2
                gpu.set(dx,dy,once_upgrades[i].name)
                if coins < once_upgrades[i].price then
                    gpu.setForeground(colors.red)
                end
                dx,dy = w-width,i*2+1
                if once_upgrades[i].has then
                    gpu.setForeground(colors.yellow)
                    gpu.set(dx,dy,"Already")
                else
                    gpu.set(dx,dy,tosting(once_upgrades[i].price))
                end
            end
        end
        if map[cntY][cntX].type == "portal" then
            dx,dy = w-width,2
            gpu.setForeground(colors.cyan)
            gpu.set(dx,dy,"Portal")
            dx,dy = w-width,4
            gpu.set(dx,dy,"TELEPORT")
        end
        --Inventory menu display
        gpu.setBackground(colors.black)
        gpu.setForeground(colors.white)
        dx,dy = w-width,8
        gpu.setForeground(colors.brown)
        gpu.set(w-width,8,"Backpack")
        dx,dy = w-width,9
        gpu.setForeground(colors.orange)
        gpu.set(dx,dy,"Food")
        dx,dy = w-width,10
        gpu.set(dx,dy,tostring(inventory.food).."x")
        dx,dy = w-width,11
        gpu.setForeground(colors.blue)
        gpu.set(dx,dy,"Water")
        dx,dy = w-width,12
        gpu.set(dx,dy,tostring(inventory.water).."x")
        dx,dy = w-width,13
        gpu.setForeground(colors.brown)
        gpu.set(dx,dy,"Alcohol")
        dx,dy = w-width,14
        gpu.set(dx,dy,tostring(inventory.poison).."x")
        --Room inventory display
        gpu.setBackground(colors.black)
        gpu.setForeground(colors.white)
        if #map[cntY][cntX].inventory > 0 then
            dx,dy = w-width,15
            gpu.setForeground(colors.gray)
            gpu.set(dx,dy,"Room")
            for i = 1,#map[cntY][cntX].inventory,1 do
                gpu.setForeground(colors.white)
                dx,dy = w-width,15+i
                gpu.set(dx,dy,map[cntY][cntX].inventory[i])
            end
        end
    end

Я абсолютно непонимаю что не так, никаких ошибок не выдает, клавиши и т.п. обрабатывает правильно, но почему-то только не рисует, черный экран и всё

function shiftMap(direction)
    if direction == "down" then
        for y=2,sizeY,1 do
            for x=1,sizeX,1 do
                map[y][x] = map[y-1][x]
            end
        end
        for x=1,sizeX,1 do
            map[1][x] = nil
        end
    elseif direction == "right" then
        for y=1,sizeY,1 do
            for x=2,sizeX,1 do
                map[y][x] = map[y][x+1]
            end
        end
        for y=1,sizeY,1 do
            map[y][sizeX] = nil
        end
    elseif direction == "top" then
        for y=sizeY-1,1,-1 do
            for x=1,sizeX,1 do
                map[y][x] = map[y+1][x]
            end
        end
        for x=1,sizeX,1 do
            map[sizeY][x] = nil
        end
    elseif direction == "left" then
        for y=1,sizeY,1 do
            for x=sizeX-1,1,-1 do
                map[y][x] = map[y][x-1]
            end
        end
        for y=1,sizeY,1 do
            map[y][1] = nil
        end
    end
end

Так вот, если я сдвигаю вправо/влево - все отлично! Но когда я пытаюсь вверх/вниз - это заставляет ВСЮ карту загенерироватся заново, хотя оно генерирует заново только пустые клетки. А также впринципе некорректно работает.

 

Немогу понять причину возникновения бага.

local function save(path)
		gamepath = path
	  OE.gamepath = gamepath
    if not path then return false end
    fs.makeDirectory('/Temporary/ProjectSave')
    local idk = {}
    for e = 1,#scenes do
      local idk1 ={}
      for i = 1,#scenes[e].game.storage do
      	table.insert(idk1,'/Temporary/ProjectSave/' ..fs.name(scenes[e].game.storage[i].path))
        fs.copy(scenes[e].game.storage[i].path,'/Temporary/ProjectSave/' ..fs.name(scenes[e].game.storage[i].path))
      end
      for i = 1,#scenes[e].game.scripts do
      	table.insert(idk1,'/Temporary/ProjectSave/' ..fs.name(scenes[e].game.scripts[i].path))
        fs.copy(scenes[e].game.scripts[i].path,'/Temporary/ProjectSave/'..fs.name(scenes[e].game.scripts[i].path))
      end
      table.remove(OE.ABN)
      for i = 1,#scenes[e].game.screen do
       scenes[e].game.screen[i].raw:remove() -- удаляем
       table.remove(scenes[e].game.screen[i].raw) -- удаляем вообще
       print(scenes[1].game.screen[1].raw) -- отладка, видим что не удаляеться.
       if scenes[e].game.screen[i].type == 'animation' then
         OE.breakAtlas(scenes[e].game.screen[i]) -- удаляет функций к анимациям
	   end
      end
      OE.cleanBuffers()
      table.insert(idk,string.gsub('/Temporary/ProjectSave/'..scenes[e].name,'.part','')..'.part')
      compressor.pack(string.gsub('/Temporary/ProjectSave/'..scenes[e].name,'.part','')..'.part',idk1)
    end
 -- fs.writeTable('/Temporary/ProjectSave/Game.dat',scenes) -- Выдаёт ошибку not enough memory. По теорий: потому-что там функций. Для тестов отрубли.
  compressor.pack(string.gsub(path,'.proj','')..'.proj',idk)
  adapting()
  OE.draw() -- Только сдесь и выдаёться raw обратно, но оно позже записи в файл
end

Ни в одной из функций не прописано что-бы в raw появлялись функций. Мы вообще её сносим и тут-же смотрим:

.

Таблица есть, функций присутствуют.

xdd какой-то

Код:

local GUI = require("GUI")
local screen = require("Screen")
local color = require('color')

--------------------------------------------------------------------------------

function round(num)
  return math.ceil(num)
end
local workspace = GUI.workspace()

--------------------------------------------------------------------------------
light = {intensivity=0.1,radius = 30,color = 0xFF0000}
local object

local function idk(x,step)
  return (x-step)/(light.intensivity-step) -- Что-бы значение интенсивности колебалось от 0 до 1, а не было 20
end

workspace.eventHandler = function(_,_,...)
  local args=  {...}
  if args[1] == 'touch' then -- При клике создадим объект
  object = workspace:addChild(GUI.object(args[3], args[4], 50, 10))
  object.draw = function(object)
    local x,y = object.x, object.y
    function set(x,y,intensivity)
      local x,y = round(x), round(y)
      local was = {screen.get(x,y)} -- Получаем цвета старого пикселя ..
      screen.set(x,y,color.blend(was[1],light.color,intensivity),color.blend(was[2],light.color,intensivity),was[3]) -- .. и миксуем его с нашим
    end
    local step = light.intensivity/light.radius -- шаг на 1 радиус, что-бы интенсивность света в конце +- была ровна 0
    for radius = 0, light.radius do
      local calc = radius * step -- Как-бы мерием сколько мы прошли, что-бы понять интенсивность света на этом этапе
      local balance = calc -- Раньше сдесь было доп условие, оно не нужно. Пока-что так.
      local last = 0 -- Затычка для будущего момета с отладкой
      for angle = 1,180 do -- Чем меньше, тем меньше "лучей" мы пустим. Полагаю большое количество не имеет смысла.
        if last ~= balance then     --      -   -  - -- Отладка
          print(idk(balance,step),balance,step,calc) -- Отладка
        end     --       -     -     -      -        -- Отладка
        last = balance   --   -        -  -      -   -- Отладка
        set(math.cos(math.deg(angle))*radius+x,(math.sin(math.deg(-angle))*radius)/1.5+y,idk(balance,step)) -- Ставим пиксели, высоту делим на 1.5 для более мене круга. Интересно как оно себя поведёт. 
      end
    end
  end
    workspace:draw()
  end
end
workspace:draw()
workspace:start()

Пример к коду, недостаток angle в цикле. Недостаток "лучей" для круга. А еще красиво.

Радиус 10

Радиус 30

Проблема: Как бы ты не изменял интенсивность, результат тот-же. Не правильно считает центр, он заливается сплошным цветом вместо градиента.

Должно-быть: чем больше интенсивность, тем больше должно убавляться света на радиус. Я не знаю что я делаю не так что-б результат получался одинаковым любом случаи. Вся интенсивность почему-то концентрируется в центре. Жэнтэльмены, помогите узнать что я делаю не так.

P.s пытался автоматизировать пкм по рунической матрице из Botania

local component = require("component")
local robot = require("robot")
local computer = require("computer")

local generator = component.generator
local maxEnergy = computer.maxEnergy()

while true do
    local energy = computer.energy()
    local energyPercentage = energy / maxEnergy

    if energyPercentage < 0.20 then
        robot.select(1)
        generator.insert()
    else
        generator.remove()
        robot.select(16)
        robot.use()
    end
end

Интересно, что если повторно запустить программу для беспроводного, то все работает, и Primary определяется, и файл отсылается. Вот код:

local component = require("component")

local modem = component.modem

component.setPrimary("modem", "адрес модема") -- пробовал ставить и перед предыдущей строкой.

prim = component.getPrimary("modem").address
  print("primary modem is : "..prim)

робот сканирует 12 слотов и выдаёт сколько там в общем блоков, а на монитор с помощью второй тоннельной карты выводится как раз сколько блоков в этих 12-ти слотах
Код для робота

Код для монитора

Помогите разобраться 

Сделал такой код который в теории должен работать, но он не работает + нечего не выводит
Если есть совпадение radar.name[j] == RadarBlackList, то он выводит 1, а если нету, то 0
но он даже 0 не выводит
можете разъяснить? А то я нечего не понимаю

Сделал программу для своего варпа
Её задача сканировать область и выводить сколько людей в определённом радиусе
Я всё сделал, но не получается написать правильно логику

Она должна выводить 'В комнате кроме вас ещё кто-то есть!' если 2 или больше человек в радиусе 7 блоков
но все равно она сканирует свой дефолтный радиус 25 блоков, и не берёт во внимание то что я прописал if #rad >= 2 and rad.distance <= 7, 'В комнате кроме вас ещё кто-то есть!', только когда 2+ человек в радиусе 7 блоков
что я не так делаю?

Дошёл до самого конца, в принципе она уже и предмет сможет выдать через костыль, но я хочу чтобы она это делала по нажатию одной кнопки.

пишу под mineOS.

Первая прога под его гуи апи, поэтому грешу на сборщик кнопок. но как это реализовать по другому не знаю.

собсна - main.lua

local component=require("component")
local chests = require("chests")
local cr=component.redstone
local ct=component.transposer
local GUI = require("GUI")
local system = require("System")
local items = chests.getStorageItems()
local slots={}
---- Выдача предметов

----Копирование таблицы в новый экземпляр
function table.copy(t)
  local u = { }
  for k, v in pairs(t) do u[k] = v end
  return setmetatable(u, getmetatable(t))
end
----подготовка списка предметов для вывода
function getScreenItems(name)
local screenItems = {}
	if name == "" then 
		for o,_ in pairs(items) do
			if o<=80 then
				table.insert(screenItems, items[o])
				--print(screenItems[#screenItems].label)
			end
		end
	else
		for itm,_ in pairs(items) do
			fnd = string.find(unicode.lower(items[itm].label),unicode.lower(name))
			if fnd~=nill then
				table.insert(screenItems, items[itm])
			end
		end
	end
return screenItems	
end
screenItems = getScreenItems("")
----
---------------------------------------------------------------------------------

-- Add a new window to MineOS workspace
local workspace, window, menu = system.addWindow(GUI.filledWindow(1, 1, 160, 50, 0xE1E1E1,addTitlePanel))
--window:maximize() -- раскрыть на весь экран 
-- Get localization table dependent of current system language
local localization = system.getCurrentScriptLocalization()

-- собираю гуи
local layout = window:addChild(GUI.layout(1, 1, window.width, window.height, 1, 3))
layout:setRowHeight(1,GUI.SIZE_POLICY_RELATIVE,0.08)
layout:setRowHeight(2,GUI.SIZE_POLICY_RELATIVE,0.8)
--layout.showGrid = true
local layout1 = layout:setPosition(1, 2, layout:addChild(GUI.layout(1, 1, layout.width, layout.height*0.8, 4, 1)))

--поисковая строка
finder = layout:setPosition(1,3,layout:addChild(GUI.input(2, 2, 30, 3, 0xEEEEEE, 0x555555, 0x999999, 0xFFFFFF, 0x2D2D2D, "", "Item name")))
finder.historyEnabled = true
finder.onInputFinished = function()
	screenItems = getScreenItems(finder.text)
	drawbtn(screenItems)
	workspace:draw()
end
-------------------------------

--layout1.showGrid = true
layout1:setColumnWidth(1,GUI.SIZE_POLICY_RELATIVE,0.25)
layout1:setColumnWidth(2,GUI.SIZE_POLICY_RELATIVE,0.25)
layout1:setColumnWidth(3,GUI.SIZE_POLICY_RELATIVE,0.25)
layout1:setColumnWidth(4,GUI.SIZE_POLICY_RELATIVE,0.25)

-- Сборщик кнопок
function drawbtn(screenItems)
	layout1:removeChildren()
	for i=1,20,1 do
		for o = 1,4,1 do
			id=(o-1)*20+i
			if #screenItems>=id then 
				btn = layout1:setPosition(o, 1, layout1:addChild(GUI.button(0, 0, (layout.width/4)-2, 1, 0xEEEEEE, 0x000000, 0xAAAAAA, 0x0, screenItems[id].label)))
				btn.id = id
				
			else
			end
		end
	end 
	for o,_ in pairs(layout1.children) do
		layout1.children[o].onTouch = function()
			--GUI.alert(screenItems[o].name)
			slots=chests.issueItem(screenItems[o])
			--ct.transferItem(slots[1], 1, _, slots[2])-- ошибка при трансфере
			
			
		end
	end
end

drawbtn(screenItems)
-- Customize MineOS menu for this application by your will
local contextMenu = menu:addContextMenuItem("File")
contextMenu:addItem("New")
contextMenu:addSeparator()
contextMenu:addItem("Open")
contextMenu:addItem("Save", true)
contextMenu:addItem("Save as")
contextMenu:addSeparator()
contextMenu:addItem("Close").onTouch = function()
	window:remove()
end

-- You can also add items without context menu
menu:addItem("выдать").onTouch = function()
	--GUI.alert("It works!")
	ct.transferItem(slots[1], 1, _, slots[2])
end

-- Create callback function with resizing rules when window changes its' size
window.onResize = function(newWidth, newHeight)
  window.backgroundPanel.width, window.backgroundPanel.height = newWidth, newHeight
  layout.width, layout.height = newWidth, newHeight
  layout1.width, layout1.height = newWidth, newHeight*0.8
 
end

---------------------------------------------------------------------------------

-- Draw changes on screen after customizing your window
workspace:draw()
--GUI.alert(component.transposer.getAllStacks(2).getAll()[1])
cr.setOutput(2,0)

--print(items[1].label)
--ct.transferItem(2, 1, _, 1, 1)

библиотечка chests.lua

local chest = {}
local component=require("component")
local ct=component.transposer
function chest.getStorageItems()
	local allItems = {}
	local thisItems = {}
	for i=0,5,1 do

		if ((ct.getInventoryName(i)) and (i~=1)) then
			local thisItems = ct.getAllStacks(i).getAll()
			for o,_ in pairs(thisItems) do
				if (thisItems[o].name~="minecraft:air") then
					local thisIt = false
					
					for g,_ in pairs(allItems) do
						if  ((thisIt==false) and (allItems[g].name == thisItems[o].name) and (allItems[g].label == thisItems[o].label)) then 
							thisIt = true
							allItems[g].count = allItems[g].count+thisItems[o].size
						end
					end
					if thisIt == false then
					
						table.insert(allItems, {name = thisItems[o].name, count = thisItems[o].size, label = thisItems[o].label})
						
					end
					
				end
			end
			
		end
	end
	return allItems
end
function chest.issueItem(itm)
	local suka = {0,0}
	local thisIt = false
	for i=0,5,1 do
		if ((thisIt==false)and(ct.getInventoryName(i)) and (i~=1)) then
			local thisItems = ct.getAllStacks(i).getAll()
			for o,_ in pairs(thisItems) do
				if (thisItems[o].name~="minecraft:air") then					
					if (thisIt==false) and (thisItems[o].name == itm.name) and (thisItems[o].label == itm.label) then
						suka = {i,o}
						
						thisIt=true
					end
				end
			end
			
		end
	end
	thisItems={}
	return suka
end
return chest

ошибка, наверно это недостаток памяти, хз

local component = require("component")
local term = require("term")
local string = require("string")
local meController = component.me_controller
local gpu = component.gpu
 
items = {

event.timer(15, animate.Anim(), math.huge)

Запускаю скрипт - выполняется корректно 1 раз анимация (сразу, без времени), а затем выдаёт ошибку bad argument #2 (function expected, got nil). Сделать через os.sleep(), как я понимаю, нельзя, так как одновременно должны работать две программы (главная (другая, не эта) и программа анимации (эта), сделаны через библиотеку thread), а os.sleep() останавливает всю систему на указанное время (опять же как я понял).
Так в чём же проблема? Или может посоветуете другое решение.

function Merging(img, horizontal, vertical)

  local newImage = {{}}
  for nLine = 1, #img do
    for nColumn = 1, #img[nLine] do
      newImage[nLine][nColumn] = img[nLine][nColumn]	-- Тут ошибка!
    end
  end
  if(horizontal == true) then
    local newLine = #img + 1
    for nLine = #img, 1 do
      for nColumn = 1, #img[nLine] do
        newImage[newLine][nColumn] = img[nLine][nColumn]
      end
      newLine = newLine + 1
    end
  end
  if(vertical == true) then
    for nLine = 1, #img do
      local newColumn = #img[nLine] + 1
      for nColumn = #img[nLine], 1 do
        newImage[nLine][newColumn] = img[nLine][nColumn]
        newColumn = newColumn + 1
      end
    end
  end


  return newImage
end