(02.11.2020, 14:57)Daniel. Wrote: Pure conversion of this script in to dimming of 3 objects is this but I'm not sure if this is what you need. Most likely you would have to calculate saturation.

Code:

addressbyteoutput1 = '32/1/1'
addressbyteoutput2 = '32/1/2'
addressbyteoutput3 = '32/1/3'

stepsize = 10

value = event.getvalue()

current1 = grp.getvalue(addressbyteoutput1)
current2 = grp.getvalue(addressbyteoutput2)
current3 = grp.getvalue(addressbyteoutput3)
if value < 8 and value ~= 0 then
  log('down',value)
  if current1 <= stepsize then
    output = 0
    if current1 ~= output then
      grp.write(addressbyteoutput1, output)
       end
  else
    output = current1 - stepsize
    if current1 ~= output then
      grp.write(addressbyteoutput1, output)
    end
  end
if current2 <= stepsize then
    output = 0
    if current2 ~= output then
      grp.write(addressbyteoutput2, output)
       end
  else
    output = current2 - stepsize
    if current2 ~= output then
      grp.write(addressbyteoutput2, output)
    end
  end 

if current3 <= stepsize then
    output = 0
    if current3 ~= output then
      grp.write(addressbyteoutput3, output)
       end
  else
    output = current3 - stepsize
    if current3 ~= output then
      grp.write(addressbyteoutput3, output)
    end
  end 
 
 
elseif value > 8 then
  log('up',value)
  if current1 >= (100 - stepsize) then
    output = 100
    if current1 ~= output then
      grp.write(addressbyteoutput1, output)
    end
  else
    output = current1 + stepsize
    if current1 ~= output then
      grp.write(addressbyteoutput1, output)
    end
  end
 


  if current2 >= (100 - stepsize) then
    output = 100
    if current2 ~= output then
      grp.write(addressbyteoutput2, output)
    end
  else
    output = current2 + stepsize
    if current2 ~= output then
      grp.write(addressbyteoutput2, output)
    end
  end
 

  if current3 >= (100 - stepsize) then
    output = 100
    if current3 ~= output then
      grp.write(addressbyteoutput3, output)
    end
  else
    output = current3 + stepsize
    if current3 ~= output then
      grp.write(addressbyteoutput3, output)
    end
  end
end

• r, g, b - color components in 0..255 range
  
• up - true = step up / false = step down
  
• step - step size, V range is 0..1 so the step should be something like 0.1 or 0.05 depending on how many total steps you want
  

(04.11.2020, 07:48)admin Wrote: To dim a color your need to convert RGB to HSV, change V up/down and then convert back to RGB.
Here are the functions that you can use.

Code:

function rgbtohsv(r, g, b)
  local max, min, d, h, s, v

  max = math.max(r, g, b)
  min = math.min(r, g, b)
  d = max - min
  s = max == 0 and 0 or (d / max)
  v = max / 255

  if max == min then
    h = 0
  elseif max == r then
    h = (g - b) + d * (g < b and 6 or 0)
    h = h / (6 * d)
  elseif max == g then
    h = (b - r) + d * 2
    h = h / (6 * d)
  elseif max == b then
    h = (r - g) + d * 4
    h = h / (6 * d)
  end

  return h, s, v
end

function hsvtorgb(h, s, v)
  local r, g, b, i, f, p, q, t, z

  i = math.floor(h * 6)
  f = h * 6 - i
  p = v * (1 - s)
  q = v * (1 - f * s)
  t = v * (1 - (1 - f) * s)
  z = i % 6

  if z == 0 then
    r = v
    g = t
    b = p
  elseif z == 1 then
    r = q
    g = v
    b = p
  elseif z == 2 then
    r = p
    g = v
    b = t
  elseif z == 3 then
    r = p
    g = q
    b = v
  elseif z == 4 then
    r = t
    g = p
    b = v
  elseif z == 5 then
    r = v
    g = p
    b = q
  end

  r = math.round(r * 255)
  g = math.round(g * 255)
  b = math.round(b * 255)

  return r, g, b
