Brentp: initial edit

2014-12-19T19:48:25Z

initial edit

New page

=Sequential Shift light=

One way to enable shift light is by using the PWM / Analog output channels to trigger a 3 + 1 shift light output. In this case, we used 3 of the outputs to control the 3 LED segments on the [[Sequential_shift_light|ShiftX Sequential Shift Light]] display, and the 4th output controls a focused Red LED that flashes at the top end of the RPM range.

* Example Video:

[https://www.youtube.com/watch?v=n-eT5V1_8uc&list=UU4Gu8BDjcUjAL8v80Ukluqg Video]

=Script=
==Requirements==
* A working RPM signal connected to the first timer input channel on RaceCapture/Pro.
* Shift light boards connected to PWM / Analog out 1 - 3; flash alert LED to the 4th output

--[[

3 stage + 1 sequential shift light

Input
Timer 0 - RPM

Tach Lights
0 - Green Light
1 - Yellow Light
2 - Red Light
3 - Flash alert
]]

-- Globals --
LIGHTS = 4
LIGHT_VALS = {}
FREQUENCY_HZ = 10

-- Global Init --
setTickRate(FREQUENCY_HZ)

function toggleLight(index)
LIGHT_VALS[index] = not LIGHT_VALS[index]
end

function lightOn(index)
LIGHT_VALS[index] = true
end

function lightOff(index)
LIGHT_VALS[index] = false
end

local lCount = 0
repeat
lightOff(lCount)
lCount = lCount + 1
until lCount >= LIGHTS

-- Script --
function updateLights()
local l = 0
repeat
-- Convert our booleans to 1 (true) or 0 (false) --
local val = LIGHT_VALS[l]
local dc = 0
if not val then
dc = 100
end
setPwmDutyCycle(l, dc)

l = l + 1
until l >= LIGHTS
end

function checkRpm()
local rpm = getTimerRpm(0)
if rpm < 3000 then
lightOff(0)
lightOff(1)
lightOff(2)
lightOff(3)
elseif 3000 < rpm and rpm < 4500 then
lightOn(0)
lightOff(1)
lightOff(2)
lightOff(3)
elseif 4500 < rpm and rpm < 5000 then
lightOn(0)
lightOn(1)
lightOff(2)
lightOff(3)
elseif 5000 < rpm and rpm < 5500 then
lightOn(0)
lightOn(1)
lightOn(2)
lightOff(3)
else
toggleLight(3)
end
end

function controlLights()
checkRpm()
updateLights()
end

-- Start!

function onTick()
controlLights()
end

RaceCapturePro2 ShiftLights - Revision history

Brentp: initial edit