融大轨道升级TDX版
CC:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
DD:=DMA(CLOSE,CC);
上轨:(1+7/100)*DD,COLORGREEN;
下轨:(1-7/100)*DD,COLORGREEN;
中轨:(上轨+下轨)/2,COLORGREEN;
疯狂:(1+14/100)*DD,COLORGRAY,POINTDOT;
抄底:(1-14/100)*DD,COLORGRAY,POINTDOT;
DRAWNUMBER(ISLASTBAR,上轨,上轨),COLOR00FFFF;
DRAWNUMBER(ISLASTBAR,下轨,下轨),COLORFFFF00;
DRAWNUMBER(ISLASTBAR,中轨,中轨),COLOR00FF00;
DRAWNUMBER(ISLASTBAR,疯狂,疯狂),COLOR0000FF;
DRAWNUMBER(ISLASTBAR,抄底,抄底),COLORWHITE;
INLINE:=EMA(C,250);
CHIPS:INLINE-(EMA(C,3)-INLINE),COLORGRAY;
V5:EMA(CYC(3),5),COLORFF7F50,LINETHICK1;
CYC:IF(V5>REF(V5,1),V5,DRAWNULL),COLORFF00FF,LINETHICK1;
上轨红:IF(上轨>=REF(上轨,1),上轨,DRAWNULL),COLORRED,LINETHICK1;
中轨红:IF(中轨>=REF(中轨,1), 中轨,DRAWNULL),COLORRED, LINETHICK1;
下轨红:IF(下轨>=REF(下轨,1), 下轨,DRAWNULL),COLORRED,LINETHICK1;
{中期临界点90:DMA(MA(CLOSE+REF(CLOSE,5)/CLOSE*0.098,90),VOL),CIRCLEDOT,COLORGRAY;}
{年:DMA(MA(CLOSE+REF(CLOSE,5)/CLOSE*0.098,250),VOL),CIRCLEDOT,COLORGRAY;}
STICKLINE(C/REF(C,1)>1.095,C,O,2,0),COLORYELLOW;
涨停:=IF(REF(C,1)*1.095-C<0.01 ,1,0);
STICKLINE(涨停,OPEN,CLOSE,2.5,0),COLORYELLOW;
DRAWTEXT(涨停,L-0.1,'涨停'),COLORYELLOW;
C3:=REF(C,1);
跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0);
STICKLINE(跌停,OPEN,CLOSE,2.5,0),COLORBLUE;
DRAWTEXT(跌停,H+0.3,'跌停'),COLORBLUE;
净资产:FINANCE(34),NODRAW,COLORFF00FF;
每股收益:FINANCE(33),NODRAW,COLORFF7F50;
市盈率:DYNAINFO(39),NODRAW,COLORFF00FF;
流通市值:(FINANCE(40)/100000000),NODRAW,COLORRED;
DIR2:=ABS(CLOSE-REF(CLOSE,10));
VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),10);
ER2:=DIR2/VIR2;
CS2:=ER2*(0.8-2/24)+2/24;
CQ2:=CS2*CS2;
{AMA2:EMA(DMA(CLOSE,CQ2),2),COLORLIBLUE,LINETHICK2;}
{无穷均线:DMA(CLOSE,(VOL)/(CAPITAL)),LINETHICK1,COLORFF00FF;}
{STICKLINE((CLOSE>=中轨) AND (CLOSE>=OPEN),CLOSE,OPEN,3,0),COLORRED;}
{STICKLINE((CLOSE>=中轨) AND (CLOSE>=OPEN),HIGH,LOW,0,0),COLORRED;}
{STICKLINE((CLOSE>=中轨) AND (CLOSE<OPEN),CLOSE,OPEN,3,1),COLORRED;}
{STICKLINE((CLOSE>=中轨) AND (CLOSE<OPEN),OPEN,HIGH,0,0),COLORRED;}
{STICKLINE((CLOSE>=中轨) AND (CLOSE<OPEN),CLOSE,LOW,0,0),COLORRED;}
{STICKLINE((CLOSE<中轨) AND (CLOSE>OPEN),CLOSE,OPEN,3,1),COLORGREEN;}
{STICKLINE((CLOSE<中轨) AND (CLOSE<=OPEN),CLOSE,OPEN,0,1),COLORGREEN;}
{STICKLINE((CLOSE<中轨) AND (CLOSE<=OPEN),HIGH,LOW,3,1),COLORGREEN;}
{STICKLINE((CLOSE<中轨) AND (CLOSE>OPEN),CLOSE,HIGH,0,1),COLORGREEN;}
{STICKLINE((CLOSE<中轨) AND (CLOSE>OPEN),OPEN,LOW,0,1),COLORGREEN;};
{好底主图}
D:=EMA((C*3+H+L+O)/6,5);
A线:=HHV(D,13)COLORYELLOW,LINETHICK2;
B线:=LLV(D,13)COLORYELLOW,LINETHICK2;
日平:="MACD.MACD#DAY"(12,26,9);
周平:="MACD.MACD#WEEK"(12,26,9);
JC:=(A线-B线);
壹:=COUNT(JC>REF(JC,1)AND A线>REF(A线,1),5)=1 AND JC>REF(JC,1)AND A线>REF(A线,1)AND D>=REF(D,1);
G1:=FILTER(壹=1,10);
G2:=BARSLAST(G1>0);
G3:=IFF(G2>0 AND G2<=10,1,0)=1 AND ((C-REF(C,G2))/REF(C,G2))*100>=5;
概壹:=(SUM(FILTER(G3,10),0)/SUM(G1>0,0))*100;
加1:=COUNT(日平>=0 AND 周平>=0,5)=1 AND 日平>=0 AND 周平>=0;
加2:=FILTER(D=A线 AND REF(D,1)<REF(A线,1)AND REF(D,2)<REF(A线,2),10);
①:=FILTER(加1=1,10);
②:=BARSLAST(①>0);
③:=IFF(②>0 AND ②<=10,1,0)=1 AND ((C-REF(C,②))/REF(C,②))*100>=5;
概加1:=(SUM(FILTER(③,10),0)/SUM(①>0,0))*100;
好底:FILTER(COUNT(D=B线,3)>=2 AND D>B线,5),COLORRED,NODRAW;
DRAWTEXT(好底,L-0.5,'好底'),COLORRED;
|
