ls1.c

hs1601液晶驱动

#include <absacc.h>
#include <reg51.h>
#include <intrins.h>
#define uchar unsigned char
#define nops() _nop_();_nop_();_nop_();_nop_();_nop_();
sbit rs=P2^5;
sbit rw=P2^6;
sbit e=P2^7;
sbit P0_7=P0^7;
sbit P2_3=P2^3;
sbit P2_0=P2^0;	/*选择*/
sbit P2_1=P2^1;	/*增加*/
sbit P2_2=P2^2;	/*减少*/

sbit P1_0=P1^0;	/*A*/
sbit P1_1=P1^1;	/*B*/
sbit P1_2=P1^2;	/*C*/
sbit P1_3=P1^3;	/*D*/
sbit P1_5=P1^5;	/*E*/
sbit P1_4=P1^4;	/*+_-*/

sbit P1_7=P1^7;	/*power*/
uchar  disp1,l_v;

int temp1,temp2,temp3,temp4;
int bb;
int power,chang,sj,l_e,s_t;	/*power-1开 0-关 chang-1时间 2-级数 3-正负*/
uchar a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12,a13,a14,a15,a16;
/*******************************/
time_1() {
int i;
for (i=0;i<4200;i++);
}
/******************************/
sp() {
int i;
for (i=0;i<8200;i++) {
P2_3=0;
}
P2_3=1;
}

/****************************/
endable() {
rs=0;
rw=1;
P0=0xff;
e=1;
while (P0_7==1);
e=0;

rs=0;
rw=0;
P0=disp1;
e=1;
nops();
e=0;
}
/***************************/
write1() {
rs=0;
rw=1;
P0=0xff;
e=1;
while (P0_7==1);
e=0;

rs=1;
rw=0;
P0=disp1;
e=1;
nops();
e=0;
}
/**************************/
/***********************************显示*/
chang1 (aa) {
uchar p;
switch (aa) {
case 0:   p='0'; break;/*0*/
case 1:   p='1'; break;/*1*/
case 2:   p='2'; break;/*2*/
case 3:   p='3'; break;/*3*/
case 4:   p='4'; break;/*4*/
case 5:   p='5'; break;/*5*/
case 6:   p='6'; break;/*6*/
case 7:   p='7'; break;/*7*/
case 8:   p='8'; break;/*8*/
case 9:   p='9'; break;/*9*/
}
return (p);
}

/*************************/
disp() {
int d2,d3;
uchar d5,d6;


d2=sj/10;
d3=sj%10;
d5=chang1(d2);
d6=chang1(d3);
if (chang==3) {
disp1=0xC0;
endable();
disp1=':';
write1();
disp1=l_v;
write1();
disp1=' ';
write1();
disp1=' ';
write1();
disp1='T';
write1();
disp1=':';
write1();
disp1=d5;
write1();
disp1=d6;
write1();
}
else {
disp1=0xC0;
endable();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=' ';
write1();
disp1='T';
write1();
disp1=':';
write1();
disp1=d5;
write1();
disp1=d6;
write1();
} 

}


