FCB 130 ;  .489
FCB 138 ;  .519
FCB 142 ;  .534
FCB 142 ;  .534
FCB 138 ;  .519
FCB 134 ;  .504
FCB 122 ;  .459
FCB 120 ;  .451
FCB 118 ;  .444

LC9B7	LDAA	L0071			;MAP 
	LSRA 				;/2 for lookup
	LDX	#$84B4 			;mean rich/lean o2 table vs. map
	JSR	LE3D0 			;2d lookup
	SUBA	$00F6			;subtract offset
	BRCLR	L003E,#4,LC9C9		;Bra if not idling?
;
	LDAA	$8496			;Mean r/l O2 threshold for idling
;
LC9C9	BRSET	L003F,#2,LC9D0		;Bra if air
	SUBA	$849D			;O2 offset when air diverted
LC9D0	PSHA				;Push r/l threshold to stack
;
;-Check O2 window for closed loop
;
	LDD	$848F			;Load O2 window boundries into AB
;
; A = UPPER LIM FOR CLS TO OPN LP
; B = LOWER LIM FOR CLS TO OPN LP
;
	CMPA	L008E			;Compare upper bound to filtered O2
	BCS	LC9DC			;Bra if O2 >, O2 outside of window
;
	CMPB	L008E			;Compare lower bound to filtered O2
	BLS	LC9E2			;Bra if O2 > lower bound
;
;-Here if O2 isnt dwelling within window, O2 is working properly
;
LC9DC	CLR	L00DE			;Clear O2 dwell timer, O2 working properly
	BSET	L0001,#$01		; SET o2 SENSOR ACTIVE
;
;-check short term direction of O2
;
LC9E2	PULA				;Get r/l threshold back
	PSHA				;Push back to stack for later
	LDAB	$849C			;Hyst. for r/l
	ABA				;Add it in
	CMPA	L008E			;Compare to filtered O2
	PULA				;Get r/l threshold back
	BCS	LC9FE			;Bra if O2 was >, going richer
;
	SBA				;Subtract hyst.
	CMPA	L008E			;Compate to filtered O2	
	BHI	LC9F8			;Bra if O2 <, going leaner
;
;-O2 neither richer or leaner, check direction of O2
;
	LDAA	L008E			;filtered O2
	CMPA	L00EA			;filtered O2, one delayed
	BHI	LC9FE			;Bra if current O2 >, going richer
;
;-Going leaner here
;
LC9F8	LDAB	L0047			;Status word
	ANDB	#$BF			;Clear b6, going leaner
	BRA	LCA02			;Bra to continue
;
;-Going richer here
;
LC9FE	LDAB	L0047			;Status word
	ORAB	#$40			;Set b6, going richer