选股
-
以波神凯线中的红“（2）”做个选股公式
编写条件：编写方法：INPUT:年(8,0,100),月(1,1,12),日(1,1,31),年2(8,0,100),月2(1,1,12),日2(1,1,31),做多吗(1,0,1),测量(1,1,4);
DATE1:=年*10000+月*100+日+1000000;
DATE2:=年2*10000+月2*100+日2+1000000;
hh:=ref(h,BArslAST(DATE1=DATE));
HH2:=IF(ref(h,barslast(DATE1=DATE))<REF(H,BARSLAST(DATE1=DATE)-1),ref(H,BARSLAST(DATE1=DATE)-1),IF(ref(h,barslast(DATE1=DATE))<REF(H,BARSLAST(DATE1=DATE)-2),REF(H,BARSLAST(DATE1=DATE)-2),ref(H,BARSLAST(DATE1=DATE)-1)));
LL2:=IF(ref(l,barslast(DATE1=DATE))>REF(l,BARSLAST(DATE1=DATE)-1),ref(l,BARSLAST(DATE1=DATE)-1),IF(ref(l,barslast(DATE1=DATE))>REF(l,BARSLAST(DATE1=DATE)-2),REF(l,BARSLAST(DATE1=DATE)-2),ref(l,BARSLAST(DATE1=DATE)-1)));
hh31:=ref(o,BARSLAST(DATE1=DATE));
hh32:=ref(c,BARSLAST(DATE1=DATE));
hh3:=min(hh31,hh32);
LL3:=max(hh31,hh32);
HH4:=if(做多吗,ref(h,barslast(DATE=DATE2)),ref(h,barslast(DATE=DATE1)));
LL4:=if(做多吗,ref(L,barslast(DATE=DATE1)),ref(L,barslast(DATE=DATE2)));
LLOW:=ref(LOW,BARSLAST(DATE1=DATE));
H1:=STRTONUM(NUMTOSTR(Hh));
L1:=STRTONUM(NUMTOSTR(LLOW));
H2:=STRTONUM(NUMTOSTR(HH2));
L2:=STRTONUM(NUMTOSTR(LL2));
h3:=STRTONUM(NUMTOSTR(Hh3));
L3:=STRTONUM(NUMTOSTR(LL3));
H4:=STRTONUM(NUMTOSTR(HH4));
L4:=STRTONUM(NUMTOSTR(LL4));
LL1:=if(测量=1,H1-L1,IF(测量=2 AND 做多吗=1,H2-L1,IF(测量=2 AND 做多吗<>1,H1-L2,IF(测量=3 AND 做多吗=1,H3-L1,IF(测量=3 AND 做多吗<>1,H1-L3,IF(测量=4,H4-L4,H4-L4))))));
LL:=STRTONUM(NUMTOSTR(LL1));
VERTLINE(date=date1,0),COLORB0B0B0,LINETHICK2;
IF 测量=4 THEN VERTLINE(date=date2,1),COLORBBBBBB;
if 做多吗=1 then
begin
多开门:LL*1.508 + L1,COLORRED,linethick2;
一线:L1+LL*2,COLORWHITE,dotline;
二线:L1+LL*2.4,COLORWHITE,dotline;
三线:L1+LL*3.05,color0045FF;
四线:L1+LL*3.75,COLORWHITE,dotline;
五线:L1+LL*4.15,color00A5FF;
六线:L1+LL*4.8,COLORWHITE,dotline;
七线:L1+LL*5.5,colorCBC0FF;
八线:L1+LL*6.1,COLORWHITE,dotline;
多关门:L1+LL*6.90001,linethick2;
DRAWTEXT(barstatus=2,LL*1.50801+L1,numtostr(LL*1.508+L1)+'多开门'),COLORB0B0B0,ALIGN2;
DRAWTEXT(BARSTATUS=2,L1+LL*3.05001,numtostr(L1+LL*3.05)+' No:3'),COLORB0B0B0,ALIGN2;
DRAWTEXT(BARSTATUS=2,L1+LL*4.15001,numtostr(L1+LL*4.15)+' No:5'),COLORB0B0B0,ALIGN2;
DRAWTEXT(BARSTATUS=2,L1+LL*5.50001,numtostr(L1+LL*5.5)+' No:7'),COLORB0B0B0,ALIGN2;
DRAWTEXT(BARSTATUS=2,L1+LL*6.90001,numtostr(L1+LL*6.9)+'多关门'),COLORB0B0B0,ALIGN2;
end;
IF 做多吗<>1 THEN
BEGIN
空开门:h1-LL*1.508,linethick2;
空一线:h1-LL*2,COLORWHITE,DOTLINE;
空二线:h1-LL*2.4,COLORWHITE,DOTLINE;
空三线:h1-LL*3.05,colorD30094;
空四线:h1-LL*3.75,COLORWHITE,DOTLINE;
空五线:h1-LL*4.15,color00A5FF;
空六线:h1-LL*4.8,COLORWHITE,DOTLINE;
空七线:h1-LL*5.5,color104974;
空八线:h1-LL*6.1,COLORWHITE,dotline;
空关门:h1-LL*6.9,linethick2;
DRAWTEXT(BARSTATUS=2,h1-LL*1.50801,numtostr(h1-LL*1.508)+'空开门'),COLORB0B0B0,ALIGN2;
DRAWTEXT(BARSTATUS=2,h1-LL*3.05001,numtostr(h1-LL*3.05)+' No:3'),COLORB0B0B0,ALIGN2;
DRAWTEXT(BARSTATUS=2,h1-LL*5.50001,numtostr(h1-LL*5.5)+' No:7'),COLORB0B0B0,ALIGN2;
DRAWTEXT(BARSTATUS=2,h1-LL*6.90001,numtostr(h1-LL*6.9)+'空关门'),COLORB0B0B0,ALIGN2;
END;
{-----------------------------立体k线--------------------------------------}
Ko:=CLOSE;
Kc:=REF(CLOSE,1); -
以波神凯线中的红“（4）”做个选股公式
编写条件：编写方法：INPUT:年(8,0,100),月(1,1,12),日(1,1,31),年2(8,0,100),月2(1,1,12),日2(1,1,31),做多吗(1,0,1),测量(1,1,4);
DATE1:=年*10000+月*100+日+1000000;
DATE2:=年2*10000+月2*100+日2+1000000;
hh:=ref(h,BArslAST(DATE1=DATE));
HH2:=IF(ref(h,barslast(DATE1=DATE))<REF(H,BARSLAST(DATE1=DATE)-1),ref(H,BARSLAST(DATE1=DATE)-1),IF(ref(h,barslast(DATE1=DATE))<REF(H,BARSLAST(DATE1=DATE)-2),REF(H,BARSLAST(DATE1=DATE)-2),ref(H,BARSLAST(DATE1=DATE)-1)));
LL2:=IF(ref(l,barslast(DATE1=DATE))>REF(l,BARSLAST(DATE1=DATE)-1),ref(l,BARSLAST(DATE1=DATE)-1),IF(ref(l,barslast(DATE1=DATE))>REF(l,BARSLAST(DATE1=DATE)-2),REF(l,BARSLAST(DATE1=DATE)-2),ref(l,BARSLAST(DATE1=DATE)-1)));
hh31:=ref(o,BARSLAST(DATE1=DATE));
hh32:=ref(c,BARSLAST(DATE1=DATE));
hh3:=min(hh31,hh32);
LL3:=max(hh31,hh32);
HH4:=if(做多吗,ref(h,barslast(DATE=DATE2)),ref(h,barslast(DATE=DATE1)));
LL4:=if(做多吗,ref(L,barslast(DATE=DATE1)),ref(L,barslast(DATE=DATE2)));
LLOW:=ref(LOW,BARSLAST(DATE1=DATE));
H1:=STRTONUM(NUMTOSTR(Hh));
L1:=STRTONUM(NUMTOSTR(LLOW));
H2:=STRTONUM(NUMTOSTR(HH2));
L2:=STRTONUM(NUMTOSTR(LL2));
h3:=STRTONUM(NUMTOSTR(Hh3));
L3:=STRTONUM(NUMTOSTR(LL3));
H4:=STRTONUM(NUMTOSTR(HH4));
L4:=STRTONUM(NUMTOSTR(LL4));
LL1:=if(测量=1,H1-L1,IF(测量=2 AND 做多吗=1,H2-L1,IF(测量=2 AND 做多吗<>1,H1-L2,IF(测量=3 AND 做多吗=1,H3-L1,IF(测量=3 AND 做多吗<>1,H1-L3,IF(测量=4,H4-L4,H4-L4))))));
LL:=STRTONUM(NUMTOSTR(LL1));
VERTLINE(date=date1,0),COLORB0B0B0,LINETHICK2;
IF 测量=4 THEN VERTLINE(date=date2,1),COLORBBBBBB;
if 做多吗=1 then
begin
多开门:LL*1.508 + L1,COLORRED,linethick2;
一线:L1+LL*2,COLORWHITE,dotline;
二线:L1+LL*2.4,COLORWHITE,dotline;
三线:L1+LL*3.05,color0045FF;
四线:L1+LL*3.75,COLORWHITE,dotline;
五线:L1+LL*4.15,color00A5FF;
六线:L1+LL*4.8,COLORWHITE,dotline;
七线:L1+LL*5.5,colorCBC0FF;
八线:L1+LL*6.1,COLORWHITE,dotline;
多关门:L1+LL*6.90001,linethick2;
DRAWTEXT(barstatus=2,LL*1.50801+L1,numtostr(LL*1.508+L1)+'多开门'),COLORB0B0B0,ALIGN2;
DRAWTEXT(BARSTATUS=2,L1+LL*3.05001,numtostr(L1+LL*3.05)+' No:3'),COLORB0B0B0,ALIGN2;
DRAWTEXT(BARSTATUS=2,L1+LL*4.15001,numtostr(L1+LL*4.15)+' No:5'),COLORB0B0B0,ALIGN2;
DRAWTEXT(BARSTATUS=2,L1+LL*5.50001,numtostr(L1+LL*5.5)+' No:7'),COLORB0B0B0,ALIGN2;
DRAWTEXT(BARSTATUS=2,L1+LL*6.90001,numtostr(L1+LL*6.9)+'多关门'),COLORB0B0B0,ALIGN2;
end;
IF 做多吗<>1 THEN
BEGIN
空开门:h1-LL*1.508,linethick2;
空一线:h1-LL*2,COLORWHITE,DOTLINE;
空二线:h1-LL*2.4,COLORWHITE,DOTLINE;
空三线:h1-LL*3.05,colorD30094;
空四线:h1-LL*3.75,COLORWHITE,DOTLINE;
空五线:h1-LL*4.15,color00A5FF;
空六线:h1-LL*4.8,COLORWHITE,DOTLINE;
空七线:h1-LL*5.5,color104974;
空八线:h1-LL*6.1,COLORWHITE,dotline;
空关门:h1-LL*6.9,linethick2;
DRAWTEXT(BARSTATUS=2,h1-LL*1.50801,numtostr(h1-LL*1.508)+'空开门'),COLORB0B0B0,ALIGN2;
DRAWTEXT(BARSTATUS=2,h1-LL*3.05001,numtostr(h1-LL*3.05)+' No:3'),COLORB0B0B0,ALIGN2;
DRAWTEXT(BARSTATUS=2,h1-LL*5.50001,numtostr(h1-LL*5.5)+' No:7'),COLORB0B0B0,ALIGN2;
DRAWTEXT(BARSTATUS=2,h1-LL*6.90001,numtostr(h1-LL*6.9)+'空关门'),COLORB0B0B0,ALIGN2;
END;
{-----------------------------立体k线--------------------------------------}
Ko:=CLOSE;
Kc:=REF(CLOSE,1); -
一个回踩30日线的公式
编写条件：编写方法：一个30日与60日线金叉后，股价回踩30日均线的选股公式。也有可跌破30日线的公式
-
最低价8天不破10日均线选股的方法
编写条件：编写方法：最低价8天不破10日均线选股的方法 LAST(L>=MA(C,10))=8;
-
一个连续向下跳空三阴线的选股公式
编写条件：编写方法：一个连续向下跳空三阴线的选股公式
XG:COUNT(H<REF(C,1) AND C<REF(C,1),3)=3; -
把量化指标改成同花顺量化选股公式
编写条件：编写方法：B:zig(3,10)*100,colorff00ff;
g:MA(B,2),colorffff00;
D:crOSS(B,g)*1000,colorred;
W:CROSS(g,B)*1000,colorgreen;
DRAWTEXT(W=1000,b*1.05,'卖' ),COLOR00ff00;
DRAWTEXT(D=1000,b*1.05,'买'),colorred; -
一个一阳穿三线 的选股公式和预警公式
编写条件：编写方法：一个一阳穿三线的选股公式和预警公式。
xg:C>O AND crOSS(C>MA(C,5),0.5) AND CROSS(C>MA(C,10) ,0.5) AND CROSS(C>MA(C,20),0.5); -
一个30周均线上行且周成交量柱同时突破5周均量线和10周均量线的
编写条件：编写方法：一个30周均线上行且周成交量柱同时突破5周均量线和10周均量线的选股公式
-
一个当天实体阳线大于2%的选股公式
编写条件：编写方法：当天实体阳线大于2%的选股公式 条件是实体阳线大于2%
-
将世纪指标中RS11上穿RS14编成选股公式
编写条件：编写方法：世纪指标中RS11上穿RS14编成选股公式，谢谢！
世纪指标原码如下：
