zjtz288 发表于 2016-1-15 21:39

通达信0轴上方MACD二次金叉选股公式源码

**** Hidden Message *****

H2陈伟 发表于 2016-9-8 09:22

DING:=MAX(O,C);{实顶}
DI:=MIN(O,C);{实底}
YANG:=(DI>=REF(DING,1)) OR (C>O AND NOT(DING<=REF(DI,1))) OR (C>REF(C,1) AND C=O) OR (C=REF(C,1) AND C=O AND REF(DING,1)=C);{阳线}
YIN:=NOT(YANG);
YANGSHENG:=YANG AND C>=REF(DING,BARSLAST(YIN)) AND (V>REF(V,BARSLAST(YIN)) OR (BETWEEN(V,REF(V,BARSLAST(YIN))*0.95,REF(V,BARSLAST(YIN))*1.05)));
YINSHENG:=(YIN AND C<=REF(DI,BARSLAST(YANG)) AND V>REF(V,BARSLAST(YANG)));
LIANGJIABI:=V/C;
MALIANGJIABI:=MA(LIANGJIABI,3);
LIANGJIABIXISHU:=1.5;
BLZ:=V>REF(V,1)*1.5;
PLZ:=BETWEEN(V,REF(V,1)*0.95,REF(V,1)*1.05) OR BETWEEN(V,REFX(V,1)*0.95,REFX(V,1)*1.05) OR
   (BETWEEN(V,REF(V,2)*0.95,REF(V,2)*1.05) AND V>REF(V,1)*1.2) OR
   (BETWEEN(V,REF(V,3)*0.95,REF(V,3)*1.05) AND V>REF(MA(V,2),1)*1.2 AND V>REF(HHV(V,2),1)) OR
   (BETWEEN(V,REF(V,4)*0.95,REF(V,4)*1.05) AND V>REF(MA(V,3),1)*1.2 AND V>REF(HHV(V,3),1)) OR
   (BETWEEN(V,REF(V,5)*0.95,REF(V,5)*1.05) AND V>REF(MA(V,4),1)*1.2 AND V>REF(HHV(V,4),1)) OR
   (BETWEEN(V,REF(V,6)*0.95,REF(V,6)*1.05) AND V>REF(MA(V,5),1)*1.2 AND V>REF(HHV(V,5),1)) OR
   (BETWEEN(V,REF(V,7)*0.95,REF(V,7)*1.05) AND V>REF(MA(V,6),1)*1.2 AND V>REF(HHV(V,6),1)) OR
   (BETWEEN(V,REF(V,8)*0.95,REF(V,8)*1.05) AND V>REF(MA(V,7),1)*1.2 AND V>REF(HHV(V,7),1)) OR
   (BETWEEN(V,REF(V,9)*0.95,REF(V,9)*1.05) AND V>REF(MA(V,8),1)*1.2 AND V>REF(HHV(V,8),1)) OR
   (BETWEEN(V,REF(V,10)*0.95,REF(V,10)*1.05) AND V>REF(MA(V,9),1)*1.2 AND V>REF(HHV(V,9),1)) OR
   (BETWEEN(V,REF(V,11)*0.95,REF(V,11)*1.05) AND V>REF(MA(V,10),1)*1.2 AND V>REF(HHV(V,10),1)) OR
   (BETWEEN(V,REF(V,12)*0.95,REF(V,12)*1.05) AND V>REF(MA(V,11),1)*1.2 AND V>REF(HHV(V,11),1));
