代码

#include<p16f877.inc>

X	equ 0x20

	org  0x000
	goto main
	org 0x020
main
	;MOVLW	0x55
	MOVLW	0x54
	movwf	X
	CALL	EVEN
	GOTO	$

EVEN
	swapf	X,w
	xorwf	X,f
	rrf		X,w
	xorwf	X,f
	btfsc	X,2
	INCF	X,f
	clrc
	btfsc	X,0
	SETC
	RETURN
END	

效果图

*博客内容为网友个人发布，仅代表博主个人观点，如有侵权请联系工作人员删除。