NEGDATA EQU     40H
NEGCOUNT        EQU     8
NEG:    MOV     A,#NEGCOUNT    ;取（字節(jié)數(shù)減一）至R2中
        DEC     A
        MOV     R6,A
        MOV     R0,#NEGDATA
NEGLOP: CLR   	C	
      	MOV	A,#99H
        SUBB	A,@R0		;按字節(jié)十進(jìn)制取補(bǔ)
        MOV	@R0,A		;存回[R0]中
        INC  	R0		;調(diào)整數(shù)據(jù)指針
        DJNZ    R6,NEGLOP       ;處理完（R6）字節(jié)
        MOV	A,#9AH		;最低字節(jié)單獨(dú)取補(bǔ)
        SUBB	A,@R0
        MOV	@R0,A
	SJMP   $
	RET
	END