一。主图指标 1.加权平均线 持股线:EMA(CLOSE,13),COLORRED,LINETHICK2; 生命线:EMA(CLOSE,25),COLORYELLOW; 中期线:EMA(CLOSE,55),COLOR0099FF; 半年线:EMA(CLOSE,144),COLORWHITE; 年线:EMA(CLOSE,255); 2.中期调整幅度 X:=CONST(HHV(HIGH,120)); X2:=HHVBARS(H,120)+1; X3:=CONST(LLV(LOW,X2)); X4:=X3/X;X5:=X4*100-100;DRAWNUMBER(L=X3,X3,X5); 调整幅度 :X5,NODRAW;IF(X5<=-30,X5,DRAWNULL),NODRAW,COLORRED; C2:=REF(C,1); 3.偏离持股线幅度 偏离持股线%:(C-EMA(C,13))/EMA(C,13)*100,NODRAW; 4.口袋支点(主图笑脸图标显示口袋支点)
MM9:=BARSCOUNT(C); MM1:=IF(MM9<13,MA(C,MM9),MA(C,13)); MM2:=IF(MM9<55,MA(C,MM9),MA(C,55)); MM3:=IF(MM9<144,MA(C,MM9),MA(C,144)); MM4:=REF(MM3,1); MM5:=IF(MM9<20,MA(C,MM9),MA(C,20)); MM6:=REF(MM5,1); MM7:=(H+L)/2; MM8:=IF(MM9<200,MA(C,MM9),MA(C,200)); LL250:=IF(MM9<250,LLV(LOW,0),LLV(LOW,250)); HH120:=IF(MM9<144,HHV(HIGH,0),HHV(HIGH,144)); XX1:=IF(C<REF(C,1),V,0); {标准口袋支点} DRAWICON(BARSSINCEN((C-REF(C,1))/REF(C,1)>=0.02AND VOL>REF(HHV(XX1,10),1) AND(VOL/REF(VOL,1)>1.20) AND MM3>=MM4 ANDMM5>=MM6 AND C>MM5 AND C>MM1 AND C>MM2 AND C>MM3 AND C>MM8AND C>MM7 AND C>LL250*1.2 AND C>(HH120*0.85),30)=0,LOW,5); 5.净利润断层(主图十字星图标显示净利润断层) {业绩断层} 高开缺口 := LOW>REF(HIGH,1) ORCLOSE/REF(CLOSE,1)>1.08; {高开缺口 :=LOW>REF(HIGH,1);} 当前日期 := DATE-1000000; SV := -1; EV := IF(WEEKDAY=1,3,2);
{业绩预告} 预告下限 := FINVALUE(285); 预告上限 := FINVALUE(286); 预告中值 := (预告上限+预告下限)/2; 预告日期 := FINVALUE(313); 预告日期差 := (当前日期-预告日期>SV) AND (当前日期-预告日期<EV); 预告断层 := (预告中值>0)AND 高开缺口 AND 预告日期差; {业绩快报} 快报净利润 := FINVALUE(287); 快报日期 := FINVALUE(315); 快报日期差 := (当前日期-快报日期>SV) AND (当前日期-快报日期<EV); 快报断层 := (快报净利润>0)AND 高开缺口 AND 快报日期差; {财报} 财报净利润 := FINVALUE(95); EPSRATE := FINVALUE(184); 财报日期 := FINVALUE(314); 财报日期差 := (当前日期-财报日期>SV) AND (当前日期-财报日期<EV); 财报断层 := 财报净利润 >0 AND EPSRATE > 0 AND 高开缺口 AND 财报日期差; {最近日期断层} 最近日期断层 := 预告断层 OR 快报断层 OR 财报断层;
{指定日期1} 指定日期1 := 1; {指定日期1业绩预告} 指预告上限1 := FINONE(285,0,指定日期1); 指预告下限1 := FINONE(286,0,指定日期1); 指预告中值1 := (指预告上限1+指预告下限1)/2; 指预告日期1 := FINONE(313,0,指定日期1); 指预告日期差1 := (当前日期-指预告日期1>SV) AND (当前日期-指预告日期1<EV); 指预告断层1 := (指预告中值1>0)AND 高开缺口 AND 指预告日期差1; {指定日期1业绩快报} 指快报净利润1 := FINONE(287,0,指定日期1); 指快报日期1 := FINONE(315,0,指定日期1); 指快报日期差1 := (当前日期-指快报日期1>SV) AND (当前日期-指快报日期1<EV); 指快报断层1 := (指快报净利润1>0)AND 高开缺口 AND 指快报日期差1; {指定日期1财报} 指财报净利润1 := FINONE(95,0,指定日期1); 指EPSRATE1 := FINONE(184,0,指定日期1); 指财报日期1 := FINONE(314,0,指定日期1); 指财报日期差1 := (当前日期-指财报日期1>SV) AND (当前日期-指财报日期1<EV); 指财报断层1 := 指财报净利润1> 0 AND 指EPSRATE1 > 0 AND 高开缺口 AND 指财报日期差1; {指定日期1断层} 指定日期1断层 := 指预告断层1 OR 指快报断层1 OR 指财报断层1;
{指定日期2} 指定日期2 := 2; {指定日期2业绩预告} 指预告上限2 := FINONE(285,0,指定日期2); 指预告下限2 := FINONE(286,0,指定日期2); 指预告中值2 := (指预告上限2+指预告下限2)/2; 指预告日期2 := FINONE(313,0,指定日期2); 指预告日期差2 := (当前日期-指预告日期2>SV) AND (当前日期-指预告日期2<EV); 指预告断层2 := (指预告中值2>0)AND 高开缺口 AND 指预告日期差2; {指定日期2业绩快报} 指快报净利润2 := FINONE(287,0,指定日期2); 指快报日期2 := FINONE(315,0,指定日期2); 指快报日期差2 := (当前日期-指快报日期2>SV) AND (当前日期-指快报日期2<EV); 指快报断层2 := (指快报净利润2>0)AND 高开缺口 AND 指快报日期差2; {指定日期2财报} 指财报净利润2 := FINONE(95,0,指定日期2); 指EPSRATE2 := FINONE(184,0,指定日期2); 指财报日期2 := FINONE(314,0,指定日期2); 指财报日期差2 := (当前日期-指财报日期2>SV) AND (当前日期-指财报日期2<EV); 指财报断层2 := 指财报净利润2> 0 AND 指EPSRATE2 > 0 AND 高开缺口 AND 指财报日期差2; {指定日期2断层} 指定日期2断层 := 指预告断层2 OR 指快报断层2 OR 指财报断层2;
{指定日期3} 指定日期3 := 3; {指定日期3业绩预告} 指预告上限3 := FINONE(285,0,指定日期3); 指预告下限3 := FINONE(286,0,指定日期3); 指预告中值3 := (指预告上限3+指预告下限3)/2; 指预告日期3 := FINONE(313,0,指定日期3); 指预告日期差3 := (当前日期-指预告日期3>SV) AND (当前日期-指预告日期3<EV); 指预告断层3 := (指预告中值3>0)AND 高开缺口 AND 指预告日期差3; {指定日期3业绩快报} 指快报净利润3 := FINONE(287,0,指定日期3); 指快报日期3 := FINONE(315,0,指定日期3); 指快报日期差3 := (当前日期-指快报日期3>SV) AND (当前日期-指快报日期3<EV); 指快报断层3 := (指快报净利润3>0)AND 高开缺口 AND 指快报日期差3; {指定日期3财报} 指财报净利润3 := FINONE(95,0,指定日期3); 指EPSRATE3 := FINONE(184,0,指定日期3); 指财报日期3 := FINONE(314,0,指定日期3); 指财报日期差3 := (当前日期-指财报日期3>SV) AND (当前日期-指财报日期3<EV); 指财报断层3 := 指财报净利润3> 0 AND 指EPSRATE3 > 0 AND 高开缺口 AND 指财报日期差3; {指定日期3断层} 指定日期3断层 := 指预告断层3 OR 指快报断层3 OR 指财报断层3;
{指定日期4} 指定日期4 := 4; {指定日期4业绩预告} 指预告上限4 := FINONE(285,0,指定日期4); 指预告下限4 := FINONE(286,0,指定日期4); 指预告中值4 := (指预告上限4+指预告下限4)/2; 指预告日期4 := FINONE(313,0,指定日期4); 指预告日期差4 := (当前日期-指预告日期4>SV) AND (当前日期-指预告日期4<EV); 指预告断层4 := (指预告中值4>0)AND 高开缺口 AND 指预告日期差4; {指定日期4业绩快报} 指快报净利润4 := FINONE(287,0,指定日期4); 指快报日期4 := FINONE(315,0,指定日期4); 指快报日期差4 := (当前日期-指快报日期4>SV) AND (当前日期-指快报日期4<EV); 指快报断层4 := (指快报净利润4>0)AND 高开缺口 AND 指快报日期差4; {指定日期4财报} 指财报净利润4 := FINONE(95,0,指定日期4); 指EPSRATE4 := FINONE(184,0,指定日期4); 指财报日期4 := FINONE(314,0,指定日期4); 指财报日期差4 := (当前日期-指财报日期4>SV) AND (当前日期-指财报日期4<EV); 指财报断层4 := 指财报净利润4> 0 AND 指EPSRATE4 > 0 AND 高开缺口 AND 指财报日期差4; {指定日期4断层} 指定日期4断层 := 指预告断层4 OR 指快报断层4 OR 指财报断层4;
净利润断层 := 最近日期断层 OR 指定日期1断层 OR 指定日期2断层 OR 指定日期3断层 OR 指定日期4断层; DRAWICON(BARSSINCEN(净利润断层,5)=0,L,23);{画十字 }; 6.主图捡钱信号 {捡钱10} ZZ:=EXTDATA_USER(6,0); RPS20:=ZZ/10; DD:=IF(RPS20<=90,0,1); A1:=C/EMA(C,255)>1; NH1:=IF(H<HHV(H,20),0,1); B1:=COUNT(NH1,30); NN1:=IF(C>EMA(C,255),1,0); AA1:=COUNT(NN1,30); AB1:=HIGH/HHV(HIGH,120)>0.9; DRAWICON(BARSSINCEN(( A1 AND AA1>2 AND AB1 AND DD AND C<EMA(C,13)),30)=0,LOW,9) {捡钱20} ZZ1:=EXTDATA_USER(3,0); RPSC50:=ZZ1/10; DD1:=IF(RPSC50<=85,0,1); AC1:=C/EMA(C,255)>1; NHC1:=IF(H<HHV(H,20),0,1); BC1:=COUNT(NHC1,30); NNC1:=IF(C>EMA(C,255),1,0); AAC1:=COUNT(NNC1,30); ABC1:=HIGH/HHV(HIGH,120)>0.9; DRAWICON(BARSSINCEN(( AC1 AND AAC1>2 AND ABC1 AND DD1 AND C<EMA(C,25)),30)=0,LOW,26); 二。附图指标
1.接近一年新高(包括首次) VAR2:CLOSE/HHV(HIGH,250)>0.85; BARSSINCEN(VAR2,30)=0; 2.一年新高(包括首次) VAR2:IF(H<HHV(H,255),0,1); BARSSINCEN(VAR2,30)=0; 3.港资持股 NOTEXT曲线: GPJYVALUE(6,1,1),COLORFFFF00; IF((GPJYVALUE(6,1,1)/FINANCE(7))>0.01,NOTEXT曲线,DRAWNULL),LINETHICK1,COLORRED; IF((GPJYVALUE(6,1,1)/FINANCE(7))=0,NOTEXT曲线,DRAWNULL),LINETHICK1,COLORWHITE; IF((GPJYVALUE(6,1,1)/FINANCE(7))>0 AND(GPJYVALUE(6,1,1)/FINANCE(7))<0.01,NOTEXT曲线,DRAWNULL),LINETHICK1,COLORCYAN; 持股量:GPJYVALUE(6,1,1)/10000,COLORLIBLUE; 万股:DRAWNULL; 占流通比:(GPJYVALUE(6,1,1)/FINANCE(7))*100,NODRAW; 占总股比:(GPJYVALUE(6,1,1)/FINANCE(1))*100,NODRAW; 增减万股:(GPJYVALUE(6,1,1)-REF(GPJYVALUE(6,1,1),1))/10000; 增减:=GPJYVALUE(6,1,1)-REF(GPJYVALUE(6,1,1),1); IF(增减<0,增减,DRAWNULL),STICK,LINETHICK4,COLORCYAN; IF(增减=0,增减,DRAWNULL),STICK,LINETHICK4,COLORWHITE; IF(增减>0,增减,DRAWNULL),STICK,LINETHICK4,COLORRED; 4.港资增资 N 1 250 60 (GPJYVALUE(6,1,1)-REF(GPJYVALUE(6,1,1),N))>0; 5.个股温斯坦强度(个股附图) N:=120; K:=1; VAR1:=LLV( LOW,N); VAR2:=HHV(HIGH , N); SD:=100*(CLOSE-VAR1)/(VAR2-VAR1); 个股MSD:MA(SD,K),COLORWHITE; {DRAWTEXT(CURRBARSCOUNT=1,个股MSD,' '),COLORWHITE;} VAR3:=LLV(INDEXL,N); VAR4:=HHV(INDEXH,N); DP:=100*(INDEXC-VAR3)/(VAR4-VAR3); 大盘MSD:MA(DP,K),COLORYELLOW; {DRAWTEXT(CURRBARSCOUNT=1,大盘MSD,' '),COLORYELLOW;} 弱势线:20,LINETHICK1,COLORGREEN; 强势线:80,LINETHICK1,COLORMAGENTA; IF(个股MSD>=80,个股MSD,DRAWNULL),LINETHICK2,COLORRED; 6.大盘温斯坦强度 (大盘附图) N:=120; K:=3; ST:=EXIST((C/REF(C,1)-1)*100>5.6,60); VAR3:=LLV(INDEXL,N); VAR4:=HHV(INDEXH,N); DP:=100*(INDEXC-VAR3)/(VAR4-VAR3); 大盘MSD:MA(DP,K),COLORYELLOW; {DRAWTEXT(CURRBARSCOUNT=1,大盘MSD,' '),COLORYELLOW;} IF(大盘MSD>=80,大盘MSD,DRAWNULL),LINETHICK2,COLORRED; 弱势线:30,LINETHICK1,COLORGREEN; 强势线:80,LINETHICK1,COLORMAGENTA; 7.九转序列多空 DRAWTEXT_FIX(1,0.01,0.01,0,'【★★仓位控制的量化标准★★】'),COLORMAGENTA; DRAWTEXT_FIX(1,0.01,0.08,0,'【★★1、粉+红=满,2、粉+绿=6,3、蓝+红=4 ,4、蓝+绿=空★★】'),COLORYELLOW; E1:=EXPMA(C,5); E2:=EXPMA(C,10); E3:=EXPMA(C,20); E4:=EXPMA(C,30); E5:=EXPMA(C,60); VARE1:=(E1+E2+E3+E4)/4; VARE2:=(E1+E2+E3+E5)/4; N:=IF(CODELIKE('9999')OR CODELIKE('3990')OR CODELIKE('880')OR CODELIKE('0000'),1,0); D1:=IF(N=1,0.013,0.03); D2:=IF(N=1,0.018,0.03); C1:=IF(N=1,0.015,0.03); C2:=IF(N=1,0.015,0.03); 短线多:EXPMA(VARE1,5)+EXPMA(VARE1,5)*D1,COLORRED; 短线空:EXPMA(VARE1,5)-EXPMA(VARE1,5)*D2,COLORRED; 长线多:EXPMA(VARE2,70)+EXPMA(VARE2,70)*C1,COLORMAGENTA; 长线空:EXPMA(VARE2,70)-EXPMA(VARE2,70)*C2,COLORMAGENTA; {DRAWKLINE(H,O,L,C);} TJ1:=RANGE(C,短线空,短线多); TJ2:=RANGE(C,长线空,长线多); STICKLINE(短线多>REF(短线多,1) AND TJ1=0,短线多,短线空,0.1,1),COLORRED; STICKLINE(短线多<REF(短线多,1) AND TJ1=0,短线多,短线空,0.1,1),COLORGREEN; STICKLINE(长线多>REF(长线多,1) AND TJ2=0,长线多,长线空,0.1,1),COLORMAGENTA; STICKLINE(长线多<REF(长线多,1) AND TJ2=0,长线多,长线空,0.1,1),COLORBLUE; NOTEXT短线多:IF(短线多<REF(短线多,1),短线多,DRAWNULL),COLORGREEN; NOTEXT短线空:IF(短线空<REF(短线空,1),短线空,DRAWNULL),COLORGREEN; NOTEXT长线多:IF(长线多<REF(长线多,1),长线多,DRAWNULL),COLORBLUE; NOTEXT长线空:IF(长线空<REF(长线空,1),长线空,DRAWNULL),COLORBLUE; 空:=REF(C,1)>REF(短线空,1) AND C<短线空 AND C<REF(C,1){ AND COUNT(C>短线多,5)>0}; 多:=REF(C,1)<REF(短线多,1) AND C>短线多 AND C>REF(C,1){ AND COUNT(C<长线多,5)>0}; 空1:=TFILTER(多,空,2); 多1:=TFILTER(多,空,1); DRAWTEXT(空1,短线多*1.04,'空'),COLORGREEN; DRAWTEXT(多1,短线空*0.96,'多'),COLORRED; DRAWICON(空1,短线多*1.02,2); DRAWICON(多1,短线空*0.98,1); A1:=C>REF(C,4); A2:=BARSLASTCOUNT(A1); A3:=REF(A2,1)=8 AND A2>REF(A2,1); A4:=REF(BETWEEN(A2,5,8),1) AND A2<REF(A2,1); A5:=ISLASTBAR AND BETWEEN(A2,6,8); A6:=(BACKSET(A3>0,9) OR BACKSET(A4>0,A2+1)*0 OR BACKSET(A5>0,A2))*A2; DRAWTEXT(A6>0,H+H*0.02,VAR2STR(A6,0)),COLORFF00FF{COLOR00FFFF}; DRAWTEXT(A2=9,H+H*0.02,'9'),COLOR00FF00; B1:=C<REF(C,4); B2:=BARSLASTCOUNT(B1); B3:=REF(B2,1)=8 AND B2>REF(B2,1); B4:=REF(BETWEEN(B2,5,8),1) AND B2<REF(B2,1); B5:=ISLASTBAR AND BETWEEN(B2,6,8); B6:=(BACKSET(B3>0,9) OR BACKSET(B4>0,B2+1)*0 OR BACKSET(B5>0,B2))*B2; DRAWTEXT(B6>0,L-L*0.02,VAR2STR(B6,0)),COLOR00FF00{COLORFFFFFF}; DRAWTEXT(B2=9,L-L*0.02,'9'),COLORFF00FF; 8.每股收益变化 最新报告期:FINVALUE(0),NODRAW; {当前报告期} 基本每股收益 : FINVALUE(1), LINETHICK1; 扣非每股收益 : FINVALUE(2), LINETHICK1; 9.动态市盈率 报告期 := FINVALUE(0) - INTPART(FINVALUE(0)/10000)*10000, NODRAW; 每股收益 : IF(报告期=331, FINVALUE(1)*4, IF(报告期=630, FINVALUE(1)*2, IF(报告期=930, FINVALUE(1)*4/3, FINVALUE(1)))), NODRAW; 动态市盈率 : IF(C/每股收益<0, 0, C/每股收益), COLORRED, LINETHICK2; {周期数} PCOUNT := IF(PERIOD = 7, 120, IF(PERIOD = 6, 500, 2500)); MCOUNT := IF(TOTALBARSCOUNT>PCOUNT,PCOUNT,TOTALBARSCOUNT); 近10年最大 : HHV(动态市盈率, MCOUNT), COLORRED, LINETHICK1; 近10年最小 : IF(LLV(动态市盈率, MCOUNT)<0, 0, LLV(动态市盈率, MCOUNT)), COLORRED, LINETHICK1; 当前平均值 := SUM(IF(动态市盈率<0,0,动态市盈率), MCOUNT)/MCOUNT; 近10年平均 : DRAWLINE(CURRBARSCOUNT=MCOUNT, CONST(当前平均值), CURRBARSCOUNT=1, 当前平均值, 3), COLORGREEN, DOTLINE; 近10年百分位 : (动态市盈率 - 近10年最小)/(近10年最大 - 近10年最小), NODRAW; 行业市盈率 : HYSYL, NODRAW; 10.RPS转折走强 X:=EXTDATA_USER(1,0);{120天的} RPS120:=X/10; Y:=EXTDATA_USER(2,0);{250天的} RPS250:=Y/10; Z:=EXTDATA_USER(3,0);{50天的} RPS50:=Z/10; P:=EXTDATA_USER(6,0);{20天的} RPS20:=P/10; RPSJQ:=(RPS50*6+RPS250*2+RPS120*2)/10; A:=RPS50>MA(RPS50,10); B:=RPS20>MA(RPS20,10); D:=RPS120>MA(RPS120,10); E:=RPS250>MA(RPS250,10); XG:RPS250>75 AND RPS120>70 AND RPS50>40 AND RPS20>50 AND A AND B AND D AND E; BARSSINCEN(XG,120)=0; 10.RPS动量走强 X:=EXTDATA_USER(1,0);{120天的} RPS120:=X/10; Y:=EXTDATA_USER(2,0);{250天的} RPS250:=Y/10; Z:=EXTDATA_USER(3,0);{50天的} RPS50:=Z/10; P:=EXTDATA_USER(6,0);{20天的} RPS20:=P/10; RPSJQ:=(RPS50*6+RPS250*2+RPS120*2)/10; A:=RPS50>MA(RPS50,10); B:=RPS20>MA(RPS20,10); D:=RPS120>MA(RPS120,20); E:=RPS250>MA(RPS250,20); XG:RPS250>90 AND RPS120>85 AND RPS50>60 AND RPS20>80 AND A AND B AND D AND E; BARSSINCEN(XG,120)=0; 12.行业走强 X:=EXTDATA_USER(7,0);{10天的} RPSBK10:=X/10; Y:=EXTDATA_USER(5,0);{20天的} RPSBK20:=Y/10; Z:=EXTDATA_USER(4,0);{60天的} RPSBK60:=Z/10; A:=RPSBK10>MA(RPSBK10,10); B:=RPSBK20>MA(RPSBK20,20); D:=RPSBK60>MA(RPSBK60,60); XG:RPSBK10>80 AND RPSBK20>75 AND RPSBK60>60 AND A AND B AND D; BARSSINCEN(XG,120)=0; 13.板块月线反转 Z:=EXTDATA_USER(5,0);{50天的} RPSBK50:=Z/10; D:=IF(RPSBK50<=85,0,1);{RPS50大于85} A:=C/MA(C,250)>1;{站上年线} NH:=IF(H<HHV(H,50),0,1); B:=COUNT(NH,30);{一月内曾创50日新高} NN:=IF(C>MA(C,250),1,0); AA:=COUNT(NN,30); AB:=HIGH/HHV(HIGH,120)>0.9;{最高价距离120日内的最高价不到10%} A AND B AND D AND AA>2 AND AA<30 AND AB;{选出刚刚站上年线小于30天,大于2天的}; 14.双月线反转 Z:=EXTDATA_USER(3,0); {50天的, 添上你自己的} RPS50:=Z/10; D:=IF(RPS50<=85,0,1); A:=C/MA(C,250)>1; NH:=IF(H<HHV(H,50),0,1); B:=COUNT(NH,30); NN:=IF(C>MA(C,250),1,0); AA:=COUNT(NN,30); AB:=HIGH/HHV(HIGH,120)>0.9; LXM1:=BARSSINCEN((A AND B AND D AND AA>2 AND AA<30 AND AB),30)=0; {倒数第二个月线反转距离最近月线反转天数} YFDAY2:=BARSLAST(LXM1); YFDAY1:=REF(BARSLAST(LXM1),BARSLAST(LXM1)+1)+1+YFDAY2; YFCLOSE1:=REF(H,YFDAY1); YFCLOSE2:=REF(H,BARSLAST(LXM1)); LXM1 AND COUNT(LXM1,250)>=2 AND (YFCLOSE2>=YFCLOSE1 OR ABS((YFCLOSE2-YFCLOSE1)/YFCLOSE1)*100<=10); 15. RPS50/120/250都大于87 X:=EXTDATA_USER(1,0);{120天的} RPS120:=X/10; Y:=EXTDATA_USER(2,0);{250天的} RPS250:=Y/10; Z:=EXTDATA_USER(3,0);{50天的} RPS50:=Z/10; A:= RPS120>87; B:= RPS250>87; D:= RPS50>87; XG: A AND B AND D; 16.RPS50/120/250任意两个大于87 X:=EXTDATA_USER(1,0);{120天的} RPS120:=X/10; Y:=EXTDATA_USER(2,0);{250天的} RPS250:=Y/10; Z:=EXTDATA_USER(3,0);{50天的} RPS50:=Z/10; A:= RPS120>87 B:= RPS250>87; D:= RPS50>87;
XG: A AND B OR A AND D OR B AND D; 三。选股公式 1.接近一年新高 CLOSE/HHV(HIGH,250)>0.9; 2.一年新高 NH:IF(H<HHV(H,250),0,1); 3.首次接近新高 VAR2:=CLOSE/HHV(HIGH,250)>0.9; BARSSINCEN(VAR2,30)=0; 4.RPS都大于90 X:=EXTDATA_USER(1,0);{120天的} RPS120:=X/10; Y:=EXTDATA_USER(2,0);{250天的} RPS250:=Y/10; Z:=EXTDATA_USER(3,0);{50天的} RPS50:=Z/10; A:= RPS120>90; B:= RPS250>90; D:= RPS50>90; XG: A AND B AND D; 5.任意一条翻红 X:=EXTDATA_USER(1,0);{120天的} RPS120:=X/10; Y:=EXTDATA_USER(2,0);{250天的} RPS250:=Y/10; Z:=EXTDATA_USER(3,0);{50天的} RPS50:=Z/10; A:= RPS120>90; B:= RPS250>90; D:= RPS50>90; XG: A OR B OR D; 6.任意两条翻红 X:=EXTDATA_USER(1,0);{120天的} RPS120:=X/10; Y:=EXTDATA_USER(2,0);{250天的} RPS250:=Y/10; Z:=EXTDATA_USER(3,0);{50天的} RPS50:=Z/10; A:= RPS120>90; B:= RPS250>90; D:= RPS50>90; XG: A AND B OR A AND D OR B AND D; 7.捡钱10 ZZ:=EXTDATA_USER(6,0); RPS20:=ZZ/10; DD:=IF(RPS20<=90,0,1); A1:=C/MA(C,250)>1; NH1:=IF(H<HHV(H,20),0,1); B1:=COUNT(NH1,30); NN1:=IF(C>EMA(C,255),1,0); AA1:=COUNT(NN1,30); AB1:=HIGH/HHV(HIGH,120)>0.9; DRAWICON(BARSSINCEN(( A1 AND AA1>2 AND AB1 AND DD AND C<EMA(C,13)),30)=0,LOW,9); 8.捡钱20 ZZ:=EXTDATA_USER(3,0); RPS50:=ZZ/10; DD:=IF(RPS50<=85,0,1); A1:=C/MA(C,250)>1; NH1:=IF(H<HHV(H,20),0,1); B1:=COUNT(NH1,30); NN1:=IF(C>EMA(C,255),1,0); AA1:=COUNT(NN1,30); AB1:=HIGH/HHV(HIGH,120)>0.9; DRAWICON(BARSSINCEN(( A1 AND AA1>2 AND AB1 AND DD AND C<EMA(C,25)),30)=0,LOW,9); 9.行业走强 X:=EXTDATA_USER(7,0);{10天的} RPSBK10:=X/10; Y:=EXTDATA_USER(5,0);{20天的} RPSBK20:=Y/10; Z:=EXTDATA_USER(4,0);{60天的} RPSBK60:=Z/10; A:=RPSBK10>MA(RPSBK10,10); B:=RPSBK20>MA(RPSBK20,20); D:=RPSBK60>MA(RPSBK60,60); XG:RPSBK10>85 AND RPSBK20>80 AND RPSBK60>70 AND A AND B AND D; 10.口袋支点选股 M1:=MA(C,10); M2:=MA(C,50); M3:=MA(C,120); M4:=REF(M3,1); M5:=MA(C,20); M6:=REF(M5,1); M7:=(H+L)/2; M8:=MA(C,200); L250:=LLV(LOW,250); H120:=HHV(HIGH,120); X1:=IF(C<REF(C,1),V,0); (C-REF(C,1))/REF(C,1)>=0.02 AND VOL>REF(HHV(X1,10),1) AND (VOL/REF(VOL,1)>1.20) AND M3>=M4 AND M5>=M6 AND C>M5 AND C>M1 AND C>M2 AND C>M3 AND C>M8 AND C>M7 AND C>L250*1.2 AND C>(H120*0.85); 11.个股首次走强 X:=EXTDATA_USER(1,0);{120天的} RPS120:=X/10; Y:=EXTDATA_USER(2,0);{250天的} RPS250:=Y/10; Z:=EXTDATA_USER(3,0);{50天的} RPS50:=Z/10; P:=EXTDATA_USER(6,0);{20天的} RPS20:=P/10; RPSJQ:=(RPS50*6+RPS250*2+RPS120*2)/10; A:=RPS50>MA(RPS50,10); B:=RPS20>MA(RPS20,10); D:=RPS120>MA(RPS120,20); XG:=RPS120>85 AND RPS50>75 AND RPS20>60 AND A AND B AND D; BARSSINCEN(XG,120)=0; 12.行业首次走强 X:=EXTDATA_USER(7,0);{10天的} RPSBK10:=X/10; Y:=EXTDATA_USER(5,0);{20天的} RPSBK20:=Y/10; Z:=EXTDATA_USER(4,0);{60天的} RPSBK60:=Z/10; A:=RPSBK10>MA(RPSBK10,10); B:=RPSBK20>MA(RPSBK20,20); D:=RPSBK60>MA(RPSBK60,60); XG:=RPSBK10>80 AND RPSBK20>75 AND RPSBK60>60 AND A AND B AND D; BARSSINCEN(XG,120)=0; 13.净利润断层选股 高开缺口 := LOW>REF(HIGH,1) OR CLOSE/REF(CLOSE,1)>1.08; {高开缺口 := LOW>REF(HIGH,1);} 当前日期 := DATE-1000000; SV := -1; EV := IF(WEEKDAY=1,3,2); {业绩预告} 预告下限 := FINVALUE(285); 预告上限 := FINVALUE(286); 预告中值 := (预告上限+预告下限)/2; 预告日期 := FINVALUE(313); 预告日期差 := (当前日期-预告日期>SV) AND (当前日期-预告日期<EV); 预告断层 := (预告中值>0) AND 高开缺口 AND 预告日期差; {业绩快报} 快报净利润 := FINVALUE(287); 快报日期 := FINVALUE(315); 快报日期差 := (当前日期-快报日期>SV) AND (当前日期-快报日期<EV); 快报断层 := (快报净利润>0) AND 高开缺口 AND 快报日期差; {财报} 财报净利润 := FINVALUE(95); EPSRATE := FINVALUE(184); 财报日期 := FINVALUE(314); 财报日期差 := (当前日期-财报日期>SV) AND (当前日期-财报日期<EV); 财报断层 := 财报净利润 > 0 AND EPSRATE > 0 AND 高开缺口 AND 财报日期差; {最近日期断层} 最近日期断层 := 预告断层 OR 快报断层 OR 财报断层; {指定日期1} 指定日期1 := 1; {指定日期1业绩预告} 指预告上限1 := FINONE(285,0,指定日期1); 指预告下限1 := FINONE(286,0,指定日期1); 指预告中值1 := (指预告上限1+指预告下限1)/2; 指预告日期1 := FINONE(313,0,指定日期1); 指预告日期差1 := (当前日期-指预告日期1>SV) AND (当前日期-指预告日期1<EV); 指预告断层1 := (指预告中值1>0) AND 高开缺口 AND 指预告日期差1; {指定日期1业绩快报} 指快报净利润1 := FINONE(287,0,指定日期1); 指快报日期1 := FINONE(315,0,指定日期1); 指快报日期差1 := (当前日期-指快报日期1>SV) AND (当前日期-指快报日期1<EV); 指快报断层1 := (指快报净利润1>0) AND 高开缺口 AND 指快报日期差1; {指定日期1财报} 指财报净利润1 := FINONE(95,0,指定日期1); 指EPSRATE1 := FINONE(184,0,指定日期1); 指财报日期1 := FINONE(314,0,指定日期1); 指财报日期差1 := (当前日期-指财报日期1>SV) AND (当前日期-指财报日期1<EV); 指财报断层1 := 指财报净利润1 > 0 AND 指EPSRATE1 > 0 AND 高开缺口 AND 指财报日期差1; {指定日期1断层} 指定日期1断层 := 指预告断层1 OR 指快报断层1 OR 指财报断层1; {指定日期2} 指定日期2 := 2; {指定日期2业绩预告} 指预告上限2 := FINONE(285,0,指定日期2); 指预告下限2 := FINONE(286,0,指定日期2); 指预告中值2 := (指预告上限2+指预告下限2)/2; 指预告日期2 := FINONE(313,0,指定日期2); 指预告日期差2 := (当前日期-指预告日期2>SV) AND (当前日期-指预告日期2<EV); 指预告断层2 := (指预告中值2>0) AND 高开缺口 AND 指预告日期差2; {指定日期2业绩快报} 指快报净利润2 := FINONE(287,0,指定日期2); 指快报日期2 := FINONE(315,0,指定日期2); 指快报日期差2 := (当前日期-指快报日期2>SV) AND (当前日期-指快报日期2<EV); 指快报断层2 := (指快报净利润2>0) AND 高开缺口 AND 指快报日期差2; {指定日期2财报} 指财报净利润2 := FINONE(95,0,指定日期2); 指EPSRATE2 := FINONE(184,0,指定日期2); 指财报日期2 := FINONE(314,0,指定日期2); 指财报日期差2 := (当前日期-指财报日期2>SV) AND (当前日期-指财报日期2<EV); 指财报断层2 := 指财报净利润2 > 0 AND 指EPSRATE2 > 0 AND 高开缺口 AND 指财报日期差2; {指定日期2断层} 指定日期2断层 := 指预告断层2 OR 指快报断层2 OR 指财报断层2; {指定日期3} 指定日期3 := 3; {指定日期3业绩预告} 指预告上限3 := FINONE(285,0,指定日期3); 指预告下限3 := FINONE(286,0,指定日期3); 指预告中值3 := (指预告上限3+指预告下限3)/2; 指预告日期3 := FINONE(313,0,指定日期3); 指预告日期差3 := (当前日期-指预告日期3>SV) AND (当前日期-指预告日期3<EV); 指预告断层3 := (指预告中值3>0) AND 高开缺口 AND 指预告日期差3; {指定日期3业绩快报} 指快报净利润3 := FINONE(287,0,指定日期3); 指快报日期3 := FINONE(315,0,指定日期3); 指快报日期差3 := (当前日期-指快报日期3>SV) AND (当前日期-指快报日期3<EV); 指快报断层3 := (指快报净利润3>0) AND 高开缺口 AND 指快报日期差3; {指定日期3财报} 指财报净利润3 := FINONE(95,0,指定日期3); 指EPSRATE3 := FINONE(184,0,指定日期3); 指财报日期3 := FINONE(314,0,指定日期3); 指财报日期差3 := (当前日期-指财报日期3>SV) AND (当前日期-指财报日期3<EV); 指财报断层3 := 指财报净利润3 > 0 AND 指EPSRATE3 > 0 AND 高开缺口 AND 指财报日期差3; {指定日期3断层} 指定日期3断层 := 指预告断层3 OR 指快报断层3 OR 指财报断层3; {指定日期4} 指定日期4 := 4; {指定日期4业绩预告} 指预告上限4 := FINONE(285,0,指定日期4); 指预告下限4 := FINONE(286,0,指定日期4); 指预告中值4 := (指预告上限4+指预告下限4)/2; 指预告日期4 := FINONE(313,0,指定日期4); 指预告日期差4 := (当前日期-指预告日期4>SV) AND (当前日期-指预告日期4<EV); 指预告断层4 := (指预告中值4>0) AND 高开缺口 AND 指预告日期差4; {指定日期4业绩快报} 指快报净利润4 := FINONE(287,0,指定日期4); 指快报日期4 := FINONE(315,0,指定日期4); 指快报日期差4 := (当前日期-指快报日期4>SV) AND (当前日期-指快报日期4<EV); 指快报断层4 := (指快报净利润4>0) AND 高开缺口 AND 指快报日期差4; {指定日期4财报} 指财报净利润4 := FINONE(95,0,指定日期4); 指EPSRATE4 := FINONE(184,0,指定日期4); 指财报日期4 := FINONE(314,0,指定日期4); 指财报日期差4 := (当前日期-指财报日期4>SV) AND (当前日期-指财报日期4<EV); 指财报断层4 := 指财报净利润4 > 0 AND 指EPSRATE4 > 0 AND 高开缺口 AND 指财报日期差4; {指定日期4断层} 指定日期4断层 := 指预告断层4 OR 指快报断层4 OR 指财报断层4; 最近日期断层 OR 指定日期1断层 OR 指定日期2断层 OR 指定日期3断层 OR 指定日期4断层; 14.断层大于3% 高开缺口 := LOW>REF(HIGH,1) OR CLOSE/REF(CLOSE,1)>1.08; {高开缺口 := LOW>REF(HIGH,1);} 当前日期 := DATE-1000000; SV := -1; EV := IF(WEEKDAY=1,3,2); {业绩预告} 预告下限 := FINVALUE(285); 预告上限 := FINVALUE(286); 预告中值 := (预告上限+预告下限)/2; 预告日期 := FINVALUE(313); 预告日期差 := (当前日期-预告日期>SV) AND (当前日期-预告日期<EV); 预告断层 := (预告中值>0) AND 高开缺口 AND 预告日期差; {业绩快报} 快报净利润 := FINVALUE(287); 快报日期 := FINVALUE(315); 快报日期差 := (当前日期-快报日期>SV) AND (当前日期-快报日期<EV); 快报断层 := (快报净利润>0) AND 高开缺口 AND 快报日期差; {财报} 财报净利润 := FINVALUE(95); EPSRATE := FINVALUE(184); 财报日期 := FINVALUE(314); 财报日期差 := (当前日期-财报日期>SV) AND (当前日期-财报日期<EV); 财报断层 := 财报净利润 > 0 AND EPSRATE > 0 AND 高开缺口 AND 财报日期差; {最近日期断层} 最近日期断层 := 预告断层 OR 快报断层 OR 财报断层; {指定日期1} 指定日期1 := 1; {指定日期1业绩预告} 指预告上限1 := FINONE(285,0,指定日期1); 指预告下限1 := FINONE(286,0,指定日期1); 指预告中值1 := (指预告上限1+指预告下限1)/2; 指预告日期1 := FINONE(313,0,指定日期1); 指预告日期差1 := (当前日期-指预告日期1>SV) AND (当前日期-指预告日期1<EV); 指预告断层1 := (指预告中值1>0) AND 高开缺口 AND 指预告日期差1; {指定日期1业绩快报} 指快报净利润1 := FINONE(287,0,指定日期1); 指快报日期1 := FINONE(315,0,指定日期1); 指快报日期差1 := (当前日期-指快报日期1>SV) AND (当前日期-指快报日期1<EV); 指快报断层1 := (指快报净利润1>0) AND 高开缺口 AND 指快报日期差1; {指定日期1财报} 指财报净利润1 := FINONE(95,0,指定日期1); 指EPSRATE1 := FINONE(184,0,指定日期1); 指财报日期1 := FINONE(314,0,指定日期1); 指财报日期差1 := (当前日期-指财报日期1>SV) AND (当前日期-指财报日期1<EV); 指财报断层1 := 指财报净利润1 > 0 AND 指EPSRATE1 > 0 AND 高开缺口 AND 指财报日期差1; {指定日期1断层} 指定日期1断层 := 指预告断层1 OR 指快报断层1 OR 指财报断层1; {指定日期2} 指定日期2 := 2; {指定日期2业绩预告} 指预告上限2 := FINONE(285,0,指定日期2); 指预告下限2 := FINONE(286,0,指定日期2); 指预告中值2 := (指预告上限2+指预告下限2)/2; 指预告日期2 := FINONE(313,0,指定日期2); 指预告日期差2 := (当前日期-指预告日期2>SV) AND (当前日期-指预告日期2<EV); 指预告断层2 := (指预告中值2>0) AND 高开缺口 AND 指预告日期差2; {指定日期2业绩快报} 指快报净利润2 := FINONE(287,0,指定日期2); 指快报日期2 := FINONE(315,0,指定日期2); 指快报日期差2 := (当前日期-指快报日期2>SV) AND (当前日期-指快报日期2<EV); 指快报断层2 := (指快报净利润2>0) AND 高开缺口 AND 指快报日期差2; {指定日期2财报} 指财报净利润2 := FINONE(95,0,指定日期2); 指EPSRATE2 := FINONE(184,0,指定日期2); 指财报日期2 := FINONE(314,0,指定日期2); 指财报日期差2 := (当前日期-指财报日期2>SV) AND (当前日期-指财报日期2<EV); 指财报断层2 := 指财报净利润2 > 0 AND 指EPSRATE2 > 0 AND 高开缺口 AND 指财报日期差2; {指定日期2断层} 指定日期2断层 := 指预告断层2 OR 指快报断层2 OR 指财报断层2; {指定日期3} 指定日期3 := 3; {指定日期3业绩预告} 指预告上限3 := FINONE(285,0,指定日期3); 指预告下限3 := FINONE(286,0,指定日期3); 指预告中值3 := (指预告上限3+指预告下限3)/2; 指预告日期3 := FINONE(313,0,指定日期3); 指预告日期差3 := (当前日期-指预告日期3>SV) AND (当前日期-指预告日期3<EV); 指预告断层3 := (指预告中值3>0) AND 高开缺口 AND 指预告日期差3; {指定日期3业绩快报} 指快报净利润3 := FINONE(287,0,指定日期3); 指快报日期3 := FINONE(315,0,指定日期3); 指快报日期差3 := (当前日期-指快报日期3>SV) AND (当前日期-指快报日期3<EV); 指快报断层3 := (指快报净利润3>0) AND 高开缺口 AND 指快报日期差3; {指定日期3财报} 指财报净利润3 := FINONE(95,0,指定日期3); 指EPSRATE3 := FINONE(184,0,指定日期3); 指财报日期3 := FINONE(314,0,指定日期3); 指财报日期差3 := (当前日期-指财报日期3>SV) AND (当前日期-指财报日期3<EV); 指财报断层3 := 指财报净利润3 > 0 AND 指EPSRATE3 > 0 AND 高开缺口 AND 指财报日期差3; {指定日期3断层} 指定日期3断层 := 指预告断层3 OR 指快报断层3 OR 指财报断层3; {指定日期4} 指定日期4 := 4; {指定日期4业绩预告} 指预告上限4 := FINONE(285,0,指定日期4); 指预告下限4 := FINONE(286,0,指定日期4); 指预告中值4 := (指预告上限4+指预告下限4)/2; 指预告日期4 := FINONE(313,0,指定日期4); 指预告日期差4 := (当前日期-指预告日期4>SV) AND (当前日期-指预告日期4<EV); 指预告断层4 := (指预告中值4>0) AND 高开缺口 AND 指预告日期差4; {指定日期4业绩快报} 指快报净利润4 := FINONE(287,0,指定日期4); 指快报日期4 := FINONE(315,0,指定日期4); 指快报日期差4 := (当前日期-指快报日期4>SV) AND (当前日期-指快报日期4<EV); 指快报断层4 := (指快报净利润4>0) AND 高开缺口 AND 指快报日期差4; {指定日期4财报} 指财报净利润4 := FINONE(95,0,指定日期4); 指EPSRATE4 := FINONE(184,0,指定日期4); 指财报日期4 := FINONE(314,0,指定日期4); 指财报日期差4 := (当前日期-指财报日期4>SV) AND (当前日期-指财报日期4<EV); 指财报断层4 := 指财报净利润4 > 0 AND 指EPSRATE4 > 0 AND 高开缺口 AND 指财报日期差4; {指定日期4断层} 指定日期4断层 := 指预告断层4 OR 指快报断层4 OR 指财报断层4; 净利润断层 := 最近日期断层 OR 指定日期1断层 OR 指定日期2断层 OR 指定日期3断层 OR 指定日期4断层; 缺口幅度:净利润断层 AND (LOW-REF(HIGH,1))/REF(HIGH,1)*100>3; 15.断层30日不补 高开缺口 := LOW>REF(HIGH,1) OR CLOSE/REF(CLOSE,1)>1.08; {高开缺口 := LOW>REF(HIGH,1);} 当前日期 := DATE-1000000; SV := -1; EV := IF(WEEKDAY=1,3,2); {业绩预告} 预告下限 := FINVALUE(285); 预告上限 := FINVALUE(286); 预告中值 := (预告上限+预告下限)/2; 预告日期 := FINVALUE(313); 预告日期差 := (当前日期-预告日期>SV) AND (当前日期-预告日期<EV); 预告断层 := (预告中值>0) AND 高开缺口 AND 预告日期差; {业绩快报} 快报净利润 := FINVALUE(287); 快报日期 := FINVALUE(315); 快报日期差 := (当前日期-快报日期>SV) AND (当前日期-快报日期<EV); 快报断层 := (快报净利润>0) AND 高开缺口 AND 快报日期差; {财报} 财报净利润 := FINVALUE(95); EPSRATE := FINVALUE(184); 财报日期 := FINVALUE(314); 财报日期差 := (当前日期-财报日期>SV) AND (当前日期-财报日期<EV); 财报断层 := 财报净利润 > 0 AND EPSRATE > 0 AND 高开缺口 AND 财报日期差; {最近日期断层} 最近日期断层 := 预告断层 OR 快报断层 OR 财报断层; {指定日期1} 指定日期1 := 1; {指定日期1业绩预告} 指预告上限1 := FINONE(285,0,指定日期1); 指预告下限1 := FINONE(286,0,指定日期1); 指预告中值1 := (指预告上限1+指预告下限1)/2; 指预告日期1 := FINONE(313,0,指定日期1); 指预告日期差1 := (当前日期-指预告日期1>SV) AND (当前日期-指预告日期1<EV); 指预告断层1 := (指预告中值1>0) AND 高开缺口 AND 指预告日期差1; {指定日期1业绩快报} 指快报净利润1 := FINONE(287,0,指定日期1); 指快报日期1 := FINONE(315,0,指定日期1); 指快报日期差1 := (当前日期-指快报日期1>SV) AND (当前日期-指快报日期1<EV); 指快报断层1 := (指快报净利润1>0) AND 高开缺口 AND 指快报日期差1; {指定日期1财报} 指财报净利润1 := FINONE(95,0,指定日期1); 指EPSRATE1 := FINONE(184,0,指定日期1); 指财报日期1 := FINONE(314,0,指定日期1); 指财报日期差1 := (当前日期-指财报日期1>SV) AND (当前日期-指财报日期1<EV); 指财报断层1 := 指财报净利润1 > 0 AND 指EPSRATE1 > 0 AND 高开缺口 AND 指财报日期差1; {指定日期1断层} 指定日期1断层 := 指预告断层1 OR 指快报断层1 OR 指财报断层1; {指定日期2} 指定日期2 := 2; {指定日期2业绩预告} 指预告上限2 := FINONE(285,0,指定日期2); 指预告下限2 := FINONE(286,0,指定日期2); 指预告中值2 := (指预告上限2+指预告下限2)/2; 指预告日期2 := FINONE(313,0,指定日期2); 指预告日期差2 := (当前日期-指预告日期2>SV) AND (当前日期-指预告日期2<EV); 指预告断层2 := (指预告中值2>0) AND 高开缺口 AND 指预告日期差2; {指定日期2业绩快报} 指快报净利润2 := FINONE(287,0,指定日期2); 指快报日期2 := FINONE(315,0,指定日期2); 指快报日期差2 := (当前日期-指快报日期2>SV) AND (当前日期-指快报日期2<EV); 指快报断层2 := (指快报净利润2>0) AND 高开缺口 AND 指快报日期差2; {指定日期2财报} 指财报净利润2 := FINONE(95,0,指定日期2); 指EPSRATE2 := FINONE(184,0,指定日期2); 指财报日期2 := FINONE(314,0,指定日期2); 指财报日期差2 := (当前日期-指财报日期2>SV) AND (当前日期-指财报日期2<EV); 指财报断层2 := 指财报净利润2 > 0 AND 指EPSRATE2 > 0 AND 高开缺口 AND 指财报日期差2; {指定日期2断层} 指定日期2断层 := 指预告断层2 OR 指快报断层2 OR 指财报断层2; {指定日期3} 指定日期3 := 3; {指定日期3业绩预告} 指预告上限3 := FINONE(285,0,指定日期3); 指预告下限3 := FINONE(286,0,指定日期3); 指预告中值3 := (指预告上限3+指预告下限3)/2; 指预告日期3 := FINONE(313,0,指定日期3); 指预告日期差3 := (当前日期-指预告日期3>SV) AND (当前日期-指预告日期3<EV); 指预告断层3 := (指预告中值3>0) AND 高开缺口 AND 指预告日期差3; {指定日期3业绩快报} 指快报净利润3 := FINONE(287,0,指定日期3); 指快报日期3 := FINONE(315,0,指定日期3); 指快报日期差3 := (当前日期-指快报日期3>SV) AND (当前日期-指快报日期3<EV); 指快报断层3 := (指快报净利润3>0) AND 高开缺口 AND 指快报日期差3; {指定日期3财报} 指财报净利润3 := FINONE(95,0,指定日期3); 指EPSRATE3 := FINONE(184,0,指定日期3); 指财报日期3 := FINONE(314,0,指定日期3); 指财报日期差3 := (当前日期-指财报日期3>SV) AND (当前日期-指财报日期3<EV); 指财报断层3 := 指财报净利润3 > 0 AND 指EPSRATE3 > 0 AND 高开缺口 AND 指财报日期差3; {指定日期3断层} 指定日期3断层 := 指预告断层3 OR 指快报断层3 OR 指财报断层3; {指定日期4} 指定日期4 := 4; {指定日期4业绩预告} 指预告上限4 := FINONE(285,0,指定日期4); 指预告下限4 := FINONE(286,0,指定日期4); 指预告中值4 := (指预告上限4+指预告下限4)/2; 指预告日期4 := FINONE(313,0,指定日期4); 指预告日期差4 := (当前日期-指预告日期4>SV) AND (当前日期-指预告日期4<EV); 指预告断层4 := (指预告中值4>0) AND 高开缺口 AND 指预告日期差4; {指定日期4业绩快报} 指快报净利润4 := FINONE(287,0,指定日期4); 指快报日期4 := FINONE(315,0,指定日期4); 指快报日期差4 := (当前日期-指快报日期4>SV) AND (当前日期-指快报日期4<EV); 指快报断层4 := (指快报净利润4>0) AND 高开缺口 AND 指快报日期差4; {指定日期4财报} 指财报净利润4 := FINONE(95,0,指定日期4); 指EPSRATE4 := FINONE(184,0,指定日期4); 指财报日期4 := FINONE(314,0,指定日期4); 指财报日期差4 := (当前日期-指财报日期4>SV) AND (当前日期-指财报日期4<EV); 指财报断层4 := 指财报净利润4 > 0 AND 指EPSRATE4 > 0 AND 高开缺口 AND 指财报日期差4; {指定日期4断层} 指定日期4断层 := 指预告断层4 OR 指快报断层4 OR 指财报断层4; 净利润断层 := 最近日期断层 OR 指定日期1断层 OR 指定日期2断层 OR 指定日期3断层 OR 指定日期4断层; PF := BARSSINCEN(净利润断层 ,30) ; P1 := BARSLAST(净利润断层) + 1; XG:LLV(L, P1) > REF(H, P1) AND (PF OR 净利润断层) ; 16.断层区间验证 高开缺口 := LOW>REF(HIGH,1) OR CLOSE/REF(CLOSE,1)>1.08; {高开缺口 := LOW>REF(HIGH,1);} 当前日期 := DATE-1000000; SV := -1; EV := IF(WEEKDAY=1,3,2); {业绩预告} 预告下限 := FINVALUE(285); 预告上限 := FINVALUE(286); 预告中值 := (预告上限+预告下限)/2; 预告日期 := FINVALUE(313); 预告日期差 := (当前日期-预告日期>SV) AND (当前日期-预告日期<EV); 预告断层 := (预告中值>0) AND 高开缺口 AND 预告日期差; {业绩快报} 快报净利润 := FINVALUE(287); 快报日期 := FINVALUE(315); 快报日期差 := (当前日期-快报日期>SV) AND (当前日期-快报日期<EV); 快报断层 := (快报净利润>0) AND 高开缺口 AND 快报日期差; {财报} 财报净利润 := FINVALUE(95); EPSRATE := FINVALUE(184); 财报日期 := FINVALUE(314); 财报日期差 := (当前日期-财报日期>SV) AND (当前日期-财报日期<EV); 财报断层 := 财报净利润 > 0 AND EPSRATE > 0 AND 高开缺口 AND 财报日期差; {最近日期断层} 最近日期断层 := 预告断层 OR 快报断层 OR 财报断层; {指定日期1} 指定日期1 := 1; {指定日期1业绩预告} 指预告上限1 := FINONE(285,0,指定日期1); 指预告下限1 := FINONE(286,0,指定日期1); 指预告中值1 := (指预告上限1+指预告下限1)/2; 指预告日期1 := FINONE(313,0,指定日期1); 指预告日期差1 := (当前日期-指预告日期1>SV) AND (当前日期-指预告日期1<EV); 指预告断层1 := (指预告中值1>0) AND 高开缺口 AND 指预告日期差1; {指定日期1业绩快报} 指快报净利润1 := FINONE(287,0,指定日期1); 指快报日期1 := FINONE(315,0,指定日期1); 指快报日期差1 := (当前日期-指快报日期1>SV) AND (当前日期-指快报日期1<EV); 指快报断层1 := (指快报净利润1>0) AND 高开缺口 AND 指快报日期差1; {指定日期1财报} 指财报净利润1 := FINONE(95,0,指定日期1); 指EPSRATE1 := FINONE(184,0,指定日期1); 指财报日期1 := FINONE(314,0,指定日期1); 指财报日期差1 := (当前日期-指财报日期1>SV) AND (当前日期-指财报日期1<EV); 指财报断层1 := 指财报净利润1 > 0 AND 指EPSRATE1 > 0 AND 高开缺口 AND 指财报日期差1; {指定日期1断层} 指定日期1断层 := 指预告断层1 OR 指快报断层1 OR 指财报断层1; {指定日期2} 指定日期2 := 2; {指定日期2业绩预告} 指预告上限2 := FINONE(285,0,指定日期2); 指预告下限2 := FINONE(286,0,指定日期2); 指预告中值2 := (指预告上限2+指预告下限2)/2; 指预告日期2 := FINONE(313,0,指定日期2); 指预告日期差2 := (当前日期-指预告日期2>SV) AND (当前日期-指预告日期2<EV); 指预告断层2 := (指预告中值2>0) AND 高开缺口 AND 指预告日期差2; {指定日期2业绩快报} 指快报净利润2 := FINONE(287,0,指定日期2); 指快报日期2 := FINONE(315,0,指定日期2); 指快报日期差2 := (当前日期-指快报日期2>SV) AND (当前日期-指快报日期2<EV); 指快报断层2 := (指快报净利润2>0) AND 高开缺口 AND 指快报日期差2; {指定日期2财报} 指财报净利润2 := FINONE(95,0,指定日期2); 指EPSRATE2 := FINONE(184,0,指定日期2); 指财报日期2 := FINONE(314,0,指定日期2); 指财报日期差2 := (当前日期-指财报日期2>SV) AND (当前日期-指财报日期2<EV); 指财报断层2 := 指财报净利润2 > 0 AND 指EPSRATE2 > 0 AND 高开缺口 AND 指财报日期差2; {指定日期2断层} 指定日期2断层 := 指预告断层2 OR 指快报断层2 OR 指财报断层2; {指定日期3} 指定日期3 := 3; {指定日期3业绩预告} 指预告上限3 := FINONE(285,0,指定日期3); 指预告下限3 := FINONE(286,0,指定日期3); 指预告中值3 := (指预告上限3+指预告下限3)/2; 指预告日期3 := FINONE(313,0,指定日期3); 指预告日期差3 := (当前日期-指预告日期3>SV) AND (当前日期-指预告日期3<EV); 指预告断层3 := (指预告中值3>0) AND 高开缺口 AND 指预告日期差3; {指定日期3业绩快报} 指快报净利润3 := FINONE(287,0,指定日期3); 指快报日期3 := FINONE(315,0,指定日期3); 指快报日期差3 := (当前日期-指快报日期3>SV) AND (当前日期-指快报日期3<EV); 指快报断层3 := (指快报净利润3>0) AND 高开缺口 AND 指快报日期差3; {指定日期3财报} 指财报净利润3 := FINONE(95,0,指定日期3); 指EPSRATE3 := FINONE(184,0,指定日期3); 指财报日期3 := FINONE(314,0,指定日期3); 指财报日期差3 := (当前日期-指财报日期3>SV) AND (当前日期-指财报日期3<EV); 指财报断层3 := 指财报净利润3 > 0 AND 指EPSRATE3 > 0 AND 高开缺口 AND 指财报日期差3; {指定日期3断层} 指定日期3断层 := 指预告断层3 OR 指快报断层3 OR 指财报断层3; {指定日期4} 指定日期4 := 4; {指定日期4业绩预告} 指预告上限4 := FINONE(285,0,指定日期4); 指预告下限4 := FINONE(286,0,指定日期4); 指预告中值4 := (指预告上限4+指预告下限4)/2; 指预告日期4 := FINONE(313,0,指定日期4); 指预告日期差4 := (当前日期-指预告日期4>SV) AND (当前日期-指预告日期4<EV); 指预告断层4 := (指预告中值4>0) AND 高开缺口 AND 指预告日期差4; {指定日期4业绩快报} 指快报净利润4 := FINONE(287,0,指定日期4); 指快报日期4 := FINONE(315,0,指定日期4); 指快报日期差4 := (当前日期-指快报日期4>SV) AND (当前日期-指快报日期4<EV); 指快报断层4 := (指快报净利润4>0) AND 高开缺口 AND 指快报日期差4; {指定日期4财报} 指财报净利润4 := FINONE(95,0,指定日期4); 指EPSRATE4 := FINONE(184,0,指定日期4); 指财报日期4 := FINONE(314,0,指定日期4); 指财报日期差4 := (当前日期-指财报日期4>SV) AND (当前日期-指财报日期4<EV); 指财报断层4 := 指财报净利润4 > 0 AND 指EPSRATE4 > 0 AND 高开缺口 AND 指财报日期差4; {指定日期4断层} 指定日期4断层 := 指预告断层4 OR 指快报断层4 OR 指财报断层4; 净利润断层 := 最近日期断层 OR 指定日期1断层 OR 指定日期2断层 OR 指定日期3断层 OR 指定日期4断层; DCH:REF(H,断层天数); ZF:=(DCH-C)/C*100; AAA:=(RANGE(ZF,0,10))*100,COLORFF0000; 17.两个月反选股 Z:=EXTDATA_USER(3,0); {50天的, 添上你自己的} RPS50:=Z/10; D:=IF(RPS50<=85,0,1); A:=C/MA(C,250)>1; NH:=IF(H<HHV(H,50),0,1); B:=COUNT(NH,30); NN:=IF(C>MA(C,250),1,0); AA:=COUNT(NN,30); AB:=HIGH/HHV(HIGH,120)>0.9; LXM1:=BARSSINCEN((A AND B AND D AND AA>2 AND AA<30 AND AB),30)=0; LXM1 AND COUNT(LXM1,250)>=2 ; 18.港资增资选股 N 1 250 60 (GPJYVALUE(6,1,1)-REF(GPJYVALUE(6,1,1),N))>0; 19.第二阶段选股 CLOSE>MA(CLOSE,50) AND MA(CLOSE,50) >MA(CLOSE,120) AND MA(CLOSE,120)>MA(CLOSE,200) AND EVERY(MA(CLOSE,200)>REF(MA(CLOSE,200),1),20) AND HHV(CLOSE,200)/LLV(CLOSE,200)>1.35 AND CLOSE/HHV(CLOSE,200)>0.75; 20.个股温斯坦强度翻红选股 N:=120; K:=1; VAR1:=LLV( LOW,N); VAR2:=HHV(HIGH,N); SD:=100*(CLOSE-VAR1)/(VAR2-VAR1); 个股MSD:=MA(SD,K); VAR3:=LLV(INDEXL,N); VAR4:=HHV(INDEXH,N); DP:=100*(INDEXC-VAR3)/(VAR4-VAR3); 大盘MSD:=MA(DP,K); 个股MSD>80; 21.反转走强选股 X:=EXTDATA_USER(1,0);{120天的} RPS120:=X/10; Y:=EXTDATA_USER(2,0);{250天的} RPS250:=Y/10; Z:=EXTDATA_USER(3,0);{50天的} RPS50:=Z/10; P:=EXTDATA_USER(6,0);{20天的} RPS20:=P/10; RPSJQ:=(RPS50*6+RPS250*2+RPS120*2)/10; A:=RPS50>MA(RPS50,10); B:=RPS20>MA(RPS20,10); D:=RPS120>MA(RPS120,10); E:=RPS250>MA(RPS250,10); XG:RPS250>75 AND RPS120>70 AND RPS50>40 AND RPS20>50 AND A AND B AND D AND E; 21.动量走强选股 X:=EXTDATA_USER(1,0);{120天的} RPS120:=X/10; Y:=EXTDATA_USER(2,0);{250天的} RPS250:=Y/10; Z:=EXTDATA_USER(3,0);{50天的} RPS50:=Z/10; P:=EXTDATA_USER(6,0);{20天的} RPS20:=P/10; RPSJQ:=(RPS50*6+RPS250*2+RPS120*2)/10; A:=RPS50>MA(RPS50,10); B:=RPS20>MA(RPS20,10); D:=RPS120>MA(RPS120,20); E:=RPS250>MA(RPS250,20); XG:RPS250>90 AND RPS120>85 AND RPS50>60 AND RPS20>80 AND A AND B AND D AND E; |
|
来自: 老树hgkxij55q2 > 《像欧奈尔一样思考》