求写1个通用公式

zhqh1607452

老师好！我有1个文华公式效果不错，很想用TB来实现交易，恳请老师帮写：
C1:=VALUEWHEN(DATE<>REF(DATE,1),REF(C,1));
H1:=VALUEWHEN(DATE<>REF(DATE,1),REF(H,1));
L1:=VALUEWHEN(DATE<>REF(DATE,1),REF(L,1));
CF:=MAX((H1-C1),(C1-L1))*3;
O1:=VALUEWHEN(DATE<>REF(DATE,1),O);
C>O1+CF,BPK;
C<O1-CF,SPK;
AUTOFILTER;
谢谢！