;2019/12/4
KI0303	START
	RPUSH
	LAD	GR1,#ABCD
;論理シフト
	SLL	GR1,4		;#BCD0
	SRL	GR1,8		;#00BC
	SLL	GR1,4		;#0BC0
;算術シフト
	LAD	GR1,#ABCD
	SLA	GR1,4		;#BCD0(1011…)
	SRA	GR1,8		;#FFBC(11111111…)
	SLA	GR1,4		;#FBC0
	RPOP
	RET
	END