end

function rgbstep(r, g, b, up, step)
  local h, s, v = rgbtohsv(r, g, b)
  local v2 = up and math.min(1, v + step) or math.max(0, v - step)
 
  if v == v2 then
    return
  end

  return hsvtorgb(h, s, v2)
end

rgbstep(r, g, b, up, step) can perform up/down step of current RGB value.
arguments:

• r, g, b - color components in 0..255 range
  
• up - true = step up / false = step down
  
• step - step size, V range is 0..1 so the step should be something like 0.1 or 0.05 depending on how many total steps you want
  

rgbstep will return new RGB values but it might also return nil when further step is not possible.

Code:

-- values from split RGB value
r = 127
g = 255
b = 10
-- step down
up = false
-- maximum 20 steps between min and max
step = 0.05

r, g, b = rgbstep(r, g, b, up, step)
if r then
  -- write new values
else
  -- stop dimming
end

(09.11.2020, 08:56)admin Wrote: Use this event script for 4-bit object. Change R/G/B addresses as needed and modify step and delay to change the dimming speed and smoothness.

Code:

raddr = '32/1/1' -- red value address
gaddr = '32/1/2' -- green value address
baddr = '32/1/3' -- blue value address
step = 0.05 -- step side
delay = 0.3 -- delay between steps

value = event.getvalue()
up = bit.band(value, 0x08) == 0x08
stop = bit.band(value, 0x07) == 0

if stop then
  return 
end

-- get value and convert from 0..100 to 0..255
r = grp.getvalue(raddr) * 2.55
g = grp.getvalue(gaddr) * 2.55
b = grp.getvalue(baddr) * 2.55

function rgbtohsv(r, g, b)
  local max, min, d, h, s, v

  max = math.max(r, g, b)
  min = math.min(r, g, b)
  d = max - min
  s = max == 0 and 0 or (d / max)
  v = max / 255

  if max == min then
    h = 0
  elseif max == r then
    h = (g - b) + d * (g < b and 6 or 0)
    h = h / (6 * d)
  elseif max == g then
    h = (b - r) + d * 2
    h = h / (6 * d)
  elseif max == b then
    h = (r - g) + d * 4
    h = h / (6 * d)
  end

  return h, s, v
end

function hsvtorgb(h, s, v)
  local r, g, b, i, f, p, q, t, z

  i = math.floor(h * 6)
  f = h * 6 - i
  p = v * (1 - s)
  q = v * (1 - f * s)
  t = v * (1 - (1 - f) * s)
  z = i % 6

  if z == 0 then
    r = v
    g = t
    b = p
  elseif z == 1 then
    r = q
    g = v
    b = p
  elseif z == 2 then
    r = p
    g = v
    b = t
  elseif z == 3 then
    r = p
    g = q
    b = v
  elseif z == 4 then
    r = t
    g = p
    b = v
  elseif z == 5 then
    r = v
    g = p
    b = q
  end

  r = math.round(r * 255)
  g = math.round(g * 255)
  b = math.round(b * 255)

  return r, g, b
end

function rgbstep(r, g, b, up, step)
  local h, s, v = rgbtohsv(r, g, b)
  local v2 = up and math.min(1, v + step) or math.max(0, v - step)
 
  if v == v2 then
    return
  end

  return hsvtorgb(h, s, v2)
end

while true do
  r, g, b = rgbstep(r, g, b, up, step)
  if r then
    grp.write(raddr, r, dt.uint8)
    grp.write(gaddr, g, dt.uint8)
    grp.write(baddr, b, dt.uint8)
  else
    break
  end

  os.sleep(delay)
  newvalue = grp.getvalue(event.dst)
  if value ~= newvalue then
    break
  end
end