1

RM51单片机实验板配套实验例程库

03AC F53D                              MOV DS1302_DATA,A
03AE C292                              CLR RST
03B0 22                                RET
            ;
            ;
            ;******************时间显示子程序*******************
03B1 7480   TIME:   MOV  A,#80H	       ;第一行左第一个字开始


D:\温度时钟器示范程序\25.ASM                                    
 
                                                                    页    12
                                                                    11-20-05
                                                                    09:53:56
伟福汇编器 V5.00                             Copyright (c) 1989, 2001 by CHY

地址  机器码 源程序

03B3 12044B 	LCALL WRITE_COM
03B6 90053B 	MOV  DPTR,#CHINESE2     ;16*16点阵“时间”
03B9 1204E8 	LCALL WRITE_HZ2
            ;
            TIMEUP:
03BC 7482           MOV  A,#82H	       ;第一行左第5个字开始
03BE 12044B 	LCALL WRITE_COM
03C1 7970           MOV   R1,#70H           ;将70-79H时间数据查出字码写入LCD
03C3 9004F9         MOV   DPTR,#TABLE1
03C6 7A0A           MOV   R2,#0AH          ; 查10次
03C8 7400           MOV   A,#00H
03CA E7     MOVCLOP:MOV   A,@R1            ;
03CB 93             MOVC  A,@A+DPTR
03CC 120484         LCALL WRITE_DAT
03CF 09             INC   R1
03D0 DAF8           DJNZ  R2,MOVCLOP       ;
03D2 22             RET
            ;
            ;***************开机显示画面***********************
03D3 7480   LOGON:	MOV  A,#80H	       ;第一行左第一个字开始
03D5 12044B 	LCALL WRITE_COM
03D8 900513 	MOV  DPTR,#CHINESE     ;WORD 16*16点阵TEST
03DB 1204D7 	LCALL WRITE_HZ
03DE 7490           MOV  A,#90H	       ;第二行左第一个字开始
03E0 12044B 	LCALL WRITE_COM
03E3 900525 	MOV  DPTR,#CHINESE1    ;WORD 16*16点阵TEST
03E6 1204D7 	LCALL WRITE_HZ
03E9 C294           CLR   LAMPBLAK         ;开背光灯
03EB 1204CF         LCALL DELAY5S          ;显示5秒
03EE D294           SETB  LAMPBLAK         ;关背光灯
03F0 22             RET
03F1 7480   LOGON1:	MOV  A,#80H	       ;第一行左第一个字开始
03F3 12044B 	LCALL WRITE_COM
03F6 90055B 	MOV  DPTR,#CHINESE5     ;WORD 16*16点阵TEST
03F9 1204D7 	LCALL WRITE_HZ
03FC 7490           MOV  A,#90H	       ;第二行左第一个字开始
03FE 12044B 	LCALL WRITE_COM
0401 90056D 	MOV  DPTR,#CHINESE6    ;WORD 16*16点阵TEST
0404 1204D7 	LCALL WRITE_HZ
0407 C294           CLR   LAMPBLAK         ;开背光灯
0409 1204CF         LCALL DELAY5S          ;显示5秒
040C D294           SETB  LAMPBLAK         ;关背光灯
040E 22             RET
            ;**********初始化程序*************
040F 1204C6 SETUP:  LCALL DELAY
0412 1204C6         LCALL DELAY
0415 1204C6         LCALL DELAY
0418 1204C6         LCALL DELAY


D:\温度时钟器示范程序\25.ASM                                    
 
                                                                    页    13
                                                                    11-20-05
                                                                    09:53:56
伟福汇编器 V5.00                             Copyright (c) 1989, 2001 by CHY

地址  机器码 源程序

041B 7401   	MOV  A,#01H		;CLEAR DISPLAY
041D 12044B 	LCALL WRITE_COM
0420 7430   	MOV  A,#00110000B	;FUNCTION SETTING
0422 12044B 	LCALL WRITE_COM
0425 7402   	MOV  A,#00000010B	;DDRAM SET TO '00H'
0427 12044B 	LCALL WRITE_COM
042A 7404   	MOV  A,#00000100B	;
042C 12044B 	LCALL WRITE_COM
042F 740C   	MOV  A,#00001100B	;DISPLAY ON
0431 12044B 	LCALL WRITE_COM
0434 7401   	MOV  A,#00000001B	;CLEARING SCREEN
0436 12044B 	LCALL WRITE_COM
0439 7480   	MOV  A,#10000000B	;SET DDRAM ADDRESS
043B 12044B 	LCALL WRITE_COM
043E 1204C6         LCALL DELAY
0441 1204C6 	LCALL DELAY
0444 1204C6 	LCALL DELAY
0447 1204C6         LCALL DELAY
044A 22     	RET
            ;************串行命令写入子程序****************
            ;写入命令字在A中
            WRITE_COM:
