BEGIN:  INP R7,2 //Read M
        INP R6,2 //Read Q
TEST1:	MOV R2,R6
	MOD R2,#2//Q[0]
	CMP R2,#0//Q[0]==0
	BEQ RSHIFT
	ADD R4,R4,R7//A=A+M
	LSR R1,R7,#7//M[7]
	MUL R2,R2,R1//Q0*M7
	ADD R3,R3,R2//F=F+
RSHIFT: //shiftare
	LSL R2,R3,#7
	LSR R1,R4,#1
	ADD R4,R1,R2
	LSR R2,R4,#7
	AND R1,R6,#254
	ADD R6,R1,R2
	CMP R5,#1//COUNT==1
	BEQ TEST2
	ADD R5,#1//COUNT++
	BRA TEST1
TEST2:  MOV R2, R6
	MOD R2,#2//Q[0]
	CMP R2,#0//Q[0]==0
	BEQ OUTPUT
	SUB R4,R4,R7//A=A-M
	AND R6,#254
OUTPUT: OUT R4,4
	OUT R7,4

THEEND    HLT