单片机流水灯c语言实现.pdf

《单片机流水灯c语言实现.pdf》由会员分享，可在线阅读，更多相关《单片机流水灯c语言实现.pdf（96页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、实验一 闪烁的LedC1rHk-220pC2T F220p.X1CRYSTAL 18R110kC3D1U119220RV1 LED-RED29 30后9 XTAL1P0.0/AD0P0.1/AD1P0.2/AD2XTAL2P0.3/AD3P0.4/AD4P0.5/AD5P0.6/AD6RSTP0.7/AD7P2.0/A8P2.1/A9P2.2/A10PSENP2.3/A11ALEP2.4/A12EAP2.5/A13P2.6/A14P2.7/A15P1.0P3.0/RXDP1.1P3.1/TXDP1.2P3.2/INT0P1.3P3.3/INT1P1.4P3.4/T0P1.5P3.5/T1P1.

2、6P3.6/WRP1.7P3.7/RDAT89C51 3938：37 36 3534:33 32 21 22 23 2425263 2728107TJ2I374HE77名称：闪烁的Led说明：Led按设定的时间间隔闪烁，约亮1 秒灭1 秒/#include#define uchar unsigned char/uchar 宏定义ttdefine uint unsigned intuint 宏定义sbit led=PlA0;/延时子程序/void delayMs(uint x)(uchar i;/uchar i 取值为 0-255while(x-)for(i=0;i120;i+);延时 120

