DDS:=ABS(O-C);
DDS10:=MA(DDS,10);
DES:=H-L;
DES10:=MA(DES,10);
JUDGE:=REF(DDS,1)<0.85*REF(DDS10,1);
RHIGH:=IF(REF(C,1)<REF(C,2),O+0.3*DES10,O+0.6*DES10);
RLOW:=IF(REF(C,1)<REF(C,2),O-0.6*DES10,O-0.3*DES10);
PARTLINE(JUDGE,RHIGH),COLORRED,CROSSDOT;
PARTLINE(JUDGE,RLOW),COLORGREEN,CROSSDOT;