【文章內(nèi)容簡介】 P2,A MOV P3,A MOV P0,A CLR 。串行寄存器打入輸出端控制位 MOV TMOD,01H 。使用 T0 作 16 位定時器 ,行掃描用。 MOV TH0,0FCH 。1ms 初值 12MHZ MOV TL0,18H MOV SCON,00H 。串口方式 0 MOV IE,82H 。T0 中斷允許 ,總中斷允許 MOV SP,70H 。修改堆棧底部為 70H 單元 LCALL DIS1 。顯示準備，黑屏， 秒 MAIN: MOV DPTR,TAB LCALL MOVDISP 。逐排顯示，每排四字，共六排 MOV DPTR,TAB LCALL MOVDISP1 。滾動顯示，每排四字 AJMP MAIN 。 。 。********************。 。 四字逐排顯示子程序 。 。********************。 。每 次四字移入移出顯示方式，入口時定義好 DPTR 值 。 MOVDISP: MOV R1,6 。顯示 6 排字 ,每排四字 R1 排數(shù) DISLOOP: MOV R3,100 。每排顯示時間 16ms*100 DISMOV: MOV R2,00H 。第 0 行開始 SETB TR0 。開掃描（每次一幀） WAITMOV: JBC 00H,DISMOV1 。標志為 1 掃描一幀結(jié)束（ 16毫秒為 1 幀，每行 1 毫秒） AJMP WAITMOV DISMOV1: DJNZ R3,DISMOV 。1 幀重復(fù)顯示（控制顯示時間） MOV A,128 。顯示字指針移一排（每排 4字 *32 128） ADD A,DPL 。 MOV DPL,A MOV A,0 ADDC A,DPH MOV DPH,A DEC R1 。R1 為 0，顯示完 MOV A,R1 JZ MOVOUT 。 AJMP DISLOOP 。 MOVOUT: RET 。移動顯示結(jié)束 。 。********************。 。 四字滾動顯示子程序 。 。********************。 。每排四字向上移出顯示方式，入口時定義好 DPTR 值 。 MOVDISP1: MOV R1,96 。向上移動顯示 6 排字 ,每排四字 R1 排數(shù) *16 DISLOOP1: MOV R3,10 。移動速度 *10 DISMOV2: MOV R2,00H 。第 0 行開始 SETB TR0 。開掃描（每次一幀） WAITMOV1: JBC 00H,DISMOV3 。標志為 1 掃描一幀結(jié)束（ 16毫秒為 1 幀，每行 1 毫秒） AJMP WAITMOV1 DISMOV3: DJNZ R3,DISMOV2 。1 幀重復(fù)顯示（控制移動速度） INC DPTR 。顯示字指針移一行（二字節(jié)位置） INC DPTR DEC R1 。R1 為 0，顯示完 MOV A,R1 JZ MOVOUT1 。 AJMP DISLOOP1 。 MOVOUT1: RET 。移動顯示結(jié)束 。 。 。*****************。 。 四個字顯示子程序 。 。*****************。 。靜止顯示表中某四個字（黑屏） DIS1: MOV R3,100 。靜止顯示時間控制（ 16MS*5ah 秒） DIS11: MOV R2,00H 。一幀掃描初始值（ 行地址從000FH） MOV DPTR,TAB 。取表首址 SETB TR0 。開掃描（每次一幀） WAIT11: JBC 00H,DIS111 。為 1，掃描一幀結(jié)束 AJMP WAIT11 DIS111: DJNZ R3,DIS11 RET 。 。 。************。 。 掃描程序 。 。************。 。1MS 傳送一行，每行顯示 1 毫秒 ,一次傳送四個字的某行共 8 個字節(jié) . 。 INTT0: PUSH ACC MOV TH0,0FCH 。1ms 初值重裝 MOV TL0,18H MOV A,97 。指向第四個字行右字節(jié) tab+97 ADD A,DPL MOV DPL,A MOV A,0 ADDC A,DPH MOV DPH,A MOV A,0 MOVC A,@A+DPTR 。查表 0+tab+97 MOV SBUF,A 。串口 0 方式發(fā)送 WAIT: JBC TI,GO 。等待發(fā)送完畢 AJMP WAIT 。 GO: MOV A,DPL 。指向第四個字行左字節(jié) SUBB A,1 MOV DPL,A MOV A,DPH SUBB A,0 MOV DPH,A MOV A,0 MOVC A,@A+DPTR MOV SBUF,A WAIT1: JBC TI,GO1 AJMP WAIT1。 GO1: MOV R0,03H MLOOP: MOV A,DPL 。指向前三個字行右字節(jié) SUBB A,31 MOV DPL,A MOV A,DPH SUBB A,0 MOV DPH,A MOV A,0 MOVC A,@A+DPTR 。查表 MOV SBUF,A 。串口 0 方式發(fā)送 WAIT2: JBC TI,GO2 。等待發(fā)送完畢 AJMP WAIT2 。 GO2: MOV A,DPL 。指向前三個字行左字節(jié) SUBB A,1 MOV DPL,A MOV A,DPH SUBB A,0 MOV DPH,A MOV A,0 MOVC A,@A+DPTR MOV SBUF,A WAIT3: JBC TI,GO3 AJMP WAIT3 GO3: DJNZ R0,MLOOP 。執(zhí)行三次 。 SETB 。關(guān)行顯示，準備涮新 NOP 。串口寄存器數(shù)據(jù)穩(wěn)定 SETB 。產(chǎn)生上升沿，行數(shù)據(jù)打入輸出端 NOP 。 NOP 。 CLR ?；謴?fù)低電平 MOV A,R2 。修改顯示行地址 ORL A,0F0H 。修改顯示行地址 a 0f0h MOV R2,A 。修改顯示行地址 r2 0f0h MOV A,P1 。修改顯示行地址 a 10111111b 0bfh ORL A,0FH 。 修改顯示行地址 a 10111111b 0bfh ANL A,R2 。修改顯示行地址 a b0h MOV P1,A 。修改完成 p1 b0h 1011 0000b CLR 。開行顯示 INC R2 。下一行掃描地址值 r2 f1h 1111 0001b INC DPTR 。dptr tab+1 INC DPTR 。下一行數(shù)據(jù)地址 dptr tab+2 MOV A,R2 ANL A,0FH 。a 01h JNZ GO4 SETB 00H 。R2 為 10H，現(xiàn)為末行掃描，置 1 幀結(jié)束標志 MOV A,DPL 。指針修正為原幀初值 SUBB