金龙起舞(通达信)

cps16888

　　参数设置：N(1,111,20)N1(1,111,7)N2(1,111,69)
源码：
{M金龙起舞N(1,111,20)N1(1,111,7)N2(1,111,69)}
M3:=EMA(CLOSE,3);
M8:EMA(CLOSE,8),,COLORGREEN;
M13:EMA(M8,13),,COLORRED;
M62:eMA(M8,55),,COLORf0f000;
Var1:=EMA(M13,62);
M81:EMA(M62,81),,COLORYELLOW;
M144:EMA(Var1,144),LINETHICK2,COLORRED;
M250:EMA(Var1,250),LINETHICK2,COLORf00ff0,pointdot;
Var2:=(CLOSE+HIGH+LOW)/3;
Var3:=EMA(Var2,10);
Var4:=REF(Var3,1);
STICKLINE(Var3Var4,Var3,Var4,4,0),,COLORYELLOW;
STICKLINE(Var3Var4,Var3,Var4,4,0),,COLORBLUE;
Var5:=(REF(HIGH,1)+REF(LOW,1))/2;
Var6:=MA(CLOSE,N)+2*STD(CLOSE,N);
drawtext(cross(var3,var4),var3*0.98,''买''),coloryellow;
DRAWTEXT(CROSS(Var5,Var6),HIGH*1.04,''卖''),,COLORGREEN;
Var7:=REF(CLOSE,1);
Var8:=SMA(MAX(CLOSE-Var7,0),N1,1)/SMA(ABS(CLOSE-Var7),N1,1)*100;
Var9:=CROSS(N2,Var8);
VarA:=FILTER(Var9,4);
DRAWTEXT(VarA,HIGH*1.04,''卖''),,COLORWHITE;
VarB:=(2*CLOSE+HIGH+LOW)/4;
VarC:=LLV(LOW,34);
VarD:=HHV(HIGH,34);
VarE:=EMA((VarB-Var1)/(Var5-Var1)*100,7);
VarF:=EMA(0.667*REF(VarE,1)+0.333*VarE,5);
DRAWTEXT(IF(COUNT(CLOSEREF(CLOSE,1),8)/80.6ANDVOL=1.5*MA(VOL,5)ANDCOUNT(VarE=VarF,3)ANDREF(LOW,1)=LLV(LOW,120),1,0),LOW,''●买进''),,{00010001};
DRAWTEXT(IF(COUNT(CLOSEREF(CLOSE,1),13)/130.6ANDCOUNT(VarEVarF,6)ANDREF(LOW,5)=LLV(LOW,120)ANDREF(CLOSE=OPEN,4)ANDREF(CLOSEOPEN,3)ANDREF(CLOSEOPEN,2)ANDREF(OPENCLOSE,1)ANDOPENREF(CLOSE,1),1,0),LOW,''●买进''),,COLORYELLOW;
Var10:=MA(CLOSE,80)-MA(CLOSE,10)/3;
DRAWTEXT(IF(CLOSEVar10ANDVOL/240MA(VOL,5)/240ANDCLOSEREF(CLOSE,1)*1.08ANDCLOSEMA(CLOSE,13)*1.3,1,0),LOW,''●抄底''),,COLORRED;
bb:=hhv(hhv(low,14),60);
x:=hhv(ma((l+h+c)/3,8),60),colorff6600;
　　


　　

　　{参数:n110020;m110032;p1120080;p21200100}
　　VAR1:=(C+H+O+L)/4;
卖出:XMA(VAR1,N)*(1+P1/1000),COLORGREEN,LINETHICK2;
买入:XMA(VAR1,M)*(1-P2/1000),COLORMAGENTA,LINETHICK2;
幅度:100*(卖出-买入)/买入,NODRAW;
MA1:=MA(VAR1,3);
STICKLINE(卖出LOWAND卖出HIGH,卖出,MAX(卖出,MAX(OPEN,CLOSE)),3,0),COLORGREEN;
STICKLINE(卖出MIN(C,O)AND卖出MAX(C,O),卖出,MAX(OPEN,CLOSE),3,0),COLORGREEN;
STICKLINE(卖出LOWAND卖出HIGH,卖出,HIGH,0,0),COLORGREEN;
STICKLINE(卖出LOW,OPEN,CLOSE,3,0),COLORGREEN;
STICKLINE(卖出LOW,HIGH,LOW,0,0),COLORGREEN;
STICKLINE(买入LOWAND买入HIGH,买入,MIN(MIN(OPEN,CLOSE),买入),3,0),COLORMAGENTA;
STICKLINE(买入MIN(C,O)AND买入MAX(C,O),买入,MIN(OPEN,CLOSE),3,0),COLORMAGENTA;
STICKLINE(买入LOWAND买入HIGH,买入,LOW,0,0),COLORMAGENTA;
STICKLINE(买入HIGH,OPEN,CLOSE,3,0),COLORMAGENTA;
STICKLINE(买入HIGH,HIGH,LOW,0,0),COLORMAGENTA;
DRAWTEXT(CROSS(LOW,买入),LOW*0.95,''Ｂ''),COLORRED,LINETHICK2;
DRAWTEXT(CROSS(卖出,HIGH),HIGH*1.02,''Ｓ''),COLORGREEN;
　　绿上卖，红下买。