實驗程序資料

拆字 ORG0000H AJMPMAINMAIN:MOVSP,#60HMOVDPTR,#0E100H MOVA,#3 MOVX@DPTR,A MOV20H,#34H MOVA,20H ACALLDIYLOOP:MOVR0,#10H MOVR1,#6 MOVR2,#1 ACALLDISPLAY AJMPLOOPDISPLAY: MOV A,@R0 ;讀顯示數(shù) MOV 0FH,#8 ;164移位次數(shù) ACALL P164 ;字形碼輸出子程序 ACALL PBIT ;字位碼輸出子程序 ACALL DELAY ;延時2ms MOV A,#0 ;熄滅顯示 MOVX @DPTR,A INC R0 ;指向下一位顯示數(shù) DJNZ R1,DISPLAY ;沒有顯示完繼續(xù) RETP164: MOV DPTR,#TAB MOVC A,@A+DPTRP164_1: RRC A MOV R3,A MOV ACC.0,C ANL A,#0FDH MOV DPTR,#0E102H MOVX @DPTR,A ORL A,#0FEH MOVX @DPTR,A MOV A,R3 DJNZ 0FH,P164_1 MOV 0FH,#8 RETPBIT: MOV DPTR,#0E101H MOV A,R2 MOVX @DPTR,A RL A MOV R2,A RETDELAY: MOV R6,#4DEL: MOV R7,#250 DJNZ R7,$ DJNZ R6,DEL RETTAB: DB0FCH,60H,0DAH,0F2H,66H,0B6H,0BEH,0E0H DB0FEH,0F6H,0EEH,3EH,9CH,7AH,9EH,8EHDIY:MOVB,#10HDIVAB MOV10H,#9 MOV11H,#0 MOV12H,#3 MOV13H,#0 MOV14H,#2 MOV15H,#1 RET END定時程序實現(xiàn)1ms定時，跑馬燈 ORG0000H AJMPMAIN ORG001BH AJMPINT_1 ORG0030HMAIN:MOVSP,#60H MOVTMOD,#10H MOVTH1,#4BH MOVTL1,#0FDH MOVR1,#20 SETBET1 SETBEA SETBTR1 MOVDPTR,#TAB MOVR2,#0 AJMP$INT_1: MOVTH1,#4BH MOVTL1,#0FDH DJNZR1,EXTI MOVR1,#20 MOVA,R2 MOVCA,@A+DPTR CLRC MOVA,#0 MOVR4,#24 ACALLS164 MOVA,#0EEH//A MOVR4,#8 ACALLS164 AJMP$S164: RRCA MOVP1.0,C CLRP1.1 SETBP1.1 DJNZR4,S164 RET END前三個黑第四個顯示AORG0000H AJMPMAIN ORG0030HMAIN:MOVSP,#60H/*MOVA,#7AH//D MOVR4,#8 ACALLS164 MOVA,#9CH //C MOV R4,#8 ACALLS164 MOVA,#3EH//B MOVR4,#8 ACALLS164 */ MOVR2,#4 MOVR3,#3LOOP:MOVA,#0EEH//顯示A MOVR4,#8 ACALLS164 DJNZR2,LOOPLOOP1: CLRC MOVA,#0 MOVR4,#8 ACALLS164 DJNZR3,LOOP1 AJMP $ /*CLRC MOVA,#0 MOVR4,#24 ACALLS164 AJMP$ /*MOVA,#0EEH//A MOVR4,#24 ACALLS164*//* CLRC MOVA,#0 MOVR4,#8 ACALLS164 CLRC MOVA,#0 MOVR4,#8 ACALLS164 */S164: RRCA MOVP1.0,C CLRP1.1 SETBP1.1 DJNZR4,S164 RET ENDDA轉換00到FFORG0000HAJMPMAINORG000BHAJMPIN_T0ORG0030HMAIN: MOVSP,#60H MOVTMOD,#01H MOVTL0,#0B0H MOVTH0,#3CH SETBET0 SETBEA SETBTR0 MOVDPTR,#0E100H MOVA,#3 MOVX@DPTR,A MOV15H,#0 MOV14H,#8 MOV13H,#0 MOV12H,#9LOOP:MOVR0,#10H MOVR1,#6 MOVR2,#1 ACALLDISPLAY AJMPLOOPIN_T0: MOVTL0,#0B0H MOVTH0,#3CH PUSHPSW PUSHACC MOVDPTR,#0A000H MOVXA,@DPTR ACALLDIY MOVX@DPTR,A POPACC POPPSW RETI DISPLAY: MOV A,@R0 ;讀顯示數(shù) MOV 0FH,#8 ;164移位次數(shù) ACALL P164 ;字形碼輸出子程序 ACALL PBIT ;字位碼輸出子程序 ACALL DELAY ;延時2ms MOV A,#0 ;熄滅顯示 MOVX @DPTR,A INC R0 ;指向下一位顯示數(shù) DJNZ R1,DISPLAY ;沒有顯示完繼續(xù) RETP164: MOV DPTR,#TAB MOVC A,@A+DPTRP164_1: RRC A MOV R3,A MOV ACC.0,C ANL A,#0FDH MOV DPTR,#0E102H MOVX @DPTR,A ORL A,#0FEH MOVX @DPTR,A MOV A,R3 DJNZ 0FH,P164_1 MOV 0FH,#8 RETPBIT: MOV DPTR,#0E101H MOV A,R2 MOVX @DPTR,A RL A MOV R2,A RETDELAY: MOV R6,#4DEL: MOV R7,#250 DJNZ R7,$ DJNZ R6,DEL RETTAB: DB0FCH,60H,0DAH,0F2H,66H,0B6H,0BEH,0E0H DB0FEH,0F6H,0EEH,3EH,9CH,7AH,9EH,8EHDIY:MOVB,#10HDIVABMOV10H,B MOV11H,A RET ENDDA轉換并且顯示小數(shù)點電壓ORG0000HAJMPMAINORG000BHAJMPIN_T0ORG0030HMAIN: MOVSP,#60H MOVTMOD,#01H MOVTL0,#0B0H MOVTH0,#3CH SETBET0 SETBEA SETBTR0 //8155初始化 MOVDPTR,#0E100H MOVA,#3MOVX@DPTR,A //讓數(shù)碼管前四位分別顯示0809 MOV15H,#0 MOV14H,#8 MOV13H,#0 MOV12H,#9//X顯示三要素LOOP:MOVR0,#10H MOVR1,#6 MOVR2,#1 ACALLDISPLAY AJMPLOOP//中斷入口IN_T0: MOVTL0,#0B0H MOVTH0,#3CH//保護現(xiàn)場 PUSHPSW PUSHACC MOVDPTR,#0A000H MOVXA,@DPTR//讀轉換結果 ACALLDIY MOVX@DPTR,A//啟動A/D轉換 POPACC //恢復現(xiàn)場 POPPSW RETI //顯示子程DISPLAY: MOV A,@R0 ;讀顯示數(shù) MOV 0FH,#8 ;164移位次數(shù) ACALL P164 ;字形碼輸出子程序 ACALL PBIT ;字位碼輸出子程序 ACALL DELAY ;延時2ms MOV A,#0 ;熄滅顯示 MOVX @DPTR,A INC R0 ;指向下一位顯示數(shù) DJNZ R1,DISPLAY ;沒有顯示完繼續(xù) RETP164: MOV DPTR,#TAB MOVC A,@A+DPTR CJNE R0,#11H,P164_1 INC AP164_1: RRC A MOV R3,A MOV ACC.0,C ANL A,#0FDH MOV DPTR,#0E102H MOVX @DPTR,A ORL A,#0FEH MOVX @DPTR,A MOV A,R3 DJNZ 0FH,P164_1 MOV 0FH,#8 RETPBIT: MOV DPTR,#0E101H MOV A,R2 MOVX @DPTR,A RL A MOV R2,A RETDELAY: MOV R6,#4DEL: MOV R7,#250 DJNZ R7,$