GLZ:=V=HHV(V,3) AND V=REFX(HHV(V,3),2);
TLZ:=(V*1.1<REFX(V,1) AND REFX(V,1)*1.1<REFX(V,2)) OR (V>REF(V,1)*1.1 AND V*1.1<REFX(V,1)) OR (V>REF(V,1)*1.1 AND REF(V,1)>REF(V,2)*1.1);
JSLS:=C<=REFX(C,1) AND REFX(C,1)<=REFX(C,2) AND LIANGJIABI>REFX(LIANGJIABI,1) AND REFX(LIANGJIABI,1)>REFX(LIANGJIABI,2);
JZ:=BLZ OR GLZ OR PLZ OR TLZ;
JJZ:=CURRBARSCOUNT>=4 AND YANG AND (YANGSHENG) AND JZ AND REFX(LLV(DI,3),3)>=DI AND (REFX(MA(LIANGJIABI,3),3)<=LIANGJIABIXISHU*LIANGJIABI OR REFX(JSLS,1)) AND REFX(C,3)>=DING;
HJZ1:=JJZ AND REFX(MA(C,3),3)>=DING AND REFX(MA(LIANGJIABI,3),3)<=LIANGJIABI AND REFX(YANG,3);
HJZ2:=YANG AND YANGSHENG AND JZ AND REFX(DI,1)>=DI AND REFX(JJZ,2) AND REFX(C,2)>DING AND REFX(LIANGJIABI,1)<LIANGJIABI;
HJZ3:=YANG AND YANGSHENG AND JZ AND REFX(LLV(DI,2),2)>=DI AND REFX(JJZ,3) AND REFX(C,3)>DING AND REFX(MA(LIANGJIABI,2),2)<LIANGJIABI;
HJZ4:=JJZ AND REFX(LLV(DI,3),3)>=DING AND REFX(MA(LIANGJIABI,3),3)<=LIANGJIABI AND REFX(YANG,3) AND (REFX(YANG,1) OR REFX(YANG,2));
WP:=JJZ OR HJZ1 OR HJZ4 OR HJZ2 OR HJZ3;
CONDJJZ:=JJZ AND REF(NOT(WP),1);
CONDHJZ1:=(HJZ1 OR HJZ2 OR HJZ3) AND REF(NOT(WP),1);
A:=CONDJJZ OR CONDHJZ1;
LZT:=BARSLAST(A);
LZTJ:=LZT<=10 AND LZT>=5;
JTJ:=C>REF(L,LZT);
JXL:=V<=LLV(V,LZT);
LTJ:=V<LLV(V,LZT)*1.1;
ZF:=(C-REF(C,1))*100/REF(C,1);
ZFTJ:=ABS(ZF)<1;
V2T:=V/REF(V,1);
JDLS:=ZF<=0 AND V2T<1;
LSTJ:=COUNT(JDLS,LZT)>=2;
{LTJ:=V2T<0.8;}
AZMD:JTJ AND LTJ AND LZTJ AND LSTJ AND ZFTJ;
STICKLINE(AZMD,0,100,3,0),COLORRED;

juanmaocup 发表于 2016-8-8 22:44

A:=AMOUNT/V/100; VARA:=EMA((((A-EMA(A,13))/EMA(A,13))*(0-100)),5); QQ:=EMA(((VARA/10)+EMA(A,13)),0); 行情线:=MA(A,1); 重心:=(C+0.618*REF(C,1)+0.382*REF(C,1)+0.236*REF(C,3)+0.146*REF(C,4))/2.382; 【操盘线】:EMA(((SLOPE(C,22)*20)+C),55),COLORYELLOW,LINETHICK4; 【黄金线】:IF(重心>=【操盘线】,【操盘线】,DRAWNULL),COLORRED,LINETHICK2; 【空仓线】:IF(重心<【操盘线】,【操盘线】,DRAWNULL),COLORCYAN,LINETHICK2;{DRAWTEXT(ISLASTBAR,【操盘线】,【操盘线】),COLORRED;} {引:EMA(CLOSE,2),LINETHICK1,COLORMAGENTA; 探:MA(CLOSE,5),LINETHICK1;} 变:EMA(CLOSE,5),LINETHICK2,COLORYELLOW; 金:IF(变>REF(变,1),变,DRAWNULL),COLORRED,LINETHICK2; 空:IF(变<REF(变,1),变,DRAWNULL),COLORGREEN,LINETHICK2; {DRAWTEXT(ISLASTBAR,变,【雷达线】),COLORRED;} {顶底信号} DA:=(EMA(H,1)+EMA(L,1)+EMA(H,1)+EMA(H,1))/4; DB:=EMA(REF(HHV(H,25),1),2),COLORGREEN,LINETHICK1; {DRAWTEXT(CROSS(DB,DA),DB,←险),COLORGREEN,LINETHICK1;} DRAWTEXT(CROSS(DA,【操盘线】),【操盘线】-0.5,★B),COLORYELLOW,LINETHICK1; {涨跌停显示} 涨停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0); STICKLINE(涨停,O,C,3,0),COLORYELLOW; ZDF:=(C-REF(C,1))/REF(C,1)*100; STICKLINE(ZDF<-9.9,O,C,3,0),COLORGREEN; DA9:=(EMA(C,1)+EMA(C,2)+EMA(C,3)+EMA(C,4))/4; DB9:=(EMA(C,10)+EMA(C,20)+EMA(C,40)+EMA(C,80))/4; DRAWTEXT(CROSS(DA9-DB9,0),L*0.98,B),COLORYELLOW; JH9:=SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100; DRAWTEXT(CROSS(84,JH9),H*1.02,☆S),COLORGREEN;

