gpio.lua revision 1.3
11.3Slneto-- $NetBSD: gpio.lua,v 1.3 2014/07/19 18:38:34 lneto Exp $
21.1Smbalmer
31.3Slnetolocal gpio = require 'gpio'
41.1Smbalmer
51.1Smbalmerprint(gpio._VERSION .. ' - ' .. gpio._DESCRIPTION)
61.1Smbalmerprint(gpio._COPYRIGHT)
71.1Smbalmerprint()
81.1Smbalmer
91.1Smbalmerg = gpio.open('/dev/gpio0')
101.1Smbalmer
111.1Smbalmerlocal npins = g:info()
121.1Smbalmer
131.1Smbalmerprint('gpio0 has ' .. npins .. ' pins.')
141.1Smbalmer
151.2Smbalmerfor n = 0, npins - 1 do
161.1Smbalmer	print('pin ' .. n .. ': ' .. g:read(n))
171.1Smbalmerend
181.1Smbalmer
191.2Smbalmerlocal oldval = g:write(31, gpio.PIN_HIGH)
201.2Smbalmerprint('pin 31: ' .. oldval .. ' -> ' .. g:read(31))
211.1Smbalmer
221.2Smbalmeroldval = g:toggle(31)
231.2Smbalmerprint('pin 31: ' .. oldval .. ' -> ' .. g:read(31))
241.1Smbalmer
251.2Smbalmerg:write(31, gpio.PIN_LOW)
261.1Smbalmer
271.2Smbalmerg:write(31, 5)
281.1Smbalmer
29