├── LuaLoader.zip
├── README.md
├── Source
    ├── LuaLoader.dpr
    ├── LuaLoader.res
    ├── LuaLoaderMain.dfm
    ├── LuaLoaderMain.pas
    ├── SerialNG.pas
    ├── SerialNGAdv.dfm
    ├── SerialNGAdv.pas
    └── supertim.zip
├── examples
    ├── AutoConnect.lua
    ├── Client with DNS.lua
    ├── Count Interrupts.lua
    ├── DS18B20 One Wire Temperature server.lua
    ├── Find Hot Spots
    │   ├── autoconnect.lua
    │   ├── httpget.lua
    │   └── init.lua
    ├── Kankun WiFi Plug
    │   ├── README.md
    │   ├── click.mp3
    │   ├── httpget.lua
    │   ├── index.html
    │   ├── init.lua
    │   └── relay.cgi
    ├── README.md
    ├── Scan for I2C devices.lua
    ├── Servo Control by UDP.lua
    ├── googleTime.lua
    ├── gpio monitor.lua
    ├── httpget.lua
    └── thebutton
    │   ├── autoconnect.lua
    │   ├── httpget.lua
    │   ├── init.lua
    │   ├── reconnect.lua
    │   └── thebutton.php
├── version 0.87
    ├── LLbin.lua
    ├── LuaLoader.exe
    ├── ReadMe.txt
    ├── RecentFiles.txt
    └── xxd.lua
└── version 0.90
    ├── LLbin.lua
    ├── LuaLoader.exe
    ├── ReadMe.txt
    ├── RecentFiles.txt
    └── xxd.lua


/LuaLoader.zip:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/GeoNomad/LuaLoader/e42164e7285a0fdcb3ee124e8a680eaf9518d701/LuaLoader.zip


--------------------------------------------------------------------------------
/README.md:
--------------------------------------------------------------------------------
  1 | LuaLoader for Windows
  2 | =====================
  3 | 
  4 | More documentation and FAQ are at http://benlo.com/esp8266
  5 | 
  6 | LuaLoader is a Windows program for uploading files to the ESP8266 and working with the Lua serial interface. It is compatible with all versions of Windows from Windows 95 to Windows 10.
  7 | 
  8 | The terminal window shows the output from the ESP8266 UART and lets you type or paste commands for immediate interpretation and execution.
  9 | 
 10 | A selection of buttons are available to automatically type often used commands and to select files for uploading to the ESP8266 file system.
 11 | 
 12 | The Buttons
 13 | 
 14 | All buttons have popup help information on mouse over. A few explanations follow:
 15 | 
 16 | <p>
 17 | <b>GPIO</b> Set the IO pins to read or write. Change their values. Read values once or multiple times
 18 | on a polling schedule. Read the ADC value.
 19 | </p>
 20 | <p>
 21 | <b>Heap</b>. Print the current Heap (RAM) available. A common cause of restarts is running out of RAM.
 22 | </p>
 23 | <p>
 24 | <b>Restart</b>. Perform a soft restart. The init.lua file is run automatically on restart.
 25 | </p>
 26 | <p>
 27 | <b>chipID</b>. Each chip has a unique ID that can be used in a multiple IoT environment.
 28 | </p>
 29 | <p>
 30 | <b>tmr.stop</b>. Stops one or more of the 7 timers. Right click to set which ones.
 31 | </p>
 32 | <p>
 33 | <b>Set AP</b>. Set the chip to STATION mode and set the Access Point SSID and Password. The ESP8266 will automatically connect to the access point. The information is saved and after a restart
 34 | the chip will automatically reconnect within 2 seconds, normally.
 35 | </p>
 36 | <p>
 37 | <b>Get IP</b>. Get the currently assigned IP address, if any.
 38 | </p>
 39 | <p>
 40 | <b>Wifi Status</b>. Show the current status of the Wifi connection.
 41 | </p>
 42 | <p>
 43 | <b>Disconnect</b>. Disconnect from the access point.
 44 | </p>
 45 | <p>
 46 | <b>Upload File...</b> Upload a file from your hard drive to the ESP8266 in text mode or binary mode.
 47 | The folder used is now designated as the current workspace and the folder name is added to the File -
 48 | Workspace menu.
 49 | </p>
 50 | <p>
 51 | <b>Upload Bin</b> (or Text). Uploads the file named in the edit box below. Right click to select
 52 | text or binary uploads. Binary uploads test each block with a checksum for data integrity
 53 | and are faster. However, the LLbin() function in the LLbin.lua file must be loaded first.
 54 | </p>
 55 | <p>
 56 | <b>File Selection</b>. A dropdown list of files in the current workspace and on the ESP8266.
 57 | Files on the ESP8266 are marked with a <b>&lt;</b> character.
 58 | </p>
 59 | <p>
 60 | <b>dofile</b>. Executes the dofile() command to execute the file named in the text box above.
 61 | </p>
 62 | <p>
 63 | <b>remove</b>. Remove the file named in the text box from the ESP8266 file system.
 64 | </p>
 65 | <p>
 66 | <b>cat</b>. List the contents of the file named in the text box.
 67 | </p>
 68 | <p>
 69 | <b>Format</b>. Format the flash file system on the ESP8266. Deletes all the files. Format only works
 70 | if you are running firmware built after 2015.01.05.
 71 | </p>
 72 | <p>
 73 | <b>file.list</b>. Lists the files in the ESP8266 flash file system. This list populates the drop
 74 | down menu in the file name text box above.
 75 | </p>
 76 | 
 77 | 
 78 | LuaLoader is freeware.
 79 | 
 80 | The MIT License (MIT)
 81 | 
 82 | Copyright (c) 2015 Peter Jennings benlo.com
 83 | 
 84 | Permission is hereby granted, free of charge, to any person obtaining a copy
 85 | of this software and associated documentation files (the "Software"), to deal
 86 | in the Software without restriction, including without limitation the rights
 87 | to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 88 | copies of the Software, and to permit persons to whom the Software is
 89 | furnished to do so, subject to the following conditions:
 90 | 
 91 | The above copyright notice and this permission notice shall be included in all
 92 | copies or substantial portions of the Software.
 93 | 
 94 | THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 95 | IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 96 | FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
 97 | AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 98 | LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 99 | OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
100 | SOFTWARE.
101 | 


--------------------------------------------------------------------------------
/Source/LuaLoader.dpr:
--------------------------------------------------------------------------------
 1 | program LuaLoader;
 2 | 
 3 | uses
 4 |   Forms,
 5 |   LuaLoaderMain in 'LuaLoaderMain.pas' {Form1},
 6 |   netstat in 'netstat.pas' {net},
 7 |   SerialNG in 'SerialNG.pas',
 8 |   SerialNGAdv in 'SerialNGAdv.pas' {SerialNGAdvDLG};
 9 | {$R *.RES}
10 | 
11 | 
12 | begin
13 |   Application.Initialize;
14 |   Application.Title := 'LuaLoader';
15 |   Application.CreateForm(TForm1, Form1);
16 |   Application.CreateForm(TSerialNGAdvDLG, SerialNGAdvDLG);
17 |   Application.CreateForm(Tnet, net);
18 |   Application.Run;
19 |   net.Free;
20 |   SerialNGAdvDLG.Free;
21 |   Halt;
22 |   Form1.Free;
23 | end.
24 | 
25 | 
26 | 


--------------------------------------------------------------------------------
/Source/LuaLoader.res:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/GeoNomad/LuaLoader/e42164e7285a0fdcb3ee124e8a680eaf9518d701/Source/LuaLoader.res


--------------------------------------------------------------------------------
/Source/LuaLoaderMain.dfm:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/GeoNomad/LuaLoader/e42164e7285a0fdcb3ee124e8a680eaf9518d701/Source/LuaLoaderMain.dfm


--------------------------------------------------------------------------------
/Source/LuaLoaderMain.pas:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/GeoNomad/LuaLoader/e42164e7285a0fdcb3ee124e8a680eaf9518d701/Source/LuaLoaderMain.pas


--------------------------------------------------------------------------------
/Source/SerialNG.pas:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/GeoNomad/LuaLoader/e42164e7285a0fdcb3ee124e8a680eaf9518d701/Source/SerialNG.pas


--------------------------------------------------------------------------------
/Source/SerialNGAdv.dfm:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/GeoNomad/LuaLoader/e42164e7285a0fdcb3ee124e8a680eaf9518d701/Source/SerialNGAdv.dfm


