【正文】 片機(jī)控制. 北京：北京航空航天大學(xué)出版社，2002．電子電路設(shè)計(jì)與實(shí)踐．濟(jì)南：山東科學(xué)技術(shù)出版社，2005．::航空工業(yè)出版社,1998附錄一：原理圖附錄二：程序清單主程序: ML EQU 32H 。ML存放分的個位數(shù)MH EQU 33H 。MH存放分的十位數(shù)HL EQU 34H 。HL存放小時的個位數(shù)HH EQU 35H 。HH存放小時的十位數(shù)L0 EQU 36H 。L0～L3：顯示數(shù)據(jù)存儲器L1 EQU 37HL2 EQU 38HL3 EQU 39HDSPLYP EQU 3AH 。顯示數(shù)據(jù)指針PLYTS EQU 3BH 。顯示次數(shù)計(jì)數(shù)器 LPLMOD BIT 39H 。低兩位顯示方式 HPLMOD BIT 3AH 。高兩位顯示方式BRIGHT BIT 3BH 。DISPLAY子程序參數(shù)TCOUNT EQU 3CH 。時間計(jì)數(shù)器ADDRES EQU 3DH 。加l子程序參數(shù)MAX EQU 3EH 。加l子程序參數(shù)IFDEC BIT 20H 。BCD加法子程序參數(shù)RMOD EQU 3FH LED4 BIT 30H 。發(fā)光管狀態(tài)位BELL BIT WITCH BIT FKEY BIT 。功能鍵(S1) MKEY BIT 。修改鍵(S2) WORKIN BIT 38H 。工作狀態(tài)指示位MAIN: MOV IE,00H 。關(guān)中斷MOV SP,57H 。設(shè)置堆棧指針MOV PSW,00H 。選用寄存器組0MOV TMOD,11H 。設(shè)定中斷工作方式為T0和T1MOV A,56HCJNE A,0AAH,CSTART 。判斷上電復(fù)位標(biāo)志，無標(biāo)志轉(zhuǎn)冷啟動MOV A,57HCJNE A,55H,CSTART 。無標(biāo)志轉(zhuǎn)冷啟動AJMP HSTART 。有上電復(fù)位標(biāo)志轉(zhuǎn)熱啟動NOPNOPCSTART: MOV P1,0FFH 。冷啟動，全面初始化MOV P3,0FFHMOV TCON,00H 。計(jì)時停止MOV TL0,0B0H 。賦中斷T0初值MOV TH0,3CHMOV TCOUNT,0AH 。賦定時器初值MOV R5,00H 。R5為一空單元(備用)MOV R4,00H 。R4為工作模式選擇寄存器MOV ML,00H MOV MH,00H 。分MOV HL,00H MOV HH,00H 。時MOV PLYTS,64H 。賦顯示次數(shù)初值為100次MOV DSPLYP,L0 。顯示指針指向顯存單元MOV L0,0AH 。送顯示數(shù)據(jù)“一”MOV L1, 0AHMOV L2,0AHMOV L3,04HSETB LED4 。數(shù)碼管之間的發(fā)光二極管SETB LPLMOD 。設(shè)定顯示方式為閃爍SETB HPLMOD SETB BRIGHT 。允許顯示CLR WORKIN 。清工作標(biāo)志，待命AJMP SETUP 。轉(zhuǎn)開始工作NOPNOPHSTART: MOV SCON,00H 。有上電標(biāo)志,熱啟動,清串行口控制MOV IP,00H 。清中斷優(yōu)先控制寄存器SETB FKEY 。重設(shè)按鍵SETB MKEYSETB EA 。開中斷AJMP BEGIN 。轉(zhuǎn)向繼續(xù)工作NOPNOPSETUP: ETB EA 。開中斷MAINl: ACALL DISPLAY 。調(diào)用顯示JB FKEY,JUDGE 。按鍵掃描ACALL DELAY1 。延時消抖動JB FKEY,JUDGE 。無鍵按下判斷是否到點(diǎn)CLR ET0 。功能鍵被按下CLR TR0 。暫停計(jì)日寸ACALL MTAB 。調(diào)用菜單設(shè)置程序BEGIN: SETB WORKIN 。置工作標(biāo)志位，開始工作SETB ET0 。開中斷SETB TR0 。開始計(jì)時MOV A,R4 。移入工作模式選擇RL A MOV DPTR,7F01H JMP @A+DPTR 。根據(jù)模式轉(zhuǎn)到相應(yīng)程序段MTAB: AJMP WORKlAJMP WORK2AJMP WORK3AJMP WORK4NOPNOPWORKl: WORK2: CLR WITCH 。工作方式1和2：開繼電器AJMP MAIN2NOPNOP WORK3: WORK4: SETB WITCH 。工作方式3和4：不開繼電器MAIN2: CLR BELL 。ACALL DL05SSETB BELLJUDGE: JNB WORKIN,MAINl 。判斷是否在定時之中JNZ MAINlMOV A,ML 。判斷分是否為零JNZ MAINlMOV A,HH 。判斷時是否為零JNZ MAINl 。若時、分、秒全為零CLR ET0 。停止計(jì)時CLR TR0 ACALL KEYI 。調(diào)用到點(diǎn)工作子程序AJMP MAIN 。返回NOPNOP ORG 0100HROUNT1: MOV A,N 。步進(jìn)電機(jī)步數(shù)→AJNB 00H,LOOP2 。反向，轉(zhuǎn) LOOP2LOOP1: MOV P2,03H 。正向，A組線圈工作 ACALL DELAY 。延時 DEC A 。A＝0，轉(zhuǎn)DONEJZ DONEMOV P2,06H 。B組線圈工作 ACALL DELAY 。延時DEC A 。A＝0，轉(zhuǎn)DONEJZ DONEMOV P2,0CH 。C組線圈工作ACALL DELAY 。延時DEC A 。A＝0，轉(zhuǎn)DONE JZ DONEMOV P2,09H 。D組線圈工作ACALL DELAY 。延時DEC A 。A≠0，轉(zhuǎn)LOOP1 JNZ LOOP1AJMP DONE 。A＝0，轉(zhuǎn)DONELOOP2: MOV P2,0CH 。反向，A組線圈工作ACALL DELAY 。延時DEC A。A＝0，轉(zhuǎn)DONJZ DONEMOV P2,06H 。B組線圈工作 ACALL DELAY 。延時DEC A JZ DONE 。MOV P2,03H 。C組線圈工作ACALL DELAY 。延時DEC A MOV P2,09H 。D組線圈工作 ACALL DELAY 。延時DEC A 。A≠0，轉(zhuǎn)LOOP2 JZ DONEJNZ LOOP2DONE: RET DISPLAY:MOV A , 03H 。初始化MOV DPTR , 7F00HMOVX @DPTR , AMOV R0 , 60H 。置顯示緩沖區(qū)首地址MOV R2 , 01H 。置位選碼初值MOV A , R2LOOP: MOV DPTR , 7F01HMOVX @DPTR , AINC DPTRMOV A , @R0ADD A , 0DH 。形成查表的偏移地址MOVC A , @A+PCDIR: MOVX @DPTR , AACALL DELAY 。延時INC R0MOV A , R2JB , LOP1 。判斷6位是否顯示完畢RL AMOV R2 , AAJMP LOOPLOP1: RETDB 3FH , 06H , 5BH , 4FH , 66H , 6DHDB 7DH , 07H , 7FH , 6FH , 77H , 7CHDB 39H , 5EH , 79H , 71HDELAY: MOV R7 , 04HDELAY1: MOV R6 , 0FFHDELAY2: DJNZ R6 , DELAY2DJNZ R7 , DELAY1RET KEYI: ACALL KS1 。調(diào)用判有無鍵閉合子程序JNZ LK1 。有鍵閉合，跳LK1NI: ACALL DIR 。無鍵閉合，調(diào)用顯示程序,延遲6ms后，跳KEYIAJMP KEYILK1: ACALL DIR ?？赡苡墟I閉合，延遲12ms，軟件去抖ACALL DIRACALL KS1 。調(diào)用判有無鍵閉合子程序JNZ LK2 。經(jīng)去抖，判鍵確實(shí)閉合，跳LK2處理ACALL DIR 。調(diào)用顯示子程序延遲6msAJMP KEYI 。抖動引起，跳KEYILK2: MOV R2,0FEH 。列選碼→R2MOV R4,00H 。R4為列號計(jì)數(shù)器LK4: MOV DPTR,7F01H 。列選碼→8155H的PA口MOV A,R2 MOVX @DPTR,A INC DPTR 。數(shù)據(jù)指針增2，指向PC口INC DPTR MOVX A,@DPTR 。讀8155H PC口JB ,LONE 。0行線為高，無鍵閉合，跳LONE，轉(zhuǎn)判1行MOV A,00H 。0行有鍵閉合,首鍵號0→A