192.168.1.33.lua

-- Chip #1. Led driver
uart.setup(0,921600,8,0,1,0)
wifi.sleeptype(wifi.NONE_SLEEP);

gpio.mode(1,gpio.OUTPUT)
gpio.mode(2,gpio.OUTPUT)
gpio.mode(6,gpio.OUTPUT)
pwm.setup(1,1000, 1)
pwm.setup(2,1000, 1)
pwm.setup(6,1000, 1)
pwm.start(1)
pwm.start(2)
pwm.start(6)

function led(r,g,b)
        pwm.setduty(1,g)
        pwm.setduty(2,b)
        pwm.setduty(6,r)
end


s=net.createServer(net.TCP)
s:listen(80,function(c)
        c:on("receive",function(c,pl)
                c:send("HTTP/1.1 200 OK\nAccess-Control-Allow-Origin: *\nAccess-Control-Allow-Headers: Origin, X-Requested-With, Content-Type, Accept\n\n");
                s,e = string.find(pl,"led=");
                if (e) then
                        rgb = string.sub(pl, e + 1, -1);
                        s,e = string.find(rgb, ",");
                        if e then
                                r = string.sub(rgb, 0, s - 1);
                                s,e1 = string.find(rgb, ",", e + 1);
                                if e1 then
                                        g = string.sub(rgb, e + 1, s - 1);
                                        s,e = string.find(rgb, " ", e1 + 1);
                                        if e then
                                                b = string.sub(rgb, e1 + 1, s - 1);
                                                c:send("got rgb: "..r.." - "..g.." - "..b.."\n");
                                                led(tonumber(r), tonumber(g), tonumber(b));
                                        end
                                end
                        end
                end
                c:send("\n")
                c:send("\nTMR:"..tmr.now().." MEM:"..node.heap())
                c:on("sent",function(c) c:close() end)
        end)
end)


led(100,0,100);