--------------------------------------------------------------------------------
/Source/SerialNGAdv.pas:
--------------------------------------------------------------------------------
  1 | unit SerialNGAdv;
  2 | // Helper Unit for SerialNG Advanced Demo
  3 | // Includes a Dialog for Advanced Settings
  4 | // To use this Dialog, simply include this Unit to Your Project
  5 | // Version 1.0.1 18.9.2001 Create the Comportlist from the System Registry
  6 | 
  7 | interface
  8 | 
  9 | uses Windows, SysUtils, Classes, Graphics, Forms, Controls, StdCtrls, 
 10 |   Buttons, ExtCtrls, ComCtrls, SerialNG;
 11 | 
 12 | type
 13 |   TSerialNGAdvDLG = class(TForm)
 14 |     Panel1: TPanel;
 15 |     OKBtn: TButton;
 16 |     CancelBtn: TButton;
 17 |     DLGTabSheet: TPageControl;
 18 |     BasicSheet: TTabSheet;
 19 |     TimingSheet: TTabSheet;
 20 |     AdvancedSheet: TTabSheet;
 21 |     CBPort : TComboBox;
 22 |     CBBaud: TComboBox;
 23 |     CBData: TComboBox;
 24 |     CBStop: TComboBox;
 25 |     CBParity: TComboBox;
 26 |     CBFlow: TComboBox;
 27 |     Label3: TLabel;
 28 |     Label4: TLabel;
 29 |     Label5: TLabel;
 30 |     Label6: TLabel;
 31 |     Label7: TLabel;
 32 |     Label8: TLabel;
 33 |     Label1: TLabel;
 34 |     Label2: TLabel;
 35 |     Label9: TLabel;
 36 |     Label10: TLabel;
 37 |     WTOExtraDelayEdit: TEdit;
 38 |     RTOCharDelayEdit: TEdit;
 39 |     WTOCharDelayEdit: TEdit;
 40 |     RTOExtraDelayEdit: TEdit;
 41 |     CBXTOAuto: TCheckBox;
 42 |     GroupBox1: TGroupBox;
 43 |     Label11: TLabel;
 44 |     Label12: TLabel;
 45 |     XOffCharEdit: TEdit;
 46 |     XOnCharEdit: TEdit;
 47 |     Label13: TLabel;
 48 |     Label14: TLabel;
 49 |     XOnLimitEdit: TEdit;
 50 |     XOffLimitEdit: TEdit;
 51 |     GroupBox2: TGroupBox;
 52 |     CBParityErrorReplacement: TCheckBox;
 53 |     Label15: TLabel;
 54 |     ParityErrorCharEdit: TEdit;
 55 |     CBStripNullChars: TCheckBox;
 56 |     Label16: TLabel;
 57 |     CBReport: TComboBox;
 58 |     Label17: TLabel;
 59 |     EventCharEdit: TEdit;
 60 |     PortBtn: TButton;
 61 |     ManualPort: TEdit;
 62 |     Label18: TLabel;
 63 |     procedure ValidateCharInput(Sender: TObject);
 64 |     procedure ValidateInteger(Sender: TObject);
 65 |     procedure FormCreate(Sender: TObject);
 66 |     procedure FormShow(Sender: TObject);
 67 |     procedure PortBtnClick(Sender: TObject);
 68 |     procedure ManualPortExit(Sender: TObject);
 69 |   private
 70 |     { Private declarations }
 71 |   public
 72 |     { Public declarations }
 73 |     procedure SetDLGData(SerialPortNG : TSerialPortNG);
 74 |     procedure GetDLGData(SerialPortNG : TSerialPortNG);
 75 |   end;
 76 | 
 77 | var
 78 |   SerialNGAdvDLG: TSerialNGAdvDLG;
 79 | 
 80 | function CharToEdit(C : Char):String;
 81 | function EditToChar(S : String; DefaultC : Char):Char;
 82 | 
 83 | implementation
 84 | 
 85 | uses netstat;
 86 | 
 87 | {$R *.DFM}
 88 | 
 89 | procedure TSerialNGAdvDLG.ValidateCharInput(Sender: TObject);
 90 | var S : String;
 91 |     N : LongInt;
 92 | begin
 93 |   S := TEdit(Sender).Text;
 94 |   if Length(S) > 1 then
 95 |     begin
 96 |       try
 97 |         EditToChar(S,#0);
 98 |       except
 99 |         Application.MessageBox('Input allowed single Char or 0..255. Leave empty to hold previous Value.','Invalid Input',mb_OK);
100 |       end;
101 |     end
102 |   else if Length(S) = 0 then
103 |     Application.MessageBox('Input allowed single Char or 0..255. Leave empty to hold previous Value.','Invalid Input',mb_OK);
104 | end;
105 | 
106 | procedure TSerialNGAdvDLG.ValidateInteger(Sender: TObject);
107 | var S : String;
108 |     N : Cardinal;
109 | begin
110 |   S := TEdit(Sender).Text;
111 |   if Length(S) > 1 then
112 |     begin
113 |       try
114 |         N := StrToInt(S);
115 |       except
116 |         Application.MessageBox('Invalid Input. Leave empty to hold previous Value.','Invalid Input',mb_OK);
117 |       end;
118 |     end;
119 | end;
120 | 
121 | function CharToEdit(C : Char):String;
122 | var S : String;
123 | begin
124 |   case C of
125 |     #0..#31,#127,#255 : S := Format('0x%2.2x',[Byte(C)]);
126 |   else
127 |     S := C;
128 |   end;
129 |   CharToEdit := S;
130 | end;
131 | 
132 | function EditToChar(S : String; DefaultC : Char):Char;
133 | var N : LongInt;
134 |     C : Char;
135 | begin
136 |   if Length(S) > 1 then
137 |     begin
138 |       if Copy(S,1,2) = '0x' then
139 |         S := '$'+Copy(S,3,Length(S));
140 |       N := StrToInt(S);
141 |       if (N < 0) or (N > 255) then
142 |         raise ERangeError.CreateFmt(
143 |           '%d is not within the valid range of %d..%d',
144 |           [N, 0, 255])
145 |       else
146 |         C := Char(N);
147 |      end
148 |    else if Length(S) = 1 then
149 |      C := S[1]
150 |    else
151 |      C := DefaultC;
152 |   EditToChar := C;
153 | end;
154 | 
155 | procedure TSerialNGAdvDLG.SetDLGData(SerialPortNG : TSerialPortNG);
156 | var i : Integer;
157 | begin
158 | // Page 1 (Basic)
159 |   try
160 |   i := CBPort.Items.IndexOf(SerialPortNG.CommPort);
161 |   except
162 |   SerialPortNG.CommPort := '';
163 |   i := 0;
164 |   end;
165 |   if i >= 0 then
166 |     CBPort.ItemIndex := i
167 |   else
168 |     CBPort.ItemIndex := 1; //COM2
169 |   i := CBBaud.Items.IndexOf(IntToStr(SerialPortNG.BaudRate));
170 |   if i >= 0 then
171 |     CBBaud.ItemIndex := i
172 |   else
173 |     CBBaud.Text := IntToStr(SerialPortNG.BaudRate);
174 | //    CBBaud.ItemIndex := 6; // 9600
175 |   i := CBData.Items.IndexOf(IntToStr(SerialPortNG.DataBits)+' Bit');
176 |   if i >= 0 then
177 |     CBData.ItemIndex := i
178 |   else
179 |     CBData.ItemIndex := 4; // 8 Bit
180 |   CBStop.ItemIndex := SerialPortNG.StopBits;
181 |   CBParity.ItemIndex := SerialPortNG.ParityType;
182 |   case SerialPortNG.FlowControl of
183 |     fcNone : CBFlow.ItemIndex := 0;
184 |     fcXON_XOFF : CBFlow.ItemIndex := 1;
185 |     fcRTS_CTS : CBFlow.ItemIndex := 2;
186 |     fcDSR_DTR : CBFlow.ItemIndex := 3;
187 |   else
188 |     CBFlow.ItemIndex := 0;
189 |   end;
190 | //  CBOpenPort.Checked := SerialPortNG.Active;
191 | // Page 2 Timing
192 |   WTOCharDelayEdit.Text := IntToStr(SerialPortNG.WTOCharDelayTime);
193 |   RTOCharDelayEdit.Text := IntToStr(SerialPortNG.RTOCharDelayTime);
194 |   WTOExtraDelayEdit.Text := IntToStr(SerialPortNG.WTOExtraDelayTime);
195 |   RTOExtraDelayEdit.Text := IntToStr(SerialPortNG.RTOExtraDelayTime);
196 |   CBXTOAuto.Checked := SerialPortNG.XTOAuto;
197 | // Page 3 Advanced
198 |   XOnCharEdit.Text := CharToEdit(SerialPortNG.XOnChar);
199 |   XOffCharEdit.Text := CharToEdit(SerialPortNG.XOffChar);
200 |   XOnLimitEdit.Text := IntToStr(SerialPortNG.XOnLimDiv);
201 |   XOffLimitEdit.Text := IntToStr(SerialPortNG.XOffLimDiv);
202 |   CBParityErrorReplacement.Checked := SerialPortNG.ParityErrorReplacement;
203 |   ParityErrorCharEdit.Text := CharToEdit(SerialPortNG.ParityErrorChar);
204 |   EventCharEdit.Text := CharToEdit(SerialPortNG.EventChar);
205 |   CBStripNullChars.Checked := SerialPortNG.StripNullChars;
206 |   if SerialPortNG.ErrorNoise > CBReport.Items.Count then
207 |     CBReport.ItemIndex := CBReport.Items.Count-1
208 |   else
209 |     CBReport.ItemIndex := SerialPortNG.ErrorNoise;
210 | end;
211 | 
212 | procedure TSerialNGAdvDLG.GetDLGData(SerialPortNG : TSerialPortNG);
213 | begin
214 |   SerialPortNG.CommPort := CBPort.Items[CBPort.ItemIndex];
215 | //  SerialPortNG.BaudRate := StrToIntDef(CBBaud.Items[CBBaud.ItemIndex],9600);
216 |   SerialPortNG.BaudRate := StrToIntDef(CBBaud.Text,9600);
217 |   SerialPortNG.DataBits := StrToIntDef(Copy(CBData.Items[CBData.ItemIndex],1,1),8);
218 |   SerialPortNG.StopBits := CBStop.ItemIndex;
219 |   SerialPortNG.ParityType := CBParity.ItemIndex;
220 |   SerialPortNG.FlowControl := BasicFlowModes[CBFlow.ItemIndex];
221 | 
222 | // Page 2 Timing
223 |   SerialPortNG.XTOAuto := CBXTOAuto.Checked;
224 |   if not CBXTOAuto.Checked then
225 |     begin
226 |       SerialPortNG.WTOCharDelayTime := StrToInt(WTOCharDelayEdit.Text);
227 |       SerialPortNG.RTOCharDelayTime := StrToInt(RTOCharDelayEdit.Text);
228 |       SerialPortNG.WTOExtraDelayTime := StrToInt(WTOExtraDelayEdit.Text);
229 |       SerialPortNG.RTOExtraDelayTime := StrToInt(RTOExtraDelayEdit.Text);
230 |     end;
231 | 
232 | // Page 3 Advanced
233 |   SerialPortNG.XOnChar := EditToChar(XOnCharEdit.Text,SerialPortNG.XOnChar);
234 |   SerialPortNG.XOffChar := EditToChar(XOffCharEdit.Text,SerialPortNG.XOffChar);
235 |   SerialPortNG.XOnLimDiv := StrToInt(XOnLimitEdit.Text);
236 |   SerialPortNG.XOffLimDiv := StrToInt(XOffLimitEdit.Text);
237 |   SerialPortNG.ParityErrorReplacement := CBParityErrorReplacement.Checked;
238 |   SerialPortNG.ParityErrorChar := EditToChar(ParityErrorCharEdit.Text,SerialPortNG.ParityErrorChar);
239 |   SerialPortNG.EventChar := EditToChar(EventCharEdit.Text,SerialPortNG.EventChar);
240 |   SerialPortNG.StripNullChars := CBStripNullChars.Checked;
241 |   SerialPortNG.ErrorNoise := CBReport.Itemindex;
242 | // Try to Open the Port if wished
243 | //  SerialPortNG.Active := CBOpenPort.Checked;
244 | end;
245 | 
246 | procedure TSerialNGAdvDLG.FormCreate(Sender: TObject);
247 | begin
248 |   GetCommNames(CBPort.Items);
249 | end;
250 | 
251 | procedure TSerialNGAdvDLG.FormShow(Sender: TObject);
252 | begin
253 |   GetCommNames(CBPort.Items);
254 | end;
255 | 
256 | procedure TSerialNGAdvDLG.PortBtnClick(Sender: TObject);
257 | begin
258 | net.ShowURL('http://benlo.com/esp8266/index.html#faq');
259 | end;
260 | 
261 | procedure TSerialNGAdvDLG.ManualPortExit(Sender: TObject);
262 | begin
263 | ManualPort.Text := UpperCase(ManualPort.Text);
264 | if (ManualPort.Text <> '') and (CBPort.Items.IndexOf(ManualPort.Text) < 0) then
265 |    begin
266 |    CBPort.Items.Add(ManualPort.Text);
267 |    end;
268 | end;
269 | 
270 | end.
271 | 


--------------------------------------------------------------------------------
/Source/supertim.zip:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/GeoNomad/LuaLoader/e42164e7285a0fdcb3ee124e8a680eaf9518d701/Source/supertim.zip


--------------------------------------------------------------------------------
/examples/AutoConnect.lua:
--------------------------------------------------------------------------------
 1 | -- choose the strongest open AP available and connect to it
 2 | -- Autoconnect to strongest AP
 3 | -- tested with NodeMcu 0.9.2 build 20141212 
 4 | 
 5 | ConnStatus = nil
 6 | function ConnStatus(n)
 7 | 
 8 | status = wifi.sta.status()
 9 | uart.write(0,' '..status)
10 | local x = n+1
11 | if (x < 50) and ( status < 5 ) then
12 |    tmr.alarm(0,100,0,function() ConnStatus(x) end)
13 | else
14 |    if status == 5 then
15 |    print('\nConnected as '..wifi.sta.getip())
16 |    else
17 |    print("\nConnection failed")
18 |    end
19 | end
20 | end
21 |    
22 | best_ssid = nil
23 | function best_ssid(ap_db)
24 | 
25 | local min = 100
26 | for k,v in pairs(ap_db) do
27 |     if tonumber(v) < min then 
28 |        min = tonumber(v)
29 |        ssid = k
30 |        end
31 |     end
32 | end
33 | 
34 | best = nil
35 | function best(aplist)
36 | 
37 | ssid = nil
38 | print("\nAvailable Open Access Points:\n")
39 | for k,v in pairs(aplist) do print(k..' '..v) end
40 | 
41 | ap_db = nil
42 | ap_db = {}
43 | if nil ~= next(aplist) then
44 |      
45 |    for k,v in pairs(aplist) do 
46 |       if '0' == string.sub(v,1,1) then 
47 |          ap_db[k] = string.match(v, '-(%d+),') 
48 |          end 
49 |        end
50 |      
51 |    if nil ~= next(ap_db) then
52 |       best_ssid(ap_db)
53 |       end
54 |    end
55 | if nil ~= ssid then
56 |    print("\nBest SSID: ".. ssid)
57 |    wifi.sta.config(ssid,"")
58 |    print("\nConnecting to "..ssid)
59 |    ConnStatus(0)
60 | else
61 |    print("\nNo available open APs")
62 |    end
63 | end
64 |     
65 | 
66 | wifi.setmode(wifi.STATION)
67 | wifi.sta.getap(function(t) best(t)  end)
68 | 
69 | 
70 | 
71 | 


--------------------------------------------------------------------------------
/examples/Client with DNS.lua:
--------------------------------------------------------------------------------
 1 | -- Simple webclient with DNS
 2 | 
 3 | -- http://www.esp8266.com/viewtopic.php?f=19&t=691
 4 | 
 5 | -- untested
 6 | 
 7 | 
 8 | 
 9 | file.remove("client.lua")
10 | file.remove("client.lua")
11 | file.open("client.lua","w+")
12 | host="www.ernstc.dk"
13 | ipnr=0
14 | file.writeline([[tmr.alarm(30000, 1, function()]])
15 | file.writeline([[sk=net.createConnection(net.TCP, 0)]])
16 | file.writeline([[sk:dns(host,function(conn,ip) ]])
17 | file.writeline([[ipnr=ip]])
18 | file.writeline([[end)]])
19 | file.writeline([[conn=net.createConnection(net.TCP, 0) ]])
20 | file.writeline([[    conn:on("receive", function(conn, payload) print(payload) end )]])
21 | file.writeline([[    conn:connect(80,ipnr)]])
22 | file.writeline([[    conn:send("GET /esp.php?tekst="..adc.read(0) .."&heap="..node.heap().." HTTP/1.1\r\nHost: "..host.."\r\n"]])
23 | file.writeline([[        .."Connection: keep-alive\r\nAccept: */*\r\n\r\n")]])
24 | file.writeline([[end)]])
25 | file.close()
26 | 
27 | 


--------------------------------------------------------------------------------
/examples/Count Interrupts.lua:
--------------------------------------------------------------------------------
 1 | -- Count pulses on GPIO2
 2 |  
 3 | count = 0
 4 | delay = 0
 5 | gpio.mode(9,gpio.INT,gpio.PULLUP)
 6 | 
 7 | function counter(level)
 8 |    x = tmr.now()
 9 |    if x > delay then
10 |       delay = tmr.now()+250000
11 |       count = count + 1
12 |       print(count)
13 |       end
14 |    end
15 | gpio.trig(9, "down",counter)
16 | 
17 | 


--------------------------------------------------------------------------------
/examples/DS18B20 One Wire Temperature server.lua:
--------------------------------------------------------------------------------
 1 | -- 1 wire to server for DS18B20 temperature sensor
 2 | 
 3 | -- http://www.esp8266.com/viewtopic.php?f=19&t=752
 4 | -- http://www.esp8266.com/viewtopic.php?f=19&t=757
 5 | 
 6 | -- untested
 7 | 
 8 | pin = 9
 9 | ow.setup(pin)
10 | 
11 | counter=0
12 | lasttemp=-999
13 | 
14 | function bxor(a,b)
15 |    local r = 0
16 |    for i = 0, 31 do
17 |       if ( a % 2 + b % 2 == 1 ) then
18 |          r = r + 2^i
19 |       end
20 |       a = a / 2
21 |       b = b / 2
22 |    end
23 |    return r
24 | end
25 | 
26 | function getTemp()
27 |       addr = ow.reset_search(pin)
28 |       repeat
29 |         tmr.wdclr()
30 |       
31 |       if (addr ~= nil) then
32 |         crc = ow.crc8(string.sub(addr,1,7))
33 |         if (crc == addr:byte(8)) then
34 |           if ((addr:byte(1) == 0x10) or (addr:byte(1) == 0x28)) then
35 |                 ow.reset(pin)
36 |                 ow.select(pin, addr)
37 |                 ow.write(pin, 0x44, 1)
38 |                 tmr.delay(1000000)
39 |                 present = ow.reset(pin)
40 |                 ow.select(pin, addr)
41 |                 ow.write(pin,0xBE, 1)
42 |                 data = nil
43 |                 data = string.char(ow.read(pin))
44 |                 for i = 1, 8 do
45 |                   data = data .. string.char(ow.read(pin))
46 |                 end
47 |                 crc = ow.crc8(string.sub(data,1,8))
48 |                 if (crc == data:byte(9)) then
49 |                    t = (data:byte(1) + data:byte(2) * 256)
50 |          if (t > 32768) then
51 |                     t = (bxor(t, 0xffff)) + 1
52 |                     t = (-1) * t
53 |                    end
54 |          t = t * 625
55 |                    lasttemp = t
56 |          print("Last temp: " .. lasttemp)
57 |                 end                   
58 |                 tmr.wdclr()
59 |           end
60 |         end
61 |       end
62 |       addr = ow.search(pin)
63 |       until(addr == nil)
64 | end
65 | 
66 | srv=net.createServer(net.TCP)
67 | srv:listen(8080,function(conn)
68 |     getTemp()
69 |     t1 = lasttemp / 10000
70 |     t2 = (lasttemp >= 0 and lasttemp % 10000) or (10000 - lasttemp % 10000)
71 |     conn:send("Temperature: " .. t1 .. "." .. string.format("%04d", t2) .. "\n\n")
72 |   conn:on("sent",function(conn) conn:close() end)
73 | end)
74 | 
75 | 


--------------------------------------------------------------------------------
/examples/Find Hot Spots/autoconnect.lua:
--------------------------------------------------------------------------------
 1 | -- choose the strongest open AP available and connect to it
 2 | -- tested with NodeMcu 0.9.2 build 20150123
 3 | 
 4 | Tstart  = tmr.now()
 5 | 
 6 | ConnStatus = nil
 7 | function ConnStatus(n)
 8 |    status = wifi.sta.status()
 9 |    uart.write(0,' '..status)
10 |    local x = n+1
11 |    if (x < 50) and ( status < 5 ) then
12 |       tmr.alarm(0,100,0,function() ConnStatus(x) end)
13 |    else
14 |       if status == 5 then
15 |       print('\nConnected as '..wifi.sta.getip())
16 |       dofile('httpget.lua')
17 |       else
18 |       print("\nConnection failed")
19 |       end
20 |    end
21 | end
22 |    
23 | best_ssid = nil
24 | function best_ssid(ap_db)
25 |    local min = 100
26 |    ssid = nil
27 |    for k,v in pairs(ap_db) do
28 |        if tonumber(v) < min then 
29 |           min = tonumber(v)
30 |           ssid = k
31 |           end
32 |        end
33 |        
34 |    gpio.write(red,gpio.LOW)
35 |    gpio.write(blue,gpio.HIGH)
36 |    return min
37 | end
38 | 
39 | 
40 | strongest = nil
41 | function strongest(aplist)
42 |    print("\nAvailable Open Access Points:\n")
43 |    for k,v in pairs(aplist) do print(k..' '..v) end
44 |    
45 |    ap_db = {}
46 |    if next(aplist) then
47 |       for k,v in pairs(aplist) do 
48 |          if '0' == string.sub(v,1,1) then 
49 |             ap_db[k] = string.match(v, '-(%d+),') 
50 |             end 
51 |           end
52 |       signal = -best_ssid(ap_db)
53 |       end
54 |    if ssid then
55 |       print("\nBest SSID: ".. ssid)
56 |       wifi.sta.config(ssid,"")
57 |       print("\nConnecting to "..ssid)
58 |       ConnStatus(0)
59 |    else
60 |       print("\nNo available open APs")
61 |       ssid = ''
62 |       end
63 | end
64 |     
65 | 
66 | wifi.setmode(wifi.STATION)
67 | wifi.sta.getap(function(t) strongest(t)  end)
68 | 


--------------------------------------------------------------------------------
/examples/Find Hot Spots/httpget.lua:
--------------------------------------------------------------------------------
 1 | -- tested on NodeMCU 0.9.5 build 20150123
 2 | -- sends info to http://benlo.com/esp8266/test.php
 3 | 
 4 | print('httpget.lua started')
 5 | 
 6 | conn = nil
 7 | conn=net.createConnection(net.TCP, 0) 
 8 | 
 9 | -- show the retrieved web page
10 | 
11 | conn:on("receive", function(conn, payload) 
12 |      print(payload) 
13 |      if string.match(payload, 'Test Number', 0) then
14 |         gpio.write(blue,gpio.LOW)
15 |         gpio.write(green,gpio.HIGH)
16 |      else
17 |         gpio.write(red,gpio.HIGH)
18 |         end
19 |      end) 
20 | 
21 | -- when connected, request page (send parameters to a script)
22 | conn:on("connection", function(conn, payload) 
23 |      print('\nConnected') 
24 |      conn:send("GET /esp8266/test.php?"
25 |       .."TIME="..(tmr.now()-Tstart)
26 |       .."&HEAP="..node.heap()
27 |       .."&SSID="..ssid
28 |       .."&SIG="..signal
29 |       .."&ID="..node.chipid()..'.'..node.flashid()
30 |       .." HTTP/1.1\r\n" 
31 |       .."Host: benlo.com\r\n" 
32 | 	   .."Connection: close\r\n"
33 |       .."Accept: */*\r\n" 
34 |       .."User-Agent: Mozilla/4.0 (compatible; esp8266 Lua; Windows NT 5.1)\r\n" 
35 |       .."\r\n")
36 |      end) 
37 | -- when disconnected, let it be known
38 | conn:on("disconnection", function(conn, payload) 
39 |       print('\nDisconnected') 
40 |       tmr.alarm(0,5000,0,function()  
41 |          gpio.write(red,gpio.LOW)
42 |          gpio.write(green,gpio.LOW)
43 |          gpio.write(blue,gpio.LOW)
44 |          end)
45 |       end)
46 |                                              
47 | conn:connect(80,'benlo.com') 
48 | 


--------------------------------------------------------------------------------
/examples/Find Hot Spots/init.lua:
--------------------------------------------------------------------------------
 1 | tmr.alarm(3,30000,1,function() dofile('init.lua') end)
 2 | 
 3 | red = 8
 4 | blue = 7
 5 | green = 6
 6 | 
 7 | 
 8 | gpio.mode(red,gpio.OUTPUT)
 9 | gpio.mode(green,gpio.OUTPUT)
10 | gpio.mode(blue,gpio.OUTPUT)
11 | gpio.write(red,gpio.HIGH)
12 | gpio.write(green,gpio.LOW)
13 | gpio.write(blue,gpio.LOW)
14 | 
15 | tmr.alarm(0,1000,0,function() dofile('autoconnect.lua') end)
16 | 
17 | 


--------------------------------------------------------------------------------
/examples/Kankun WiFi Plug/README.md:
--------------------------------------------------------------------------------
 1 | Kankun smart plug outlet controller
 2 | 
 3 | Full tutorial is at http://benlo.com/esp8266/KankunSmartPlug.html
 4 | 
 5 | <hr>
 6 | 
 7 | scp to the Kankun 
 8 | 
 9 | create /www/cgi-bin
10 | 
11 | chmod 755 cgi-bin
12 | 
13 | put relay.cgi in cgi-bin
14 | 
15 | 
16 | <hr>
17 | upload init.lua and httpget.lua to the esp8266
18 | 
19 | 
20 | <hr>
21 | 
22 | /www/index.html and /www/click.mp3 are optional
23 | 
24 | They make a pretty toggle button for browser control of the Kandun outlet.
25 | 
26 | Browse to http://192.168.10.253 with any web browser.
27 | 
28 | The toggle will reflect the state of the Kandun switch as well as control it.
29 | 
30 | 
31 | 
32 | 


--------------------------------------------------------------------------------
/examples/Kankun WiFi Plug/click.mp3:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/GeoNomad/LuaLoader/e42164e7285a0fdcb3ee124e8a680eaf9518d701/examples/Kankun WiFi Plug/click.mp3


--------------------------------------------------------------------------------
/examples/Kankun WiFi Plug/httpget.lua:
--------------------------------------------------------------------------------
 1 | -- tested on NodeMCU 0.9.5 build 20150126
 2 | -- sends commands to Kankun WiFi button
 3 | -- http://benlo.com/esp8266/KankunSmartPlug.html
 4 | 
 5 | print('httpget.lua started')
 6 | print(node.heap())
 7 | 
 8 | conn = nil
 9 | conn=net.createConnection(net.TCP, 0) 
10 | 
11 | -- show the retrieved web page
12 | 
13 | conn:on("receive", function(conn, payload) 
14 |      print(payload) 
15 |      end) 
16 | 
17 | -- when connected, request page (send parameters to a script)
18 | conn:on("connection", function(conn, payload) 
19 |      print('\nConnected') 
20 |      conn:send("GET /cgi-bin/relay.cgi?"
21 |       .."toggle"
22 |       .." HTTP/1.1\r\n" 
23 | 	   .."Connection: close\r\n"
24 |       .."Accept: */*\r\n" 
25 |       .."User-Agent: Mozilla/4.0 (compatible; esp8266 Lua; Windows NT 5.1)\r\n" 
26 |       .."\r\n")
27 |      end) 
28 | -- when disconnected, let it be known
29 | conn:on("disconnection", function(conn, payload) 
30 |       print('\nDisconnected') 
31 |       wifi.sta.disconnect()
32 |       tmr.wdclr()      
33 |       tmr.alarm(0,1000,0,function()
34 |          print('all done')
35 |          node.dsleep(600000000)  
36 |          end)
37 |       end)
38 |                                              
39 | conn:connect(80,'192.168.10.253') 
40 | 


--------------------------------------------------------------------------------
/examples/Kankun WiFi Plug/index.html:
--------------------------------------------------------------------------------
  1 | <html>
  2 | <!-- based on A Pen by Yair Even Or   http://codepen.io/vsync/pen/pqEGJ -->
  3 | <head>
  4 | <style>
  5 | *{ margin:0; padding:0; }
  6 | html, body{ height:100%; }
  7 | body{ font:15px/1 arial; text-align:center; background:#307D9D; }
  8 | body:before{ content:''; display:inline-block; height:100%; vertical-align:middle; }
  9 | 	
 10 | .checkboxControl2{ 
 11 | 		border:2px solid #102838; border-radius:7px; display:inline-block; vertical-align:middle; font-weight:bold;
 12 | 		width:60px; height:100px; position:relative; margin:0 5px;
 13 | 		color:#12678C; box-shadow:0 0 5px rgba(255,255,255,.4);
 14 | 	}
 15 | .checkboxControl2 input{ position:absolute; visibility:hidden; }
 16 | .checkboxControl2 > div{ 
 17 | 		background:-webkit-linear-gradient(top, #002B44 0%, #0690AC 11%, #038EAA 14%, #A0F2FE 58%, #91DBE7 96%, #B9E8E8 100%); 
 18 | 		background:linear-gradient(to bottom, #002B44 0%, #0690AC 11%, #038EAA 14%, #A0F2FE 58%, #91DBE7 96%, #B9E8E8 100%); 
 19 | 		height:100%; border-radius:5px; line-height:50px; font-we0 0 3px 0px #F95757 inset, 0 0 12px 6px #F95757tion:relative; z-index:1; cursor:pointer; text-shadow:0 1px rgba(255,255,255,0.5);
 20 | 	}
 21 | .checkboxControl2 > div:after{ 
 22 | 		content:'OFF'; display:block; height:50%; line-height:4;
 23 | 		transform-origin:0 0; -webkit-transform-origin:0 0;
 24 | 	}
 25 | .checkboxControl2 > div:before{ 
 26 | 		content:'ON'; display:block; height:50%; line-height:2.5;
 27 | 		border-radius:80%/5px;
 28 | 		box-shadow:0 8px 12px -13px #89DFED inset, 0 -2px 2px -1px rgba(255,255,255,0.8);
 29 | 		transform-origin:0 100%; -webkit-transform-origin:0 100%; 
 30 | 		transform:scaleY(0.7); -webkit-transform:scaleY(0.7);
 31 | 	}
 32 | 	
 33 | .checkboxControl2 :checked ~ div{ 
 34 | 		background:-webkit-linear-gradient(bottom, #002B44 0%, #0690AC 11%, #038EAA 14%, #A0F2FE 58%, #91DBE7 96%, #B9E8E8 100%);
 35 | 		background:linear-gradient(to top, #002B44 0%, #0690AC 11%, #038EAA 14%, #A0F2FE 58%, #91DBE7 96%, #B9E8E8 100%);
 36 | 	}
 37 | .checkboxControl2 :checked ~ div:before{ 
 38 | 		border-radius:0; box-shadow:none;
 39 | 		transform:none; -webkit-transform:none;
 40 | 	}
 41 | .checkboxControl2 :checked ~ div:after{ 
 42 | 		border-radius:80%/5px;
 43 | 		box-shadow:0 -8px 12px -5px #89DFED inset, 0 2px 2px 0 #0690AC;
 44 | 		transform:scaleY(0.7); -webkit-transform:scaleY(0.7);
 45 | 	}
 46 | 
 47 | /* the light indicator to the top of the button */
 48 | .checkboxControl2 .indicator{ position:absolute; top:-20px; left:17px; width:25px; height:8px; box-shadow:0 0 8px #000 inset; border:1px solid rgba(255,255,255,0.1); border-radius:15px; transition:0.2s; -webkit-transition:0.2s; }
 49 | 	.checkboxControl2 .indicator:before{ content:''; display:block; margin:2px auto; width:8px; height:5px; border-radius:10px; transition:0.5s; -webkit-transition:0.5s; }
 50 | 	.checkboxControl2 :checked ~ .indicator:before{ box-shadow:0 0 2px 0px #F95757 inset, 0 0 12px 6px #F95757; background:#FFF; transition:0.1s; -webkit-transition:0.1s; }
 51 | </style>
 52 | <script>
 53 | var timerx = setTimeout(function(){ switchx("state"); }, 3000);
 54 | function switchx( cmd )
 55 |    {
 56 |    if ( timerx ) clearTimeout(timerx);
 57 |    var relay = new XMLHttpRequest();
 58 |    relay.open('GET',"/cgi-bin/relay.cgi?"+cmd, true);
 59 |    relay.send();
 60 |    relay.onreadystatechange = function() 
 61 |       {
 62 |       if( relay.readyState == 4 )
 63 |          { 
 64 |          if ( relay.status == 200 )
 65 |             {
 66 |             if (relay.responseText.indexOf("ON")>=0)
 67 |                {
 68 |                $('cbox').checked = true;
 69 |                }
 70 |             else
 71 |                {
 72 |                $('cbox').checked = false;
 73 |                }
 74 |             }
 75 |          }
 76 |       }
 77 |     timerx = setTimeout(function(){ switchx("state"); }, 3000);
 78 |     }
 79 | 
 80 | function check(checkbox)
 81 |   {
 82 |   if (checkbox.checked)
 83 |     {
 84 |     switchx('on');
 85 |     }
 86 |   else
 87 |     {
 88 |     switchx('off');
 89 |     }
 90 |   }
 91 | var snd = new Audio('click.mp3');
 92 | 
 93 | document.addEventListener('change', function(e){
 94 | 	if(e.target.parentNode.className.indexOf('checkboxControl') != -1){
 95 | 		snd.currentTime = 0;
 96 | 		snd.play(); 
 97 | 	}
 98 | });
 99 | 
100 | function $(id) { return document.getElementById(id); }
101 | 
102 | </script>
103 | </head>
104 | <body onload="switchx('state')">
105 | <label class='checkboxControl2'>
106 | 	<input type='checkbox' id="cbox" onclick="check(this)" />
107 | 	<div></div>
108 | 	<span class='indicator' id="Lnav"></span>
109 | </label>
110 | </body>
111 | </html>
112 | 


--------------------------------------------------------------------------------
/examples/Kankun WiFi Plug/init.lua:
--------------------------------------------------------------------------------
 1 | print('init.lua')
 2 | LLbin = nil
 3 | 
 4 | print(node.heap())
 5 | 
 6 | wifi.setmode(wifi.STATION)
 7 | wifi.sta.config("0K_SP3_BD4524","")
 8 | 
 9 | tmr.alarm(0,1000,0,function() dofile('httpget.lua') end)
10 | 
11 | 


--------------------------------------------------------------------------------
/examples/Kankun WiFi Plug/relay.cgi:
--------------------------------------------------------------------------------
 1 | #!/bin/sh
 2 | echo "Content-Type: text/plain"
 3 | echo "Cache-Control: no-cache, must-revalidate"
 4 | echo "Expires: Sat, 26 Jul 1997 05:00:00 GMT"
 5 | echo
 6 | 
 7 | RELAY_CTRL=/sys/class/leds/tp-link:blue:relay/brightness
 8 | 
 9 | case "$QUERY_STRING" in
10 |   state) 
11 |     case "`cat $RELAY_CTRL`" in
12 |       0) echo "OFF";;
13 |       1) echo "ON" ;;
14 |     esac;;
15 |   on) 
16 |     echo 1 > $RELAY_CTRL
17 |     echo ON;;
18 |   off) 
19 |     echo 0 > $RELAY_CTRL
20 |     echo OFF;;
21 |   toggle)
22 |     case "`cat $RELAY_CTRL`" in
23 |       0) echo 1 > $RELAY_CTRL
24 |          echo "ON";;
25 |       1) echo 0 > $RELAY_CTRL
26 |          echo "OFF" ;;
27 |     esac;;    
28 | esac
29 | 
30 | 
31 | 


