CLR R0
	MOV# 1, R1
	MOV R1, R2
	MOV X, R3
LOOP:	BIT R1, R3
	BEQ NOPE
	INC R0
NOPE:	LSHL 1, R1
	TST R1
	BNE LOOP
	HALT

X:	.WORD 124