AHUNDS:
  MOV A, R0
  FZERO:
	CJNE A, #0, FONE
	MOV R3, #ZERO
        sjmp F_RET
  FONE:
    CJNE A, #1, FTWO
	MOV R3, #ONE
        sjmp F_RET
  FTWO:
	MOV R3, #TWO
F_RET:
        RET