--------------------------------------------------------------------------------
/examples/README.md:
--------------------------------------------------------------------------------
 1 | LuaLoader for Windows - Examples
 2 | =====================
 3 | 
 4 | More documentation and FAQ are at http://benlo.com/esp8266
 5 | 
 6 | LuaLoader is a Windows program for uploading files to the ESP8266 and working with the Lua serial interface. It is compatible with all versions of Windows from Windows 95 to Windows 10.
 7 | 
 8 | <hr>
 9 | The examples in this folder were all tested with versions of nodeMCU that were current at the time.
10 | 
11 | But, be aware that as the nodeMCU Lua interpreter has "improved", sometimes it breaks the examples.
12 | 
13 | For more up-to-date examples, the best repository is the one updated by the nodeMCU team at
14 | 
15 | <a href="https://github.com/NodeUSB/lua-examples/tree/master/codes">https://github.com/NodeUSB/lua-examples/tree/master/codes</a>
16 | 
17 | 


--------------------------------------------------------------------------------
/examples/Scan for I2C devices.lua:
--------------------------------------------------------------------------------
 1 | -- http://www.esp8266.com/viewtopic.php?f=19&t=771
 2 | -- Scan for I2C devices
 3 | 
 4 | id=0
 5 | sda=8
 6 | scl=9
 7 | 
 8 | -- initialize i2c, set pin1 as sda, set pin0 as scl
 9 | 
