54_a_paulfellows
There's a programmable infra-red sensor and some magnetics ones and key-fob and so forth and you can do it really well.
( (IP-MAT (ILYR (ILYR (EX There;{there})
(BEP;_ex_V_ <apos>s;{be})
(NP-ESBJ (NLYR (NLYR (D a;{a})
(ADJP (ADJ programmable;{programmable}))
(ADJP (ADJ infra_<hyphen>_red;{infra_red}))
(N sensor;{sensor}))
(CONJP (CONJ and;{and})
(NLYR (D some;{some})
(NLYR (NLYR (NS magnetics;{magnetics})
(NS ones;{one}))
(CONJP (CONJ and;{and})
(NLYR (NS key_<hyphen>_fob;{key_fob}))))))
(CONJP (CONJ and;{and})
(NLYR (ADVP (ADVP (ADV so;{so}))
(ADV forth;{forth})))))))
(CONJP (CONJ and;{and})
(ILYR (NP-SBJ (PRO you;{you}))
(MD;_cat_Vi_ can;{can})
(IP-INF-CAT (DO;_Tn_ do;{do})
(NP-OB1 (PRO it;{it}))
(ADVP-NIM (ADVP (ADV really;{really}))
(ADV well;{well}))))))
(PUNC .))
(ID 54_a_paulfellows))
arc(r_0054_0002___apos_s,r_0054_0007__and_r_0054_0013__and,arg0).
arc(r_0054_0003__a_r_0054_0006__sensor,r_0054_0004__programmable,attrib).
arc(r_0054_0003__a_r_0054_0006__sensor,r_0054_0005__infra__hyphen__red,attrib).
arc(r_0054_0007__and_r_0054_0013__and,r_0054_0003__a_r_0054_0006__sensor,conj1).
arc(r_0054_0007__and_r_0054_0013__and,r_0054_0008__some_r_0054_0009__magnetics_r_0054_0010__ones_r_0054_0011__and_r_0054_0012__key__hyphen__fob,conj2).
arc(r_0054_0007__and_r_0054_0013__and,z_0054_5009,conj3).
arc(r_0054_0015__forth,r_0054_0014__so,qual).
arc(r_0054_0016__and,r_0054_0002___apos_s,conj1).
arc(r_0054_0016__and,r_0054_0018__can,conj2).
arc(r_0054_0018__can,r_0054_0019__do,scope).
arc(r_0054_0019__do,r_0054_0017__you,arg0).
arc(r_0054_0019__do,r_0054_0020__it,arg1).
arc(r_0054_0019__do,r_0054_0022__well,nim).
arc(r_0054_0022__well,r_0054_0021__really,qual).
arc(z_0054_5009,r_0054_0015__forth,qual).
fof(formula,axiom,
? [R_0054_0004__PROGRAMMABLE,R_0054_0005__INFRA__HYPHEN__RED,R_0054_0003__A_R_0054_0006__SENSOR,R_0054_0008__SOME_R_0054_0009__MAGNETICS_R_0054_0010__ONES_R_0054_0011__AND_R_0054_0012__KEY__HYPHEN__FOB,R_0054_0014__SO,R_0054_0015__FORTH,Z_0054_5009,R_0054_0007__AND_R_0054_0013__AND,R_0054_0002___APOS_S,R_0054_0017__YOU,R_0054_0020__IT,R_0054_0021__REALLY,R_0054_0022__WELL,R_0054_0018__CAN_R_0054_0019__DO,R_0054_0016__AND] :
( r_0054_0004__programmable(R_0054_0004__PROGRAMMABLE)
& r_0054_0005__infra__hyphen__red(R_0054_0005__INFRA__HYPHEN__RED)
& r_0054_0008__some_r_0054_0009__magnetics_r_0054_0010__ones_r_0054_0011__and_r_0054_0012__key__hyphen__fob(R_0054_0008__SOME_R_0054_0009__MAGNETICS_R_0054_0010__ONES_R_0054_0011__AND_R_0054_0012__KEY__HYPHEN__FOB)
& r_0054_0014__so(R_0054_0014__SO)
& r_0054_0017__you(R_0054_0017__YOU)
& r_0054_0020__it(R_0054_0020__IT)
& r_0054_0021__really(R_0054_0021__REALLY)
& r_0054_0016__and(R_0054_0016__AND)
& has_conj2(R_0054_0016__AND,R_0054_0018__CAN_R_0054_0019__DO)
& r_0054_0018__can_r_0054_0019__do(R_0054_0018__CAN_R_0054_0019__DO)
& has_nim(R_0054_0018__CAN_R_0054_0019__DO,R_0054_0022__WELL)
& r_0054_0022__well(R_0054_0022__WELL)
& has_qual(R_0054_0022__WELL,R_0054_0021__REALLY)
& has_arg1(R_0054_0018__CAN_R_0054_0019__DO,R_0054_0020__IT)
& has_arg0(R_0054_0018__CAN_R_0054_0019__DO,R_0054_0017__YOU)
& has_conj1(R_0054_0016__AND,R_0054_0002___APOS_S)
& r_0054_0002___apos_s(R_0054_0002___APOS_S)
& has_arg0(R_0054_0002___APOS_S,R_0054_0007__AND_R_0054_0013__AND)
& r_0054_0007__and_r_0054_0013__and(R_0054_0007__AND_R_0054_0013__AND)
& has_conj3(R_0054_0007__AND_R_0054_0013__AND,Z_0054_5009)
& z_0054_5009(Z_0054_5009)
& has_qual(Z_0054_5009,R_0054_0015__FORTH)
& r_0054_0015__forth(R_0054_0015__FORTH)
& has_qual(R_0054_0015__FORTH,R_0054_0014__SO)
& has_conj2(R_0054_0007__AND_R_0054_0013__AND,R_0054_0008__SOME_R_0054_0009__MAGNETICS_R_0054_0010__ONES_R_0054_0011__AND_R_0054_0012__KEY__HYPHEN__FOB)
& has_conj1(R_0054_0007__AND_R_0054_0013__AND,R_0054_0003__A_R_0054_0006__SENSOR)
& r_0054_0003__a_r_0054_0006__sensor(R_0054_0003__A_R_0054_0006__SENSOR)
& has_attrib(R_0054_0003__A_R_0054_0006__SENSOR,R_0054_0005__INFRA__HYPHEN__RED)
& has_attrib(R_0054_0003__A_R_0054_0006__SENSOR,R_0054_0004__PROGRAMMABLE) ) ).