《【精品】广东工业大学单片机课程设计(何教授)》由会员分享，可在线阅读，更多相关《【精品】广东工业大学单片机课程设计(何教授)（12页珍藏版）》请在金锄头文库上搜索。
1、课程设计课程名称题目名称 单片机原理课程设计学生学院自动化学院专业班级学 号学生姓名指导教师何X敏、李X芳2010年09 月10日(1)把两条输入线同一端口的一根输入线接到kO接口。当kO=l,显示78FA;当k0=0,显示12BE:程序如下：ORG 0000HHJMPMAINORG I000HDB 0EEH,8EH,0FEH,0E0HDB 9EH,3EH,0DAH,60HMAIN:MOV 52H,#00HMOV 53H,#00HMOV51H,#OOHMOV 5()H,#()()HMOV R5,#53HKEYSUB :MOV A,#03HMOV DPTR,#7F00HMOVX DPTR,ABE
2、GIN:MOV DPTR,#()7F()3HMOV A,DPTRMOV R3,#0FEHJB ACCDISPLAY】JMP D1SPLAY2DISPLAY 1:MOV R2,#(X)HJMP AlDISPLAY2:MOV R2,#04HAl: MOVA,R3MOV DPTR,#7F01HMOVX DPTR,AMOV DPTR,#1000HMOV A,R2MOVC A,A+DPTRMOV DPTR,#7F02HMOVX DPTR,ACALL DLIMSINC R2MOV A,R3RLAMOV R3,AJNB ACC.4,BEGINJMPA1DLIMS:MOV R7,#05HDLO:MOV R6,
3、#0FFHDL1:DJNZ R6,DL1DJNZ R7,DL0RETEND(2)编程实现键盘ORG 0000HHJMPMAINORG I000H54790EBA并能左移显示：程序如下:MAIN:MOV 52H,#()()HMOV 53H,#00HMOV51H,#OOHMOV 50H,#00HMOV R5,#53HKEYSUB :MOVA,#()3HMOV DPTR,#7F00HMOVX DPTR,ABEG1N:ACALLDISACALLCLEARACALL CCSCANJNZ INK 1AJMP BEGIN INKkACALL DISACALL DLIMSACALL DLIMSACALLCLE
4、ARACALL CCSCANJNZ INK2AJMP BEGININK2:MOV R2,#0FEHMOV R4,#00HCOLUM:MOV DPTR,#7F01HMOV A,R2MOVX DPTR,AINC DPTRINC DPTRMOVX A,DPTRJB ACC.3JLONEMOV A,#00HAJMPKCODELONE:JB.ACC.2,NEXTMOV A,#04HKCODE:ADD A,R4ACALLPUTBUFPUSH ACCKON: ACALL DISACALLCLEARACALL CCSCANJNZ KONPOP ACCNEXT: INC R4MOVA,R2JNB ACC.4,K
5、EERRLAMOV R2,AAJMP COLUMKERR:AJMP BEGINCCSCANiMOV DPTR,#7F01HMOV A,#()()HMOV DPTR,AINC DPTRINC DPTRMOVX A ,DPTRCPLAANLA,#0CHRETCLEAR: MOV DPTR,#7F02HMOV A,#00HMOVX DPTR,ARETDIS:PUSH ACCPUSH OOHPUSH 03HMOV R(),#()5HMOV R3,#0F7HMOV A,R3AGAIN:MOV DPTR,#7F01HMOVX DPTR,AMOV A,R()MOV DPTR,#DDEGMOVC A,A+DP
6、TRMOV DPTR,#7F02HMOVX DPTR,AACALL DLIMSINC ROMOV A,R3JNB ACC.OQUTRRAMOV R3,AAJMP AGAINOUT:POP 03HPOPOOHPOP ACCRETDDEG:DB 0EE,3EH,9EH,7AHDB 0E6H,0E0H,66H,0B6HDLIMS:MOV R7,#01HDL():MOV R6,#0FFHDL1:DJNZ R6,DL1DJNZ R7,DL0RETPUTBUF:PUSH OOHMOV R7,AMOVA,51HMOV 50H,AMOV A,52HMOV51H,AMOVA,53HMOV 52H,AMOV A,
7、R7MOV R3,APOPOOHRETEND(3)程序实现单片机售票机，以下要求：a) 当k()=l时，键入地址、价钱、SET,设置某个地址的票价，该机至少可连续设置三个不 同地址的价钱：上海864元、北京756元、广州819元。b) 当k0=0时，键入一个地址，购买的张数，按SET得到总价，再键入另一个地址、购买 的张数，按SET即得总价，可计得至少三个地址的合总价。程序如下：#include# include#define uchar unsigned char#dcfinc peon XBYTE0X7F00#define pa XBYTE0X7F01#define pb XBYTEL0X
8、7F02J#define pc XBYTE0X7F03#dcfinc lcdO DBYTE0x50#define ledl DBYTE0x51#define led2 DBYTELOx52J#define led3 DBYTE0x53#define keynum DBYTE0x54uchar bdata da; sbit pc2=daA2;sbit pc3=daA3;sbit kO=daA 1;sbit p26=P2A6;uchar code tableH二0XFC,0X60,0XBA,0XF2,0X66,0XB6,0XBE,0XE0,0XFE,0XE6;uchar code Ctrl 4=0
9、XFE,0XFD,0XFB ,0XF7;void Init()p26二1；pa=0x00;pcon=()x03;Void Delay(int sec)int i,j;for(i=();isec;i+)fog 二 O;jvlO;j+);void DisplayO pa=ctrlOJ; pb=ledO;Delay(lO)；pa=ctrll; pb=ledl;Delay(lO)；pa=ctrl2; pb=led2;Delay(lO)；pa=ctrl31; pb=lcd3;Delay(lO)；void main()int temp;int status=O;int sadd=O;int count3=
10、 0,0,0；int price3 0,0,0；int numbuff4=0,0,0,0;unsigned int totalprice=0;led()=table();lcdl=tablcO;led2=table0;led3=table0;while(l)/Ipa=0x00;da=pc;if(pc2=0|pc3=0)/2Delay(30);/键盘扫描/pa=ctrl0;da=pc;if(pc2=0)keynum= 7;else if(pc3=0)keynum= 8;else/3 pa=ctrlLl J; da=pc; if(pc2=0)keynum= 6;else if(pc3=0)kcyn
11、um= 1;else/4pa=ctrl ；da=pc;if(pc2=0)kcynum二 5;else if(pc3=0)keynum= 2;else/5pa=ctrl3;da=pc; if(pc2=0)keynum= 4;else if(pc3=0)keynum二 3;/5/4/3/ 以上键盘扫描/while(l)paHOXOpdaupc;if(pc3HH0=pc2H0) led()blelnumbufffolk led 1 Htablemumbum 二 k -ed2HEb 一 2numbuf=2 三 led3gb_e=umbuff!3八 Display。；云c-sc brcar三三三三三曙厅湎三三三三三三daHPpifslr上)33三三三三右cow%三三三三三 if(SEUSHHO)一一4i f(key n u mv3 &=3&sadd=5)/7pricesadd-3=numbuff0* 1 OOO+numbuff 1*100+numbuff2 * 10+numbuff3J;sadd=O;numbuff3=numbuff21=numbufff 1 =numbuffO=O； status=O;/7break;/6/5/4/以上 price/3else if(kO=O)/3/address/if(status=O)
