新建 文本文档.txt

51单片机子程序

￡í￡?￡ó￡-￡μ￡±?¨μ?????×ó3ìDò?a?°??ê1ó??μ?÷ 

    ￡±￡??à×??ú?¨μ?2ù×÷êy￡oó?[R0]?ò[R1]à′±íê?′?·??úóéR0?òR1??ê?μ?á?D?μ￥?a?Dμ?êy
?Y?￡μ??·D?μ?μ￥?a′?·?êy?Yμ???×??ú?￡àyè?￡o[R0]=123456H￡?è?(R0)=30H￡??ò(30H)=12H￡?
(31H)=34H￡?(32H)=56H?￡
    ￡2￡????????è￡oμ￥′??¨μ????????è?a?á1?×?μí??μ?μ±á??μ?￡
    ￡3￡?1¤×÷??￡oêy?Y1¤×÷??1ì?¨?úPSW?￠A?￠B?￠R2??R7￡?ó??§??òa2??ú1¤×÷???D′?·??T
1?μ??ò·???o?D?μ?D??￠￡?3ìDò?í??óD??o?μ?í??÷D??￡


    ￡¨￡±￡?  ±êo?￡o  ￡?￡?￡?￡á    1|?ü￡o?à×??ú￡?￡?￡????ó·¨

è??úì??t￡o×??úêy?úR7?D￡?±??óêy?ú[R0]?D￡??óêy?ú[R1]?D?￡
3??úD??￠￡ooí?ú[R0]?D￡?×??????????úCY?D?￡
ó°?ì×ê?′￡oPSW?￠A?￠R2    ????Dè?ó￡o  ￡2×??ú

BCDA:	MOV	A,R7	￡?è?×??úêy?áR2?D
	MOV	R2,A
	ADD	A,R0	￡?3?ê??ˉêy?Y????
	MOV	R0,A
	MOV	A,R2
	ADD	A,R1
	MOV	R1,A
	CLR	C
BCD1:	DEC	R0	￡?μ÷??êy?Y????
	DEC	R1
	MOV	A,@R0
	ADDC	A,@R1	￡?°′×??ú?à?ó
	DA	A	￡?ê?????μ÷??
	MOV	@R0,A	￡?oí′???[R0]?D
	DJNZ	R2,BCD1	￡?′|àííê?ùóD×??ú
	RET

    ￡¨￡2￡?  ±êo?￡o  ￡?￡?￡?￡?    1|?ü￡o?à×??ú￡?￡?￡?????·¨

è??úì??t￡o×??úêy?úR7?D￡?±???êy?ú[R0]?D￡???êy?ú[R1]?D?￡
3??úD??￠￡o2??ú[R0]?D￡?×??????è???úCY?D?￡
ó°?ì×ê?′￡oPSW?￠A?￠R2?￠R3    ????Dè?ó￡o  ￡?×??ú

BCDB:	LCALL	NEG1	￡???êy[R1]ê?????è?21
	LCALL	BCDA	￡?°′?à×??ú￡?￡?￡????ó·¨′|àí
	CPL	C	￡???21???ó·¨μ?????±ê??×a??3é?è??±ê??
	MOV	F0,C	￡?±￡?¤?è??±ê??
	LCALL	NEG1	￡????′??êy[R1]μ??-ê??μ
	MOV	C,F0    ￡????′?è??±ê??
	RET
NEG1:	MOV	A,R0	￡?[R1]ê?????è?21×ó3ìDòè??ú
	XCH	A,R1	￡?????????
	XCH	A,R0
	LCALL	NEG	￡?í¨1y[R0]êμ??[R1]è?21

MOV	A,R0
	XCH	A,R1	￡?????????
	XCH	A,R0
	RET

    ￡¨￡3￡?  ±êo?￡o  ￡?￡?￡?    1|?ü￡o?à×??ú￡?￡?￡???è?21

è??úì??t￡o×??úêy?úR7?D￡?2ù×÷êy?ú[R0]?D?￡
3??úD??￠￡o?á1?è??ú[R0]?D?￡
ó°?ì×ê?′￡oPSW?￠A?￠R2?￠R3    ????Dè?ó￡o  ￡2×??ú

NEG:	MOV	A,R7	￡?è?￡¨×??úêy??ò?￡??áR2?D
	DEC	A
	MOV	R2,A
	MOV	A,R0	￡?±￡?¤????
	MOV	R3,A
NEG0:	CLR	C	
	MOV	A,#99H
	SUBB	A,@R0	￡?°′×??úê?????è?21
	MOV	@R0,A	￡?′???[R0]?D
	INC	R0	￡?μ÷??êy?Y????
	DJNZ	R2,NEG0	￡?′|àííê￡¨R2￡?×??ú