/*************************/
djs() {
if (temp3>=60) {
temp3=0;
if (sj>0) {
sj=sj-1;
disp();
}
}

if (sj==0) {
power=0;
P1_7=0;
P1_0=0;	
P1_1=0;
P1_2=0;
P1_3=0;
P1_5=0;
l_e=1;
temp1=temp2=temp3=0;
}

}
/******************************/
s_j() {
disp1=0x80;
endable();
disp1='T';
write1();
disp1='I';
write1();
disp1='M';
write1();
disp1='E';
write1();
disp1=':';
write1();

if (s_t==0) {
sj=0;
P1_7=0;
P1_0=0;	
P1_1=0;
P1_2=0;
P1_3=0;
P1_5=0;
l_e=1;
power=0;
disp1='0';write1();
disp1='0';write1();
}
if (s_t==1) {
sj=5;
power=1;
disp1='0';write1();
disp1='5';write1();
}
if (s_t==2) {
sj=10;
power=1;
disp1='1';write1();
disp1='0';write1();
}
if (s_t==3) {
sj=15;
power=1;
disp1='1';write1();
disp1='5';write1();
}
if (s_t==4) {
sj=20;
power=1;
disp1='2';write1();
disp1='0';write1();
}
if (s_t==5) {
sj=25;
power=1;
disp1='2';write1();
disp1='5';write1();
}
if (s_t==6) {
sj=30;
power=1;
disp1='3';write1();
disp1='0';write1();
}
disp1=' ';
write1();
}
/***************************/
j_s() {
disp1=0x80;
endable();
disp1='L';
write1();
disp1='E';
write1();
disp1='V';
write1();
disp1='E';
write1();
disp1='L';
write1();
disp1=':';
write1();


if (l_e==1) {
P1_0=0;	
P1_1=0;
P1_2=0;
P1_3=0;
P1_5=0;
disp1='1';write1();
}
if (l_e==2) {
P1_0=1;	
P1_1=0;
P1_2=0;
P1_3=1;
P1_5=1;
disp1='2';write1();
}
if (l_e==3) {
P1_0=1;	
P1_1=0;
P1_2=1;
P1_3=1;
P1_5=1;
disp1='3';write1();
}
if (l_e==4) {
P1_0=1;	
P1_1=1;
P1_2=1;
P1_3=0;
P1_5=0;
disp1='4';write1();
}
if (l_e==5) {
P1_0=1;	
P1_1=1;
P1_2=0;
P1_3=1;
P1_5=1;
disp1='5';write1();
}
if (l_e==6) {
P1_0=1;	
P1_1=1;
P1_2=1;
P1_3=0;
P1_5=1;
disp1='6';write1();
}
if (l_e==7) {
P1_0=1;	
P1_1=1;
P1_2=1;
P1_3=1;
P1_5=0;
disp1='7';write1();
}

disp1=' ';
write1();
}
/****************************/
j_x() {
disp1=0x80;
endable();
disp1='G';
write1();
disp1='A';
write1();
disp1='L';
write1();
disp1='V';
write1();
disp1='A';
write1();
disp1='N';
write1();
disp1='I';
write1();
disp1='C';
write1();
disp();
}
/***************************/
bb1() {
if (temp4>=50) {
temp4=0;
if (chang==0) {
if (bb<33) {
bb=bb+1;
}
else {
bb=0;
}

switch (bb) {
case 0: a1=' ';a2=' ';a3=' ';a4=' ';a5=' ';a6=' ';a7=' ';a8=' '; 
        a9=' ';a10=' ';a11=' ';a12=' ';a13=' ';a14=' ';a15=' ';a16='B'; break;
case 1: a1=' ';a2=' ';a3=' ';a4=' ';a5=' ';a6=' ';a7=' ';a8=' '; 
        a9=' ';a10=' ';a11=' ';a12=' ';a13=' ';a14=' ';a15='B';a16='a'; break;
case 2: a1=' ';a2=' ';a3=' ';a4=' ';a5=' ';a6=' ';a7=' ';a8=' '; 
        a9=' ';a10=' ';a11=' ';a12=' ';a13=' ';a14='B';a15='a';a16='b'; break;
case 3: a1=' ';a2=' ';a3=' ';a4=' ';a5=' ';a6=' ';a7=' ';a8=' '; 
        a9=' ';a10=' ';a11=' ';a12=' ';a13='B';a14='a';a15='b';a16='e'; break;
case 4: a1=' ';a2=' ';a3=' ';a4=' ';a5=' ';a6=' ';a7=' ';a8=' '; 
        a9=' ';a10=' ';a11=' ';a12='B';a13='a';a14='b';a15='e';a16='f'; break;
case 5: a1=' ';a2=' ';a3=' ';a4=' ';a5=' ';a6=' ';a7=' ';a8=' '; 
        a9=' ';a10=' ';a11='B';a12='a';a13='b';a14='e';a15='f';a16='a'; break;
case 6: a1=' ';a2=' ';a3=' ';a4=' ';a5=' ';a6=' ';a7=' ';a8=' '; 
        a9=' ';a10='B';a11='a';a12='b';a13='e';a14='f';a15='a';a16='c'; break;
case 7: a1=' ';a2=' ';a3=' ';a4=' ';a5=' ';a6=' ';a7=' ';a8=' '; 
        a9='B';a10='a';a11='b';a12='e';a13='f';a14='a';a15='c';a16='e'; break;
case 8: a1=' ';a2=' ';a3=' ';a4=' ';a5=' ';a6=' ';a7=' ';a8='B'; 
        a9='a';a10='b';a11='e';a12='f';a13='a';a14='c';a15='e';a16=' '; break;
case 9: a1=' ';a2=' ';a3=' ';a4=' ';a5=' ';a6=' ';a7='B';a8='a'; 
        a9='b';a10='e';a11='f';a12='a';a13='c';a14='e';a15=' ';a16=' '; break;
case 10: a1=' ';a2=' ';a3=' ';a4=' ';a5=' ';a6='B';a7='a';a8='b'; 
        a9='e';a10='f';a11='a';a12='c';a13='e';a14=' ';a15=' ';a16=' '; break;
case 11: a1=' ';a2=' ';a3=' ';a4=' ';a5='B';a6='a';a7='b';a8='e'; 
        a9='f';a10='a';a11='c';a12='e';a13=' ';a14=' ';a15=' ';a16=' '; break;
case 12: a1=' ';a2=' ';a3=' ';a4='B';a5='a';a6='b';a7='e';a8='f'; 
        a9='a';a10='c';a11='e';a12=' ';a13=' ';a14=' ';a15=' ';a16=' '; break;
case 13: a1=' ';a2=' ';a3='B';a4='a';a5='b';a6='e';a7='f';a8='a'; 
        a9='c';a10='e';a11=' ';a12=' ';a13=' ';a14=' ';a15=' ';a16=' '; break;
case 14: a1=' ';a2='B';a3='a';a4='b';a5='e';a6='f';a7='a';a8='c'; 
        a9='e';a10=' ';a11=' ';a12=' ';a13=' ';a14=' ';a15=' ';a16=' '; break;
case 15: a1='B';a2='a';a3='b';a4='e';a5='f';a6='a';a7='c';a8='e'; 
        a9=' ';a10=' ';a11=' ';a12=' ';a13=' ';a14=' ';a15=' ';a16=' '; break;
case 16: a1='B';a2='a';a3='b';a4='e';a5='f';a6='a';a7='c';a8='e'; 
        a9=' ';a10=' ';a11=' ';a12=' ';a13=' ';a14=' ';a15=' ';a16=' '; break;


case 17: a1=' ';a2=' ';a3=' ';a4=' ';a5=' ';a6=' ';a7=' ';a8=' '; 
        a9=' ';a10=' ';a11=' ';a12=' ';a13=' ';a14=' ';a15=' ';a16='G'; break;
case 18: a1=' ';a2=' ';a3=' ';a4=' ';a5=' ';a6=' ';a7=' ';a8=' '; 
        a9=' ';a10=' ';a11=' ';a12=' ';a13=' ';a14=' ';a15='G';a16='a'; break;
case 19: a1=' ';a2=' ';a3=' ';a4=' ';a5=' ';a6=' ';a7=' ';a8=' '; 
        a9=' ';a10=' ';a11=' ';a12=' ';a13=' ';a14='G';a15='a';a16='l'; break;
case 20: a1=' ';a2=' ';a3=' ';a4=' ';a5=' ';a6=' ';a7=' ';a8=' '; 
        a9=' ';a10=' ';a11=' ';a12=' ';a13='G';a14='a';a15='l';a16='v'; break;
case 21: a1=' ';a2=' ';a3=' ';a4=' ';a5=' ';a6=' ';a7=' ';a8=' '; 
        a9=' ';a10=' ';a11=' ';a12='G';a13='a';a14='l';a15='v';a16='a'; break;
case 22: a1=' ';a2=' ';a3=' ';a4=' ';a5=' ';a6=' ';a7=' ';a8=' '; 
        a9=' ';a10=' ';a11='G';a12='a';a13='l';a14='v';a15='a';a16='n'; break;
case 23: a1=' ';a2=' ';a3=' ';a4=' ';a5=' ';a6=' ';a7=' ';a8=' '; 
        a9=' ';a10='G';a11='a';a12='l';a13='v';a14='a';a15='n';a16='i'; break;
case 24: a1=' ';a2=' ';a3=' ';a4=' ';a5=' ';a6=' ';a7=' ';a8=' '; 
        a9='G';a10='a';a11='l';a12='v';a13='a';a14='n';a15='i';a16='c'; break;
case 25: a1=' ';a2=' ';a3=' ';a4=' ';a5=' ';a6=' ';a7=' ';a8='G'; 
        a9='a';a10='l';a11='v';a12='a';a13='n';a14='i';a15='c';a16=' '; break;
case 26: a1=' ';a2=' ';a3=' ';a4=' ';a5=' ';a6=' ';a7='G';a8='a'; 
        a9='l';a10='v';a11='a';a12='n';a13='i';a14='c';a15=' ';a16='i'; break;
case 27: a1=' ';a2=' ';a3=' ';a4=' ';a5=' ';a6='G';a7='a';a8='l'; 
        a9='v';a10='a';a11='n';a12='i';a13='c';a14=' ';a15='i';a16='n'; break;
case 28: a1=' ';a2=' ';a3=' ';a4=' ';a5='G';a6='a';a7='l';a8='v'; 
        a9='a';a10='n';a11='i';a12='c';a13=' ';a14='i';a15='n';a16='&'; break;
case 29: a1=' ';a2=' ';a3=' ';a4='G';a5='a';a6='l';a7='v';a8='a'; 
        a9='n';a10='i';a11='c';a12=' ';a13='i';a14='n';a15='&';a16='o'; break;
case 30: a1=' ';a2=' ';a3='G';a4='a';a5='l';a6='v';a7='a';a8='n'; 
        a9='i';a10='c';a11=' ';a12='i';a13='n';a14='&';a15='o';a16='u'; break;
case 31: a1=' ';a2='G';a3='a';a4='l';a5='v';a6='a';a7='n';a8='i'; 
        a9='c';a10=' ';a11='i';a12='n';a13='&';a14='o';a15='u';a16='t'; break;
case 32: a1='G';a2='a';a3='l';a4='v';a5='a';a6='n';a7='i';a8='c'; 
        a9=' ';a10='i';a11='n';a12='&';a13='o';a14='u';a15='t';a16=' '; break;
case 33: a1='G';a2='a';a3='l';a4='v';a5='a';a6='n';a7='i';a8='c'; 
        a9=' ';a10='i';a11='n';a12='&';a13='o';a14='u';a15='t';a16=' '; break;

}
disp1=0x80;
endable();
disp1=a1;
write1();
disp1=a2;
write1();
disp1=a3;
write1();
disp1=a4;
write1();
disp1=a5;
write1();
disp1=a6;
write1();
disp1=a7;
write1();
disp1=a8;
write1();
disp1=0xC0;
endable();
disp1=a9;
write1();
disp1=a10;
write1();
disp1=a11;
write1();
disp1=a12;
write1();
disp1=a13;
write1();
disp1=a14;
write1();
disp1=a15;
write1();
disp1=a16;
write1();

}
}
}
/**************************555*/
kb() {
/**/
if (P2_0==0) {
time_1();
if (P2_0==0) {
sp();
if (chang==0) {
chang=1;
s_j();
}
else {
if (chang==1) {
chang=2;
j_s();
}
else {
if (chang==2) {
chang=3;
j_x();
}
else {
chang=0;
bb=0;
disp1=0x80;
endable();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=0xC0;
endable();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=' ';
write1();
}
}
}

disp();
do{djs();}
while (P2_0==0);
}
}
/**/

/**/
if (chang!=0) {
if (P2_1==0) {
time_1();
if (P2_1==0) {
sp();
if (chang==1) {
if (s_t<6) {
s_t=s_t+1;
s_j();
}
}

if (chang==2) {
if (l_e<7) {
l_e=l_e+1;
j_s();
}
}

if (chang==3) {
l_v='+';
P1_4=1;
j_x();
}
disp();
do{djs();}
while (P2_1==0);
}
}
/**/

/**/
if (P2_2==0) {
time_1();
if (P2_2==0) {
sp();
if (chang==1) {
if (s_t > 0) {
s_t=s_t-1;
s_j();
}
}

if (chang==2) {
if (l_e > 1) {
l_e=l_e-1;
j_s();
}
}

if (chang==3) {
l_v='-';
P1_4=0;
j_x();
}
disp();
do{djs();}
while (P2_2==0);
}
}
/**/
}


}

