MaurizioRoma
Member
Hi everybody, I'm trying to connect two Arduinos devices (1 NodeMCU ESP 12E + 1 ESPDuino) making use of a dedicated WiFi Network.
I programmed the Espduino in "AccessPoint mode" to act as a "server" listening on Port "12345", by the following code:
And I made use of this additional code on the NodeMCU to let it connect to server listening port :
As you may see, my goal, in order to test it, is to send data received from the serial of Espduino to the NodeMCU in order to light on the built LED.
Unfortunately it doesn't work!!
I noticed that :
If I try to connect to the Espduino (AP) via a mobile phone, I received the correct replies from it
(putting the 192.168.4.1:12345 address in html browser, I receive the correct reply "ciao"), but the NodeMCU (client) is not capable to connect to it and to send any request; the code stops at line :
Sock1.ConnectIP(ServerIP,serverPort)
If, on the contrary, I make use of a external router (i.e. the hotspot of my mobile phone) and both boards (Espduino and NodeMCU) connect to it in STA mode, everything works fine.
Could anyone kindly help me to solve this issue?
Thanks in advance!
Maurizio
I programmed the Espduino in "AccessPoint mode" to act as a "server" listening on Port "12345", by the following code:
B4X:
Sub Process_Globals
'These global variables will be declared once when the application starts.
'Public variables can be accessed from all modules.
Public Serial1 As Serial
Private Wifi As ESP8266WiFi
Private Server As WiFiServerSocket
Private SerStream As AsyncStreams
Private NetStream As AsyncStreams
Private WifiEx As ESP8266extras
'Private Timer1 As Timer
End Sub
Private Sub AppStart
Serial1.Initialize(115200)
Log("AppStart")
WifiEx.ConfigAP("192.168.4.1","0.0.0.0","255.255.255.0")
Log("StartAP :",Wifi.StartAccessPoint2("ESPWifi","Password"))
Log("My AP ip:",Wifi.AccessPointIp)
SerStream.Initialize(Serial1.Stream,"SerStream_NewData","SerStream_Error")
Server.Initialize(12345,"Server_NewConnection")
Server.Listen
End Sub
Sub Server_NewConnection (NewSocket As WiFiSocket)
If NewSocket.Connected=True Then Log("Client Connected")
NetStream.Initialize(NewSocket.Stream,"NetStream_NewData","NetStream_Error")
NetStream.Write("HTTP/1.1 200").Write(CRLF)
NetStream.Write("Content-Type: text/html").Write(CRLF).Write(CRLF)
NetStream.Write("ciao")
End Sub
Sub SerStream_NewData (Buffer() As Byte)
Log(Buffer)
NetStream.Write(Buffer)
End Sub
Sub SerStream_Error
Log("Error receiving data from Serial")
End Sub
Sub NetStream_NewData (Buffer() As Byte)
Log(Buffer)
End Sub
Sub NetStream_Error
Log("Error receiving data from NetStream")
Server.Listen
End SubAnd I made use of this additional code on the NodeMCU to let it connect to server listening port :
B4X:
Sub Process_Globals
'These global variables will be declared once when the application starts.
'Public variables can be accessed from all modules.
Public Serial1 As Serial
Private WiFi As ESP8266WiFi
Private WifiEx As ESP8266extras
Private Sock1 As WiFiSocket
Private Stream As AsyncStreams
Private ServerIP() As Byte = Array As Byte(192,168,4,1)
Private ThisIP() As Byte = Array As Byte(192,168,4,9)
Private SubNet() As Byte = Array As Byte(255,255,255,0)
Private Gateway() As Byte = Array As Byte(0,0,0,0)
Private DNS1() As Byte = Array As Byte(0,0,0,0)
Private DNS2() As Byte = Array As Byte(0,0,0,0)
Private const serverPort As UInt = 12345
Private PinLed16 As Pin
End Sub
Private Sub AppStart
Serial1.Initialize(115200)
Log("AppStart")
WifiEx.ConfigNetwork(ThisIP,ServerIP,SubNet,ServerIP,ServerIP)
WiFi.Connect2("ESPWifi","Password")
If WiFi.IsConnected=True Then
Log ("Connected to WiFi with IP:", WiFi.LocalIp," SSID: ",WifiEx.SSID)
End If
PinLed16.Initialize(16,PinLed16.MODE_OUTPUT)
If(Sock1.ConnectIP(ServerIP,serverPort)) Then
Stream.Initialize(Sock1.Stream,"Stream_NewData","Stream_Error")
End If
End Sub
Sub Stream_NewData (Buffer() As Byte)
Dim bc As ByteConverter
Dim cmd As String = bc.StringFromBytes(Buffer)
Log(cmd)
If cmd="ON" Then
PinLed16.DigitalWrite(False)
Else
PinLed16.DigitalWrite(True)
End If
End Sub
Sub Stream_Error
Log("Errore ricezione pacchetto")
End SubAs you may see, my goal, in order to test it, is to send data received from the serial of Espduino to the NodeMCU in order to light on the built LED.
Unfortunately it doesn't work!!
I noticed that :
If I try to connect to the Espduino (AP) via a mobile phone, I received the correct replies from it
(putting the 192.168.4.1:12345 address in html browser, I receive the correct reply "ciao"), but the NodeMCU (client) is not capable to connect to it and to send any request; the code stops at line :
Sock1.ConnectIP(ServerIP,serverPort)
If, on the contrary, I make use of a external router (i.e. the hotspot of my mobile phone) and both boards (Espduino and NodeMCU) connect to it in STA mode, everything works fine.
Could anyone kindly help me to solve this issue?
Thanks in advance!
Maurizio
