公式
-
以波神凯线中的红“（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); -
通达信三剑屠龙抄底指标公式
N:=3;
STICKLINE(C>0,0,0,10,0),COLORGRAY;
STICKLINE(C>0,30,30,10,0),COLORRED;
STICKLINE(C>0,60,60,10,0),COLORGREEN;
STICKLINE(C>0,20,20,6,0),COLORCYAN;
STICKLINE(C>0,40,40,6,0),COLORYELLOW;
JJ:=(CLOSE-LLV(LOW,3*N))/(HHV(HIGH,3*N)-LLV(LOW,3*N))*100;
JK:=(SMA(JJ,3,1));
JD:=SMA(JK,3,1);
J5:=(CLOSE-LLV(LOW,5*N))/(HHV(HIGH,5*N)-LLV(LOW,5*N))*100;
J21:=(CLOSE-LLV(LOW,21*N))/(HHV(HIGH,21*N)-LLV(LOW,21*N))*100;
K21:=SMA(J21,3,1);
D21:=SMA(K21,3,1);
PMC:=POW(MA(CLOSE,N),2)+MA(CLOSE,N);
PML:=POW(MA(LOW,N),2)+MA(LOW,N);
PMH:=POW(MA(HIGH,N),2)+MA(HIGH,N);
JP:=((PMC-LLV(PML,14*N))/(HHV(PMH,14*N)-LLV(PML,14*N))*100);
JPK:=SMA(JP,3,1);
JPD:=SMA(JPK,3,1);
JPJ:=3*JPK-2*JPD;
BJ:=(J5+JJ+J21)/3;
BK:=((2*JK+K21+JPK)/4);
BD:=((2*JD+D21+JPD)/4);
Bkd:=((J5+J21*2+BJ+BK+BD+JP+JPK+JPD+JPJ)/10);
JN:=(HHV(HIGH,N)-CLOSE)/(HHV(HIGH,N)-LLV(LOW,N));
N3:=(HHV(HIGH,3*N)-CLOSE)/(HHV(HIGH,3*N)-LLV(LOW,3*N));
N7:=(HHV(HIGH,7*N)-CLOSE)/(HHV(HIGH,7*N)-LLV(LOW,7*N));
N14:=(HHV(HIGH,14*N)-CLOSE)/(HHV(HIGH,14*N)-LLV(LOW,14*N));
N21:=(HHV(HIGH,21*N)-CLOSE)/(HHV(HIGH,21*N)-LLV(LOW,21*N));
N34:=(HHV(HIGH,34*N)-CLOSE)/(HHV(HIGH,34*N)-LLV(LOW,34*N));
N55:=(HHV(HIGH,55*N)-CLOSE)/(HHV(HIGH,55*N)-LLV(LOW,55*N));
BN:=((JN+N3+N7+N14+N21+N34+N55)/7)*100;
NK:=SMA(BN,3,1);
ND:=(SMA(NK,3,1));
KL:=(BK+BD+BKD+JPK+JPD+JPJ+ND+D21)/8-20;
K:SMA(KL,3,1);
D:SMA(K,3,1);
ED:SMA(D,3,1);
VAR1:=LLV(LOW,3)<=LLV(LOW,60);
VAR2:= C>O AND (C/O>1.03 OR C>1.03*REF(C,1));
绝地反击:IF(VAR1 AND VAR2,65,0),COLORYELLOW,LINETHICK2; -
以波神凯线中的红“（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); -
一个连阴后有一天收星，长下影线，小阳线等止跌信号的公式
编写条件：编写方法：解答如下：
-
一个股价连续3天收在涨停价上的公式
编写条件：编写方法：要求：股价涨停后三天收盘价均在涨停价上方的公式
-
一个回踩30日线的公式
编写条件：编写方法：一个30日与60日线金叉后，股价回踩30日均线的选股公式。也有可跌破30日线的公式
-
把一个MACD金叉公式表现在主图
编写条件：编写方法：条件 macd指标 DIFF上交DEA 在主图满足条件当天k线处画一条收盘线，线段保留5天（如不可，可直接画条直线也可以）
附上MacD指标 -
一个连续向下跳空三阴线的选股公式
编写条件：编写方法：一个连续向下跳空三阴线的选股公式
XG:COUNT(H<REF(C,1) AND C<REF(C,1),3)=3; -
一个5日均线呈60角度向上运行且股价向上跳空收阴的预警公式
编写条件：编写方法：一个5日均线呈60角度向上运行且股价向上跳空收阴的预警公式
-
把量化指标改成同花顺量化选股公式
编写条件：编写方法：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;