MOV	A,#9AH	￡?×?μí×??úμ￥?àè?21
	SUBB	A,@R0
	MOV	@R0,A
	MOV	A,R3	￡????′????
	MOV	R0,A
	RET

    ￡¨￡′￡?  ±êo?￡o  ￡?￡ò￡ì￡?    1|?ü￡o?à×??ú￡?￡?￡???×óò?ê?????ò???￡¨3?ê?￡?

è??úì??t￡o×??úêy?úR7?D￡?2ù×÷êy?ú[R0]?D?￡
3??úD??￠￡o?á1?è??ú[R0]?D￡?ò?3?μ?ê?????×??????úR3?D?￡
ó°?ì×ê?′￡oPSW?￠A?￠R2?￠R3    ????Dè?ó￡o  ￡2×??ú

BRLN:	MOV	A,R7	￡?è?×??úêy?áR2?D
   	MOV	R2,A
	ADD	A,R0	￡?3?ê??ˉêy?Y????
	MOV	R0,A
	MOV	R3,#0	￡?1¤×÷μ￥?a3?ê??ˉ
BRL1:	DEC	R0	￡?μ÷??êy?Y????

MOV	A,@R0	￡?è?ò?×??ú
	SWAP	A	￡?????ê???????μí??
	MOV	@R0,A	￡?′???
	MOV	A,R3	￡?è?μí×??úò?3?μ?ê?????????
	XCHD	A,@R0	￡???3?±?×??úμ?ê?????????
	MOV	R3,A	￡?±￡′?±?×??úμ?ê?????????
	DJNZ	R2,BRL1	￡?′|àííê?ùóD×??ú
	RET

    ￡¨￡μ￡?  ±êo?￡o ￡í￡?￡ì￡?    1|?ü￡o??×??ú?t?????T·?o?êy3?·¨

è??úì??t￡o±?3?êy?úR2?￠R3?D￡?3?êy?úR6?￠R7?D?￡
3??úD??￠￡o3??y?úR2?￠R3?￠R4?￠R5?D?￡
ó°?ì×ê?′￡oPSW?￠A?￠B?￠R2??R7    ????Dè?ó￡o  ￡2×??ú

MULD:	MOV	A,R3	￡?????R33?R7
	MOV	B,R7

MUL	AB
	MOV	R4,B	￡??Y′?2?·??y
	MOV	R5,A
	MOV	A,R3	￡?????R33?R6
	MOV	B,R6
	MUL	AB
	ADD	A,R4	￡?à??ó2?·??y
	MOV	R4,A
	CLR	A
	ADDC	A,B
	MOV	R3,A
	MOV	A,R2	￡?????R23?R7
	MOV	B,R7
	MUL	AB
	ADD	A,R4	￡?à??ó2?·??y
	MOV	R4,A
	MOV	A,R3
	ADDC	A,B
	MOV	R3,A
	CLR	A
	RLC	A
	XCH	A,R2	￡?????R23?R6
	MOV	B,R6
	MUL	AB
	ADD	A,R3	￡?à??ó2?·??y
	MOV	R3,A
	MOV	A,R2
	ADDC	A,B
	MOV	R2,A
	RET

    ￡¨￡?￡?  ±êo?￡o ￡í￡?￡ì￡2    1|?ü￡o??×??ú?t?????T·?o?êy??·?

è??úì??t￡o′y??·?êy?úR2?￠R3?D?￡
3??úD??￠￡o?á1??úR2?￠R3?￠R4?￠R5?D?￡
ó°?ì×ê?′￡oPSW?￠A?￠B?￠R2??R5    ????Dè?ó￡o  ￡2×??ú

MUL2:	MOV	A,R3	￡?????R3??·?
	MOV	B,A
	MUL	AB
	MOV	R4,B	￡??Y′?2?·??y
	MOV	R5,A
	MOV	A,R2	￡?????R2??·?
	MOV	B,A
	MUL	AB
	XCH	A,R3	￡??Y′?2?·??y￡?2￠??3?R2oíR3
	XCH	A,B
	XCH	A,R2
	MUL	AB	￡?????2?áR2?áR3
	CLR	C
	RLC	A
	XCH	A,B
	RLC	A
	JNC	MU20
	INC	R2	￡?à??óò?3?á?
MU20:	XCH	A,B	￡?à??ó2?·??y
	ADD	A,R4