10 | i2c.setup(id,sda,scl,i2c.SLOW)
11 | 
12 | for i=0,127 do
13 |   i2c.start(id)
14 |   resCode = i2c.address(id, i, i2c.TRANSMITTER)
15 |   i2c.stop(id)
16 |   if resCode == true then print("We have a device on address 0x" .. string.format("%02x", i) .. " (" .. i ..")") end
17 | end
18 | 
19 | 


--------------------------------------------------------------------------------
/examples/Servo Control by UDP.lua:
--------------------------------------------------------------------------------
 1 | -- Servo Control by UDP
 2 | 
 3 | -- http://www.esp8266.com/viewtopic.php?f=19&t=794
 4 | -- untested
 5 | 
 6 | if(pl==nil) then
 7 | pl=1500
 8 | end
 9 | port=88
10 | pin=9
11 | srv=net.createServer(net.UDP)
12 | srv:on("receive", function(srv, pl)
13 |    print("Command Reveived")
14 |    print(pl)
15 | --servo code
16 | gpio.mode(pin,gpio.OUTPUT)
17 | tmr.alarm(20, 1, function()  
18 | gpio.write(pin,gpio.HIGH)
19 | tmr.delay(pl)
20 | gpio.write(pin,gpio.LOW)
21 | end)
22 |  --servo code
23 |    end)
24 | srv:listen(port)
25 | 
26 | 


