psubwi.asm

来自「web51的开发库」· 汇编 代码 · 共 25 行

; P-Code Aritmetic Library (c)Copyright 2000, 2001, Radek Benedikt
;	[e-mail], http://benedikt.lphard.cz

	.global	psubwi
	.text
;
; *** PSUBWI *** SUB word (cpu IDATA mem), with WORD constant  ***
; psubwi buffer_addr, wordconst
;	R7,	R4R5
psubwi:	MOV     A,R7
	MOV	R0,A
	INC	R0
	CLR	C
	MOV	A,@R0
	SUBB	A,R5
	MOV	@R0,A
	DEC	R0
	MOV	A,@R0
	SUBB	A,R4
	MOV	@R0,A
	mov	cflag,C
	RET
	;; END