num.inc

来自「单片机液晶段显示驱动汇编程序。用新茂单片机。」· INC 代码 · 共 100 行

                ;***************************************


                SUM:            CALL DLY100US
                                JNB REC,SUM0
                                JMP JG_REC

                SUM0:           JNB REC,$
                                CALL DLY100US
                                JNB REC,SUM0

                CMP0:           MOV A,RECN
                                CJNE A,#00H,JG_T30MSN
                                INC RECN
                                SETB TR1
                                JMP JG_REC

                JG_T30MSN:      MOV A,T30MSN
                                CJNE A,#00,CMP1
                                CLR TR1
                                JMP ST_REC
                CMP1:           CJNE A,#01H,JP_ST_REC
                                INC RECN
                                MOV A,RECN
                                CJNE A,#04H,JP_JG_REC
                                CLR TR1
                                CALL INC_LCD
                                CALL STT1_30MS
                                SETB TR1
                OVER0:          MOV T30MSN,#00H
                OVER1:          MOV A,T30MSN
                                CJNE A,#08H,JG_REC0
                                CLR TR1
                                JMP ST_REC
                JG_REC0:        JB REC,OVER1
                                CALL DLY100US
                                JB REC,OVER1
                                JMP OVER0

                JP_ST_REC:      JMP ST_REC

                JP_JG_REC:      MOV T30MSN,#00H
                                CLR TR1
                                CALL STT1_30MS
                                SETB TR1
                                JMP JG_REC


                INC_LCD:        INC LCD0
                                MOV A,LCD0
                                CJNE A,#0AH,SUM1
                                JMP SUM2
                SUM1:           CALL SHOW0
                                RET
                SUM2:           MOV LCD0,#00H
                                CALL SHOW0
                                INC LCD1
                                MOV A,LCD1
                                CJNE A,#0AH,SUM3
                                MOV LCD1,#00H
                SUM3:           CALL SHOW1
                                RET

                ;***************************************

                SHOW1:          MOV DPTR,#D_DA
                                MOV A,LCD1
                                MOVC A,@A+DPTR
                                MOV LCDB0,A
                                RET
                SHOW0:          MOV DPTR,#D_DA
                                MOV A,LCD0
                                MOVC A,@A+DPTR
                                JB BAT,ABAT
                SSHOW:          MOV LCDB1,A
                                RET
                ABAT:           INC A
                                JMP SSHOW

                ;***************************************

                D_DA:   DB 0BEH                ;ZERO
                        DB 06H                 ;ONE
                        DB 0DAH                ;TWO
                        DB 5EH                 ;THREE
                        DB 66H                 ;FOUR
                        DB 7CH                 ;FIVE
                        DB 0FCH                ;SIX
                        DB 16H                 ;SEVEN
                        DB 0FEH                ;EIGHT
                        DB 7EH                 ;NINE

                ;***************************************

                DLY100US:       MOV R0,#07H
                                DJNZ R0,$
                                RET