--------------------------------------------------------------------------------
/examples/googleTime.lua:
--------------------------------------------------------------------------------
 1 | -- retrieve the current time from Google
 2 | -- tested on NodeMCU 0.9.5 build 20150108
 3 | 
 4 | conn=net.createConnection(net.TCP, 0) 
 5 | 
 6 | conn:on("connection",function(conn, payload)
 7 |             conn:send("HEAD / HTTP/1.1\r\n".. 
 8 |                       "Host: google.com\r\n"..
 9 |                       "Accept: */*\r\n"..
10 |                       "User-Agent: Mozilla/4.0 (compatible; esp8266 Lua;)"..
11 |                       "\r\n\r\n") 
12 |             end)
13 |             
14 | conn:on("receive", function(conn, payload)
15 |     print('\nRetrieved in '..((tmr.now()-t)/1000)..' milliseconds.')
16 |     print('Google says it is '..string.sub(payload,string.find(payload,"Date: ")
17 |            +6,string.find(payload,"Date: ")+35))
18 |     conn:close()
19 |     end) 
20 | t = tmr.now()    
21 | conn:connect(80,'google.com') 
22 | 


--------------------------------------------------------------------------------
/examples/gpio monitor.lua:
--------------------------------------------------------------------------------
 1 | -- monitor an input pin with output to the terminal
 2 | 
 3 | 
 4 | function monitor( pin )
 5 |    uart.write( 0, ''..gpio.read(pin) )
 6 |    end
 7 |    
 8 | gpio.mode(9,gpio.INPUT,gpio.PULLUP)
 9 | 
