Ev pirsgirêk ji bo ku hûn dozek çavkaniya vekirî ya ku xelata xelatê wergirtiye Diwen Foruma Pêşkêşkerê ya pir praktîk bişopînin - şanderê e-nameyê smtp-ya bingeha T5L, endezyar ekrana zîrek a T5L bikar tînin, bi navgîniya modulê WiFi ve ji bo gihîştina servera smtp, ji bo bidestxistina fonksiyona şandina e-nameyê. ji rêveberê re, operasyona ekranê ji bo têketina navnîşana e-nameya wergir, sernavê e-nameyê, naveroka e-nameyê û agahdariya din dikare li ser ekranê were danîn.Hêjayî gotinê ye ku naveroka e-nameyê di heman demê de nivîsa sade, kontrolên veavakirinê, danîna rengê nivîsê û awayên din ên guherandinê piştgirî dike.
1.Program Architecture
Ekrana hişmend a T5L modula WiFi kontrol dike da ku bi porta serial 5-ê bi servera smtp re têkilî daynin da ku fonksiyona şandina e-nameyê bi dest bixe.
2.Pêşveçûna Navberê
Nermalava DGUS pêşkeftina fonksiyonên pêşandan û destikê bi navgîniya serpêhatiya qatan temam dike.Bikarhêner tenê hewce ne ku materyalên wêneya amadekirî di nermalava DGUS-ê de bar bikin û fonksiyonên pêşandan û destikê saz bikin.
1. C51SoftwareDesign
T5L porta serial a smart screen 5 bi modula WiFi re danûstendinê dike da ku pêwendiya bi servera smtp re temam bike.Beşek ji koda sereke wiha ye:
void uart5_init (u32 baud)
{
SCON3T = 0x80;
SCON3R = 0x80;
baud = (u32) ((ducar) (FOSC/8.0)/baud);
BODE3_DIV_H = (baud>>8)&0xff;
BODE3_DIV_L = baud&0xff;
ES3R = 0;
ES3T = 0;
}
void u5_send_byte(u8 byte)
{
SBUF3_TX = byte;
dema (!(SCON3T&0x01));
SCON3T &= 0xfe;
}
void u5_send_bytes(u8 *bytes,u16 len)
{
u16 i;
ji bo(i=0;i
{
SBUF3_TX = bytes;
dema (!(SCON3T&0x01));
SCON3T &= 0xfe;
}
}
betal get_input(u8 * val,u8 len)
{
u8 i;
ji bo(i=0;i
{
eger (val==0xff)
{
val = 0x00;
val[i+1] = 0x00;
vegerr;
}
}
}
u8 esp8266_send_cmd(u8 *cmd,u8 *ack,u16 dema bendê,u8 clearBuffer)
{
u8 res=0;
rx_sta=0;
heke (pejirandin&&dema bendê&&cmd)
{
dema (--dema bendê)
{
sys_delay_ms(10);
eger(rx_sta&0X8000)
{
if(esp8266_check_respond(ack))
rawesta;
}
}
eger(waittime==0)res=1;
eger(clearBuffer==1)rx_sta=0;
}
vegera res;
}
typedef struct{
u8 cmd;
u8 email[20];
u8 name[20];
u8 title[20];
u8 msg[60];
}EMAIL_INFO;
EMAIL_INFO email_info;
u8 bersiv[80];
u8 wifi_name[30];
u8 wifi_passwd[30];
server u8[30];
port u8[30];
u8 navê bikarhêner[30];
u8 auth_code[30];
u8 rx_sta;
sys_read_vp(0x1000,(u8*)&btn_val,1);
eger(btn_val)
{
eger(btn_val==1)
{
sys_read_vp(0x3000,email_info.name,10);
sys_read_vp(0x3020,email_info.email,10);
sys_read_vp(0x3040,email_info.title,10);
sys_read_vp(0x3060,email_info.msg,30);
get_input(email_info.name,20);
get_input(email_info.email,20);
get_input(email_info.title,20);
get_input(email_info.msg,60);
send_packet((u8*)&email_info,sizeof(EMAIL_INFO));
eger (rx_sta)
send_mail(email_info.email,email_info.title,email_info.msg);
}heke din(btn_val==2)
{
sys_read_vp(0x3100,wifi_name,15);
sys_read_vp(0x3120,wifi_passwd,15);
get_input(wifi_name,30);
get_input(wifi_passwd,30);
}heke din(btn_val==3)
{
sys_read_vp(0x3200, server, 15);
sys_read_vp(0x3220,port,15);
sys_read_vp(0x3240,navê bikarhêner,15);
sys_read_vp(0x3260,auth_code,15);
get_input(server,30);
get_input(port,30);
get_input(navê bikarhêner,30);
get_input(auth_code,30);
}
btn_val = 0;
sys_write_vp(0x1000,(u8*)&btn_val,1);
}
sys_read_vp(0x2050,(u8*)&btn_val2,1);
eger(btn_val2!=old_val)
{
eger(btn_val2==1)
sys_write_vp(0x3060,"Ev e-nameyek ji T5L ye!\0\0",30);
din eger(btn_val2==2)
sys_write_vp(0x3060," \0\0",30);
din eger (btn_val2==3)
sys_write_vp(0x3060,"HesabîSor\0\0",30);
old_val = btn_val2;
}
Dema şandinê: Oct-31-2023