通达信缠论分笔主图公式
虽然不是很完美，但也是见到的比较好的一个了。分享给大家，有高手完善更好
顶:=BBI+3*STD(BBI,13),COLOR004AFF;
底:=BBI-3*STD(BBI,13),COLOR67FF00;
KU1:=IF(HIGH=HHV(HIGH,3),1,0);
KD1:=IF(LOW=LLV(LOW,3),1,0);
UL:=IF(REF(KU1,2)=1 AND REF(KU1,1)=0
AND KU1=0,REF(HIGH,2),REF(HIGH,2+BARSLAST(REF(KU1,2)=1
AND REF(KU1,1)=0 AND KU1=0)));
DL:=IF(REF(KD1,2)=1 AND REF(KD1,1)=0
AND KD1=0,REF(LOW,2),REF(LOW,2+BARSLAST(REF(KD1,2)=1
AND REF(KD1,1)=0 AND KD1=0)));
HV:=H UL AND H REF(H,1) ;
LV:=L DL AND L REF(L,1) ;
GP:=BARSLAST(HV);
DP:=BARSLAST(LV);
IP:=IF(GP=0,DP,GP)
HHV1:=HV AND IP AND H =HHV(H,BARSLAST(LV));
LV1:=LV AND IP AND L =LLV(L,BARSLAST(HV));
DRAWLINE(LV1,LOW,HHV1, HIGH,0),COLORYELLOW,LINETHICK1;
DRAWLINE(HHV1,HIGH,LV1, LOW,0),COLORMAGENTA,LINETHICK1;
{笔底分型 选股 预警 确保向下笔成立后的底分型}
V00:= HIGH REF(HIGH,1) AND LOW REF(LOW,1);
V01:= HIGH REF(HIGH,1) AND LOW REF(LOW,1);
V02:= HIGH REF(HIGH,1) AND LOW REF(LOW,1);
V03:= HIGH REF(HIGH,1) AND LOW REF(LOW,1);
V04:= REF(HIGH,2) HIGH AND REF(LOW,2) LOW
AND REF(HIGH,2) REF(HIGH,1) AND REF(LOW,2) REF(LOW,1);
V1:= COUNT(V00,6) =3 AND COUNT(V01 OR V02,5)=0 AND LLVBARS(LOW,6) = 1 AND HHVBARS(HIGH,6) = 5 AND V03;
V2:= COUNT(V00,7) =3 AND COUNT(V01 OR V02,6)=1 AND LLVBARS(LOW,7) = 2 AND HHVBARS(HIGH,7) = 6 AND V04;
V3:= COUNT(V00,7) =3 AND COUNT(V01 OR V02,6)=1 AND LLVBARS(LOW,7) = 1 AND HHVBARS(HIGH,7) = 6 AND V03;
V4:= COUNT(V00,8) =3 AND COUNT(V01 OR V02,7) =2 AND LLVBARS(LOW,8) = 2 AND HHVBARS(HIGH,8) = 7 AND V04;
V5:= COUNT(V00,8) =3 AND COUNT(V01 OR V02,7) =2 AND LLVBARS(LOW,8) = 1 AND HHVBARS(HIGH,8) = 7 AND V03;
V6:= COUNT(V00,9) =3 AND COUNT(V01 OR V02,8) =3 AND LLVBARS(LOW,9) = 2 AND HHVBARS(HIGH,9) = 8 AND V04;
V7:= COUNT(V00,9) =3 AND COUNT(V01 OR V02,8) =3 AND LLVBARS(LOW,9) = 1 AND HHVBARS(HIGH,9) = 8 AND V03;
V8:= COUNT(V00,10) =3 AND COUNT(V01 OR V02,9) =4 AND LLVBARS(LOW,10) = 2 AND HHVBARS(HIGH,10) = 9 AND V04;
V9:= COUNT(V00,10) =3 AND COUNT(V01 OR V02,9) =4 AND LLVBARS(LOW,10) = 1 AND HHVBARS(HIGH,10) = 9 AND V03;
V10:= COUNT(V00,11) =3 AND COUNT(V01 OR V02,10) =5 AND LLVBARS(LOW,11) = 2 AND HHVBARS(HIGH,11) = 10 AND V04;
XG:= V1 OR V2 OR V3 OR V4 OR V5 OR V6 OR V7 OR V8 OR V9 OR V10;
{笔顶分型 选股 预警 确保向上笔成立后的顶分型IN1.CC}
HV00:= HIGH REF(HIGH,1) AND LOW REF(LOW,1);
HV01:= HIGH REF(HIGH,1) AND LOW REF(LOW,1);
HV02:= HIGH REF(HIGH,1) AND LOW REF(LOW,1);
HV03:= HIGH REF(HIGH,1) AND LOW REF(LOW,1);
HV04:= REF(HIGH,2) HIGH AND REF(LOW,2) LOW AND REF(HIGH,2) REF(HIGH,1) AND REF(LOW,2) REF(LOW,1);
HV1:= COUNT(HV00,6) =3 AND COUNT(HV01 OR HV02,5)=0 AND HHVBARS(HIGH,6) = 1 AND LLVBARS(LOW,6) = 5 AND HV03;
HV2:= COUNT(HV00,7) =3 AND COUNT(HV01 OR HV02,6)=1 AND HHVBARS(HIGH,7) = 2 AND LLVBARS(LOW,7) = 6 AND HV04;
HV3:= COUNT(HV00,7) =3 AND COUNT(HV01 OR HV02,6)=1 AND HHVBARS(HIGH,7) = 1 AND LLVBARS(LOW,7) = 6 AND HV03;
HV4:= COUNT(HV00,8) =3 AND COUNT(HV01 OR HV02,7) =2 AND HHVBARS(HIGH,8) = 2 AND LLVBARS(LOW,8) = 7 AND HV04;
HV5:= COUNT(HV00,8) =3 AND COUNT(HV01 OR HV02,7) =2 AND HHVBARS(HIGH,8) = 1 AND LLVBARS(LOW,8) = 7 AND HV03;
HV6:= COUNT(HV00,9) =3 AND COUNT(HV01 OR HV02,8) =3 AND HHVBARS(HIGH,9) = 2 AND LLVBARS(LOW,9) = 8 AND HV04;
HV7:= COUNT(HV00,9) =3 AND COUNT(HV01 OR HV02,8) =3 AND HHVBARS(HIGH,9) = 1 AND LLVBARS(LOW,9) = 8 AND HV03;
HV8:= COUNT(HV00,10) =3 AND COUNT(HV01 OR HV02,9) =4 AND HHVBARS(HIGH,10) = 2 AND LLVBARS(LOW,10) = 9 AND HV04;
HV9:= COUNT(HV00,10) =3 AND COUNT(HV01 OR HV02,9) =4 AND HHVBARS(HIGH,10) = 1 AND LLVBARS(LOW,10) = 9 AND HV03;
HV10:= COUNT(HV00,11) =3 AND COUNT(HV01 OR HV02,10) =5 AND HHVBARS(HIGH,11) = 2 AND LLVBARS(LOW,11) = 10 AND HV04;
HXG:=HV1 OR HV2 OR HV3 OR HV4 OR HV5 OR HV6 OR HV7 OR HV8 OR HV9 OR HV10;
