brentpicasso

setTickRate(30)

function encodeWheel(value)
 low_byte = bit.band(value, 0xFF)
 high_byte = bit.rshift(bit.band(value, 0x1F00), 5)
 return low_byte, high_byte
end

lf_wheel = 0
rf_wheel = 0

brentpicasso

--This example configured for E46 CAN
-- Automatically starts logging with engine 'on' (RPM triggered)
--how frequently we poll for CAN messages
tickRate = 30
--the CAN baud rate
CAN_baud = 500000
--CAN channel to listen on. 0=first CAN channel, 1=second
CAN_chan = 0

--add your virtual channels here

brentpicasso

--RPM simulator!
rpm = 0 
rpmDir = 100
maxRpm = 10000
rpmId = addChannel("RPM", 10, 0, 0, 10000)
setTickRate(50)

function onTick() 
  setChannel(rpmId, rpm)
  rpm=rpm + rpmDir

brentpicasso

fuel2Id = addChannel("Fuel2", 25, 2, 0,10,"%")
--change this to make a bigger averaging window
--300 = 10 seconds averaging at 30Hz tick rate
maxAvg = 300 
fuelAvg={}
fuel2Index = 1

function updateFuel2(value)
  local i

brentpicasso

{
  "rcpCfg": {
    "analogCfg": {
      "0": {
        "alpha": 1.0,
        "map": {
          "raw": [
            0.0,
            1.25,
            2.5,

brentpicasso

tires = 4
tireZones = 4
tirePrefixes = {'TireTmpFL', 'TireTmpFR', 'TireTmpRL', 'TireTmpRR'}
tireValues = {}
tireIds = {}
minTireVal = 0
maxTireVal = 300

brakes = 4
brakeZones = 4

brentpicasso

setTickRate(30)
initCAN(0, 500000)

 txCAN(0, 744389 + 10, 1, {0, 9, 0,0,0,5})

leds = 7
function onTick()
 local x = getImu(3) / 10
 local l = math.floor(math.abs(x))
 if l > leds then l = leds end

brentpicasso

setTickRate(30)
initCAN(0, 500000)

txCAN(0, 744389 + 12, 1, {0, 0, 5,  0, 0  , 255, 0, 0})
sleep(10)
txCAN(0, 744389 + 12, 1, {0, 1, 20, 0, 255, 0  , 0, 0})
sleep(10)

txCAN(0, 744389 + 12, 1, {1, 0, 5,  0, 0  , 255, 0, 0})
sleep(10)

brentpicasso

function splitWord(value)
  return bit.band(value, 0xFF), bit.rshift(bit.band(value, 0xFF00),8)
end

function setLinearThreshold(id, threshold, red, green, blue, flash)
  local lowt
  local hight
  lowt, hight = splitWord(threshold)
  txCAN(0, 744389 + 15, 1, {id, 0, lowt, hight, red, green, blue, flash})

brentpicasso

function splitWord(value)
  return bit.band(value, 0xFF), bit.rshift(bit.band(value, 0xFF00),8)
end

function setLinearThreshold(id, threshold, red, green, blue, flash)
  local lowt
  local hight
  lowt, hight = splitWord(threshold)
  txCAN(0, 744389 + 15, 1, {id, 0, lowt, hight, red, green, blue, flash})