Widget inital load. Currently working ONLY for SMALEST size (#3495)
* Widget inital load. Currently working ONLY for SMALEST size * Allows selection of Cels sensor in the widgets settings, cosmetic (indentation) * Change indent to 2
This commit is contained in:
3djc
+149
@@ -0,0 +1,149 @@
|
||||
---- ###############################################################
|
||||
---- # #
|
||||
---- # Telemetry widget Script for FrSky Horus #
|
||||
---- # LI-xx BATTCHECK v1 // Use it with OpenTX 2.2.x #
|
||||
---- # #
|
||||
---- # License: Share alike #
|
||||
---- # Can be used and changed non commercial #
|
||||
---- # #
|
||||
---- # Developed for Horus widgets by OpenTx team. #
|
||||
---- # #
|
||||
---- # Initial work for Taranis by Heisenberg. #
|
||||
---- # Initial credits to Kilrah, Dev.Fred, and Sacred100 #
|
||||
---- # from the french forum frskytaranis.forumactif.org/ #
|
||||
---- # #
|
||||
---- ###############################################################
|
||||
|
||||
|
||||
local options = {
|
||||
{ "Sensor", SOURCE, 1 },
|
||||
{ "Color", COLOR, WHITE }
|
||||
}
|
||||
|
||||
local function create(zone, options)
|
||||
local myZone = { zone=zone, options=options }
|
||||
return myZone
|
||||
end
|
||||
|
||||
--- This function returns a table with cels values
|
||||
local function getCels(sensor)
|
||||
return getValue(sensor)
|
||||
end
|
||||
|
||||
--- This function returns the number of cels
|
||||
local function getCellCount(cellData)
|
||||
return #cellData
|
||||
end
|
||||
|
||||
--- This function returns the value of the highest of all cels
|
||||
local function getCellMax(cellData)
|
||||
cellMax = 0
|
||||
if type(cellData) == "table" then
|
||||
for k, v in pairs(cellData) do
|
||||
if v > cellMax then cellMax = v end
|
||||
end
|
||||
end
|
||||
return cellMax
|
||||
end
|
||||
|
||||
--- This function returns the value of the lowest of all cels
|
||||
local function getCellMin(cellData)
|
||||
cellMin = 5
|
||||
if type(cellData) == "table" then
|
||||
for k, v in pairs(cellData) do
|
||||
if v < cellMin then cellMin = v end
|
||||
end
|
||||
end
|
||||
return cellMin
|
||||
end
|
||||
|
||||
--- This function return the percentage remaining in a single Lipo cel
|
||||
local function getCellPercent(cellValue)
|
||||
--## Based on Robbe lipo sensor
|
||||
local myArrayPercentList =
|
||||
{{3, 0}, {3.093, 1}, {3.196, 2}, {3.301, 3}, {3.401, 4}, {3.477, 5}, {3.544, 6}, {3.601, 7}, {3.637, 8}, {3.664, 9}, {3.679, 10}, {3.683, 11}, {3.689, 12}, {3.692, 13}, {3.705, 14}, {3.71, 15}, {3.713, 16}, {3.715, 17}, {3.72, 18}, {3.731, 19}, {3.735, 20}, {3.744, 21}, {3.753, 22}, {3.756, 23}, {3.758, 24}, {3.762, 25}, {3.767, 26}, {3.774, 27}, {3.78, 28}, {3.783, 29}, {3.786, 30}, {3.789, 31}, {3.794, 32}, {3.797, 33}, {3.8, 34}, {3.802, 35}, {3.805, 36}, {3.808, 37}, {3.811, 38}, {3.815, 39}, {3.818, 40}, {3.822, 41}, {3.825, 42}, {3.829, 43}, {3.833, 44}, {3.836, 45}, {3.84, 46}, {3.843, 47}, {3.847, 48}, {3.85, 49}, {3.854, 50}, {3.857, 51}, {3.86, 52}, {3.863, 53}, {3.866, 54}, {3.87, 55}, {3.874, 56}, {3.879, 57}, {3.888, 58}, {3.893, 59}, {3.897, 60}, {3.902, 61}, {3.906, 62}, {3.911, 63}, {3.918, 64}, {3.923, 65}, {3.928, 66}, {3.939, 67}, {3.943, 68}, {3.949, 69}, {3.955, 70}, {3.961, 71}, {3.968, 72}, {3.974, 73}, {3.981, 74}, {3.987, 75}, {3.994, 76}, {4.001, 77}, {4.007, 78}, {4.014, 79}, {4.021, 80}, {4.029, 81}, {4.036, 82}, {4.044, 83}, {4.052, 84}, {4.062, 85}, {4.074, 86}, {4.085, 87}, {4.095, 88}, {4.105, 89}, {4.111, 90}, {4.116, 91}, {4.12, 92}, {4.125, 93}, {4.129, 94}, {4.135, 95}, {4.145, 96}, {4.176, 97}, {4.179, 98}, {4.193, 99}, {4.2, 100}}
|
||||
|
||||
for i, v in ipairs( myArrayPercentList ) do
|
||||
if v[ 1 ] >= cellValue then
|
||||
result = v[ 2 ]
|
||||
break
|
||||
end
|
||||
end
|
||||
return result
|
||||
end
|
||||
|
||||
--- This function parse each individual cell and return the sum of all cels
|
||||
local function getCellSum(cellData)
|
||||
cellSum = 0
|
||||
if type(cellData) == "table" then
|
||||
for k, v in pairs(cellData) do cellSum = cellSum + v end
|
||||
end
|
||||
return cellSum
|
||||
end
|
||||
|
||||
--- This function returns the average of all cels
|
||||
local function getCellAvg(cellData)
|
||||
if type(cellData) == "table" then
|
||||
return getCellSum(cellData)/getCellCount(cellData)
|
||||
end
|
||||
end
|
||||
|
||||
-- This function returns green at 100%, red bellow 30% and graduate in betwwen
|
||||
local function getPercentColor(cpercent)
|
||||
if cpercent < 30 then
|
||||
return(lcd.RGB(0xff,0,0))
|
||||
else
|
||||
g = math.floor(0xdf * cpercent / 100)
|
||||
r = 0xdf - g
|
||||
return (lcd.RGB(r,g,0))
|
||||
end
|
||||
end
|
||||
|
||||
--- Size is 160x32
|
||||
local function zoneSmall(zone)
|
||||
local mySensor = getCels(zone.options.Sensor)
|
||||
|
||||
lcd.setColor(TEXT_COLOR, zone.options.Color)
|
||||
if type(mySensor) == "table" then
|
||||
local myString = tostring(getCellSum(mySensor)).."V ("..getCellCount(mySensor).."S)"
|
||||
local percent = getCellPercent(getCellAvg(mySensor))
|
||||
lcd.drawText(zone.zone.x+90, zone.zone.y+22, myString, LEFT + SMLSIZE + TEXT_COLOR)
|
||||
lcd.drawText(zone.zone.x+95, zone.zone.y,percent.."%", LEFT + MIDSIZE + TEXT_COLOR)
|
||||
lcd.setColor(CUSTOM_COLOR, getPercentColor(percent))
|
||||
lcd.drawGauge(zone.zone.x+2, zone.zone.y+2, 75, zone.zone.h - 4,percent,100, CUSTOM_COLOR)
|
||||
end
|
||||
lcd.setColor(CUSTOM_COLOR, WHITE)
|
||||
for i=2,75,15 do
|
||||
lcd.drawRectangle(zone.zone.x+i, zone.zone.y+2, 15, zone.zone.h - 4, SOLID + CUSTOM_COLOR,1)
|
||||
end
|
||||
lcd.drawRectangle(zone.zone.x+2, zone.zone.y+2, 75, zone.zone.h - 4, SOLID + CUSTOM_COLOR,2)
|
||||
lcd.drawRectangle(zone.zone.x+77, zone.zone.y+8, 6, zone.zone.h - 16, SOLID + CUSTOM_COLOR,2)
|
||||
lcd.setColor(CUSTOM_COLOR, BLACK)
|
||||
lcd.setColor(TEXT_COLOR, BLACK)
|
||||
return
|
||||
end
|
||||
|
||||
--- Size is 180x70
|
||||
local function zoneMedium(zone)
|
||||
return
|
||||
end
|
||||
|
||||
--- Size is 192x152
|
||||
local function zoneLarge(zone)
|
||||
return
|
||||
end
|
||||
|
||||
--- Size is 390x172
|
||||
local function zoneXLarge(zone)
|
||||
return
|
||||
end
|
||||
|
||||
function refresh(myZone)
|
||||
if myZone.zone.w == 160 then zoneSmall(myZone)
|
||||
elseif myZone.zone.w == 180 then zoneMedium(myZone)
|
||||
elseif myZone.zone.w == 192 then zoneLarge(myZone)
|
||||
elseif myZone.zone.w == 390 then zoneXLarge(myZone)
|
||||
end
|
||||
end
|
||||
|
||||
return { name="BattCheck", options=options, create=create, refresh=refresh }
|
||||
Reference in New Issue
Block a user