10 | tmr.alarm( 50,1,function() monitor(9) end )
11 | 
12 | 


--------------------------------------------------------------------------------
/examples/httpget.lua:
--------------------------------------------------------------------------------
 1 | -- tested on NodeMCU 0.9.5 build 20141222...20150108
 2 | -- sends connection time and heap size to http://benlo.com/esp8266/test.php
 3 | 
 4 | print('httpget.lua started')
 5 | Tstart  = tmr.now()
 6 | 
 7 | conn = nil
 8 | conn=net.createConnection(net.TCP, 0) 
 9 | 
10 | -- show the retrieved web page
11 | 
12 | conn:on("receive", function(conn, payload) 
13 |                        success = true
14 |                        print(payload) 
15 |                        end) 
16 | 
17 | -- when connected, request page (send parameters to a script)
18 | conn:on("connection", function(conn, payload) 
19 |                        print('\nConnected') 
20 |                        conn:send("GET /esp8266/test.php?"
21 |                         .."T="..(tmr.now()-Tstart)
22 |                         .."&heap="..node.heap()
23 |                         .." HTTP/1.1\r\n" 
24 |                         .."Host: benlo.com\r\n" 
25 |                		   .."Connection: close\r\n"
26 |                         .."Accept: */*\r\n" 
27 |                         .."User-Agent: Mozilla/4.0 (compatible; esp8266 Lua; Windows NT 5.1)\r\n" 
28 |                         .."\r\n")
29 |                        end) 
30 | -- when disconnected, let it be known
31 | conn:on("disconnection", function(conn, payload) print('\nDisconnected') end)
32 |                                              
33 | conn:connect(80,'benlo.com') 
34 | 