3、微妙/主程序/-void main()(while(l)(led=led;delayMs(2050);约亮 1 秒灭 1 秒实验二 从左到右的流水灯C1T的IC2TI22OPBTWU1XTAL1XTAL2RSTP3.aRXOP31,JXDP3.2.1RT6P3.3/1NY7P34ToP3.5T1P3.&WRP3.7TOALEEAPO.O/ADOPO.VAD1PO2/AD2PO3AD3P0.4/AD4P05/A05PO.6.AD6PO.7/AD7H匐老罟曾系名称：从左到右的流水灯说明：接 在 P0端口的8 只 Led从左到右循环依次点亮，产生走马灯效果/-#include#include 循环左

4、移头文件宏定义#define uchar unsigned char#define uint unsigned int/延时函数void delayMs(uint x)(uchar i;while(x-)for(i=0;il20;i+);/-主程序void main()PO=Oxfe;PO 口初始化值 1111.1110while(l)PO=_c rol_(PO,l);/PO 口循环左移 1 位delayMs(15O);晶振为 11.0592 时，0.1594885 秒移动一次)实验三左右来回循环的流水灯U1XTAL1XTAL2RSTPO.QADOP0.1/AD1PO2AD2PO3AD3PO.

5、4ACMPO.&AD5P0.6/AD6P0.7/AD7P2.a,A8P2.t/A9P22A10P2.WA11P 2 4 A l 2P2.5A13P26A14P2.7.A15P3.0/RXDP3.1/TXDP3.2.1NTOP33,W HP3 4,-T0P3&-T1P3.6WRP3.7TO名称：左右来回循环的流水灯说明：程序利用循环移位函数一c rol_和 一c ror形成来回滚动的效果/#inc lude#inc lude#define uc har unsigned c har#define uint unsigned int/void delayMs(uint x)(uc har i;wh

6、ile(x-)for(i=0;i120;i+);)/-void main()uchar i;P2=OxOl;P2端口初始化while(l)死循环(for(i=0;i7;i+)/i自加1,当 i=7时执行第二个for语句(P2=_crol_(P2,l);P2 端口循环左移 1 位delayMs(150);)for(i=0;i7;i+)(P2=_cror_(P2,l);/P2 端口循环右移 1 位delayMs(150);)注释 for(i=0;iXTAL1XTAL2RSTPSENALEAPO.aADOP0.1/AD1P0.2/AD2P03AD3P0.4/AD4P0.5*AD5P0.6.AD6P0

7、.7/AO7P2QA8P21-A9P2.2/A10P2.3/A11P2.4AI2P2S/A13P2 6rAi 4P2.7/A15P3.0.RXDP3.1/TXDP3.2/WTOP33557TP3.4/TOP3.5T1P3.6WRP3.7/RD名称：花样流水灯说明：16只 LED分两段组按预设的多种花样变换显示/-#include#d efine uchar unsigned char#d efine uint unsigned intuc har c ode pattern_PO=Oxfc,Oxf7,Ox5f;/5 POuc har c ode pattern_P2=0 xff,0 x07,0

8、 xf5;定义 P2 显示数组调整数组。里的内容，可以实现自定义的花样显示/-void delayMs(uint x)(uc har i;while(x-)for(i=0;i120;i+);)/-void main()(uc har i;while(l)|for(i=0;i7;i+)(PO=pattern_POi;/i自加1次，PO数组重新扫描1次P2=pattern_P2i;/i自加1次，P2数组重新扫描1次delayMs(150);)数组定义格式为/uc har c ode pattern_P0=0 xfc,0 xf7;uhar为数组类型，pattern_PO数组名称/c ode数组存储类

9、型0 xfc,0 xf7为数组显示参数，为Oxff为全部关闭实 验 五Led模拟交通灯/Led模拟交通灯说明：东西向绿灯亮若干秒，黄灯闪烁，闪烁5 秒后亮红灯，红灯亮后，南北向有红灯变为绿灯，若干秒后南北向黄灯闪烁,闪烁5 次后，亮红灯，东西向绿灯亮，如此重复/-#include#define uchar unsigned char#define uint unsigned intsbit red_a=POAO;sbit yellow_a=POAl;sbit green_a=P0A2;sbit red_b=P0A3;sbit yellow_b=P0A4;sbit green_b=P0A5;/s

10、bit 为 LED 控制位定义uchar Flash_Count=0,Operation_Type=l;/Flash_Count闪烁次数和Operation_Type操作类型变量定义/void delayMs(uint x)(uchar i;while(x-)(for(i=0;i120;i+)；)/交通灯切换子程序void Traffic_Light()(switch(Operation_Type)(case 1：东西向绿灯亮与南北向红灯亮red_a=l;yellow_a=l;green_a=0;red_b=0;yellow_b=l;green_b=l;delayMs(2000);Operat

11、ion_Type=2;break;case 2:东西向黄灯开始闪烁，绿灯关闭delayMs(300);yellow_a=!yellow_a;green_a=l;黄灯闪烁5 次if(+Flash_Count!=10)return;Flash_Count=0;Operation_Type=3;break;case 3:东西向红灯与南北向绿灯亮red_a=0;yellow_a=l;green_a=l;red_b=l;yellow_b=l;green_b=0;delayMs(2000);Operation_Type=4;break;中断 case3 执行 case4case 4:南北向黄灯开始闪烁de

12、layMs(300);yellow_b=!yellow_b;green_b=l;if(+Flash_Count!=10)return;Flash_Count=0;Operation_Type=l;)/void main()(while(l)Traffic_Light();)/switch是多分支选择语句常用格式“switch(表达式)/case常量表达式1;语 句 1/case常量表达式2;语句2/case常量表达式3;语句3/case常量表达式n;语句n“default:语句 n+1“return是返回值，break的返回是指停止这次执行，返回开始实验六单只数码管循环显示0-9C1HF220

13、p19O X1C2 r-CRYSTA%220p R19 U1 XTAL1XTAl_210k-C3刊卜-10uRSTPSENALEEA12345678P1.0P1.1P1.2P1.3P1.4P1.5P1.6P1.7P0.0/AD0P0.1/AD1P0.2/AD2P0.3/AD3P0.4/AD4P0.5/AD5P0.6/AD6P0.7/AD7P2.0/A8P2.1/A9P2.2/A10P2.3/A11P2.4/A12P2.5/A13P2.6/A14P2.7/A15P3.0/RXDP3.1/TXDpa.a/ihrroP3.3/INTTP3.4/T0P3.5/T1P 3 6亚P3.7/RD3837-3

14、63534332-1-2-3-4-5-6-7-8-OT-2-3-4-5-6-7-为 2互髭互必匿-五黑五RP1RESPACK-8WAT89C51单只数码管循环显示0-9说明：主程序中的循环语句反复将0-9 的段码送至P0端口/使数字0-9 循环显示/#include#define uchar unsigned char#define uint unsigned intuchar code DSY_CODE=0 xc0,0 xf9,0 xa4,0 xb0,0 x99,0 x92,0 x82,0 xf8,0 x80,0 x90,Oxff;。内为共阳数码管0-9的编码/void DelayMs(ui

15、nt x)(uchar i;while(x-)for(i=0;i120;i+);)/void main()uchar i=0;PO=OxOO;while(l)(PO=DSY_CODEi;显示数组取反i=(i+l)%10;/DelayMs(180);说明；电路中数码管接法是共阴，段码表是共阳的；所以用PO=YDS_CODEi语句取反显示实 验 七8只数码管滚动显示单个不同数字XTAL1XTAL2RSTPO.OiADOPO.1/AD1PO2AD2P03/AD3P0.4/AD4PO.5AD5PO.6，AD6PO.7/AD7P2.O/ABP2.1/A9P22A1OP23A11P 2 4 A l 2P

16、2 s A i 3P 2 6 A l4P2.7/A15P3.0/RXDP 3.trrxpP、一 L，P3.3/INT7P3.4.1DP 3 5rHP3.aWRP3.7TOAT89C51用三极管驱动显示不正常，最好去掉三级管驱动/咫只数码管滚动显示单个不同数字说明：数码管从左到右依次滚动显示0-9,程序通过每次仅循环选通一只数码管/#include#include#define uchar unsigned char#define uint unsigned intuchar code DSY_CODE=0 xc0,0 xf9,0 xa4,0 xb0,0 x99,0 x92,0 x82,0 xf

17、8,0 x80,0 x90,;数组定义/void DelayMs(uint x)uchar i;while(x-)(for(i=0;i200;i+);/-void main()(uchar i,k;k=0 x80;/K 初始化 1000.0000while(l)(for(i=0;i10;i+)(PO=Oxff;关闭显示PO=DSY_CODEi;发送数字段码k=_crol_(k,l)；P2=k；所以第 1 位右移P2=k;发送数码管位码，打开对应的数码管DelayMs(300);/i=10是因为数组里有1-9共十个段码k=0 x80;因为移位P2八 8 开始，移动一位才开始显示第一位实验八8只数

18、码管显示多个不同字符C2XTAL1XTAL2RSTr mo X1 CRYSPO.O/ADOP0.VAD1P02AD2P0.3AD3P0.4/AD4P0.5/AD5P0.&AD6PO.7/AD738 P0190123451/AA1A1A1A1A1A12.Z1&4s,67,PP2,P2P2,P2,P2.P2.36 P03PSENP1QPl iP12P13P1.4PtSPI 6Pl 7P3GRXDP3.VTXDP 3 2标P3.3.iRTlP 3 4F)P3.5THP3.6匹P3 7,WOI R只数码管显示多个不同字符说明：数码管动态显示0-7,(刷新快)/-#include#include#def

19、ine uchar unsigned char#define uint unsigned intuchar code DSY_CODE=0 xc0,0 xf9,0 xa4/0 xb0,0 x99,0 x92,0 x82,0 xf8,0 x80,0 x90,0 xff;数码管段码数组定义/延时程序void DelayMs(uint x)(uchar i;while(x-)for(i=0;i120;i+);)/主程序/void main()uchar k,m=0 x80;赋初值while(l)for(k=0;k8;k+)(m=_crol_(m,l);位右移P2=m;位码PO=DSY_CODEk+l

20、;段码DelayMs(10);延时短本例刷新速度快！视觉显示多个字符如果延时间加长，就是固定位置显示单个字符实验九数码管闪烁显示字符串5ABCDEFG DP 12345678P2Q/A8P2.1/A9P2.2/A10P23XA11P2.4/A12P 25仇 13P2.&AJ4P2.7/A15R3.GRXDP3.1.TXDP32,WT0P3.3WF7P3.4/TDP3.5T1P3.6WRP3 7,D2御R1-F10kr C310u0.V23向7popopopopopopopoWAD1AD2AD3黑湛PSENALEEA数码管闪烁显示字符串说明：数码管闪烁显示由0-7 构成的一串数字/本例用动态刷新

21、发法显示一串字符，在停止时所有数字显示消失（区别定义两个数组）#include#define uchar unsigned char#define uint unsigned int数字0-9 的数码管段码表uchar code DSY CODE=0 xc 0,0 xf9/0 xa4/0 xb0,0 x99,0 x92/0 x82,0 xf8,0 x80,0 x90;数码管位选通索引表(位码表)uc har c ode DSY_IDX=0 x01,0 x02,0 x04,0 x08,/0 x10,0 x20,0 x40,0 x80;/延时程序/void DelayMs(uint x)(uc h

22、ar i;while(x-)for(i=0;i120;i+);/主程序Hvoid main()(uc har k,m;赋初值PO=Oxff;/PO 初始化P2=0 x00;/P2 初始化while(l)for(k=0;k30;k+)(for(m=0;m8;m+)(P2=DSYDXm;显示位码PO=DSY_CODEm;显示段码De!ayMs(20);)P2=0 x00;位关闭DelayMs(lOOO);)第一-个for(k=0;k30;k+)数码管保持显示时间延时第二个for(m=0;m8;m+)位码和段码显示位限制实验十 8只数码管滚动显示数字串E89C1T卜220PC2Sxi CRYSTAL

23、2 2 即 R11-C3AT89C51PSENALEPO.O,ADOPO1/AD1P02AD2PO.3AD0P0.&AD4P0.&AD6P0.6/AD6P0.7-AD7P2QA8P2 VA9P2.2-A10P2.3/A11P2.4/A12P2.&A13P2.6/AI4P2.7/A15P3.0/RXDP3.1.TXDP3-2.NTOP3 3/WTTP3.4/TOP3.5EP3.6WRP3.7W,39 叩.0PO 23 02.Z 03 25 3 26 05-9 p 3：M P0上)3：；，P0 7 37 叩 NQ6Q7:sz s蚩z iz iXTAL1XTAL212345B7883933883 8

24、 只数码管滚动显示数字串说明：数码管向左滚动显示3 个字符构成的字符串#include#include#define uchar unsigned char#define uint unsigned intuchar code DSY_CODE=0 xc0,0 xf9,0 xa4,0 xb0,0 x99,0 x92,0 x82,0 xf8,0 x80,0 x90,Oxff;程序将下面数组看成环形队列显示从某个数开始的8 个 数(10表示黑屏)uchar Num=10,10,10,10,10,10,10,10,2,8,9;/void DelayMs(uint x)(uchar i;while(x

25、-)for(i=0;i120;i+);)/void main()uchar i,j,k,m;PO=Oxff;P2=0 x00;m=0 x80;while(l)for(i=0;i10;i+)显示保持for(j=0;j8;j+)m=_crol_(m,l)；P2=m;采用环形取法从第K 开始取J 个PO=DSY_CODENum(k+j)%ll;DelayMs(2);)环形队列首指针K 递增,Num的下表范围为/A)-1 0 因此对 11求余k=(k+l)%ll;)在用软件仿真是最好不要加三极管驱动！因程序运行占用CPU资源，运行不正常实验1K1-K4控 制 LEd移位C1220p _|_ LU1口

26、X1C2 CRYSTAL 18H F-XTAL1XTAL22丝 R1_10k2931RSTPO.O/ADOP0.1/AD1P02AD2P0.3/ADGP0.4.AD4P0.5/AD5P0.6/AD6P0.7.AD7 39%3736343332DID2D3,DT远D6D7PSENALEEAP2QA8P2.1；A9P2.2/A10P2.3，A11P2.4/A12P 2 H A i3P26A14P2.7/A15D9 j 22 DIO 23 D”临 D12:；士冬 D14 Z7 D15讶 D16R上机L下移.46 7P1.0P i 1P1.2P13P1.4P1.5P16P1.7P3 O/RXDP3.V

27、TXDP3.2/WTOP3.3.WTTP3.4/T0P 3.5 FP3.&WRP3.7而D3 D 3D6 D6D5 D507 D7D1 D1D 4 D4D2 D2D1.吗.220RD1D11D1D1D9士 C3H产AT89C51名称：K1-K4控 制 LEd移位说明：按下k l 时，P0端口 LED向上移动一位说明：按下k2时，P0端口 LED向下移动一位说明：按下k3时，P2端口 LED向上移动一位说明：按下k4时，P2端口 LED向下移动一位/#inc lude#inc ludettdefine uc har unsigned c har#define uint unsigned intH

28、void DelayMs(uint x)(uc har i;while(x-)(for(i=：0;iXTAL1XTAI_2RSTVP1.0P1.1PSENALEEAC1小220p口C2d220P R 1U1下时LED灭k1.k2mK3.K4P1.5P1.6P1.7-C3AT89C51PO.O/ADOPO.1/AD1P0.2/AD2P0.3/AD3P0.4/AD4P0.5/AD5P0.6/AD6P0.7/AD7P2.0/A8P2.1/A9P2.2/A10P2.3/A11P2.4/A12P2.5/A13P2.6/A14P2.7/A15P3.0/RXDP3.1/TXDps.g/iKnoPS.aiNT

29、TP3.4/T0P3.5/T1P3.aWRP3.7/RD393837136D1R2D3D4220R220RR5名称：K1-K4按键状态显示说明：按下k l、k2时，led点亮，松开时熄灭说明：k3、k4按下并释放时点亮，再次按下时熄灭/-#include#include#define uchar unsigned char#define uint unsigned intsbit K1=P1A4;sbit K2=P1A5;sbit K3=P1A6;sbit K4=P1A7;sbit D1=POAO;sbit D2=P0Al;sbit D3=P0A2;sbit D4=P0A3;/void Del

30、ayMs(uint x)(uchar i;while(x-)for(i=0;iXTAL1XTAL2RSTPSENALEEAP1P1P1P1P1P1P1P1PO.O/ADOP0.1/AD1P0.2/AD2P0.3/AD3P0.4/AD4P0.5/AD5P0.6/AD6P0.7/AD7P2.0/A8P2.1/A9P2.2/A10P2.3/A11P2.4/A12P2.5/A13P2.6/A14P2.7/A15P3.0/RXDP3.1/TXDP3.2/1NT0P3.3/irTfTP3.4/T0P3.5/T1P3.&WRP3.7/RD/K 1-K 4分组控制LED说明：每次按下k l时，递增点亮一只LE

31、D全亮时再次按下则再次循环开始按下k2点亮上面4只LED按下k3点亮下面4只LED按下K4后关闭所有LED#inc lude#define uc har unsigned c har#define uint unsigned int/void DelayMs(uint x)(uc har i;while(x-)(for(i=0;i120;i+);)/void main()(uc har k,t,key_state;PO=Oxff;Pl=Oxff;while(l)t=pl;if(t!=Oxff)(DelayMs(lO);if(t!=Pl)c ontinue;再次检查按键值key_state=t4

32、;/t 取反右移 4 位赋给 key_statek=0;while(key_state!=O)循环检查1所在的位置，累加获取按键号K(k+;/k 自加 1key_state=l;当键号右移等于1时，跳出while语句)switc h(k)根据按键号K进行4种处理c ase 1:if(PO=OxOO)PO=Oxff;PO=1;递增点亮P0 口的LEDDelayMs(200);break;c ase 2:PO=OxfO;break;点亮低四位c ase 3:PO=OxOf;break;点亮高四位c ase 4:PO=Oxff;关闭 pO 口)实验十四 K1-K4控制数码管移位显示ABCDeFG D

33、PRN1RX83曰I123456788 5 S S S 8 8 5XTAL1XTAL2RSTPSENALEEAC1Hb-pn220P I|_C2H Fv-112吗 J;U1C3AT89C51POQADOPO.VAD1P0.2/AD2PO.yAD3P0.47AD4PO.AD5P0.6，AD6P0.7/AD7P2aA8P2.1/A9P2-2/A10P2.3.A11P2.4/A12P2.5/A13P26/A14P27.A15P3.0/RXDP3.VTXDP32耐P3.3iNf7P34T0P3.511P3.&WRP3.7.RD 23错需条_建/K1-K4控制数码管移位显示说明：按下k l 时加1 计数

34、并增加显示位说明：按下k2时减1 计数并减少显示位说明：按下k3时清零/include#define uchar unsigned charftdefine uint unsigned int3-9 的段码，Oxff为黑屏uchar code DSY_CODE=0 xc0/0 xf9,0 xa4,0 xb0,0 x99,0 x92,0 x82,0 xf8,0 x80,0 x90,Oxff;位码uchar code DSY_lndex=0 x80,0 x40,0 x20,0 x10,0 x08,0 x04,0 x02,0 x01;待显示到各数码管的数字缓冲(开始时仅在0 位显示0,其他数码管黑屏

35、)uchar Display_Buffer=0,10,10,10,10,10,10,10);/void DelayMs(uint x)(uchar i;while(x-)for(i=0;i120;i+);)/显示子程序void Show_Count_ON_DSY()(uchar i;for(i=0;i8)key_Cou nts=8;Display_Bufferkey_Counts-l=key_Counts;break;case OxFD:if(key_Counts0)减 1 计数，减少显示位Display_Buffer key_Counts=10;if(key_Counts=0)Display

36、_Buffer0=0;break;case OxFB:Display_Buffer=0;关闭显示,按键清零for(i=0;i8;i+)Display_Bufferi=10;key_Counts=0;)while(Pl!=Oxff)如果按键未释放则仅执行刷新显示，不进行按键扫描Show_Count_ON_DSY();显示段码和位码)实验十五K1-K4控制数码管加减演示 2a8Q7*_错京i s名称：K1-K4控制数码管加减演示说明：k l按下加1 计数/K2按下后减1 计数/K3按下后清零#include#include#define uchar unsigned char#define uin

37、t unsigned intuchar code DSY_CODE=0 xc0,0 xf9z0 xa4,0 xb0,0 x99,0 x92,0 x82z0 xf8,0 x80,0 x90,Oxff;/Q-9 的段码uchar Num_Buffer=0,0,0;待显示的 3 位数uchar key_code,key_Counts=0;按键代码，按键计数最大值255/void DelayMs(uint x)(uchar i;while(x-)for(i=0;i120;i+)；/-显示子程序void Show_Counts_ON_DSY()uchar i=0 x01;uchar j=0 x80;显示

38、位置初始化Num_Buffer0=key_Counts/100;分离显示百位Num_Bufferl=key_Counts/10%10;分 离显示十位Num_Buffer2=key_Counts%10;分离显示个位for(i=0;i3;i+)(j=_crol_(j,l)；P2寸显示位置J=0 x80,从第一位显示，j=0 x01从第二位开始显示PO=DSY_CODENum_Bufferi;显示数组DelayMs(l);)/void main()(uchar i;PO=Oxff;Pl=Oxff;P2=0 x00;key_code=Oxff;while(l)Show_Counts_ON_DSY();

39、Pl=Oxff;key_code=Pl;if(key_code!=Oxff)for(i=0;i30;i+)Show_Counts_ON_DSY();有键按下数码管刷新 30 次，延时switch(key_code)(case Oxfe:if(key_Counts0)key_Counts-;break;按键减 1 计数case Oxfb:key_Counts=0;清零)key_code=Oxff;否则按键代码为0总结；显示位置,j=0 x80,从第一位显示，/j=0 x01从第二位显示实验十六 4X4键盘矩阵控制条形LED显示C1T 卜220p19U1C2220p R1=-|-1-10kX1CR

40、YSTAL_18.XTAL1XTAL2C329 31p亘亘亘亘亘亘p0 11 22 33 44 55 66 77 8Q/2.34567P1P1P1P1P1P1P1P1RSTPO.O.ADOPO.1.AD1P0.2/AD2P0.3/AD3P0.4/AD4P0.5/AD5P0.6/AD6P0.7/AD7P2.0/A8P2.1/A9P 22A 10P2J7A11P2.4/A12P2.5/A13P2.&A14P2.7/A15P3.0/RXOP3.1/IXDP3.2,iNTOP3.3/iNTTP 3 41ToP3.5/HP3.6WRP3.7/RD222324252627381012131416 17LJ

41、 AaI._-M_1:_;/4/4M键盘矩阵控制条形LED显示说明：运行本例时，按下的按键值越大，点亮的LED就越多，按 下 K1 一只LED亮，按下K16全亮/include#include#define uchar unsigned char#define uint unsigned int3-9,af 数码管段码表，最后一个是黑屏uchar code DSY_CODE=0 xc0/0 xf9/0 xa4/0 xb0,0 x99/0 x92,0 x82,0 xf8,0 x80,0 x90,0 x88,0 x83,0 xc6,0 xal,0 x86,0 x8e,0 x00;矩阵键盘按键特征扫

42、描码uchar code keycodetable=0 x11,0 x12,0 x14,0 x18,0 x21,0 x22,0 x24,0 x28,0 x41,0 x42,0 x44,0 x48,0 x81,0 x82,0 x84,0 x88;/void DelayMs(uint x)(uchar i;while(x-)for(i=0;i120;i+);)/键盘矩阵扫描uchar keys_scan()(uchar scode,kcode,i,k;Pl=0 xf0;低4 位置0,放入4 行DelayMs(l);/if(Pl&OxfO)!=OxfO)高4 位取与之后为4 个 1,如果高4 位列出

43、现0,则有键按下(scode=0 xfe;行扫描码赋初值for(k=0;k4;k+)对4 行分别进行扫描(Pl=scode;if(P1&Oxf0)!=Oxf0)如果低四位不为0(kcode=Pl;/Pl 取反后赋给 kcode,for(i=0;i16;i+)查表得到按键序号并返回if(kcode=keycodetablei)return i;)else scode=_crol_(scode,l);扫描码循环右移)return-1;)/void main()(uchar keyNo=-l;按键序号-1表示无按键uchar i,P2_LED,P3_LED;while(l)(keyNo=keys_s

44、can();if(keyNo!=-l)判断有无按键按下P2_LED=0 xff;P3_LED=0 xff;for(i=0;i=keyNo;i+)(if(i8)键值大于8P3_LED=1;/P3 按位右移elseP2_LED=1;/P2 按位右移)P3=P3_LED;P2=P2_LED;点亮条形 LED)本例键盘矩阵行线连接P0.0-P0.3,列线连接P0.4-P0.71 程序首先判断是否有键按下，在行线上放置4 个 0,即 P0=0 xf0;如果有键按下，列线上必有一位为0,2 如果有键按下，则判断案件所在行、列位置，并返回按键序号代码中扫描初值scode初值为Oxfe,通该值循环右移，对 4

45、 行逐行发送0,每次扫描后即判断高4 位的4 个 1 中是否有0 出现，如果有0 出现按键在该行上这时将发送的低4 位和读取的高4 位取反，也就是P1 口取反P1 口出现两个1,分别处在高4 位和低4 位，共 16种可能，根据取反的的值查询键盘矩阵按键特征码衣，即可得到按键序号实验十七 数码管显示4 X 4键盘矩阵键序号RP1RESPACK-8C1注220pC219XTAL1XTAL29 RST10kPSENALEEA29 3031 口 SvSTAL_18U1r220P R1P0.0/AD0PO.1/AD1P0.2/AD2P0.3/AD3P0.4/AD4PO.5/AD5P0.6/AD6P0.7

46、/AD7士C310uP1。1P1.1 2二P1.2 3：P1.3 4 P1.4 5。P1.5 67P1.6P1.0P1.1P1.2P1.3P1.4P1.5P1.6P1.7P2.0/A8P2.1/A9P2.2/A10P2.3/A11P2.4/A12P2.5/A13P2.6/A14P2.7/A15P3.0/RXDP3.1/TXDP3.2/INT0P3.3/INTTP3.4/T0P3.5/T1P3.6/WRP3.7/RDLS1n/GE RAT89C51寸工KOmEK49Q：K8K12p-O O ,P1.0K1K5K9K13,P1.1K2K6K10K14,P1.2K3K7K11K15P1.3v/-名称

47、；数码管显示4x4键盘矩阵键序号/说明：按下任意一键时，数码管会显示它在键盘矩阵上的0-F,扫描程序首先判断按键发生在那一列，然后根据所发生的行附加不同的值从而得到键盘按键号/#include#define uchar unsigned char#define uint unsigned intuchar code DSY_CODE=0 xc0z0 xf9,0 x34,0 x60,0 x99,0 x92,0 x82,0 xf8,0 x80,0 x90,0 x88,0 x83,0 xc6,0 xal,0 x86,0 x8e,0 x00;sbit BEEP=P3A7;上次按键和当前按键序号，该矩阵

48、中的序号范围为0-15,16表示无按键uchar pre_keyN0=16,keyNo=16;/延时void DelayMs(uint ms)(uchar t;while(ms-)for(t=0;t120;t-);/键盘矩阵扫描void keys_Scan()uchar Tmp;Pl=OxOf;高4 位 置 1,放入4 行DelayMs(l);Tmp=PlA0 x0f;/Pl 与 OXOF 异或switch(Tmp)判断按键发生在那一列(case l:keyNo=0;break;case 2:keyNo=l;break;case 4:keyNo=2;break;case 8:keyNo=3;b

49、reak;default:keyNo=16;无键按下)Pl=OxfO;低4 位置0,放入4 列DelayMs(l);Tmp=Pl4A0 x0f;/Pl逐位右移并且与OXOF异或switch(Tmp)对0-3行分别附加起始值0,4,8,12.(case 1:key No+=O;break;第一列行号 0=3 力 口 0(显示 0.1.2.3)case 2:keyNo+=4;break;第二歹行号 0-3 力 口 4(显示 4.5.6.7)case 4:keyNo+=8;break;第三列行号 0-3 力 口 8(显示 8.8.10.11)case8:keyNo+=12;break;第四歹U行号

50、0-3 力 口 12(显示 12.13.14.15)/void Beep()蜂鸣器程序(uchar i;for(i=0;i120;i-)(DelayMs(20);BEEP=BEEP;BEEP=1;/主程序/void main()(PO=OxOO;while(l)Pl=OxfO;if(Pl!=OxfO)keys_Sc an();扫描键盘获取按键序号if(pre_keyNo!=keyNo)如果上次和本次序号不一致(PO=DSY_CODEkeyNo;显示本次键号Beep();蜂鸣器响pre_keyNo=keyNo;本次键号保存)DelayMs(lOO);)实验十八 开关控制LDEU1 XTAL1XT