-
Notifications
You must be signed in to change notification settings - Fork 0
/
init.lua
78 lines (69 loc) · 1.98 KB
/
init.lua
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
require('config')
-- Setup wifi
wifi.setmode(wifi.STATION)
wifi.sta.config(AP,PWD)
-- Duty values
RIGHT = 1
CENTER = 510
LEFT = 1020
-- Declare servo motor
servo = {}
servo.pin = 4 -- GPIO_2
servo.clock = 500 -- PWM frequency (1 to 1000)
servo.duty = 512 -- PWM duty cycle (0 to 1023)
function delay_ms(milli_secs)
local ms = milli_secs * 1000
local timestart = tmr.now()
while(tmr.now() - timestart < ms) do
tmr.wdclr()
end
end
function rotate(duty)
pwm.setup(servo.pin, servo.clock, servo.duty)
pwm.start(servo.pin)
pwm.setduty(servo.pin, duty)
delay_ms(500)
pwm.stop(servo.pin)
pwm.close(servo.pin)
end
rotate(CENTER)
srv=net.createServer(net.TCP)
srv:listen(80,function(conn)
conn:on("receive", function(client,request)
local _, _, method, path, vars = string.find(request, "([A-Z]+) (.+)?(.+) HTTP");
if(method == nil)then
_, _, method, path = string.find(request, "([A-Z]+) (.+) HTTP");
end
local _GET = {}
if (vars ~= nil)then
for k, v in string.gmatch(vars, "(%w+)=(%w+)&*") do
_GET[k] = v
end
end
if(_GET.rotate == "LEFT")then
print('Rotate to left')
rotate(LEFT)
elseif(_GET.rotate == "CENTER")then
print('Rotate to center')
rotate(CENTER)
elseif(_GET.rotate == "RANDOM")then
rd = math.random(RIGHT, LEFT)
print('Random: '.. rd)
rotate(rd)
elseif(_GET.rotate == "RIGHT")then
print('Rotate to right')
rotate(RIGHT)
elseif(_GET.rotate == "VALUE")then
print('Rotate: '.. _GET.value)
rotate(_GET.value)
elseif(_GET.rotate == "RESET")then
node.restart();
end
-- Close session
local response = "HTTP/1.1 200 OK\r\n\r\nOK"
conn:send(response, function()
conn:close()
end)
collectgarbage();
end)
end)