Попробуйте разбить скрипт на несколько файлов, в соответствии с выполняемыми задачами. Пока скрипт в файле во флеш памяти, он не занимает RAM. Немного поможет.
Спасибо за отклик.
Пытаюсь повторить Ваш проект: http://geektimes.ru/post/242366/
wifi.setmode(wifi.SOFTAP);
wifi.ap.config({ssid="test",pwd="12345678"});
gpio.mode(4, gpio.OUTPUT)
srv=net.createServer(net.TCP)
srv:listen(80,function(conn)
conn:on("receive", function(client,request)
local buf = "";
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
buf = buf.."<h1> Hello, NodeMcu.</h1><form src=/>Turn GPIO2 <select name=pin onchange=\"form.submit()\">";
print("\nMethod: "..method);
print("Path: "..path);
local _on,_off = "",""
if(_GET.pin == "ON")then
_on = " selected=true";
gpio.write(4, gpio.HIGH);
elseif(_GET.pin == "OFF")then
_off = " selected=true";
gpio.write(4, gpio.LOW);
end
buf = buf.."<option".._on..">ON</opton><option".._off..">OFF</option></select></form>";
client:send(buf);
client:close();
collectgarbage();
end)
end)function urlEncode(str)
if (str) then
str = string.gsub (str, "\n", "\r\n")
str = string.gsub (str, "([^%w ])",
function (c) return string.format ("%%%02X", string.byte(c)) end)
str = string.gsub (str, " ", "+")
end
return str
end
function urlDecode(str)
local str;
str = string.gsub (str, "+", " ");
str = string.gsub (str, "%%(%x%x)", function(h) return string.char(tonumber(h,16)) end);
str = string.gsub (str, "\r\n", "\n");
return str
end local _, _, auth = string.find(request, "%cAuthorization: Basic ([%w=\+\/]+)");--Authorization:
if (auth == nil or auth ~= "dXNlcjoxMjM0")then --user:1234
client:send("HTTP/1.0 401 Authorization Required\r\nWWW-Authenticate: Basic realm=\"NodeMCU\"\r\n");
client:close();
return;
enddofile('ntp-run.lua')
> 23:38:22loadfile("ntp.lua")():sync(function(T)
print(T:show_time())
end)-- -----------------------------------------------------------------------------------
-- for a continuous run:
-- TIME=loadfile("ntp.lua")()
-- TIME:run(timer,updateinterval,syncinterval,[ntp-server])
-- TIME.hour TIME.minute TIME.second are updated every 'updateinterval'-seconds
-- NTP-server is queried every 'syncinterval'-seconds
--
-- a one-time run:
-- loadfile("ntp.lua")():sync(function(T) print(T:show_time()) end)
--
-- config:
-- choose a timer for udptimer
-- choose a timeout for udptimeout
-- timer-function to close connection is needed - memory leaks on unanswered sends :(
-- set tz according to your timezone
-- choose a NTP-server near you and don't stress them with a low syncinterval :)
-- -----------------------------------------------------------------------------------
return({
hour=0,
minute=0,
second=0,
lastsync=0,
ustamp=0,
tz=1,
udptimer=2,
udptimeout=1000,
ntpserver="193.170.62.252",
sk=nil,
sync=function(self,callback)
-- print("SYNC " .. self.ustamp .. " " .. self.ntpserver)
-- request string blindly taken from http://arduino.cc/en/Tutorial/UdpNTPClient ;)
local request=string.char( 227, 0, 6, 236, 0,0,0,0,0,0,0,0, 49, 78, 49, 52,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
)
self.sk=net.createConnection(net.UDP, 0)
self.sk:on("receive",function(sck,payload)
-- tmr.stop(self.udptimer)
sck:close()
self.lastsync=self:calc_stamp(payload:sub(41,44))
self:set_time()
if callback and type(callback) == "function" then
callback(self)
end
collectgarbage() collectgarbage()
-- print("DONE " .. self.ustamp)
end)
self.sk:connect(123,self.ntpserver)
tmr.alarm(self.udptimer,self.udptimeout,0,function() self.sk:close() end)
self.sk:send(request)
end,
calc_stamp=function(self,bytes)
local highw,loww,ntpstamp
highw = bytes:byte(1) * 256 + bytes:byte(2)
loww = bytes:byte(3) * 256 + bytes:byte(4)
ntpstamp=( highw * 65536 + loww ) + ( self.tz * 3600) -- NTP-stamp, seconds since 1.1.1900
self.ustamp=ntpstamp - 1104494400 - 1104494400 -- UNIX-timestamp, seconds since 1.1.1970
-- print(string.format("NTP: %u",ntpstamp))
-- print(string.format("UIX: %u",self.ustamp))
return(self.ustamp)
end,
set_time=function(self)
self.hour = self.ustamp % 86400 / 3600
self.minute = self.ustamp % 3600 / 60
self.second = self.ustamp % 60
-- print(string.format("%02u:%02u:%02u",hour,minute,second))
end,
show_time=function(self)
return(string.format("%02u:%02u:%02u",self.hour,self.minute,self.second))
end,
run=function(self,t,uinterval,sinterval,server)
if server then self.ntpserver = server end
self.lastsync = sinterval * 2 * -1 -- force sync on first run
tmr.alarm(t,uinterval * 1000,1,function()
self.ustamp = self.ustamp + uinterval
self:set_time()
-- print(self:show_time())
if self.lastsync + sinterval < self.ustamp then
self:sync()
end
end)
end
})Visiks ,а что вы использовали в качестве AC/DC 5V в этом проекте?
Мне нужно было 5 вольт для питания реле и 3,3 для модуля. Я брал внутренности миниатюрного USB зарядника и то, что описано тут: http://arduino.ru/forum/apparatnye-...odelites-vpechatleniyami?page=5#comment-93529
Relay=4 --GPIO_2 как выход
Button=3 --GPIO_0 как вход
gpio.mode(Relay, gpio.OUTPUT)
gpio.mode(Button, gpio.INPUT)
gpio.write(Relay, gpio.LOW)
tmr.delay(1000000)
gpio.write(Relay, gpio.HIGH)
tmr.delay(1000000)
gpio.write(Relay, gpio.LOW)
print(gpio.read(Relay))
print(gpio.read(Button))
function on()
if gpio.read(Button) == "HIGH" then gpio.write(Relay, gpio.HIGH) end
endfunction on()
if gpio.read(Button) == 1 then gpio.write(Relay, gpio.HIGH) end
endfunction on()
if (gpio.read(Button)) == 1 then gpio.write(Relay, gpio.HIGH) end
endТочно!
n("receive", function(sck, c) print('answer length is '..#c) end)