开心古海 发表于 2016-8-7 21:57

IFF:EMA(CLOSE,12)-EMA(CLOSE,27); DEA:EMA(DIFF,9); MACD:2*(DIFF-DEA), COLORSTICK,LINETHICK2; 低位金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1; STICKLINE(低位金叉,0,0.08,6,0),COLORYELLOW; DRAWTEXT(低位金叉,0.16,' 低位金叉'),COLORWHITE; JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0)); 二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1; STICKLINE(二次金叉,0,0.06,6,0),COLORFF00FF; DRAWICON(二次金叉,DEA*0.9,1) ; DRAWTEXT(二次金叉,0.2,' 二次金叉'),COLORYELLOW; A1:=BARSLAST(REF(CROSS(DIFF,DEA),1)); 底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA); STICKLINE(底背离,0,0.03,6,0),COLOR00FF00; 底背RAWLINE(A1=0,DEA,底背离,DEA,0),COLORRED,LINETHICK4; DRAWTEXT(底背离,0.12,' 底背离'),COLORFF00FF; A2:=BARSLAST(REF(CROSS(DEA,DIFF),1)); 顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF); 顶背RAWLINE(A2=0,DEA,顶背离,DEA,0),COLORGREEN,LINETHICK4;DRAWTEXT(低位金叉 AND 二次金叉 AND 底背离,0.25,'三全项'),COLOR0000FF,LINETHICK2;

k-uian 发表于 2016-1-15 23:23

看俺 看看看俺 看看

472356252 发表于 2016-1-15 23:38

00000000000000000000

hqt 发表于 2016-1-16 08:52


谢谢楼主分享!

xiaolanxing 发表于 2016-1-16 09:34

学习学习。。。。

潇洒雨 发表于 2016-1-16 09:56

周末快乐 谢谢分享!!!

绣溪翁 发表于 2016-1-16 14:07

看俺 看看看俺 看看

ghssp 发表于 2016-1-16 16:07

谢谢发现谢谢分享

稳字当先 发表于 2016-1-16 16:09

plokjhjhghfddssa

jmhe 发表于 2016-1-16 16:10

通达信0轴上方MACD二次金叉选股公式源码

梅花已经开 发表于 2016-1-16 16:36

看俺 看看看俺 看看

枫叶飘红 发表于 2016-1-16 17:03

不错,谢谢分享

lookpart 发表于 2016-1-16 21:17

wddwn 发表于 2016-1-16 21:33

看看到底是什么!

学屠工 发表于 2016-1-17 09:34

通达信0轴上方MACD二次金叉选股公式
页: [1] 2 3 4 5 6 7 8 9 10
查看完整版本: 通达信0轴上方MACD二次金叉选股公式源码