crc16子程序

MIDI文件格式0的解析原代码

; CRC16校验
; 第一次调用必须将MCRCL=0FFH MCRCH=0FFH
; 输入一个校验数与上次的CRC校验值校验出新的CRC值
; 入口参数 MCRCDAT需要校验的数 MCRCL、MCRCH上次校验的值
; 输出参数 MCRCH 、MCRCL 新的CRC值
MCRC16:
	MOV R7,#8
	MOV A,MCRCL
	XRL A,MCRCDAT
	MOV MCRCL,A
MCRCLOP:
	CLR C
	MOV A,MCRCH
	RRC A
	MOV MCRCH,A
	MOV A,MCRCL
	RRC A
	MOV MCRCL,A
	JC MNEXT	
	DJNZ R7,MCRCLOP
	RET
MNEXT:
	MOV A,MCRCH
	XRL A,#0A0H
	MOV MCRCH,A
	MOV A,MCRCL
	XRL A,#01
	MOV MCRCL,A
	DJNZ R7,MCRCLOP
	RET