044B 1204BD 	        LCALL DELAY1		;
044E D295                   SETB  CS
0450 C0E0   		PUSH  ACC
0452 7808   		MOV  R0,#8
0454 74F8   		MOV  A,#11111000B
            COMM1:
0456 C3                     CLR  C
0457 33     		RLC  A
0458 9296   		MOV  SID,C
045A C297   		CLR  CLK
045C D297                   SETB CLK
045E D8F6    		DJNZ R0,COMM1
0460 D0E0   		POP  ACC
0462 FD     		MOV  R5,A
0463 54F0   		ANL  A,#0F0H
0465 7808   		MOV  R0,#8
0467 C3     COMM2:	        CLR  C
0468 33     		RLC  A
0469 9296   		MOV  SID,C
046B C297   		CLR  CLK
046D D297   		SETB CLK
046F D8F6   		DJNZ R0,COMM2
0471 ED     		MOV  A,R5
0472 C4     		SWAP A
0473 54F0   		ANL  A,#0F0H
0475 7808   		MOV  R0,#8


D:\温度时钟器示范程序\25.ASM                                    
 
                                                                    页    14
                                                                    11-20-05
                                                                    09:53:56
伟福汇编器 V5.00                             Copyright (c) 1989, 2001 by CHY

地址  机器码 源程序

0477 C3     COMM3:	        CLR  C
0478 33     		RLC  A
0479 9296   		MOV  SID,C
047B C297   		CLR  CLK
047D D297   		SETB CLK
047F D8F6   		DJNZ R0,COMM3
0481 C295   		CLR  CS
0483 22     	        RET
            ;
            ;***********串行数据写入子程序****************
            ;写入数据字在A中
            WRITE_DAT:
0484 1204BD 		LCALL DELAY1
0487 D295                   SETB CS
0489 C0E0   		PUSH  ACC
048B 7808   		MOV  R0,#8
048D 74FA   		MOV  A,#11111010B
048F C3     DATA1:	        CLR  C
0490 33     		RLC  A
0491 9296   		MOV  SID,C
0493 C297   		CLR  CLK
0495 D297   		SETB CLK
0497 D8F6   		DJNZ R0,DATA1
0499 D0E0   		POP  ACC
049B FD     		MOV  R5,A
049C 54F0   		ANL  A,#0F0H
049E 7808   		MOV  R0,#8
04A0 C3     DATA2:	        CLR  C
04A1 33     		RLC  A
04A2 9296   		MOV  SID,C
04A4 C297   		CLR  CLK
04A6 D297   		SETB CLK
04A8 D8F6   		DJNZ R0,DATA2
04AA ED     		MOV  A,R5
04AB C4     		SWAP A
04AC 54F0   		ANL  A,#0F0H
04AE 7808   		MOV  R0,#8
04B0 C3     DATA3:	        CLR  C
04B1 33     		RLC  A
04B2 9296   		MOV  SID,C
04B4 C297   		CLR  CLK
04B6 D297   		SETB CLK
04B8 D8F6   		DJNZ R0,DATA3
04BA C295   		CLR  CS
04BC 22     	        RET
            ;
            ;**************延时子程序**********************
            ;0.544ms


D:\温度时钟器示范程序\25.ASM                                    
 
                                                                    页    15
                                                                    11-20-05
                                                                    09:53:56
伟福汇编器 V5.00                             Copyright (c) 1989, 2001 by CHY

地址  机器码 源程序

            DELAY1:
04BD 7F10   	MOV  R7,#010H
04BF 7E10   D11:	MOV  R6,#010H
04C1 DEFE   	DJNZ R6,$
04C3 DFFA   	DJNZ R7,D11
04C5 22     	RET
            ;0.13s
            DELAY:
04C6 7900   	MOV  R1,#00H
04C8 7A00   D2:	MOV  R2,#00H
04CA DAFE   	DJNZ R2,$
04CC D9FA   	DJNZ R1,D2
04CE 22     	RET
            ;5.2s