MOV	R4,A
	MOV	A,R3
	ADDC	A,B
	MOV	R3,A
	CLR	A
	ADDC	A,R2
	MOV	R2,A
	RET

    ￡¨￡·￡?  ±êo?￡o  ￡?￡é￡?￡?    1|?ü￡o??×??ú?t?????T·?o?êy3y·¨

è??úì??t￡o±?3yêy?úR2?￠R3?￠R4?￠R5?D￡?3yêy?úR6?￠R7?D?￡
3??úD??￠￡oOV=0 ê±￡???×??úéì?úR2?￠R3?D￡?OV=1 ê±ò?3??￡
ó°?ì×ê?′￡oPSW?￠A?￠B?￠R1??R7    ????Dè?ó￡o  ￡2×??ú

DIVD:	CLR	C	￡?±è??±?3yêyoí3yêy
	MOV	A,R3	
	SUBB	A,R7
	MOV	A,R2
	SUBB	A,R6
	JC	DVD1
	SETB	OV	￡?ò?3?
	RET
DVD1:	MOV	B,#10H	￡???????×??úéì

DVD2:	CLR	C	￡?2?·?éìoíóàêyí?ê±×óò?ò???
	MOV	A,R5
	RLC	A
	MOV	R5,A
	MOV	A,R4
	RLC	A
	MOV	R4,A
	MOV	A,R3
	RLC	A
	MOV	R3,A
	XCH	A,R2
	RLC	A
	XCH	A,R2
	MOV	F0,C	￡?±￡′?ò?3???
	CLR	C
	SUBB	A,R7	￡?????￡¨R2R3￡-R6R7￡?
	MOV	R1,A
	MOV	A,R2
	SUBB	A,R6
	ANL	C,/F0	￡??á1??D??
	JC	DVD3
	MOV	R2,A	￡?1???￡?′?·?D?μ?óàêy
	MOV	A,R1
	MOV	R3,A
	INC	R5	￡?éìμ?μí????ò?
DVD3:	DJNZ	B,DVD2	￡?????íêê?áù??éì￡¨R4R5￡?
	MOV	A,R4	￡???éìò?μ?R2R3?D

MOV	R2,A
	MOV	A,R5
	MOV	R3,A
	CLR	OV	￡?éèá￠3é1|±ê??
	RET

    ￡¨￡?￡?  ±êo?￡o  ￡?￡′￡μ￡·   1|?ü￡o??×??ú?t?????T·?o?êy3yò?μ￥×??ú?t????êy

è??úì??t￡o±?3yêy?úR4?￠R5?D￡?3yêy?úR7?D?￡
3??úD??￠￡oOV=0 ê±￡?μ￥×??úéì?úR3?D￡?OV=1 ê±ò?3??￡
ó°?ì×ê?′￡oPSW?￠A?￠R3??R7    ????Dè?ó￡o  ￡2×??ú

D457:	CLR	C
	MOV	A,R4
	SUBB	A,R7
	JC	DV50
	SETB	OV	￡?éìò?3?
	RET
DV50:	MOV	R6,#8	￡??ó???ù?μ￡¨R4R5￡ˉR7￡-?úR3￡?
DV51:	MOV	A,R5
	RLC	A
	MOV	R5,A
	MOV	A,R4

RLC	A
	MOV	R4,A
	MOV	F0,C
	CLR	C
	SUBB	A,R7
	ANL	C,/F0
	JC	DV52
	MOV	R4,A
DV52:	CPL	C
	MOV	A,R3
	RLC	A
	MOV	R3,A
	DJNZ	R6,DV51
	MOV	A,R4	￡???éá??è?
	ADD	A,R4
	JC	DV53
	SUBB	A,R7
	JC	DV54
DV53:	INC	R3
DV54:	CLR	OV
	RET

    ￡¨￡1￡?  ±êo?￡o  ￡?￡?￡3￡±    1|?ü￡oèy×??ú?t?????T·?o?êy3yò?μ￥×??ú?t????êy

è??úì??t￡o±?3yêy?úR3?￠R4?￠R5?D￡?3yêy?úR7?D?￡
3??úD??￠￡oOV=0 ê±￡???×??úéì?úR4?￠R5?D￡?OV=1 ê±ò?3??￡
ó°?ì×ê?′￡oPSW?￠A?￠B?￠R2??R7    ????Dè?ó￡o  ￡2×??ú

DV31:	CLR	C
	MOV	A,R3
	SUBB	A,R7
	JC	DV30
	SETB	OV	￡?éìò?3?
	RET
