ardunio仿真實(shí)現(xiàn)網(wǎng)頁控制廣告燈閃爍程序

ID:744206 · 發(fā)表于 2020-5-5 09:50

效果說明：用HTML制作一個簡易網(wǎng)頁，網(wǎng)頁上有兩個按鈕ON,OFF。

建立Arduino和所制作的網(wǎng)頁之間的通訊，但按下ON時，廣告燈閃爍，當(dāng)按下OFF時，廣告燈熄滅。

電路圖：

代碼：

#include<EtherCard.h>
#include<SPI.h>
static byte myip[] = {192,168,43,21};//設(shè)置本機(jī)同網(wǎng)段ip【根據(jù)你自己的IP設(shè)置】
static byte gwip[] = {192, 168, 43, 1};
static byte mymac[] = {0xDD, 0xDD, 0xDD, 0xDD, 0xDD, 0x95};
byte Ethernet::buffer[700];
BufferFiller bfill;
int LED_PIN[] = {2, 3, 4, 5};
int cnt = 0;
boolean flag = false;
char *on = "ON";
char *off = "OFF";
char *statusLabel;
char *buttonLabel;
void light_on()//設(shè)置開燈
{
if (cnt % 2 == 0)
{
for (int i = 0; i < 4; i++)
{
digitalWrite(LED_PIN[ i], HIGH);
delay(100);
}
}
else
{
for (int i = 0; i < 4; i++)
{
digitalWrite(LED_PIN[ i], LOW);
delay(100);
}
}
}
void light_off()//設(shè)置關(guān)燈
{
for (int i = 0; i < 4; i++)
{
digitalWrite(LED_PIN[ i], LOW);
}
}
void setup()
{
Serial.begin(9600);
if (!ether.begin(sizeof Ethernet::buffer, mymac, 10))
Serial.println("Failed to access Ethernet controller");
if (!ether.staticSetup(myip, gwip))
Serial.println("Failed to set IP address");
ether.printIp("LocalIP: ", ether.myip);
ether.printIp("GWIP: ", ether.gwip);
Serial.println();
for (int i = 0; i < 4; i++)
{
pinMode(LED_PIN[ i], OUTPUT);
}
}
void loop()
{
word len = ether.packetReceive();
word pos = ether.packetLoop(len);
if (pos)
{
char *data = (char *)Ethernet::buffer + pos;
if (strstr(data, "GET /?status=ON") != 0)
{
Serial.println("Received ON ");
flag = true;
}
if (strstr(data, "GET /?status=OFF") != 0)
{
Serial.println("Received OFF ");
flag = false;
}
if (flag)
{
statusLabel = on;
buttonLabel = off;
}
else
{
statusLabel = off;
buttonLabel = on;
}
bfill = ether.tcpOffset();
bfill.emit_p(PSTR("HTTP/1.0 200 OK\r\n"
"Content-Type: text/html\r\nPragma: no-cache\r\n\r\n"
"<html><head><title>WebLed</title></head>"
"<body>LED燈 Status: $S "
"<a href=\"/?status=$S\"><input type=\"button\" value=\"$S\"></a>"
"</body></html>"),
statusLabel, buttonLabel, buttonLabel);
ether.httpServerReply(bfill.position());
}
if (flag)
{
light_on();
}
else
{
light_off();
}
cnt += 1;
}

復(fù)制代碼

效果：

網(wǎng)頁控制led.zip (36.41 KB, 下載次數(shù): 15)

ID:85865 · 發(fā)表于 2020-5-5 20:47

這個可用外網(wǎng)來控制嗎

ID:396751 · 發(fā)表于 2020-5-22 11:38

仿真部分是如何實(shí)現(xiàn)的呢？

ID:396751 · 發(fā)表于 2020-5-22 11:39

請問一下仿真部分是如何實(shí)現(xiàn)的呢？

ID:396751 · 發(fā)表于 2020-5-22 11:41

樓主藍(lán)牙智能小車APP的下載鏈接失敗了

帳號		自動登錄	找回密碼
密碼			立即注冊

ardunio仿真實(shí)現(xiàn)網(wǎng)頁控制廣告燈閃爍程序

評分

相關(guān)帖子