--------------------------------------------------------------------------------
/examples/thebutton/autoconnect.lua:
--------------------------------------------------------------------------------
 1 | -- choose the strongest open AP available and connect to it
 2 | -- http://benlo.com/esp8266/esp8266Projects.html#thebutton
 3 | -- tested with NodeMcu 0.9.2 build 20150123
 4 | 
 5 | gpio.write(red,gpio.HIGH)
 6 | Tstart  = tmr.now()
 7 | 
 8 | ConnStatus = nil
 9 | function ConnStatus(n)
10 |    status = wifi.sta.status()
11 |    uart.write(0,' '..status)
12 |    local x = n+1
13 |    if (x < 50) and ( status < 5 ) then
14 |       tmr.alarm(0,100,0,function() ConnStatus(x) end)
15 |       if gpio.read(red) > 0 then gpio.write(red,gpio.LOW)
16 |       else gpio.write(red,gpio.HIGH)
17 |       end
18 |    else
19 |       if status == 5 then
20 |          print('\nConnected as '..wifi.sta.getip())
21 |          dofile('httpget.lua')
22 |       else
23 |          print("\nConnection failed")
24 |          dofile('reconnect.lua')
25 |       end
26 |    end
27 | end
28 |    
29 | best_ssid = nil
30 | function best_ssid(ap_db)
31 |    local min = 100
32 |    ssid = nil
33 |    for k,v in pairs(ap_db) do
34 |        if tonumber(v) < min then 
35 |           min = tonumber(v)
36 |           ssid = k
37 |           end
38 |        end
39 |     return min
40 | end
41 | 
42 | 
43 | connect = nil
44 | function connect(aplist)
45 |    print("\nAvailable Open Access Points:\n")
46 |    for k,v in pairs(aplist) do print(k..' '..v) end
47 |    
48 |    ap_db = {}
49 |    if next(aplist) then
50 |       for k,v in pairs(aplist) do 
51 |          if '0' == string.sub(v,1,1) then 
52 |             ap_db[k] = string.match(v, '-(%d+),') 
53 |             end 
54 |           end
55 |       signal = -best_ssid(ap_db)
56 |       end
57 |    if ssid then
58 |       print("\nBest SSID: ".. ssid)
59 |       wifi.sta.config(ssid,"")
60 |       print("\nConnecting to "..ssid)
61 |       ConnStatus(0)
62 |    else
63 |       print("\nNo available open APs")
64 |       ssid = ''
65 |       gpio.write(red,gpio.LOW)
66 |       gpio.write(green,gpio.LOW)
67 |       gpio.write(blue,gpio.LOW)
68 |       end
69 | end
70 |     
71 | 
72 | wifi.setmode(wifi.STATION)
73 | wifi.sta.getap(function(aplist) connect(aplist)  end)
74 | 


--------------------------------------------------------------------------------
/examples/thebutton/httpget.lua:
--------------------------------------------------------------------------------
 1 | -- tested on NodeMCU 0.9.5 build 20150123
 2 | -- sends info to http://benlo.com/esp8266/test.php
 3 | -- http://benlo.com/esp8266/esp8266Projects.html#thebutton
 4 | 
 5 | print('httpget.lua started')
 6 | 
 7 | conn = nil
 8 | conn=net.createConnection(net.TCP, 0) 
 9 | 
10 | -- show the retrieved web page
11 | 
12 | conn:on("receive", function(conn, payload) 
13 |      print(payload) 
14 |      if string.match(payload, 'Button Received', 0) then   -- change this to the expected reply
15 |         gpio.write(red,gpio.LOW)
16 |         gpio.write(blue,gpio.LOW)
17 |         gpio.write(green,gpio.HIGH)
18 |      end
19 |      end) 
20 | 
21 | -- when connected, request page (send parameters to a script)
22 | conn:on("connection", function(conn, payload) 
23 |      print('\nConnected') 
24 |      conn:send("GET /esp8266/test.php?"          -- change this to your script
25 |       .."TIME="..(tmr.now()-Tstart)
26 |       .."&HEAP="..node.heap()
27 |       .."&SSID="..ssid
28 |       .."&SIG="..signal
29 |       .."&ID="..node.chipid()..'.'..node.flashid()
30 |       .." HTTP/1.1\r\n" 
31 |       .."Host: benlo.com\r\n"                     -- change this to your host
32 | 	   .."Connection: close\r\n"
33 |       .."Accept: */*\r\n" 
34 |       .."User-Agent: Mozilla/4.0 (compatible; esp8266 Lua; Windows NT 5.1)\r\n" 
35 |       .."\r\n")
36 |      end) 
37 | -- when disconnected, let it be known
38 | conn:on("disconnection", function(conn, payload) 
39 |       print('\nDisconnected') 
40 |       tmr.alarm(0,3000,0,function()  
41 |          gpio.write(red,gpio.LOW)
42 |          gpio.write(green,gpio.LOW)
43 |          gpio.write(blue,gpio.LOW)
44 |          dofile('reconnect.lua')
45 |          end)
46 |       end)
47 |                                              
48 | conn:connect(80,'benlo.com')                       -- change this to your host
49 | 
50 | gpio.write(red,gpio.LOW)
51 | gpio.write(green,gpio.LOW)
52 | gpio.write(blue,gpio.HIGH)
53 | 


--------------------------------------------------------------------------------
/examples/thebutton/init.lua:
--------------------------------------------------------------------------------
 1 | -- thebutton http://benlo.com/esp8266/esp8266Projects.html#thebutton
 2 | 
 3 | print('init.lua')
 4 | 
 5 | wifi.setmode(wifi.STATION)
 6 | 
 7 | red = 7
 8 | blue = 5
 9 | green = 6
10 | 
11 | gpio.mode(red,gpio.OUTPUT)
12 | gpio.mode(green,gpio.OUTPUT)
13 | gpio.mode(blue,gpio.OUTPUT)
14 | gpio.write(red,gpio.HIGH)
15 | gpio.write(green,gpio.LOW)
16 | gpio.write(blue,gpio.LOW)
17 | 
18 | tmr.alarm(0,1000,0,function() dofile('autoconnect.lua') end)
19 | 
20 | 


--------------------------------------------------------------------------------
/examples/thebutton/reconnect.lua:
--------------------------------------------------------------------------------
 1 | -- http://benlo.com/esp8266/esp8266Projects.html#thebutton
 2 | 
 3 | Tstart  = tmr.now()
 4 | gpio.write(green,gpio.LOW)
 5 | gpio.write(blue,gpio.LOW)
 6 | gpio.write(red,gpio.HIGH)
 7 | 
 8 | ap_db[ssid] = nil
 9 | 
10 | for k,v in pairs(ap_db) do
11 |     print(k..','..v)
12 | end
13 | 
14 | 
15 | 
16 | signal = -best_ssid(ap_db)
17 | if ssid then
18 |    print("\nBest SSID: ".. ssid)
19 |    wifi.sta.config(ssid,"")
20 |    print("\nConnecting to "..ssid)
21 |    ConnStatus(0)
22 | else
23 |    print("\nFinished all available open APs")
24 |    ssid = ''
25 |    gpio.write(red,gpio.LOW)
26 |    gpio.write(green,gpio.LOW)
27 |    gpio.write(blue,gpio.LOW)
28 |    end
29 | 


--------------------------------------------------------------------------------
/examples/thebutton/thebutton.php:
--------------------------------------------------------------------------------
 1 | <?php
 2 | echo "the button received\n";
 3 | 
 4 | $msg = "\nThe red button was pushed.\n";
 5 | 
 6 | require 'PushBullet.class.php'; //https://github.com/PENDOnl/emails-to-pushbullet/blob/master/classes/pushbullet.class.php
 7 | 
 8 | $p = new PushBullet('yourOauthToken');
 9 | $p->pushNote('yourDeviceToen', 'RED Button', $msg);
10 | 
11 | mail("youremail@gmail.com","RED Button",$msg,"From: golem@yourserver.com\r\n");
12 | ?> 
13 | 