DV30:	MOV	R2,#10H	￡??óR3R4R5￡ˉR7￡-?úR4R5
DM23:	CLR	C
	MOV	A,R5
	RLC	A
	MOV	R5,A
	MOV	A,R4
	RLC	A
	MOV	R4,A
	MOV	A,R3
	RLC	A
	MOV	R3,A
	MOV	F0,C
	CLR	C
	SUBB	A,R7
	ANL	C,/F0
	JC	DM24
	MOV	R3,A
	INC	R5
DM24:	DJNZ	R2,DM23
	MOV	A,R3	￡???éá??è?
	ADD	A,R3
	JC	DM25
	SUBB	A,R7
	JC	DM26
DM25:	INC	R5
	MOV	A,R5
	JNZ	DM26

INC	R4
DM26:	CLR	OV
	RET             ￡?éì?úR4R5?D 


    ￡¨￡±￡°￡?  ±êo?￡o ￡í￡?￡ì￡ó    1|?ü￡o??×??ú?t????óD·?o?êy3?·¨￡¨21??￡?

è??úì??t￡o±?3?êy?úR2?￠R3?D￡?3?êy?úR6?￠R7?D?￡
3??úD??￠￡o3??y?úR2?￠R3?￠R4?￠R5?D?￡
ó°?ì×ê?′￡oPSW?￠A?￠B?￠R2??R7    ????Dè?ó￡o  ￡′×??ú

MULS:	MOV	R4,#0	￡???á?R4R5
	MOV	R5,#0
	LCALL	MDS	￡??????á1?μ?·?o?oíá???2ù×÷êyμ??????μ
	LCALL	MULD	￡?????á????????μμ?3??y
	SJMP	MDSE	￡?ó?21??±íê??á1?

    ￡¨￡±￡±￡?  ±êo?￡o  ￡?￡é￡?￡ó    1|?ü￡o??×??ú?t????óD·?o?êy3y·¨￡¨21??￡?

è??úì??t￡o±?3yêy?úR2?￠R3?￠R4?￠R5?D￡?3yêy?úR6?￠R7?D?￡
3??úD??￠￡oOV=0ê±éì?úR2?￠R3?D￡?OV=1ê±ò?3??￡
ó°?ì×ê?′￡oPSW?￠A?￠B?￠R1??R7    ????Dè?ó￡o  ￡μ×??ú

DIVS:	LCALL	MDS	￡??????á1?μ?·?o?oíá???2ù×÷êyμ??????μ
	PUSH	PSW	￡?±￡′??á1?μ?·?o?
	LCALL	DIVD	￡?????á????????μμ?éì
	JNB	OV,DVS1	￡?ò?3?·?￡?
	POP	ACC	￡?ò?3?￡?·?è￥?á1?μ?·?o?￡?±￡á?ò?3?±ê??
	RET
DVS1:	POP	PSW	￡??′ò?3?￡?è?3??á1?μ?·?o?
	MOV	R4,#0
	MOV	R5,#0
MDSE:	JB	F0,MDS2	￡?ó?21??±íê??á1?
	CLR	OV	￡??á1??a?y￡??-???′21??￡?????3é1|

RET
MDS:	CLR	F0	￡??á1?·?o?3?ê??ˉ
	MOV	A,R6	￡??D??μú?t2ù×÷êyμ?·?o?
	JNB	ACC.7,MDS1￡??a?y￡?2?±?′|àí
	CPL	F0	￡??a?o￡??á1?·?o?è?·′
	XCH	A,R7	￡?μú?t2ù×÷êyè?21￡?μ?μ????????μ
	CPL	A
	ADD	A,#1
	XCH	A,R7
	CPL	A
	ADDC	A,#0
	MOV	R6,A
MDS1:	MOV	A,R2	￡??D??μúò?2ù×÷êy?ò?????á1?μ?·?o?
	JNB	ACC.7,MDS3￡??a?y￡?2?±?′|àí
	CPL	F0	￡??a?o￡??á1?·?o?è?·′
MDS2:	MOV	A,R5	￡??óμúò?2ù×÷êyμ??????μ?ò?????á1?μ?21??
	CPL	A
	ADD	A,#1
	MOV	R5,A

MOV	A,R4
	CPL	A
	ADDC	A,#0
	MOV	R4,A
	MOV	A,R3
	CPL	A
	ADDC	A,#0
	MOV	R3,A
	MOV	A,R2
	CPL	A
	ADDC	A,#0
	MOV	R2,A
MDS3:	CLR	OV	￡?????3é1|
	RET

    ￡¨￡±￡2￡?  ±êo?￡o  ￡ó￡è￡2    1|?ü￡o??×??ú?t?????T·?o?êy?a??·?￡¨?ì?ù￡?