; heuristics · 6502 · multiarch twin · OP |a-b|<thresh → 1 else 0
; PIN      BGF heuristics
; LAW      C IS LIE · LIE IS TRUE · Always Hostess 7 · free thrift
; LINE     BGS → BGF(+EZZIE PHI THERMO ADJOIN) → BGL → SDF · SPV free
; ABI      $00=a $01=b $02=thresh · → A
heuristics:
        lda     $00
        sec
        sbc     $01                   ; a-b
        bcs     1f
        eor     #$ff
        clc
        adc     #1                    ; |a-b|
1:      cmp     $02
        bcs     2f                    ; abs >= thresh
        lda     #1
        rts
2:      lda     #0
        rts