--------------------------------------------------------------------------------
/version 0.87/LLbin.lua:
--------------------------------------------------------------------------------
1 | LLbin = nil
2 | function LLbin(fname) file.open(fname,'w+') uart.on("data", "\r", function(data) a = {} if string.find(data,'EOF') then uart.on("data","\r",function(data) end,1) file.flush() file.close() 
3 | else for x in string.gmatch(data, "[^%s]+") do table.insert(a,x) end if a[3] then addr = a[1] dat = a[2] csum = 0 for byte in dat:gmatch'%x%x' do x = tonumber(byte,16) csum = csum + x end
4 | if tonumber(a[3]) == csum then uart.write(0,'>') else uart.write(0,'!') print(a[3]..' '..csum) end sdat = '' for byte in dat:gmatch'%x%x' do sdat = sdat..string.char(tonumber(byte,16)) end
5 | file.seek("set",addr) file.write(sdat) end end end , 0) end 


--------------------------------------------------------------------------------
/version 0.87/LuaLoader.exe:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/GeoNomad/LuaLoader/e42164e7285a0fdcb3ee124e8a680eaf9518d701/version 0.87/LuaLoader.exe


--------------------------------------------------------------------------------
/version 0.87/ReadMe.txt:
--------------------------------------------------------------------------------
 1 | Lua Loader is a helper application for the Lua implementation on the esp8266 by NodeMCU
 2 | 
 3 | 1. run LuaLoader.exe
 4 | 2. Use the Tools menu to get and install NodeMCU Lua on your ESP
 5 | 3. Set the LuaLoader comm port to COMx 9600 8-N-1
 6 | 4. Test with your chip - you should get the > prompt
 7 | 
 8 | LLbin.lua should be in the same folder as LuaLoader.exe for binary uploads
 9 | xxd.lua   should be in the same folder as LuaLoader.exe for binary downloads
10 | 
11 | Feedback via http://www.benlo.com/comments.html
12 | 
13 | 
14 | 
15 | Examples
16 | 
17 | Some examples of working code is included. Most are from the esp8266.com forum.
18 | 
19 | Beware that as the Lua firmware changed, some of the examples may only work with a particular firmware build.
20 | 
21 | Count interrupts. Typical use of the GPIO port to count pulses of any kind.
22 | 
23 | A web client
24 | 
25 | A One Wire temperature sensor implementation
26 | 
27 | Google time look up from HEAD information
28 | 
29 | Monitoring a GPIO input
30 | 
31 | Scan for I2C devices
32 | 
33 | Servo control by UDP
34 | 
35 | Auto Connect to the strongest open AP visible
36 | 
37 | 
38 | 
39 | LuaLoader is freeware.
40 | 
41 | The MIT License (MIT)
42 | 
43 | Copyright (c) 2015 Peter Jennings benlo.com
44 | 
45 | Permission is hereby granted, free of charge, to any person obtaining a copy
46 | of this software and associated documentation files (the "Software"), to deal
47 | in the Software without restriction, including without limitation the rights
48 | to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
49 | copies of the Software, and to permit persons to whom the Software is
50 | furnished to do so, subject to the following conditions:
51 | 
52 | The above copyright notice and this permission notice shall be included in all
53 | copies or substantial portions of the Software.
54 | 
55 | THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
56 | IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
57 | FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
58 | AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
59 | LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
60 | OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
61 | SOFTWARE.
62 | 
63 | 


--------------------------------------------------------------------------------
/version 0.87/RecentFiles.txt:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/GeoNomad/LuaLoader/e42164e7285a0fdcb3ee124e8a680eaf9518d701/version 0.87/RecentFiles.txt


--------------------------------------------------------------------------------
/version 0.87/xxd.lua:
--------------------------------------------------------------------------------
 1 | function xxd(filename)
 2 |   file.open(filename, "r")
 3 |   buf =  file.read()
 4 |   file.close()
 5 |   print('Downloading '..#buf..' bytes')
 6 |   sum = 0
 7 |   for byte=1, #buf do
 8 |      uart.write(0,string.format('%02X ',buf:byte(byte)))
 9 |      sum = sum + tonumber(buf:byte(byte),10)
10 |      if byte%16 == 0 then print(sum) sum = 0 end
11 |      tmr.wdclr()
12 |   end
13 |   print('\nEOF EOF EOF '..sum)
14 | end
15 | 


--------------------------------------------------------------------------------
/version 0.90/LLbin.lua:
--------------------------------------------------------------------------------
1 | LLbin = nil
2 | function LLbin(fname) file.open(fname,'w+') uart.on("data", "\r", function(data) a = {} if string.find(data,'EOF') then uart.on("data","\r",function(data) end,1) file.flush() file.close() 
3 | else for x in string.gmatch(data, "[^%s]+") do table.insert(a,x) end if a[3] then addr = a[1] dat = a[2] csum = 0 for byte in dat:gmatch'%x%x' do x = tonumber(byte,16) csum = csum + x end
4 | if tonumber(a[3]) == csum then uart.write(0,'>') else uart.write(0,'!') print(a[3]..' '..csum) end sdat = '' for byte in dat:gmatch'%x%x' do sdat = sdat..string.char(tonumber(byte,16)) end
5 | file.seek("set",addr) file.write(sdat) end end end , 0) end 


--------------------------------------------------------------------------------
/version 0.90/LuaLoader.exe:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/GeoNomad/LuaLoader/e42164e7285a0fdcb3ee124e8a680eaf9518d701/version 0.90/LuaLoader.exe


--------------------------------------------------------------------------------
/version 0.90/ReadMe.txt:
--------------------------------------------------------------------------------
 1 | Lua Loader is a helper application for the Lua implementation on the esp8266 by NodeMCU
 2 | 
 3 | 1. run LuaLoader.exe
 4 | 2. Use the Tools menu to get and install NodeMCU Lua on your ESP
 5 | 3. Set the LuaLoader comm port to COMx 9600 8-N-1
 6 | 4. Test with your chip - you should get the > prompt
 7 | 
 8 | LLbin.lua should be in the same folder as LuaLoader.exe for binary uploads
 9 | xxd.lua   should be in the same folder as LuaLoader.exe for binary downloads
10 | 
11 | Feedback via http://www.benlo.com/comments.html
12 | 
13 | 
14 | 
15 | Examples
16 | 
17 | Some examples of working code is included. Most are from the esp8266.com forum.
18 | 
19 | Beware that as the Lua firmware changed, some of the examples may only work with a particular firmware build.
20 | 
21 | Count interrupts. Typical use of the GPIO port to count pulses of any kind.
22 | 
23 | A web client
24 | 
25 | A One Wire temperature sensor implementation
26 | 
27 | Google time look up from HEAD information
28 | 
29 | Monitoring a GPIO input
30 | 
31 | Scan for I2C devices
32 | 
33 | Servo control by UDP
34 | 
35 | Auto Connect to the strongest open AP visible
36 | 
37 | 
38 | 
39 | LuaLoader is freeware.
40 | 
41 | The MIT License (MIT)
42 | 
43 | Copyright (c) 2015 Peter Jennings benlo.com
44 | 
45 | Permission is hereby granted, free of charge, to any person obtaining a copy
46 | of this software and associated documentation files (the "Software"), to deal
47 | in the Software without restriction, including without limitation the rights
48 | to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
49 | copies of the Software, and to permit persons to whom the Software is
50 | furnished to do so, subject to the following conditions:
51 | 
52 | The above copyright notice and this permission notice shall be included in all
53 | copies or substantial portions of the Software.
54 | 
55 | THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
56 | IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
57 | FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
58 | AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
59 | LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
60 | OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
61 | SOFTWARE.
62 | 
63 | 


--------------------------------------------------------------------------------
/version 0.90/RecentFiles.txt:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/GeoNomad/LuaLoader/e42164e7285a0fdcb3ee124e8a680eaf9518d701/version 0.90/RecentFiles.txt


--------------------------------------------------------------------------------
/version 0.90/xxd.lua:
--------------------------------------------------------------------------------
 1 | function xxd(filename)
 2 |   file.open(filename, "r")
 3 |   buf =  file.read()
 4 |   file.close()
 5 |   print('Downloading '..#buf..' bytes')
 6 |   sum = 0
 7 |   for byte=1, #buf do
 8 |      uart.write(0,string.format('%02X ',buf:byte(byte)))
 9 |      sum = sum + tonumber(buf:byte(byte),10)
10 |      if byte%16 == 0 then print(sum) sum = 0 end
11 |      tmr.wdclr()
12 |   end
13 |   print('\nEOF EOF EOF '..sum)
14 | end
15 | 


--------------------------------------------------------------------------------