|
以下是通达信飞雪多空主图指标源码（无源码的请下载附件导入）
MB:= MA(CLOSE,20);
上轨:= MB+STD(CLOSE,20);
下轨:= MB-STD(CLOSE,20);
上极限:= MB+2*STD(CLOSE,20);
下极限:= MB-2*STD(CLOSE,20);
LC:=REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
MTR:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),12);
HD :=HIGH-REF(HIGH,1);
LD :=REF(LOW,1)-LOW;
DMP:=EMA(IF(HD>0&&HD>LD,HD,0),12);
DMM:=EMA(IF(LD>0&&LD>HD,LD,0),12);
PDI:= DMP*100/MTR;
MDI:= DMM*100/MTR;
ADX:= EMA(ABS(MDI-PDI)/(MDI+PDI)*100,2);
ADXR:=EMA(ADX,2);
ADD:=ADX>REF(ADX,1) AND REF(ADX,1)<=REF(ADX,2);
TYP:=(HIGH+LOW+CLOSE)/3;
CCI14:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)),COLORWHITE;
CCI80:=(TYP-MA(TYP,70))/(0.015*AVEDEV(TYP,70));
RSV:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
BBI1:(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
BBI2:(MA(C,14)+MA(C,25)+MA(C,60)+MA(C,140))/4;
BB:(BBI1+BBI2)/2,LINETHICK2,COLORMAGENTA;
MA25:MA(C,25),CIRCLEDOT,LINETHICK2,COLORFF99CC;
EMA3:EMA(C,3),COLOR0066FF;
TBB2:=BARSLAST(BB>REF(BB,1) AND REF(BB,1)<=REF(BB,2));
TBB:=BARSLAST(BB<REF(BB,1) AND REF(BB,1)>=REF(BB,2));
T253:=BARSLAST(CROSS(EMA3,MA25));
TM3D:=EMA3<REF(EMA3,1) AND REF(EMA3,1)>=REF(EMA3,2);
底:=REF(BB,TBB)/LLV(L,TBB)>1.10 AND HHV(MDI,TBB)>=40 AND HHV(ADX,TBB)>=50 AND LLV(J,BARSLAST(CROSS(K,J)))<=0 AND CROSS(J,K);
DRAWTEXT(底,L*0.98,'【★】'),COLORYELLOW;
出:=HHV(H,TBB2)>REF(BB,TBB2)*1.10 AND HHV(H,T253)>=上极限*0.98 AND HHV(J,BARSLAST(CROSS(J,K)))>=85 AND HHV(PDI,T253)>=35 AND CROSS(K,J);
DRAWICON(出,H*1.01,2);
DRAWTEXT(RSI1>80 AND PDI>40 AND ADX>50 AND COUNT(J>85,3)>=1 AND CCI80<REF(CCI80,1),H*1.05,'【逃】');
DRAWTEXT(RSI1>70 AND PDI>35 AND ADX>50 AND J>85 AND CCI14<REF(CCI14,1),H*1.03,'▼'),COLORGREEN;
{=======================================================================================================================================}
底成:=COUNT(MDI>=40 AND ADX>=50 AND CCI14<-150,TBB)>=1 AND HHV(BB,TBB)/LLV(L,TBB)>1.10;
DRAWTEXT(底成 AND CROSS(C,BBI1),L*0.98,'【底成】'),COLORRED;
PP:=(PDI>MDI AND ADD AND PDI<30) OR CROSS(PDI,MDI);
追:=(BBI1-BBI2)/BBI2*100<=3 AND BBI1>REF(BBI1,1) AND BB>REF(BB,1) AND BBI2>=REF(BBI2,1)*0.99
AND HHV(MDI,TM3D)>20 AND PP AND J<85;
DRAWTEXT(追,L*0.98,'【追】'),COLORRED;
{=======================================================================================================================================}
坑:DRAWTEXT(MDI>35 AND HHV(PDI,T253)>=30 AND HHV(BB,TBB)/L>1.10 AND J<10,L*0.99,'【坑】');
85311917.jpg
|
