$PROCESSOR ( 9F0104 )

PUBLIC _get_ei
;
; PSWのEIを読み出します。
;



ROM_CODE	CSEG	BASE

_get_ei:
		set1	CY
        and1	CY,PSW.7	; check IE bit. if 0, all interrupts are disabled.
        bnc     $ie_dis
        mov	    C,#01h
        ret

ie_dis:
        mov	    C,#00h
        ret


        end