movf	REGB, w			; wレジスタにREGBを代入
	subwf	REGA, w			; REGAからwレジスタを引く
	addwf	REGC, w			; wレジスタにREGCを足す
	addwf	REGD, w			; wレジスタにREGDを足す

リスト2-5     Copyright 2005 Noriaki Mitsunaga