/**************************************************/
run() {

if (l_e==1) {
P1_0=0;	
P1_1=0;
P1_2=0;
P1_3=0;
P1_5=0;
}

if (l_e==2) {
P1_0=1;	
P1_1=0;
P1_2=0;
P1_3=1;
P1_5=1;
}
if (l_e==3) {
P1_0=1;	
P1_1=0;
P1_2=1;
P1_3=1;
P1_5=1;
}
if (l_e==4) {
P1_0=1;	
P1_1=1;
P1_2=1;
P1_3=0;
P1_5=0;
}
if (l_e==5) {
P1_0=1;	
P1_1=1;
P1_2=0;
P1_3=1;
P1_5=1;
}
if (l_e==6) {
P1_0=1;	
P1_1=1;
P1_2=1;
P1_3=0;
P1_5=1;
}
if (l_e==7) {
P1_0=1;	
P1_1=1;
P1_2=1;
P1_3=1;
P1_5=0;
}
}
/********************************
void timer0(void) interrupt 1 using 1 {	/*定时中断 0*

TMOD=0x11;	/*定时10ms*
TH0=0xfc;	/*400us*
TL0=0x18;
ET0=1;	
TR0=1;
EA=1;
if (power==1) {
temp1=temp1+1;

/**
if (l_e==1) {	/**6666**
if (temp1<=98) {
P1_0=1;
}
else {
if (temp1>=100) {
temp1=0;
P1_0=1;
}
else {
P1_0=0;
}
}
}
else {
if (l_e==2) {
if (temp1<=97) {
P1_0=1;
}
else {
if (temp1>=100) {
temp1=0;
P1_0=1;
}
else {
P1_0=0;
}
}
}
else {
if (l_e==3) {
if (temp1<=96) {
P1_0=1;
}
else {
if (temp1>=100) {
temp1=0;
P1_0=1;
}
else {
P1_0=0;
}
}
}
else {
if (l_e==4) {
if (temp1<=95) {
P1_0=1;
}
else {
if (temp1>=100) {
temp1=0;
P1_0=1;
}
else {
P1_0=0;
}
}
}
else {
if (l_e==5) {
if (temp1<=94) {
P1_0=1;
}
else {
if (temp1>=100) {
temp1=0;
P1_0=1;
}
else {
P1_0=0;
}
}
}
else {
if (l_e==6) {
if (temp1<=93) {
P1_0=1;
}
else {
if (temp1>=100) {
temp1=0;
P1_0=1;
}
else {
P1_0=0;
}
}
}
else {
if (l_e==7) {
if (temp1<=90) {
P1_0=1;
}
else {
if (temp1>=100) {
temp1=0;
P1_0=1;
}
else {
P1_0=0;
}
}
}

}
}
}
}
}
}


/**
}

}

/******************************/
void timer1(void) interrupt 3 using 3 {	/*定时中断 1*/
TMOD=0x11;	/*定时1ms*/
TH1=0xd8;	/*定时器1 /*定时10ms*/
TL1=0xf0;
ET1=1;	
TR1=1;
temp2=temp2+1;
temp4=temp4+1;


/**/
if (temp2>=100) {	/*1s*/
temp2=0;
temp3=temp3+1;
}
/**/

/**/

/**/

}
/***************************/
main() {
TMOD=0x11;	
TH1=0xd8;	/*定时器1 /*定时1ms*/
TL1=0xf0;
ET1=1;	
TR1=1;
/*TH0=0xfc;
TL0=0x18;
ET0=1;	
TR0=1;*/
EA=1;

bb=0;
P1_7=0;
P1_4=1;
temp1=temp2=temp3=temp4=0;
chang=0;power=0;
sj=15;l_v='+';s_t=3;l_e=1;
P1_0=0;	
P1_1=0;
P1_2=0;
P1_3=0;
P1_5=0;

disp1=0x30;
endable();
disp1=0x30;
endable();
disp1=0x38;
endable();
disp1=0x38;
endable();
disp1=0x0c;
endable();
disp1=0x0c;
endable();
disp1=0x06;
endable();
disp1=0x06;
endable();
disp1=0x01;
endable();
disp1=0x01;
endable();

disp1=0x80;
endable();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=0xC0;
endable();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=' ';
write1();
disp1=' ';
write1();

sp();
while (1) {
kb();
djs();
bb1();
run();
if (sj==0) {
power=0;
P1_7=0;
P1_0=0;	
P1_1=0;
P1_2=0;
P1_3=0;
P1_5=0;
l_e=1;
}
/*else {
if (l_e==0) {
power=0;
P1_0=1;
}*/
else {
power=1;

}

}
}