用了两天的时间,将有心狼的狂赚主图源码加上我的源码,完成了(股龙有心)的通达信主图公式(最新版50输出).
公式加上支撑阻力价,强攻回调位,买入点作了双重的保险.
发此公式的目的是想大家都赚钱,同时也希望大家能认真的回一帖,帮我顶上去让大家都能分享!
祝大家新年发财!
C/C++ Code复制内容到剪贴板
- {股龙有心}
-
- {N:1 100 5 M:1 100 13}{喜欢什么均线自己调,不影响买卖}
-
- 获利%:WINNER(CLOSE)*100,NODRAW,COLORWHITE; {此句为计算获利盘比例,不需要可以不要}
- V1:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
- V2:=(1-7/100)*(DMA(CLOSE,V1));
- V3:=(1+7/100)*(DMA(CLOSE,V1));
- V5:=MA((LOW+HIGH+CLOSE)/3,5);
- 支撑:REFDATE(V2,DATE),POINTDOT,LINETHICK3,COLORCC66FF;
- 阻力:REFDATE(V3,DATE),POINTDOT,LINETHICK3,COLORGREEN;
- MA1:=MEMA(CLOSE,5);
- MA2:=ATAN((MA1/REF(MA1,1)-1)*100)*180/3.1416;
- MA3:=IF(MA2>0,MA2,MA2);
- MA5:MA(CLOSE,N),COLOR888899;
- MA13:MA(CLOSE,M),COLORFF9900,LINETHICK2;
- VAR1:=CLOSE=HHV(C,4) AND (REF(C,1)>=REF(C,2) OR REF(C,1)>=REF(C,3)) OR REF(C,1)=HHV(C,4) AND CLOSE>=REF(C,2) OR REF(C,2)=HHV(C,4) AND REF(C,3)=LLV(C,4) AND C>=REF(C,1) OR REF(C,3)=HHV(C,4) AND C>=REF(C,1) AND C>=REF(C,2);
- VAR2:=CLOSE=HHV(C,4) AND REF(C,1)=LLV(C,4);
- VAR3:=CLOSE=LLV(C,4) AND (REF(C,1)<REF(C,2) OR REF(C,1)<REF(C,3)) OR REF(C,1)=LLV(C,4) AND C<REF(C,2) OR REF(C,2)=LLV(C,4) AND REF(C,1)=HHV(C,4) AND C<REF(C,1) OR REF(C,3)=LLV(C,4) AND C<REF(C,1) AND C<REF(C,2);
- VAR4:=REF(C,1)=LLV(C,4) AND C>=REF(C,2) OR REF(C,2)=LLV(C,4) AND REF(C,1)<=REF(C,3) AND REF(C,2)<REF(C,4) AND C>=REF(C,1);
- VAR5:=REF(C,1)=HHV(C,4) AND C<REF(C,2) OR (REF(C,2)=HHV(C,4) AND REF(C,1)>REF(C,3) OR REF(C,3)=HHV(C,4) AND REF(C,1)>REF(C,2)) AND REF(C,2)>=REF(C,4) AND C<REF(C,1);
- VAR6:=V5>REF(V5,1) AND REF(V5,1)<REF(V5,2);
- VAR7:=LOW<HHV(V5,13) AND HIGH>HHV(V5,13) AND CLOSE>REF(C,1) AND CLOSE>OPEN;
- VAR8:=VAR7 AND COUNT(VAR6,2);
- VAR9:=100*EMA(EMA(C-REF(C,1),6),6)/EMA(EMA(ABS(C-REF(C,1)),6),6);
- VAR10:=EMA(MA(C,13),13);
- VAR11:=FILTER((LLV(VAR9,2)=LLV(VAR9,7) AND COUNT(VAR9<0,2) AND CROSS(VAR9,MA(VAR9,2)))=1,5);
- VAR12:=FILTER((HHV(VAR9,2)=HHV(VAR9,7) AND COUNT(VAR9>50,2) AND CROSS(MA(VAR9,2),VAR9))=1,1);
- VAR13:=SMA(EMA((C-REF(C,1))/REF(C,1),5)*100,3,1)*10;
- VAR14:=FILTER(((CROSS(VAR13,0) OR CROSS(C,VAR10)) AND VAR11)=1,3);
- VAR15:=MA(C,18)>=REF(MA(C,18),3) AND CROSS(C,MA(C,18));
- VAR16:=VAR8 AND NOT(REF(VAR8,1));
- 强攻:IF(MA3>REF(MA3,1) AND MA3>=0,MA13,DRAWNULL),COLORYELLOW,LINETHICK2;
- 回调:IF(MA3<REF(MA3,1) AND MA3>0,MA13,DRAWNULL),COLORGREEN,LINETHICK2;
- {KDJ}
- RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
- K:=SMA(RSV,3,1);
- D:=SMA(K,3,1);
- J:=3*K-2*D;
- 金叉:=CROSS(J,D);
- 死叉:=CROSS(D,J);
- 买1:=(VAR14 OR VAR15) AND VAR11;
- 买2:=(VAR14 OR VAR15) AND VAR4;
- 买3:=(VAR14 OR VAR15) AND VAR2;
- 买4:=(VAR2 AND VAR11) OR (VAR4 AND VAR11);
- 买5:=(金叉 AND VAR4) OR (金叉 AND VAR2) OR (金叉 AND VAR11);
- {涨停}
- STICKLINE(CLOSE>REF(CLOSE,1)*1.0985 AND CLOSE=HIGH,CLOSE,OPEN,4,-1),COLOR00FFFF;
- {跌停}
- STICKLINE(CLOSE<REF(CLOSE,1)*0.9015 AND CLOSE=LOW,CLOSE,OPEN,4,-1),COLORGREEN;
- {蓝}
- STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3,0),COLORFF7700;
- STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,2.2,0),COLORFF9900;
- STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1.5,0),COLORFFBB00;
- STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,0.5,0),COLORCYAN;
- {红}
- STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0),COLOR000099;
- STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.2,0),COLOR0000CC;
- STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.5,0),COLOR0000FF;
- STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0.5,0),COLORCC66FF;
- {绿}
- STICKLINE(VAR3,OPEN,(OPEN+CLOSE)/2,3,0),COLOR009900;
- STICKLINE(VAR3,OPEN,(OPEN+CLOSE)/2,2.2,0),COLOR00BB00;
- STICKLINE(VAR3,OPEN,(OPEN+CLOSE)/2,1.5,0),COLOR00DD00;
- STICKLINE(VAR3,OPEN,(OPEN+CLOSE)/2,0.5,0),COLOR00FF00;
- {灰}
- STICKLINE(VAR4,OPEN,(OPEN+CLOSE)/2,3,0),COLOR999999;
- STICKLINE(VAR4,OPEN,(OPEN+CLOSE)/2,2.2,0),COLORBBBBBB;
- STICKLINE(VAR4,OPEN,(OPEN+CLOSE)/2,1.5,0),COLORDDDDDD;
- STICKLINE(VAR4,OPEN,(OPEN+CLOSE)/2,0.5,0),COLORFFFFFF;
- STICKLINE(金叉,OPEN,CLOSE,0.5,0),COLORYELLOW;
- STICKLINE(死叉,OPEN,CLOSE,0.5,0),COLOR000099;
- DRAWICON(VAR16,LOW-0.02,7);
- DRAWICON(买1 OR 买2 OR 买3 OR 买4 OR 买5,LOW-0.01,1);
- DRAWICON(死叉 OR VAR12 OR CROSS(40,VAR9),HIGH+0.01,2);
C/C++ Code复制内容到剪贴板
- 选股公式:
-
- VAR1:=MA((LOW+HIGH+CLOSE)/3,5);
- VAR2:=CLOSE=HHV(C,4) AND REF(C,1)=LLV(C,4);
- VAR3:=REF(C,1)=LLV(C,4) AND C>=REF(C,2) OR REF(C,2)=LLV(C,4) AND REF(C,1)<=REF(C,3) AND REF(C,2)<REF(C,4) AND C>=REF(C,1);
- VAR4:=VAR1>REF(VAR1,1) AND REF(VAR1,1)<REF(VAR1,2);
- VAR5:=LOW<HHV(VAR1,13) AND HIGH>HHV(VAR1,13) AND CLOSE>REF(C,1) AND CLOSE>OPEN;
- VAR6:=VAR5 AND COUNT(VAR4,2);
- VAR7:=VAR6 AND NOT(REF(VAR6,1));
- VAR8:=100*EMA(EMA(C-REF(C,1),6),6)/EMA(EMA(ABS(C-REF(C,1)),6),6);
- VAR9:=EMA(MA(C,13),13);
- VAR10:=FILTER((LLV(VAR8,2)=LLV(VAR8,7) AND COUNT(VAR8<0,2) AND CROSS(VAR8,MA(VAR8,2)))=1,5);
- VAR11:=SMA(EMA((C-REF(C,1))/REF(C,1),5)*100,3,1)*10;
- VAR12:=FILTER(((CROSS(VAR11,0) OR CROSS(C,VAR9)) AND VAR10)=1,3);
- VAR13:=MA(C,18)>=REF(MA(C,18),3) AND CROSS(C,MA(C,18));
- RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
- K:=SMA(RSV,3,1);
- D:=SMA(K,3,1);
- J:=3*K-2*D;
- 金叉:=CROSS(J,D);
- 死叉:=CROSS(D,J);
- 买1:=(VAR12 OR VAR13) AND VAR10;
- 买2:=(VAR12 OR VAR13) AND VAR3;
- 买3:=(VAR12 OR VAR13) AND VAR2;
- 买4:=(VAR2 AND VAR10) OR (VAR3 AND VAR10);
- 买5:=(金叉 AND VAR3) OR (金叉 AND VAR2) OR (金叉 AND VAR10);
- ST:=EXIST(C/REF(C,1)>1.06,50);
- 输出:(买1 OR 买2 OR 买3 OR 买4 OR 买5 OR VAR7) AND ST;
