新发：向上笔成立后的顶分型预警公式源码

应大家要求，再写一个向上笔成立后的顶分型预警公式，供做中线的朋友参考。4个软件都测试通过了。下面完整的源码是大智慧L2的，飞狐也可以用，不用改。但通达信和同花顺要把最后一句替换，否则编译不了。这是不同软件有一些函数不兼容造成的，一定要换!

补充说明一下：下面回帖有朋友可能放错类了。预警公式就是选股公式，新建公式时要选新建选股公式，这样在选股时就不会出现XG取值范围的问题了。注意：用作选股时，一定要把时间限制去掉，否则早上9:25前选不出股票来，晚上24:00前可以。



{笔顶分型 选股 预警 确保向上笔成立后的顶分型}
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 HHVBARS(HIGH,6) = 1 AND LLVBARS(LOW,6) >= 5 AND V03;
V2:= COUNT(V00,7)>=3 AND COUNT(V01 OR V02,6)=1 AND HHVBARS(HIGH,7) = 2 AND LLVBARS(LOW,7) >= 6 AND V04;
V3:= COUNT(V00,7)>=3 AND COUNT(V01 OR V02,6)=1 AND HHVBARS(HIGH,7) = 1 AND LLVBARS(LOW,7) >= 6 AND V03;
V4:= COUNT(V00,8)>=3 AND COUNT(V01 OR V02,7)<=2 AND HHVBARS(HIGH,8) = 2 AND LLVBARS(LOW,8) >= 7 AND V04;
V5:= COUNT(V00,8)>=3 AND COUNT(V01 OR V02,7)<=2 AND HHVBARS(HIGH,8) = 1 AND LLVBARS(LOW,8) >= 7 AND V03;
V6:= COUNT(V00,9)>=3 AND COUNT(V01 OR V02,8)<=3 AND HHVBARS(HIGH,9) = 2 AND LLVBARS(LOW,9) >= 8 AND V04;
V7:= COUNT(V00,9)>=3 AND COUNT(V01 OR V02,8)<=3 AND HHVBARS(HIGH,9) = 1 AND LLVBARS(LOW,9) >= 8 AND V03;
V8:= COUNT(V00,10)>=3 AND COUNT(V01 OR V02,9)<=4 AND HHVBARS(HIGH,10) = 2 AND LLVBARS(LOW,10) >= 9 AND V04;
V9:= COUNT(V00,10)>=3 AND COUNT(V01 OR V02,9)<=4 AND HHVBARS(HIGH,10) = 1 AND LLVBARS(LOW,10) >= 9 AND V03;
V10:= COUNT(V00,11)>=3 AND COUNT(V01 OR V02,10)<=5 AND HHVBARS(HIGH,11) = 2 AND LLVBARS(LOW,11) >= 10 AND V04;
XG:CURRENTTIME>092530 AND (V1 OR V2 OR V3 OR V4 OR V5 OR V6 OR V7 OR V8 OR V9 OR V10) AND STRFIND(stkname,'ST',1)=0 AND STRFIND(stkname,'S',1)=0 AND DYNAINFO(4)<>0;



通达信换成：XG: V1 OR V2 OR V3 OR V4 OR V5 OR V6 OR V7 OR V8 OR V9 OR V10;



同花顺换成：XG: (V1 OR V2 OR V3 OR V4 OR V5 OR V6 OR V7 OR V8 OR V9 OR V10) AND STRFIND(stkname,'ST',1)=0 AND STRFIND(stkname,'S',1)=0;



动态翻译：

V00赋值: 最高价>昨日最高价 AND 最低价>昨日最低价
V01赋值: 最高价<昨日最高价 AND 最低价>昨日最低价
V02赋值: 最高价>昨日最高价 AND 最低价<昨日最低价
V03赋值: 最高价<昨日最高价 AND 最低价<昨日最低价
V04赋值: 2日前的最高价 > 最高价 AND 2日前的最低价 > 最低价 AND 2日前的最高价 > 昨日最高价 AND 2日前的最低价 < 昨日最低价
V1赋值: 统计6日中满足V00的天数>=3 AND 统计5日中满足V01ORV02的天数=0 AND 6日内最高价距今天数 = 1 AND 6日内最低价距今天数 >= 5 AND V03
V2赋值: 统计7日中满足V00的天数>=3 AND 统计6日中满足V01ORV02的天数=1 AND 7日内最高价距今天数 = 2 AND 7日内最低价距今天数 >= 6 AND V04
V3赋值: 统计7日中满足V00的天数>=3 AND 统计6日中满足V01ORV02的天数=1 AND 7日内最高价距今天数 = 1 AND 7日内最低价距今天数 >= 6 AND V03
V4赋值: 统计8日中满足V00的天数>=3 AND 统计7日中满足V01ORV02的天数<=2 AND 8日内最高价距今天数 = 2 AND 8日内最低价距今天数 >= 7 AND V04
V5赋值: 统计8日中满足V00的天数>=3 AND 统计7日中满足V01ORV02的天数<=2 AND 8日内最高价距今天数 = 1 AND 8日内最低价距今天数 >= 7 AND V03
V6赋值: 统计9日中满足V00的天数>=3 AND 统计8日中满足V01ORV02的天数<=3 AND 9日内最高价距今天数 = 2 AND 9日内最低价距今天数 >= 8 AND V04
V7赋值: 统计9日中满足V00的天数>=3 AND 统计8日中满足V01ORV02的天数<=3 AND 9日内最高价距今天数 = 1 AND 9日内最低价距今天数 >= 8 AND V03
V8赋值: 统计10日中满足V00的天数>=3 AND 统计9日中满足V01ORV02的天数<=4 AND 10日内最高价距今天数 = 2 AND 10日内最低价距今天数 >= 9 AND V04
V9赋值: 统计10日中满足V00的天数>=3 AND 统计9日中满足V01ORV02的天数<=4 AND 10日内最高价距今天数 = 1 AND 10日内最低价距今天数 >= 9 AND V03
V10赋值: 统计11日中满足V00的天数>=3 AND 统计10日中满足V01ORV02的天数<=5 AND 11日内最高价距今天数 = 2 AND 11日内最低价距今天数 >= 10 AND V04
输出XG:V1 OR V2 OR V3 OR V4 OR V5 OR V6 OR V7 OR V8 OR V9 OR V10

    CURRENTTIME>092530是限制预警时间在9:25:30集合竞价以后。做为选股公式用时在这个时间之前也选不出来。这个函数只有大智慧和飞狐认。其他两个软件不认，所以必须去掉。

    STRFIND(stkname,'ST',1)=0 AND STRFIND(stkname,'S',1)=0是去ST板块的，喜欢做ST板块的可以去掉。

    DYNAINFO(4)<>0是去当日停牌的的。可惜通达信和同花顺不认。