mirror of
https://github.com/elua/elua.git
synced 2025-01-25 01:02:54 +08:00
54 lines
1.4 KiB
Lua
Executable File
54 lines
1.4 KiB
Lua
Executable File
-- Acquire ADC samples using a timer with polling for available samples
|
|
|
|
if pd.board() == "ET-STM32" then
|
|
timer = 2
|
|
adcchannels = {0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15}
|
|
adcsmoothing = {4, 4, 4, 4, 16, 16, 16, 16, 32, 32, 32, 32, 64, 128, 64, 128}
|
|
else
|
|
timer = 0
|
|
adcchannels = {0,1,2,3}
|
|
adcsmoothing = {4, 64, 32, 16}
|
|
end
|
|
|
|
-- Setup ADC and start sampling
|
|
for i, v in ipairs(adcchannels) do
|
|
adc.setblocking(v,0) -- no blocking on any channels
|
|
adc.setsmoothing(v,adcsmoothing[i]) -- set smoothing from adcsmoothing table
|
|
adc.setclock(v, 4 ,timer) -- get 4 samples per second, per channel
|
|
end
|
|
|
|
-- Draw static text on terminal
|
|
term.clrscr()
|
|
term.gotoxy(1,1)
|
|
term.putstr("ADC Status:")
|
|
term.gotoxy(1,3)
|
|
term.putstr(" CH SLEN RES")
|
|
term.gotoxy(1,#adcchannels+5)
|
|
term.putstr("Press ESC to exit.")
|
|
|
|
-- start sampling on all channels at the same time
|
|
adc.sample(adcchannels,128)
|
|
|
|
while true do
|
|
for i, v in ipairs(adcchannels) do
|
|
-- If samples are not being collected, start
|
|
if adc.isdone(v) == 1 then adc.sample(v,128) end
|
|
|
|
-- Try and get a sample
|
|
tsample = adc.getsample(v)
|
|
|
|
-- If we have a new sample, then update display
|
|
if not (tsample == nil) then
|
|
term.gotoxy(1,i+3)
|
|
term.putstr(string.format("ADC%02d (%03d): %04d\n", v, adcsmoothing[i], tsample))
|
|
end
|
|
end
|
|
|
|
-- Exit if user hits Escape
|
|
key = term.getch( term.NOWAIT )
|
|
if key == term.KC_ESC then break end
|
|
end
|
|
|
|
term.clrscr()
|
|
term.gotoxy(1, 1)
|