+1 -1

config.json

Reviewed

··· 1 1 - {"slots":{"0":{"name":"slot1","type":{"events":[],"methods":[]}},"1":{"name":"slot2","type":{"events":[],"methods":[]}},"2":{"name":"slot3","type":{"events":[],"methods":[]}},"3":{"name":"slot4","type":{"events":[],"methods":[]}},"4":{"name":"slot5","type":{"events":[],"methods":[]}},"5":{"name":"slot6","type":{"events":[],"methods":[]}},"6":{"name":"slot7","type":{"events":[],"methods":[]}},"7":{"name":"slot8","type":{"events":[],"methods":[]}},"8":{"name":"slot9","type":{"events":[],"methods":[]}},"9":{"name":"slot10","type":{"events":[],"methods":[]}},"-1":{"name":"unit","type":{"events":[],"methods":[]}},"-2":{"name":"system","type":{"events":[],"methods":[]}},"-3":{"name":"library","type":{"events":[],"methods":[]}}},"handlers":[{"code":"system.print(\"----------------------------------------\")\nsystem.print(\"DU-Mining-Units-Monitoring version 1.4.1\")\nsystem.print(\"----------------------------------------\")\n\nfontSize = 25 --export: font size for each line on the screen\ncalibrationSecondsRedLevel = 259200 --export: The time in seconds from last calibration above the time will be displayed in red. Default to 259200 (3 days / 72h)\ncalibrationSecondsYellowLevel = 86400 --export: The time in seconds from last calibration above the time will be displayed in yellow. Default to 86400 (1 day / 24h)\n\nlocal renderScript = [[\nlocal json = require('dkjson')\nlocal data = json.decode(getInput()) or {}\nimages = {}\nfor index,mu in ipairs(data) do\n images[index] = loadImage(\"resources_generated/env/\" .. mu[3][2])\nend\n\nlocal rx,ry = getResolution()\n\nlocal back=createLayer()\nlocal front=createLayer()\n\nfont_size = ]] .. fontSize .. [[\n\n\nlocal mini=loadFont('Play',12)\nlocal small=loadFont('Play',14)\nlocal smallBold=loadFont('Play-Bold',18)\nlocal itemName=loadFont('Play-Bold',font_size)\nlocal itemNameSmall=loadFont('Play-Bold',font_size*0.75)\nlocal itemNameXs=loadFont('Play-Bold',font_size*0.65)\n\nsetBackgroundColor( 15/255,24/255,29/255)\n\nsetDefaultStrokeColor( back,Shape_Line,0,0,0,0.5)\nsetDefaultShadow( back,Shape_Line,6,0,0,0,0.5)\n\nsetDefaultFillColor( front,Shape_BoxRounded,249/255,212/255,123/255,1)\nsetDefaultFillColor( front,Shape_Text,0,0,0,1)\nsetDefaultFillColor( front,Shape_Box,0.075,0.125,0.156,1)\nsetDefaultFillColor( front,Shape_Text,0.710,0.878,0.941,1)\n\nfunction format_number(value)\n local formatted = value\n while true do\n formatted, k = string.gsub(formatted, \"^(-?%d+)(%d%d%d)\", '%1 %2')\n if (k==0) then\n break\n end\n end\n return formatted\nend\n\nfunction SecondsToClockString(a)local a=tonumber(a)if a==nil or a<=0 then return\"-\"else days=string.format(\"%2.f\",math.floor(a/(3600*24)))hours=string.format(\"%2.f\",math.floor(a/3600-days*24))mins=string.format(\"%2.f\",math.floor(a/60-hours*60-days*24*60))secs=string.format(\"%2.f\",math.floor(a-hours*3600-days*24*60*60-mins*60))str=\"\"if tonumber(days)>0 then str=str..days..\"d \"end;if tonumber(hours)>0 then str=str..hours..\"h \"end;if tonumber(mins)>0 then str=str..mins..\"m \"end;if tonumber(secs)>0 then str=str..secs..\"s\"end;return str end end\n\nfunction round(a,b)if b then return utils.round(a/b)*b end;return a>=0 and math.floor(a+0.5)or math.ceil(a-0.5)end\n\nfunction getRGBGradient(a,b,c,d,e,f,g)a=-1*math.cos(a*math.pi)/2+0.5;local h=b-a*(b-e)local i=c-a*(c-f)local j=d-a*(d-g)return h,i,j end\n\nfunction renderHeader(title)\n local h_factor = 12\n local h = 35\n addLine( back,0,h+12,rx,h+12)\n addBox(front,0,12,rx,h)\n addText(front,smallBold,title,44,35)\nend\n\nlocal storageBar = createLayer()\nsetDefaultFillColor(storageBar,Shape_Text,110/255,166/255,181/255,1)\nsetDefaultFillColor(storageBar,Shape_Box,0.075,0.125,0.156,1)\nsetDefaultFillColor(storageBar,Shape_Line,1,1,1,1)\n\nlocal storageYellow = createLayer()\nsetDefaultFillColor(storageYellow,Shape_Text,249/255,212/255,123/255,1)\nsetDefaultFillColor(storageYellow,Shape_Box,249/255,212/255,123/255,1)\n\nlocal storageDark = createLayer()\nsetDefaultFillColor(storageDark,Shape_Text,63/255,92/255,102/255,1)\nsetDefaultFillColor(storageDark,Shape_Box,13/255,24/255,28/255,1)\n\nlocal storageRed = createLayer()\nsetDefaultFillColor(storageRed,Shape_Text,177/255,42/255,42/255,1)\nsetDefaultFillColor(storageRed,Shape_Box,177/255,42/255,42/255,1)\n\nlocal storageGreen = createLayer()\nsetDefaultFillColor(storageGreen,Shape_Text,34/255,177/255,76/255,1)\nsetDefaultFillColor(storageGreen,Shape_Box,34/255,177/255,76/255,1)\n\nlocal imagesLayer = createLayer()\n\nlocal gaugeColorLayer = createLayer()\n\nfunction renderResistanceBar(title, index, status, time, prod_rate, calibration, optimal, efficiency, cal_time, x, y, w, h, withTitle)\n local quantity_x_pos = font_size * 6.7\n local percent_x_pos = font_size * 2\n\n local colorLayer = storageGreen\n if status == \"STALLED\" then colorLayer = storageYellow end\n if status == \"STOPPED\" then colorLayer = storageRed end\n\n local calibrationRequiredTime = time + ((calibration-optimal)/.625)*3600\n if 259200 - cal_time > 0 then calibrationRequiredTime = calibrationRequiredTime + 259200 - cal_time end\n if calibration < optimal then calibrationRequiredTime = 86400 - cal_time end\n\n local colorRequiredCalibrationLayer = storageBar\n if calibrationRequiredTime < 86400 then colorRequiredCalibrationLayer = storageYellow end\n if calibrationRequiredTime < 43200 then colorRequiredCalibrationLayer = storageRed end\n\n if calibrationRequiredTime < 0 then\n calibrationRequiredTime = \"REQUIRED\"\n else \n calibrationRequiredTime = SecondsToClockString(calibrationRequiredTime)\n end\n\n pcal = calibration\n if pcal > optimal then pcal = optimal end\n if optimal > 0 then\n pcal = pcal / optimal\n else\n pcal = 1\n end\n local r = 34/255\n local g = 177/255\n local b = 76/255\n if pcal < 1 then\n r,g,b = getRGBGradient(pcal,177/255,42/255,42/255,249/255,212/255,123/255)\n end\n\n local CalibrationTimeColorLayer = storageGreen\n if cal_time > ]] .. calibrationSecondsYellowLevel .. [[ then CalibrationTimeColorLayer = storageYellow end\n if cal_time > ]] .. calibrationSecondsRedLevel .. [[ then CalibrationTimeColorLayer = storageRed end\n\n addBox(storageBar,x,y,w,h)\n\n\n if withTitle then\n addText(storageBar, small, \"ORE\", x, y-5)\n addText(storageBar, small, \"STATUS\", x+w-60, y-5)\n setNextTextAlign(storageBar, AlignH_Center, AlignV_Bottom)\n addText(storageBar, small, \"TIME & RATE\", x+(w*0.3), y-3)\n setNextTextAlign(storageBar, AlignH_Center, AlignV_Bottom)\n addText(storageBar, small, \"Calibration\", x+(w*0.45), y-3)\n setNextTextAlign(storageBar, AlignH_Center, AlignV_Bottom)\n addText(storageBar, small, \"CALIBRATION REQUIRED IN\", x+(w*0.65), y-3)\n setNextTextAlign(storageBar, AlignH_Center, AlignV_Bottom)\n addText(storageBar, small, \"EFFICIENCY\", x+(w*0.80), y-3)\n end\n\n addText(storageBar, itemName, title, x+15+font_size, y+h-font_size/2)\n setNextFillColor(gaugeColorLayer, r, g, b, 1)\n addBox(gaugeColorLayer,x,y+h-3,w*calibration/100,3)\n\n if isImageLoaded(images[index]) then\n addImage(imagesLayer, images[index], x+10, y+5, font_size, font_size)\n end\n setNextTextAlign(storageBar, AlignH_Center, AlignV_Middle)\n addText(storageBar, itemNameXs, SecondsToClockString(time), x+(w*0.3), y+(h/4)-3)\n setNextTextAlign(storageBar, AlignH_Center, AlignV_Middle)\n addText(storageBar, itemNameXs, format_number(prod_rate) .. 'L', x+(w*0.3), y+(h/4)+(h/4)+(h/4)-3)\n setNextTextAlign(CalibrationTimeColorLayer, AlignH_Center, AlignV_Middle)\n addText(CalibrationTimeColorLayer, itemNameXs, SecondsToClockString(cal_time), x+(w*0.45), y+(h/4)-3)\n setNextFillColor(gaugeColorLayer, r, g, b, 1)\n setNextTextAlign(gaugeColorLayer, AlignH_Center, AlignV_Middle)\n addText(gaugeColorLayer, itemNameXs, format_number(round(calibration)) .. '% / ' ..format_number(round(optimal)) .. '%', x+(w*0.45), y+(h/4)+(h/4)+(h/4)-3)\n setNextTextAlign(colorRequiredCalibrationLayer, AlignH_Center, AlignV_Middle)\n addText(colorRequiredCalibrationLayer, itemNameSmall, calibrationRequiredTime, x+(w*0.65), y+(h/2)-3)\n setNextTextAlign(storageBar, AlignH_Center, AlignV_Middle)\n addText(storageBar, itemNameSmall, format_number(round(efficiency)) .. '%', x+(w*0.80), y+(h/2)-3)\n\n setNextTextAlign(colorLayer, AlignH_Right, AlignV_Middle)\n addText(colorLayer, itemName, status, x+w-10, y+(h/2)-3)\nend\n\nrenderHeader('MINING UNITS MONITORING')\n\nstart_h = 75\n\nlocal h = font_size + font_size / 2\nfor i,mu in ipairs(data) do\n renderResistanceBar(mu[3][1], i, mu[1], mu[2], mu[4], mu[5], mu[6], mu[7], mu[8], 44, start_h, rx-88, h, i==1)\n start_h = start_h+h+15\nend\nrequestAnimationFrame(10)\n]]\n\nscreens = {}\nmining_units = {}\nfor slot_name, slot in pairs(unit) do\n if type(slot) == \"table\"\n and type(slot.export) == \"table\"\n and slot.getElementClass\n then\n slot.slotname = slot_name\n if slot.getElementClass():lower() == 'screenunit' then\n table.insert(screens,slot)\n slot.setRenderScript(renderScript)\n elseif slot.getElementClass():lower() == 'miningunit' then\n table.insert(mining_units,slot)\n end\n end\nend\nif #screens == 0 then\n system.print(\"No screen detected\")\nelse\n table.sort(screens, function(a,b) return a.slotname < b.slotname end)\n local plural = \"\"\n if #screens > 1 then plural = \"s\" end\n system.print(#screens .. \" screen\" .. plural .. \" connected\")\nend\nif #mining_units == 0 then\n system.print(\"No mining unit detected\")\nelse\n table.sort(mining_units, function(a,b) return a.slotname < b.slotname end)\n local plural = \"\"\n if #mining_units > 1 then plural = \"s\" end\n system.print(#mining_units .. \" mining unit\" .. plural .. \" connected\")\nend\n\nfunction round(a,b)if b then return utils.round(a/b)*b end;return a>=0 and math.floor(a+0.5)or math.ceil(a-0.5)end\n\nores = {}\n\n--Nested Coroutines by Jericho\ncoroutinesTable = {}\n--all functions here will become a coroutine\nMyCoroutines = {\n function()\n screen_data = {}\n for index, mu in pairs(mining_units) do\n local ore_id = mu.getActiveOre()\n if ores[ore_id] == nil then\n local item_data = system.getItem(ore_id)\n ores[ore_id] = {\n item_data.locDisplayName,\n item_data.iconPath:gsub(\"resources_generated/env/\",\"\")\n }\n end\n local mu_data = {\n mu.getStatus(),\n round(mu.getRemainingTime()),\n ores[ore_id],\n round(mu.getProductionRate()*100)/100,\n round(mu.getCalibrationRate()*10000)/100,\n round(mu.getOptimalRate()*10000)/100,\n round(mu.getEfficiency()*10000)/100,\n round(mu.getLastExtractionTime()),\n }\n table.insert(screen_data, mu_data)\n coroutine.yield(coroutinesTable[1])\n end\n for index, screen in pairs(screens) do\n screen.setScriptInput(json.encode(screen_data))\n end\n end\n}\n\nfunction initCoroutines()\n for _,f in pairs(MyCoroutines) do\n local co = coroutine.create(f)\n table.insert(coroutinesTable, co)\n end\nend\n\ninitCoroutines()\n\nrunCoroutines = function()\n for i,co in ipairs(coroutinesTable) do\n if coroutine.status(co) == \"dead\" then\n coroutinesTable[i] = coroutine.create(MyCoroutines[i])\n end\n if coroutine.status(co) == \"suspended\" then\n assert(coroutine.resume(co))\n end\n end\nend\n\nMainCoroutine = coroutine.create(runCoroutines)\n","filter":{"args":[],"signature":"start()","slotKey":"-1"},"key":"0"},{"code":"if coroutine.status(MainCoroutine) == \"dead\" then\n MainCoroutine = coroutine.create(runCoroutines)\nend\nif coroutine.status(MainCoroutine) == \"suspended\" then\n assert(coroutine.resume(MainCoroutine))\nend","filter":{"args":[],"signature":"update()","slotKey":"-2"},"key":"1"}],"methods":[],"events":[]} 1 1 + {"slots":{"0":{"name":"slot1","type":{"events":[],"methods":[]}},"1":{"name":"slot2","type":{"events":[],"methods":[]}},"2":{"name":"slot3","type":{"events":[],"methods":[]}},"3":{"name":"slot4","type":{"events":[],"methods":[]}},"4":{"name":"slot5","type":{"events":[],"methods":[]}},"5":{"name":"slot6","type":{"events":[],"methods":[]}},"6":{"name":"slot7","type":{"events":[],"methods":[]}},"7":{"name":"slot8","type":{"events":[],"methods":[]}},"8":{"name":"slot9","type":{"events":[],"methods":[]}},"9":{"name":"slot10","type":{"events":[],"methods":[]}},"-1":{"name":"unit","type":{"events":[],"methods":[]}},"-2":{"name":"system","type":{"events":[],"methods":[]}},"-3":{"name":"library","type":{"events":[],"methods":[]}}},"handlers":[{"code":"system.print(\"----------------------------------------\")\nsystem.print(\"DU-Mining-Units-Monitoring version 1.5.0\")\nsystem.print(\"----------------------------------------\")\n\nfontSize = 25 --export: font size for each line on the screen\ncalibrationSecondsRedLevel = 259200 --export: The time in seconds from last calibration above the time will be displayed in red. Default to 259200 (3 days / 72h)\ncalibrationSecondsYellowLevel = 86400 --export: The time in seconds from last calibration above the time will be displayed in yellow. Default to 86400 (1 day / 24h)\n\nlocal renderScript = [[\nlocal json = require('dkjson')\nlocal fromScript = json.decode(getInput()) or {}\npool = fromScript[1] or {}\ndata = fromScript[2] or {}\nimages = {}\nfor k,p in pairs(pool) do\n if images[k] == nil or not isImageLoaded(images[k]) then\n images[k] = loadImage(\"resources_generated/env/\" .. p[4])\n end\nend\n\nlocal rx,ry = getResolution()\n\nlocal back=createLayer()\nlocal front=createLayer()\n\nfont_size = 25\n\nlocal mini=loadFont('Play',12)\nlocal small=loadFont('Play',14)\nlocal smallBold=loadFont('Play-Bold',18)\nlocal itemName=loadFont('Play-Bold',font_size)\nlocal itemNameSmall=loadFont('Play-Bold',font_size*0.75)\nlocal itemNameXs=loadFont('Play-Bold',font_size*0.65)\n\nsetBackgroundColor( 15/255,24/255,29/255)\n\nsetDefaultStrokeColor( back,Shape_Line,0,0,0,0.5)\nsetDefaultShadow( back,Shape_Line,6,0,0,0,0.5)\n\nsetDefaultFillColor( front,Shape_BoxRounded,249/255,212/255,123/255,1)\nsetDefaultFillColor( front,Shape_Text,0,0,0,1)\nsetDefaultFillColor( front,Shape_Box,0.075,0.125,0.156,1)\nsetDefaultFillColor( front,Shape_Text,0.710,0.878,0.941,1)\n\nfunction format_number(value)\n local formatted = value\n while true do\n formatted, k = string.gsub(formatted, \"^(-?%d+)(%d%d%d)\", '%1 %2')\n if (k==0) then\n break\n end\n end\n return formatted\nend\n\nfunction SecondsToClockString(a)local a=tonumber(a)if a==nil or a<=0 then return\"-\"else days=string.format(\"%2.f\",math.floor(a/(3600*24)))hours=string.format(\"%2.f\",math.floor(a/3600-days*24))mins=string.format(\"%2.f\",math.floor(a/60-hours*60-days*24*60))secs=string.format(\"%2.f\",math.floor(a-hours*3600-days*24*60*60-mins*60))str=\"\"if tonumber(days)>0 then str=str..days..\"d \"end;if tonumber(hours)>0 then str=str..hours..\"h \"end;if tonumber(mins)>0 then str=str..mins..\"m \"end;if tonumber(secs)>0 then str=str..secs..\"s\"end;return str end end\n\nfunction round(a,b)if b then return utils.round(a/b)*b end;return a>=0 and math.floor(a+0.5)or math.ceil(a-0.5)end\n\nfunction getRGBGradient(a,b,c,d,e,f,g)a=-1*math.cos(a*math.pi)/2+0.5;local h=b-a*(b-e)local i=c-a*(c-f)local j=d-a*(d-g)return h,i,j end\n\nfunction renderHeader(title)\n local h_factor = 12\n local h = 35\n addLine( back,0,h+12,rx,h+12)\n addBox(front,0,12,rx,h)\n addText(front,smallBold,title,44,35)\nend\n\nlocal storageBar = createLayer()\nsetDefaultFillColor(storageBar,Shape_Text,110/255,166/255,181/255,1)\nsetDefaultFillColor(storageBar,Shape_Box,0.075,0.125,0.156,1)\nsetDefaultFillColor(storageBar,Shape_Line,1,1,1,1)\n\nlocal storageYellow = createLayer()\nsetDefaultFillColor(storageYellow,Shape_Text,249/255,212/255,123/255,1)\nsetDefaultFillColor(storageYellow,Shape_Box,249/255,212/255,123/255,1)\n\nlocal storageDark = createLayer()\nsetDefaultFillColor(storageDark,Shape_Text,63/255,92/255,102/255,1)\nsetDefaultFillColor(storageDark,Shape_Box,13/255,24/255,28/255,1)\n\nlocal storageRed = createLayer()\nsetDefaultFillColor(storageRed,Shape_Text,177/255,42/255,42/255,1)\nsetDefaultFillColor(storageRed,Shape_Box,177/255,42/255,42/255,1)\n\nlocal storageGreen = createLayer()\nsetDefaultFillColor(storageGreen,Shape_Text,34/255,177/255,76/255,1)\nsetDefaultFillColor(storageGreen,Shape_Box,34/255,177/255,76/255,1)\n\nlocal imagesLayer = createLayer()\n\nlocal gaugeColorLayer = createLayer()\n\nfunction renderResistanceBar(ore_id, status, time, prod_rate, calibration, optimal, efficiency, cal_time, x, y, w, h, withTitle)\n local quantity_x_pos = font_size * 6.7\n local percent_x_pos = font_size * 2\n\n local colorLayer = storageGreen\n if status == \"STALLED\" then colorLayer = storageYellow end\n if status == \"STOPPED\" then colorLayer = storageRed end\n\n local calibrationRequiredTime = time + ((calibration-optimal)/.625)*3600\n if 259200 - cal_time > 0 then calibrationRequiredTime = calibrationRequiredTime + 259200 - cal_time end\n if calibration < optimal then calibrationRequiredTime = 86400 - cal_time end\n\n local colorRequiredCalibrationLayer = storageBar\n if calibrationRequiredTime < 86400 then colorRequiredCalibrationLayer = storageYellow end\n if calibrationRequiredTime < 43200 then colorRequiredCalibrationLayer = storageRed end\n\n if calibrationRequiredTime < 0 then\n calibrationRequiredTime = \"REQUIRED\"\n else \n calibrationRequiredTime = SecondsToClockString(calibrationRequiredTime)\n end\n\n pcal = calibration\n if pcal > optimal then pcal = optimal end\n if optimal > 0 then\n pcal = pcal / optimal\n else\n pcal = 1\n end\n local r = 34/255\n local g = 177/255\n local b = 76/255\n if pcal < 1 then\n r,g,b = getRGBGradient(pcal,177/255,42/255,42/255,249/255,212/255,123/255)\n end\n\n local CalibrationTimeColorLayer = storageGreen\n if cal_time > 86400 then CalibrationTimeColorLayer = storageYellow end\n if cal_time > 259200 then CalibrationTimeColorLayer = storageRed end\n\n addBox(storageBar,x,y,w,h)\n\n\n if withTitle then\n addText(storageBar, small, \"ORE\", x, y-5)\n addText(storageBar, small, \"STATUS\", x+w-60, y-5)\n setNextTextAlign(storageBar, AlignH_Center, AlignV_Bottom)\n addText(storageBar, small, \"TIME & RATE\", x+(w*0.3), y-3)\n setNextTextAlign(storageBar, AlignH_Center, AlignV_Bottom)\n addText(storageBar, small, \"Calibration\", x+(w*0.45), y-3)\n setNextTextAlign(storageBar, AlignH_Center, AlignV_Bottom)\n addText(storageBar, small, \"CALIBRATION REQUIRED IN\", x+(w*0.65), y-3)\n setNextTextAlign(storageBar, AlignH_Center, AlignV_Bottom)\n addText(storageBar, small, \"EFFICIENCY\", x+(w*0.80), y-3)\n end\n \n addText(storageBar, itemName, pool[ore_id][3], x+15+font_size, y+h-font_size/2)\n setNextFillColor(gaugeColorLayer, r, g, b, 1)\n addBox(gaugeColorLayer,x,y+h-3,w*calibration/100,3)\n\n if isImageLoaded(images[ore_id]) then\n addImage(imagesLayer, images[ore_id], x+10, y+5, font_size, font_size)\n end\n setNextTextAlign(storageBar, AlignH_Center, AlignV_Middle)\n addText(storageBar, itemNameXs, SecondsToClockString(time), x+(w*0.3), y+(h/4)-3)\n setNextTextAlign(storageBar, AlignH_Center, AlignV_Middle)\n addText(storageBar, itemNameXs, format_number(prod_rate) .. 'L', x+(w*0.3), y+(h/4)+(h/4)+(h/4)-3)\n setNextTextAlign(CalibrationTimeColorLayer, AlignH_Center, AlignV_Middle)\n addText(CalibrationTimeColorLayer, itemNameXs, SecondsToClockString(cal_time), x+(w*0.45), y+(h/4)-3)\n setNextFillColor(gaugeColorLayer, r, g, b, 1)\n setNextTextAlign(gaugeColorLayer, AlignH_Center, AlignV_Middle)\n addText(gaugeColorLayer, itemNameXs, format_number(round(calibration)) .. '% / ' ..format_number(round(optimal)) .. '%', x+(w*0.45), y+(h/4)+(h/4)+(h/4)-3)\n setNextTextAlign(colorRequiredCalibrationLayer, AlignH_Center, AlignV_Middle)\n addText(colorRequiredCalibrationLayer, itemNameSmall, calibrationRequiredTime, x+(w*0.65), y+(h/2)-3)\n setNextTextAlign(storageBar, AlignH_Center, AlignV_Middle)\n addText(storageBar, itemNameSmall, format_number(round(efficiency)) .. '%', x+(w*0.80), y+(h/2)-3)\n\n setNextTextAlign(colorLayer, AlignH_Right, AlignV_Middle)\n addText(colorLayer, itemName, status, x+w-10, y+(h/2)-3)\nend\n\nfunction renderPool(pool)\n local h_factor = 12\n local h = 35\n addLine( back,0,ry-h+h_factor,rx,ry-h+h_factor)\n addBox(front,0,ry-h-h_factor,rx,h)\n local nb_col = 1\n for k,v in pairs(pool) do nb_col = nb_col + 1 end\n local n = 1\n for k,v in pairs(pool) do\n setNextTextAlign(storageBar, AlignH_Center, AlignV_Bottom)\n addText(storageBar, small, v[3], (rx/nb_col)*n, ry-h-h_factor)\n if isImageLoaded(images[k]) then\n addImage(storageBar, images[k], (rx/nb_col)*n-h-h, ry-(h/2)-h_factor-(h/2)+2, h-4, h-4)\n end\n setNextTextAlign(storageBar, AlignH_Center, AlignV_Middle)\n addText(storageBar, itemNameSmall, format_number(round(v[1])) .. \" / \" .. format_number(round(v[2])), (rx/nb_col)*n, ry-(h/2)-h_factor)\n n = n + 1\n end\nend\n\nrenderHeader('MINING UNITS MONITORING')\n\nstart_h = 75\n\nlocal h = font_size + font_size / 2\nfor i,mu in ipairs(data) do\n renderResistanceBar(tostring(mu[3]), mu[1], mu[2], mu[4], mu[5], mu[6], mu[7], mu[8], 44, start_h, rx-88, h, i==1)\n start_h = start_h+h+15\nend\nrenderPool(pool)\nrequestAnimationFrame(10)\n]]\n\nscreens = {}\nmining_units = {}\nfor slot_name, slot in pairs(unit) do\n if type(slot) == \"table\"\n and type(slot.export) == \"table\"\n and slot.getElementClass\n then\n slot.slotname = slot_name\n if slot.getElementClass():lower() == 'screenunit' then\n table.insert(screens,slot)\n slot.setRenderScript(renderScript)\n elseif slot.getElementClass():lower() == 'miningunit' then\n table.insert(mining_units,slot)\n end\n end\nend\nif #screens == 0 then\n system.print(\"No screen detected\")\nelse\n table.sort(screens, function(a,b) return a.slotname < b.slotname end)\n local plural = \"\"\n if #screens > 1 then plural = \"s\" end\n system.print(#screens .. \" screen\" .. plural .. \" connected\")\nend\nif #mining_units == 0 then\n system.print(\"No mining unit detected\")\nelse\n table.sort(mining_units, function(a,b) return a.slotname < b.slotname end)\n local plural = \"\"\n if #mining_units > 1 then plural = \"s\" end\n system.print(#mining_units .. \" mining unit\" .. plural .. \" connected\")\nend\n\nfunction round(a,b)if b then return utils.round(a/b)*b end;return a>=0 and math.floor(a+0.5)or math.ceil(a-0.5)end\n\nores = {}\n\n--Nested Coroutines by Jericho\ncoroutinesTable = {}\n--all functions here will become a coroutine\nMyCoroutines = {\n function()\n screen_data = {}\n pool = {}\n for index, mu in ipairs(mining_units) do\n local mup = mu.getOrePools()\n for _,p in ipairs(mup) do\n if ores[p.oreId] == nil then\n local item_data = system.getItem(p.oreId)\n ores[p.oreId] = {\n item_data.locDisplayName,\n item_data.iconPath:gsub(\"resources_generated/env/\",\"\")\n }\n end\n pool[p.oreId] = {p.available, p.maximum, ores[p.oreId][1], ores[p.oreId][2]}\n end\n local mu_data = {\n mu.getStatus(),\n round(mu.getRemainingTime()),\n mu.getActiveOre(),\n round(mu.getProductionRate()*100)/100,\n round(mu.getCalibrationRate()*10000)/100,\n round(mu.getOptimalRate()*10000)/100,\n round(mu.getEfficiency()*10000)/100,\n round(mu.getLastExtractionTime()),\n }\n table.insert(screen_data, mu_data)\n coroutine.yield(coroutinesTable[1])\n end\n for index, screen in pairs(screens) do\n local toSend = {\n pool,\n screen_data\n }\n screen.setScriptInput(json.encode(toSend))\n end\n end\n}\n\nfunction initCoroutines()\n for _,f in pairs(MyCoroutines) do\n local co = coroutine.create(f)\n table.insert(coroutinesTable, co)\n end\nend\n\ninitCoroutines()\n\nrunCoroutines = function()\n for i,co in ipairs(coroutinesTable) do\n if coroutine.status(co) == \"dead\" then\n coroutinesTable[i] = coroutine.create(MyCoroutines[i])\n end\n if coroutine.status(co) == \"suspended\" then\n assert(coroutine.resume(co))\n end\n end\nend\n\nMainCoroutine = coroutine.create(runCoroutines)\n","filter":{"args":[],"signature":"start()","slotKey":"-1"},"key":"0"},{"code":"if coroutine.status(MainCoroutine) == \"dead\" then\n MainCoroutine = coroutine.create(runCoroutines)\nend\nif coroutine.status(MainCoroutine) == \"suspended\" then\n assert(coroutine.resume(MainCoroutine))\nend","filter":{"args":[],"signature":"update()","slotKey":"-2"},"key":"1"}],"methods":[],"events":[]}

