xb.txt

来自「一个用单片机写的驱动打印机的程序,值得你下载」· 文本 代码 · 共 133 行

;;*******************************************************************
;打印俄文“下车时间”	   yuan 05.2.24
        MOV     A,        #17
        MOV     5BH,      A

        MOV     A,        #0eH
	MOV     5AH,      A

	MOV     A,        #22
	MOV     59H,      A

	MOV     A,        #18
	MOV     58H,      A

	MOV     A,        #16
	MOV     57H,      A

	MOV     A,        #19
	MOV     56H,      A

	MOV     A,        #23
	MOV     55H,      A

	MOV     A,        #16
	MOV     54H,      A

	MOV     R1,       #30H
	LCALL   PRTSTS2
;;*********************************
	MOV     58H, 77h;    #23H ;hour
	MOV     59H, 78h;    #H ;min
;---------------------------
	MOV     5AH,     #0AAH
	mov     A ,58H
	ANL     A ,#0F0H
	SWAP    A
	ADD A,#0A0H
	MOV     5BH, A
	MOV A ,58H
	ANL   A ,#0FH
	SWAP A
	ADD A ,#0DH
	MOV  58H ,A
	MOV R1 ,#30H
	LCALL  PRTSTS1	     ;打印下车时间
	LCALL  PRNNC
;;*******************************************************************

************************************************/
PRTSTS2:   mov    a,      57H
	   mov     @R1,    a     ;;30H  将54H中的数放入30H

	   INC     R1            ;;31H
	   mov     a,      56H
	   mov     @R1,    a	 ;将58H中的数放入31H

	   INC     R1            ;;32H
	   mov     a,      55H
	   mov     @R1,    a

	   INC    R1             ;;33H
	   mov     a,      54H
	   mov     @R1,    a

	   INC    R1             ;;34H
	   mov     a,      5BH
	   mov     @R1,    a

	   INC     R1             ;;35H
           mov     a,      5AH
           mov     @R1,  a

           INC     R1             ;;36H
           mov     a,      59H
	   mov     @R1,    a

	   INC     R1              ;;37H
	   mov     a,      58H
           mov     @R1,    a
  
	   LCALL   PRN
	   LCALL   PRNNC
	   ret
;;***********************************************************


;;***********************************************************
PRN:     MOV     DPTR,   #TXT
	 MOV     R7,     #4
REPRN:   LCALL   LOAD_2L
	 CPL     DOG
	 LCALL   PRN_2L
	 DJNZ    R7,     REPRN
	 RET
;;***********************************************************


;;***********************************************************
LOAD_2L:  MOV     R0,   #08h   ;d
	  MOV     R1,   #30H   ;s
	  MOV     R2,   #16    ;c
LOAD_2L1:
         MOV     A,  @R1
	 LCALL   EX_2L
	 INC     R1
	 DJNZ    R2,    LOAD_2L1
	 MOV     R1,    #30H
	 INC     DPL
	 MOV     R2,    #16

LOAD_2L2:MOV A,  @R1
	 LCALL   EX_2L
	 INC     R1
	 DJNZ    R2,    LOAD_2L2
	 INC     DPL
	 CPL     DOG
	 RET
;;***********************************************************

PRN_2L:负责打印

;;***********************************************************
PRNNC:   MOV     A,      #10
	 CPL     DOG
	 LCALL   LD
	 MOV     DPTR,   #TXT
	 MOV     R7,     #5
REPRNC:  LCALL   LOAD_C
	 LCALL   PRN_C
	 DJNZ    R7,     REPRNC
	 RET
;;***********************************************************