#include<reg51.h>
#define uint unsigned int
#define uchar unsigned char
uint z,num1=0,num2=0,H=0,L=0;
sbit D1=P1^0;
sbit D2=P1^1;
sbit D3=P1^2;
sbit D4=P1^3;
sbit D5=P1^4;
sbit MC=P2^5;
sbit FX=P2^4;
uchar code Ht[]={0XFF,0XFF,0XFF,0XFF,0XFF,0XFF,0XFF,0XFF,0XFF,0XFF,0XFF,0XFF,0XFF,
0XFF,0XFF,0XFF,0XFF,0XFF,0XFF,0XFF,0XFF,0XFF,0XFF,0XFF,0XFF,0XFF,0XFF,0XFF,0XFF,0XFF,0XFF};
uchar code Lt[]={0X44,0X48,0X4C,0X50,0X54,0X58,0X5C,0X60,0X64,0X68,0X6C,0X70,0X74,
0X78,0X7C,0X80,0X84,0X88,0X9C,0XA0,0XA4,0XA8,0XAC,0XB0,0XB4,0XB8,0XBC,0XC0,0XC4,0XC8,0XCC};
void delay(z)
{
uint m,n;
for(m=z;m>0;m--)
for(n=110;n>0;n--);
}
void init()
{
TMOD=0x11;
//TH0=Ht[H];
//TL0=Lt[L];
TH0=(65536-125)/256;
TL0=(65536-125)%256;
TH1=(65536-125)/256;
TL1=(65536-125)%256;
EA=1;
ET0=1;
ET1=1;
MC=0;
FX=0;
}
void keyscan()
{
P1=0Xff;
if(D1==0)
{
delay(500);
if(D1==0)
TR0=1;
}
/*if(D4==0)
{
delay(5);
if(D4==0)
{
H++;
L++;
if(H>=19)
{
H=3;
L=3;
}
delay(5);
}
}
if(D3==0)
{
delay(5);
if(D3==0)
{
H--;
L--;
if(H<=0)
{
H=0;
L=0;
}
delay(5);
}
}*/
else
TR0=0;
P1=0Xff;
if(D2==0||D3==0)
{
delay(500);
if(D2==0||D3==0)
{
if(D2==0)
{
TR1=1;
FX=0;
}
if(D3==0)
{
TR1=1;
FX=1;
}
}
}
else
TR1=0;
}
void timer0() interrupt 1
{
MC=~MC;
//TH0=Ht[H];
//TL0=Lt[L];
TH0=(65536-125)/256;
TL0=(65536-125)%256;
num1++;
if(num1==100)
{
num1=0;
num2++;
}
if(num2==200)
{
delay(1);
FX=~FX;
}
if(num2==600)
{
delay(1);
FX=~FX;
}
if(num2==800)
{
num2=0;
}
}
void timer1() interrupt 3
{
MC=~MC;
TH1=(65536-125)/256;
TL1=(65536-125)%256;
}
main()
{
init();
while(1)
{
keyscan();
}
}
FWT.rar_fwt
版权申诉
60 浏览量
2022-09-21
08:18:57
上传
评论
收藏 682B RAR 举报
局外狗
- 粉丝: 64
- 资源: 1万+
最新资源
- 上市公司-股票性质数据-工具变量(民企、国企、央企)2003-2022年.dta
- 上市公司-股票性质数据-工具变量(民企、国企、央企)2003-2022年.xlsx
- Reeds+Shepp曲线算法讲解和实现.pdf
- 毕业设计基于SpringBoot+MyBatisPlus+MySQL+Vue的外卖配送信息系统源代码+数据库
- 词向量(Word Embeddings)是自然语言处理(NLP)领域的一种重要技术.txt
- Surfer,线性函数
- MyBatis 的动态 SQL 是其核心特性之一.txt
- 时代的sdddsddsddsd
- 基于哈希链表的简单人员信息管理系统
- 其他类别JdonFramework开源框架 v5.1 Build20071025-jdonframework-5.1.rar
资源上传下载、课程学习等过程中有任何疑问或建议,欢迎提出宝贵意见哦~我们会及时处理!
点击此处反馈