04CF 7B28   DELAY5S:MOV  R3,#28H
04D1 1204C6 DE5S:   LCALL DELAY
04D4 DBFB           DJNZ R3,DE5S
04D6 22             RET
            ;
            ;************16*16点阵汉字写入子程序共7个***********
            WRITE_HZ:		;WRITE 7 CHINESE TO LCD
04D7 7C07   		MOV  R4,#7
04D9 E4     DD:	        CLR  A
04DA 93     		MOVC A,@A+DPTR
04DB A3     		INC  DPTR
04DC 120484 		LCALL WRITE_DAT
04DF E4     		CLR  A
04E0 93     		MOVC A,@A+DPTR
04E1 A3     		INC DPTR
04E2 120484 		LCALL WRITE_DAT
04E5 DCF2   		DJNZ R4,DD
04E7 22     		RET
            ;************16*16点阵汉字写入子程序共2个***********
            WRITE_HZ2:		;WRITE 8 CHINESE TO LCD
04E8 7C02   		MOV  R4,#2
04EA E4     DD4:	        CLR  A
04EB 93     		MOVC A,@A+DPTR
04EC A3     		INC  DPTR
04ED 120484 		LCALL WRITE_DAT
04F0 E4     		CLR  A
04F1 93     		MOVC A,@A+DPTR
04F2 A3     		INC DPTR
04F3 120484 		LCALL WRITE_DAT
04F6 DCF2   		DJNZ R4,DD4
04F8 22     		RET
            ;
            ;*****************************16*8点阵的字符代码表**********************************
04F9 303132 


D:\温度时钟器示范程序\25.ASM                                    
 
                                                                    页    16
                                                                    11-20-05
                                                                    09:53:56
伟福汇编器 V5.00                             Copyright (c) 1989, 2001 by CHY

地址  机器码 源程序

04FC 333435 
04FF 363738 
0502 393A3B 
0505 3C3D3E 
0508 202D2E TABLE1: DB     30H,31H,32H,33H,34H,35H,36H,37H,38H,39H,3AH,3BH,3CH,3DH,3EH,20H,2DH,2EH
            ;               0   1   2   3   4   5   6   7   8   9   :   ;   <   =   > "不显"'-''.'
            ;**********************************自造字符地址表***********************************
050B 0000   CGRAM1:	DB 000H,000H
050D 0002   CGRAM2:	DB 000H,002H
050F 0004   CGRAM3:	DB 000H,004H
0511 0006   CGRAM4:	DB 000H,006H
            ;******************"这里是16*16点阵的汉字代码表"************************************
0513 204330 
0516 332D31 
0519 B0E033 
051C 35BAC5 
051F 202020 
0522 202020 CHINESE:  Db " C03-1班35号      "    ;
0525 C2A5C8 
0528 BBC3E7 
052B C9E8BC 
052E C6D6C6 
0531 D7F720 
0534 202020 
0537 202020 
053A 20     CHINESE1: Db "楼然苗设计制作        "   ;
053B CAB1   
053D BCE4   CHINESE2: DW 0CAB1H,0BCE4H                                          ;时间
053F CEC2   
0541 B6C8   
0543 DBA0   
0545 DBA0   
0547 DBA0   
0549 DBA0   
054B A1E6   CHINESE3: DW 0CEC2H,0B6C8H,0DBA0H,0DBA0H,0DBA0H,0DBA0H,0A1E6H       ;温度----℃
054D B1A8   
054F BEAF   
0551 DBA0   
0553 DBA0   
0555 DBA0   
0557 DBA0   
0559 A1E6   CHINESE4: DW 0B1A8H,0BEAFH,0DBA0H,0DBA0H,0DBA0H,0DBA0H,0A1E6H       ;报警----℃
055B CEC2B6 
055E C8CAB1 
0561 D6D3CF 
0564 D4CABE 
0567 C6F720 
056A 202020 CHINESE5:  Db "温度时钟显示器    "


D:\温度时钟器示范程序\25.ASM                                    
 
                                                                    页    17
                                                                    11-20-05
                                                                    09:53:56
伟福汇编器 V5.00                             Copyright (c) 1989, 2001 by CHY

地址  机器码 源程序

056D 2D2D30 
0570 352E31 
0573 312E31 
0576 39D6C6 
0579 D7F720 
057C 202020