大智慧精确主图指标

源码

N:=10;

R5:MA(CLOSE,5),PRECIS2,color0099cc,linethick2;
R10:MA(CLOSE,10),PRECIS2,color009900,linethick2;
R20:=MA(CLOSE,20);
R30:MA(CLOSE,30),colorff9933;
R60:MA(CLOSE,60),PRECIS2,linethick1,COLORred;
强弱:ema(cost(60),10),PRECIS2,COLORa9a9a9,DOTLINE,LINETHICK1;
lhnh:=BARSLAST(DISPSTATUS=1)+1;
nnl:=DISPSTATUS=2;
P:=BACKSET(nnl,hhvBARS(h,lhnh)+1);
B:=P>REF(P,1);
P2:=BACKSET(nnl,LLVBARS(L,lhnh)+1);
B2:=P2>REF(P2,1);
高:REF(H,BARSLAST(b)),PRECIS2,COLORRED,LINETHICK1;
DRAWTEXT(nnl,高,'高： ￥'+高),ALIGN2,COLORGREEN;
低:REF(L,BARSLAST(B2)),PRECIS2,COLORGREEN,LINETHICK1;
DRAWTEXT(nnl,低*1.009,'低： ￥'+低),ALIGN2,COLORGREEN;
F6:((高-低)*0.236)+低,PRECIS0,COLORA9A9A9;
DRAWTEXT(BARSLAST(B)>BARSLAST(B2) and nnl,F6,'0.236：￥'+F6),ALIGN2,COLORGREEN;
F2:((高-低)*0.382)+低,PRECIS0,COLORA9A9A9;
DRAWTEXT(BARSLAST(B)>BARSLAST(B2) and nnl,F2,'0.382：￥'+F2),ALIGN2,COLORGREEN;
F3:((高-低)*0.5)+低,PRECIS0,COLOR5F9EA0;
DRAWTEXT(nnl,F3,'0.5：￥'+F3),ALIGN2,COLORGREEN;
F4:((高-低)*0.618)+低,PRECIS0,COLORA9A9A9;
DRAWTEXT(BARSLAST(B)>BARSLAST(B2)and nnl,F4,'0.618：￥'+F4),ALIGN2,COLORGREEN;
F5:((高-低)*0.764)+低,PRECIS0,COLORA9A9A9;
DRAWTEXT(BARSLAST(B)>BARSLAST(B2) and nnl,F5,'0.764：￥'+F5),ALIGN2,COLORGREEN;
PDAY1 := BARSLAST(CROSS(R5,R60));{5日均线上穿60日均线}
PDAY2 := BARSLAST(CROSS(R10,R60));{10日均线上穿60日均线，至此形成颈部}
PDAY3 := BARSLAST(HIGH=HHV(HIGH,PDAY2));{形成头部，要下跌}
PDAY4 := BARSLAST(CROSS(R10,R5));{下跌后，5日均线和10日均线死叉}
PDAY5 := BARSLAST(CROSS(R5,R10));{回落不久，5日均线和10日均线形成金叉，形成D部}
A1:= PDAY1>PDAY2 AND PDAY2>PDAY3 AND PDAY3>PDAY4 AND PDAY4>PDAY5 AND PDAY5<5;
A2:= COUNT(CROSS(R10,R5),PDAY2)=1;
AA:=IF(A1 AND A2 AND MA(C,5)>=MA(C,10) AND MA(C,10)>MA(C,60),10,0);
BB:=FILTER( A1 AND A2 AND MA(C,5)>=MA(C,10) AND MA(C,10)>MA(C,60),5);
有戏:=IF(AA AND BB,1,0);
DRAWICON(AA AND BB ,LOW*0.99,1),ALIGN1;
A0:=AMOUNT/VOL/100;
A3:=(EMA(A0,3)>EMA(A0,7) AND EMA(A0,7)>EMA(A0,13) AND EMA(A0,13)>EMA(A0,21));
DRAWTEXT(A3,MA(C,60),'*'),ALIGN1,colorred;
GJ:=(C+H+L+O)/4;
明阻:=L+(GJ-L)+(C-L);
明支:=L+(C-GJ);
阻:REF(明阻 , 1),LINETHICK0,PRECIS2,COLORRED;
支:REF(明支 , 1),LINETHICK0,PRECIS2,COLORFF00FF;
STICKLINE(DISPSTATUS=2  AND C>=阻,阻*1.001,阻*0.999,15,0),COLOR0000FF;
STICKLINE(DISPSTATUS=2  AND C<阻,阻*1.001,阻*0.999,15,0),COLOR00FF00;
STICKLINE(DISPSTATUS=2  AND C>=支,支*1.001,支*0.999,15,0),COLORFF00FF;
STICKLINE(DISPSTATUS=2  AND C<支,支*1.001,支*0.999,15,0),COLORFF8800;
MTM:=C-REF(C,1);
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
ZX:=100*EMA(EMA(MTM,12),12)/EMA(EMA(ABS(MTM),12),12);
CX:=100*EMA(EMA(MTM,26),26)/EMA(EMA(ABS(MTM),26),26);
DXGD:=LLV(DX,2)=LLV(DX,5) AND CROSS(DX,MA(DX,2));
ZXGD:=LLV(ZX,2)=LLV(ZX,5) AND CROSS(ZX,MA(ZX,2)) AND DX>ZX;
短买:=IF(DXGD AND BETWEEN(DX,0,60) AND ZX>0,1,0);
中买:=IF(ZXGD AND BETWEEN(DX,0,50) AND BETWEEN(CX,0,50),1,0);
DTPL:=DX>ZX AND ZX>CX AND CX>0;
QSXS:=DX>REF(DX,1) AND ZX>REF(ZX,1);
TSJC:=CROSS(DX,CX) AND CROSS(ZX,CX);
优选:=IF(CROSS(DTPL,0.8) AND (TSJC OR COUNT(QSXS,3)=3) AND CX<40,1,0);
短卖:=IF(CROSS(ZX,DX),1,0);
中卖:=IF(CROSS(CX,ZX) AND DX 买:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0);
卖:=IF(HHV(DX,2)=HHV(DX,7) AND COUNT(DX>50,2) AND CROSS(MA(DX,2),DX),1,0);
DRAWTEXT(短买,low*0.99,'△'),COLORe91daf,ALIGN1;
DRAWTEXT(中买,low*0.99,'▲'),COLORe91daf,ALIGN1;
DRAWTEXT(短卖,high*1.02,'▽'),COLORff0000,ALIGN1;
DRAWTEXT(中卖,high*1.02,'▼'),COLORff0000,ALIGN1;
DRAWTEXT(filter(买=1,5),low-0.03,'★'),COLORe91adf,ALIGN1;
DRAWTEXT(filter(卖=1,5),high*1.015,'★'),COLORff0000,ALIGN1;
DRAWICON(优选,low-0.03,7);
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
K1:=SMA(RSV,3,1);
D1:=SMA(K1,3,1);
J1:=3*K1-2*D1;
BDGD1:=HHV(J1,2)=HHV(J1,8) AND J1>80;
BDDD:=LLV(J1,2)=LLV(J1,8);
J1向下拐头:=IF(CROSS(REF(J1-0.01,1),J1) AND REF(BDGD1,1),1,0);
DRAWTE