【正文】 ；讀入的八位數(shù)據(jù)儲(chǔ)存在 R1MOV R7,4 ；讀取后四位READ3: CLR ；時(shí)鐘低電平MOV C, ；讀入的數(shù)據(jù)存入 CYRLC A ；送入 A 中SETB ；時(shí)鐘變高電平DJNZ R7,READ3 ；讀數(shù)結(jié)束否MOV R2,A ；讀入的 4 位數(shù)據(jù)送 ASETB ；片選無(wú)效CLR ；時(shí)鐘低電平MOV A,R1MOV R7,AMOV A,R2MOV R6,AACALL HTOBCD 。二—十進(jìn)制轉(zhuǎn)換子程序RET顯示子程序：MOV P2,7FH ；一直送數(shù)字 8 的代碼段MOV R0,E0H ；左邊第一位顯示位控字LCALL DELAY ；延時(shí) 1msMOV R0,D0H ；左邊第二位顯示LCALL DELAY ；延時(shí) 1msMOV R0,C0H ；左邊第三位顯示LCALL DELAY ；延時(shí) 1msMOV R0,B0H ；最后一位顯示LCALL DELAY ；延時(shí) 1msLEDBUF: EQU 40H ；顯示數(shù)據(jù)首地址DISPLAY: MOV R0, LEDBUF ；指向顯示緩沖首址 MOV R3, 77H ；從右邊第一位顯示 MOV A, FFH ；取全不亮位控字 MOV R1, BITPORT ；指向位控口 MOVX @R1, A ；關(guān)顯示LD1: MOV A, @R0 ；取顯示數(shù)據(jù) MOV DPTR, TABLE ；指向顯示段碼表首址 MOV A,@A+DPTR ；查顯示段碼表 MOV P0, A ；輸出顯示段碼 MOV A, R3 ；取位控制字 MOV P2, A ；輸出位控制字 LCALL DELAY1 ；延時(shí) 1ms INC R0 ；取下一個(gè)數(shù) JNB ,LD2 ；已到最高位則返回 RL A ；不到最高位，則向高位移動(dòng) MOV R3, A SJMP LD1LD2: RETTABLE: DB 3FH ；對(duì)應(yīng)字符 0 DB 06H ；對(duì)應(yīng)字符 1 DB 5BH ；對(duì)應(yīng)字符 2DB 4FH ；對(duì)應(yīng)字符 3DB 66H ；對(duì)應(yīng)字符 4DB 6DH ；對(duì)應(yīng)字符 5DB 7DH ；對(duì)應(yīng)字符 6DB 07H ；對(duì)應(yīng)字符 7DB 7FH ；對(duì)應(yīng)字符 8DB 6FH ；對(duì)應(yīng)字符 9DB 0AH ；對(duì)應(yīng)消隱零DELAY1：MOV R7,64H ；延時(shí) 1ms 子程序 LOOP： NOP NOP NOP DJNZ R7,LOOP RETHTOBCD: PUSH A MOV R5,03H MOV R4,0E8H ACLL DIVZ 。先除以 1000 得千位 POP R0 。取出千位 BCD 碼地址 PUSH R0 CJNE R6,0,HB1 。千位不是零就跳 MOV @R0,0AH 。千位是零就消隱 SJMP HB2HB0: MOV A,R6 MOV @R0,A CJNE A,5,HB01 。不超重就跳 CLR P3,4 。超重報(bào)警 CLR P3,5 RETHB01: MOV A,R2 MOV R6,A MOV A,R3 MOV R7,A MOV R5,0 。先除以 100 得百位 BCD 碼 MOV R4,100 ACALL DIVZ POP R0 。取出百位 BCD 碼存放地址 PUSH R0 CJNE R6,0,HB3 。百位不是零就跳 MOV A,@R0 。百位是零，查千位是否為零？ INC R0 。存放地址指向百位 JNZ HB4 。千位不為零就跳 MOV @R0,0AH 。千位為零百位零消隱 SJMP HB5HB1: MOV A,R6MOV @R0,A 。送千位 BCD 碼到對(duì)應(yīng)的顯示區(qū)HB2: MOV A,R2 MOV R6,AMOV A,R3MOV R7,AMOV R5,0MOV R4,10ACALL DIVZPOP R0 。取百位 BCD 碼存放地址CJNE R6,0,HB3 。十位不為零就跳MOV A,@R0 。十位為零查百位是否為零？INC RO 。存放地址指向十位JNZ HB4MOV @R0,0AH 。百位為零十位零消隱SJMP HB5HB3: INC R0HB4: MOV A,R6MOV @R0,A 。存放 BCD 碼到對(duì)應(yīng)顯示區(qū)HB5: INC R0MOV A,R2MOV @R0,A 。個(gè)位零不用消隱，不用判斷是否為零RETDIVZ: MOV A,R7JNZ BEGINMOV A,R6JNZ BEGINRETBEGIN: MOV R2,0 MOV R3,0 MOV R1,16DIVZ1: CLR C MOV A,R6 RLC A MOV R6,A MOV A,R7 RLC A MOV R7,A MOV A,R2 RLC A MOV R2,A MOV A,R3 RLC A MOV R3,A MOV A,R2 SUBB A,R4 MOV R0,A MOV A,R3 SUBB A,R5 JC NEXT INC R6 MOV R3,A MOV A,R0 MOV R2,ANEXT: DJNZ R1,DIVZ1附 錄 2電路原理圖：1 2 3 4ABCD4321DCBA TitleNumber RevisionSizeA4Date: 14Jun2022 Sheet of File: C:\Documents and Settings\user\192。195。230。\202。253。214。179。198。214。216。210。199。181。196。201。232。188。 By:1G1 A12 1Y1 18A24 1Y2 16A36 1Y3 14A48 1Y4 122G19 B111 2Y1 9B213 2Y2 7B315 2Y3 5B417 2Y4 3U374LS2441 2U3A74LS041 2U1A74LS041 2U2A74LS041 2U4A74LS041234567abcdefg8 dp9GNDa bfcgde dpDS1AMBERCC 1234567abcdefg8 dp9GNDa bfcgde dpDS2AMBERCC 1234567abcdefg8 dp9GNDa bfcgde dpDS3AMBERCC 1234567abcdefg8 dp9GNDa bfcgde dpDS4AMBERCCR62001KR5200R7200R8200Q1NPNQ2NPNQ3NPND11BQ20TF11TO11 32V VGNDIN OUTU1LM7805CTC3EA/VP31 X119X218 RESET9RD17 WR16INT012 INT113T014 T115P101 P112 P123P134 P145 P156P167 P178P00 39P01 38P02 37P03 36P04 35P05 34P06 33P07 32P20 21P21 22P22 23P23 24P24 25P25 26P26 27P27 28PSEN 29ALE/P 30TXD11RXD 10VCC40GND20U289C51VddAIN/SHDNVrefSCLK/CSDOUTGNDGNDGNDC1010uFR2500R320KS1SWPBGND+~220V ~9VC5GND MAX187+5VU4GNDR9~R16C11R17200D2LED+5UBELL+12Q1PNPR18510GNDD1LEDRL1KGND180。171。184。208。198。247。+55LPSII1032 61 874 INA1265166。204。FC13166。204。FC1410166。204。F 166。204。F+5 RL 20KAINAINC16100nFC18220FC17100nF C19220FR19750R20750 202。253。214。179。198。214。216。210。199。181。196。201。232。188。198。