du-mining-units-monitoring.png

Reviewed

This is a binary file and will not be displayed.

+55 -23

source/unit/start.lua

Reviewed

··· 1 1 system.print("----------------------------------------") 2 2 - system.print("DU-Mining-Units-Monitoring version 1.4.1") 2 2 + system.print("DU-Mining-Units-Monitoring version 1.5.0") 3 3 system.print("----------------------------------------") 4 4 5 5 fontSize = 25 --export: font size for each line on the screen ··· 8 8 9 9 local renderScript = [[ 10 10 local json = require('dkjson') 11 11 - local data = json.decode(getInput()) or {} 11 11 + local fromScript = json.decode(getInput()) or {} 12 12 + pool = fromScript[1] or {} 13 13 + data = fromScript[2] or {} 12 14 images = {} 13 13 - for index,mu in ipairs(data) do 14 14 - images[index] = loadImage("resources_generated/env/" .. mu[3][2]) 15 15 + for k,p in pairs(pool) do 16 16 + if images[k] == nil or not isImageLoaded(images[k]) then 17 17 + images[k] = loadImage("resources_generated/env/" .. p[4]) 18 18 + end 15 19 end 16 20 17 21 local rx,ry = getResolution() ··· 19 23 local back=createLayer() 20 24 local front=createLayer() 21 25 22 22 - font_size = ]] .. fontSize .. [[ 23 23 - 26 26 + font_size = 25 24 27 25 28 local mini=loadFont('Play',12) 26 29 local small=loadFont('Play',14) ··· 89 92 90 93 local gaugeColorLayer = createLayer() 91 94 92 92 - function renderResistanceBar(title, index, status, time, prod_rate, calibration, optimal, efficiency, cal_time, x, y, w, h, withTitle) 95 95 + function renderResistanceBar(ore_id, status, time, prod_rate, calibration, optimal, efficiency, cal_time, x, y, w, h, withTitle) 93 96 local quantity_x_pos = font_size * 6.7 94 97 local percent_x_pos = font_size * 2 95 98 ··· 126 129 end 127 130 128 131 local CalibrationTimeColorLayer = storageGreen 129 129 - if cal_time > ]] .. calibrationSecondsYellowLevel .. [[ then CalibrationTimeColorLayer = storageYellow end 130 130 - if cal_time > ]] .. calibrationSecondsRedLevel .. [[ then CalibrationTimeColorLayer = storageRed end 132 132 + if cal_time > 86400 then CalibrationTimeColorLayer = storageYellow end 133 133 + if cal_time > 259200 then CalibrationTimeColorLayer = storageRed end 131 134 132 135 addBox(storageBar,x,y,w,h) 133 136 ··· 145 148 addText(storageBar, small, "EFFICIENCY", x+(w*0.80), y-3) 146 149 end 147 150 148 148 - addText(storageBar, itemName, title, x+15+font_size, y+h-font_size/2) 151 151 + addText(storageBar, itemName, pool[ore_id][3], x+15+font_size, y+h-font_size/2) 149 152 setNextFillColor(gaugeColorLayer, r, g, b, 1) 150 153 addBox(gaugeColorLayer,x,y+h-3,w*calibration/100,3) 151 154 152 152 - if isImageLoaded(images[index]) then 153 153 - addImage(imagesLayer, images[index], x+10, y+5, font_size, font_size) 155 155 + if isImageLoaded(images[ore_id]) then 156 156 + addImage(imagesLayer, images[ore_id], x+10, y+5, font_size, font_size) 154 157 end 155 158 setNextTextAlign(storageBar, AlignH_Center, AlignV_Middle) 156 159 addText(storageBar, itemNameXs, SecondsToClockString(time), x+(w*0.3), y+(h/4)-3) ··· 170 173 addText(colorLayer, itemName, status, x+w-10, y+(h/2)-3) 171 174 end 172 175 176 176 + function renderPool(pool) 177 177 + local h_factor = 12 178 178 + local h = 35 179 179 + addLine( back,0,ry-h+h_factor,rx,ry-h+h_factor) 180 180 + addBox(front,0,ry-h-h_factor,rx,h) 181 181 + local nb_col = 1 182 182 + for k,v in pairs(pool) do nb_col = nb_col + 1 end 183 183 + local n = 1 184 184 + for k,v in pairs(pool) do 185 185 + setNextTextAlign(storageBar, AlignH_Center, AlignV_Bottom) 186 186 + addText(storageBar, small, v[3], (rx/nb_col)*n, ry-h-h_factor) 187 187 + if isImageLoaded(images[k]) then 188 188 + addImage(storageBar, images[k], (rx/nb_col)*n-h-h, ry-(h/2)-h_factor-(h/2)+2, h-4, h-4) 189 189 + end 190 190 + setNextTextAlign(storageBar, AlignH_Center, AlignV_Middle) 191 191 + addText(storageBar, itemNameSmall, format_number(round(v[1])) .. " / " .. format_number(round(v[2])), (rx/nb_col)*n, ry-(h/2)-h_factor) 192 192 + n = n + 1 193 193 + end 194 194 + end 195 195 + 173 196 renderHeader('MINING UNITS MONITORING') 174 197 175 198 start_h = 75 176 199 177 200 local h = font_size + font_size / 2 178 201 for i,mu in ipairs(data) do 179 179 - renderResistanceBar(mu[3][1], i, mu[1], mu[2], mu[4], mu[5], mu[6], mu[7], mu[8], 44, start_h, rx-88, h, i==1) 202 202 + renderResistanceBar(tostring(mu[3]), mu[1], mu[2], mu[4], mu[5], mu[6], mu[7], mu[8], 44, start_h, rx-88, h, i==1) 180 203 start_h = start_h+h+15 181 204 end 205 205 + renderPool(pool) 182 206 requestAnimationFrame(10) 183 207 ]] 184 208 ··· 225 249 MyCoroutines = { 226 250 function() 227 251 screen_data = {} 228 228 - for index, mu in pairs(mining_units) do 229 229 - local ore_id = mu.getActiveOre() 230 230 - if ores[ore_id] == nil then 231 231 - local item_data = system.getItem(ore_id) 232 232 - ores[ore_id] = { 233 233 - item_data.locDisplayName, 234 234 - item_data.iconPath:gsub("resources_generated/env/","") 235 235 - } 252 252 + pool = {} 253 253 + for index, mu in ipairs(mining_units) do 254 254 + local mup = mu.getOrePools() 255 255 + for _,p in ipairs(mup) do 256 256 + if ores[p.oreId] == nil then 257 257 + local item_data = system.getItem(p.oreId) 258 258 + ores[p.oreId] = { 259 259 + item_data.locDisplayName, 260 260 + item_data.iconPath:gsub("resources_generated/env/","") 261 261 + } 262 262 + end 263 263 + pool[p.oreId] = {p.available, p.maximum, ores[p.oreId][1], ores[p.oreId][2]} 236 264 end 237 265 local mu_data = { 238 266 mu.getStatus(), 239 267 round(mu.getRemainingTime()), 240 240 - ores[ore_id], 268 268 + mu.getActiveOre(), 241 269 round(mu.getProductionRate()*100)/100, 242 270 round(mu.getCalibrationRate()*10000)/100, 243 271 round(mu.getOptimalRate()*10000)/100, ··· 248 276 coroutine.yield(coroutinesTable[1]) 249 277 end 250 278 for index, screen in pairs(screens) do 251 251 - screen.setScriptInput(json.encode(screen_data)) 279 279 + local toSend = { 280 280 + pool, 281 281 + screen_data 282 282 + } 283 283 + screen.setScriptInput(json.encode(toSend)) 252 284 end 253 285 end 254 286 }