通达信买卖黄金线幅图公式源码,股海明灯，量学官网，量学知识股票论坛。

bonroi 发表于 2016-10-29 15:48

通达信买卖黄金线幅图公式源码

本帖最后由 bonroi 于 2016-10-29 16:06 编辑

通达信买卖黄金线幅图公式源码：

{ 买卖黄金线，幅图 }
AA:=(O+H+L+C)/4;
BB:=MA(AA,3);
CC:=SUM(IF(AA>REF(AA,1),AA*VOL,0),4)/SUM(IF(AA<REF(AA,1),AA*VOL,0),4);
DD:=REF(100-(100/(1+CC)),1);
A1:=HHV(AA,15);
A2:=LLV(AA,15);
A3:=A1-A2;
A4:=EMA((AA-A2)/A3,2)*100;
B1:=HHV(AA,60);
B2:=LLV(AA,60);
B3:=B1-B2;
B4:=EMA((AA-B2)/B3,2)*100;
C1:=HHV(AA,240);
C2:=LLV(AA,240);
C3:=C1-C2;
C4:=EMA((AA-C2)/C3,2)*100;
**** Hidden Message *****

qzuser 发表于 2017-10-4 17:57

三日不破:=MIN(MIN(L,REF(L,1)),REF(L,2))>=REF(L,3)&&COUNT(C>REF(C,1),3)>=2;
三日量缩:=(MAX(MAX(V,REF(V,1)),REF(V,2))<REF(V,3));
三日价涨A:=LAST(C>=REF(C,1),3,0);
三日价涨B:=C<REF(C,1) AND LAST(L>REF(C,3),3,0);
三日价涨C:=MIN(MIN(C,REF(C,1)),REF(C,2))>=REF(L,3);
TIM:=IF(DATE<1140214,1,0);
倍量柱:=C>REF(C,1)*1.04 AND (VOL>=1.9*REF(VOL,1))*TIM;
四日前倍量柱:=(REF(VOL,3)>1.9*REF(VOL,4))*TIM;
四日前高量柱:=(REF(VOL,3)>=REF(VOL,4) AND REF(VOL,3)<1.9*REF(VOL,4) AND 三日量缩)*TIM;
前三引用不成立:=COUNT(REF(四日前倍量柱 OR 四日前高量柱,1) AND (REF(三日不破,1) OR REF(三日价涨C,1)),3)=0 AND COUNT(REF(四日前高量柱,1) AND (REF(三日不破,1) OR REF(三日价涨C,1)),3)=0;
倍量黄金柱:=四日前倍量柱 AND 三日量缩 AND 三日不破 AND 三日价涨A AND 前三引用不成立;
高量黄金柱:=四日前高量柱 AND 三日量缩 AND 三日不破 AND 三日价涨A AND 前三引用不成立;
黄金柱:=倍量黄金柱 OR 高量黄金柱;
BACKSET101:=BACKSET(黄金柱,4);
FILTER101:=FILTER(BACKSET101,3);
K1:=SUMBARS(FILTER101,1);
黄金值_实:REF(C,K1-1),NODRAW,COLORYELLOW;
虚:REF(L,K1-2),NODRAW,COLORYELLOW;
倍量:=C>REF(C,1) AND (VOL>=1.9*REF(VOL,1))*TIM;
BACKSET102:=BACKSET(倍量,1);
FILTER102:=FILTER(BACKSET102,1);
K2:=SUMBARS(FILTER102,1);
STICKLINE(K2,REF(C,K2-1),REF(C,K2-1),7,0),COLORBLUE;{高位线};
STICKLINE(K2,REF(O,K2-1),REF(O,K2-1),7,0),COLORLIGREEN;{低位线};
STICKLINE(K1,REF(L,K1-2),REF(L,K1-2),2,0),COLORYELLOW;
STICKLINE(K1,REF(C,K1-1),REF(C,K1-1),5,0),COLORYELLOW;{低位线}
{STICKLINE(FILTER102,OPEN,CLOSE,2,0),COLORRED;
STICKLINE(FILTER102,H,L,0,0),COLORRED;
STICKLINE(FILTER101,OPEN,CLOSE,2,0),COLORYELLOW;
STICKLINE(FILTER101,H,L,0,0),COLORYELLOW;}
波谷值:= CONST(TROUGH(2,5,1)),COLORYELLOW,NODRAW;{前M个ZIG转向波谷值}
   波谷距离:= 1+CONST(TROUGHBARS(2,百分比,1)),NODRAW;{前M个ZIG转向波谷到当前距离}
   波峰值:= CONST(PEAK(1,5,2));
   允许误差:=0.024;
   XG:= ABS(波峰值-波谷值)<=允许误差 {AND BARSCOUNT(V)>60};
   波峰距离:= 1+CONST(PEAKBARS(1,百分比,2)),NODRAW;
   距离:=CURRBARSCOUNT;
   风骨: DRAWLINE(距离=波峰距离 AND XG,波谷值,距离=1,波谷值,1),COLORWHITE;
   DRAWTEXT(距离=波谷距离 AND XG,L*0.99,'风骨'),COLORWHITE;
   精准点:=(ABS(H-波谷值)<=允许误差 OR ABS(L-波谷值)<=0.024){AND 距离<=120};
   STICKLINE(精准点,波谷值,波谷值,6,0),COLORYELLOW;
   波谷值2:= CONST(TROUGH(2,百分比,2));
   波谷值3:= CONST(TROUGH(2,百分比,3));
   波谷值4:= CONST(TROUGH(2,百分比,4));
   波谷距离2:= 1+CONST(TROUGHBARS(2,百分比,2));
   波谷距离3:= 1+CONST(TROUGHBARS(2,百分比,3));
   波谷距离4:= 1+CONST(TROUGHBARS(2,百分比,4));
   XG2:= ABS(波谷值-波谷值2)<=允许误差;
   XG3:= ABS(波谷值-波谷值3)<=允许误差;
   XG4:= ABS(波谷值-波谷值4)<=允许误差;
   XGL:=(距离=波谷距离2 AND XG2) OR (距离=波谷距离3 ANDXG3)
      OR (距离=波谷距离4 ANDXG4);
   精准线RAWLINE(XGL,波谷值,距离=2,波谷值,1),COLOR00CCA0;
   DRAWTEXT(XGL,L*0.99, '精准' ),COLOR00CCA0;
五十日低量:=(VOL=LLV(VOL,50))*TIM&&V>0;
STICKLINE(五十日低量,L*0.98,L*0.93,0,-1);
DRAWTEXT(五十日低量,L*0.98,'五十');
百日低量:=(VOL=LLV(VOL,144))*TIM&&V>0;
STICKLINE(百日低量,L*0.98,L*0.93,0,-1);
DRAWTEXT(百日低量,L*0.96,'百日');
价值:FINANCE(34)+FINANCE(18)+FINANCE(32)+FINANCE(33)/4,COLOR00CCFF,NODRAW;
溢价率C/价值-1)*100,NODRAW;
C3:=REF(C,1);
涨停:=IF((C-C3)*100/C3>=(10-0.009*100/C3),1,0);
CC21:=STICKLINE(涨停,OPEN,CLOSE,1,0),COLORBLUE;
上板:REF(HIGH,BARSLAST(涨停)),COLORRED,POINTDOT,LINETHICK3;
STICKLINE(涨停,O,C,3,0),COLORRED;
跌停:=IF((C3-C)*100/C3>=(10-0.009*100/C3),1,0);
STICKLINE(跌停,OPEN,CLOSE,1,0),COLORBLUE;
AB:=C/REF(C,1)<1.0992 AND C/REF(C,1)>0.049;
STICKLINE(C/REF(C,1)<1.0992 AND C/REF(C,1)>=1.09,C,O,2,0),COLORMAGENTA;
STICKLINE(C/REF(C,1)<1.09 AND C/REF(C,1)>=1.07,C,O,1,0),COLORWHITE;
STICKLINE(C/REF(C,1)<1.07 AND C/REF(C,1)>1.049,C,O,1,0),COLORYELLOW;
STICKLINE(C/O>=1.1,C,O,1,0),COLORBROWN;
{多彩K线-主图公式, 显示大阳\大阴\涨停\跌停\假阴\假阳\跳空\大K线中点,适用于通达信 }
DRAWTEXT_FIX(ISLASTBAR,0,0,0,HYBLOCK);{在屏幕左上角显示所属行业板块}
DRAWTEXT_FIX(ISLASTBAR,0.05,0,0,DYBLOCK);{在屏幕左上角显示所属地域板块}
DRAWTEXT_FIX(ISLASTBAR,0.1,0,0,GNBLOCK);{在屏幕左上角显示所属概念板块}
{跳空}
STICKLINE(REF(L,1)>H,H,REF(L,1),5,0),COLORGRAY;
STICKLINE(REF(H,1)<L,L,REF(H,1),5,0),COLORGRAY;
中跌:=IF((C3-C)*100/C3>=(3-0.01*100/C3),1,0);
中阴:=IF((O-C)*100/O>=(3-0.01*100/O),1,0);
大阴:=IF((O-C)*100/O>=(5-0.01*100/O),1,0);
大跌:=IF((C3-C)*100/C3>=(5-0.01*100/C3),1,0);
平底阳:=O=L&&C>O&&EXIST(L=LLV(L,24),3);
STICKLINE(中跌,OPEN,CLOSE,2,10),COLORBLUE;
STICKLINE(中阴,OPEN,CLOSE,2,10),COLORGREEN;
STICKLINE(大跌,OPEN,CLOSE,2,0),COLORBLUE;
STICKLINE(大阴,OPEN,CLOSE,2,0),COLORGREEN;
DD:=中阴||中跌;
SS:=大跌||大阴;
DING:=MAX(O,C);
DING1:=MAX(O,C)&&DD;{实顶}
DING2:=MAX(O,C)&&SS;{实顶}
SDING1:=CURRBARSCOUNT>=N AND DING1=HHV(DING1,1) AND
DING1>REFX(HHV(DING1,N-1),N-1);
SDING2:=CURRBARSCOUNT>=N AND DING2=HHV(DING2,N) AND
DING2>REFX(HHV(DING2,N-1),N-1);
中阴实顶RAWLINE(DD,DING,REF(DD,1),REF(DING,1),1),COLORMAGENTA;
大阴实顶RAWLINE(SDING2,DING,REF(SDING2,1),REF(DING,1),1),COLORRED;
MA5:=MA(C,5);
M5角: ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416,NODRAW;

qzuser 发表于 2017-10-4 17:57

maybe0065 发表于 2017-6-29 17:50

三日不破:=MIN(MIN(L,REF(L,1)),REF(L,2))>=REF(L,3)&&COUNT(C>REF(C,1),3)>=2;
三日量缩:=(MAX(MAX(V,REF(V,1)),REF(V,2))<REF(V,3));
三日价涨A:=LAST(C>=REF(C,1),3,0);
三日价涨B:=C<REF(C,1) AND LAST(L>REF(C,3),3,0);
三日价涨C:=MIN(MIN(C,REF(C,1)),REF(C,2))>=REF(L,3);
TIM:=IF(DATE<1140214,1,0);
倍量柱:=C>REF(C,1)*1.04 AND (VOL>=1.9*REF(VOL,1))*TIM;
四日前倍量柱:=(REF(VOL,3)>1.9*REF(VOL,4))*TIM;
四日前高量柱:=(REF(VOL,3)>=REF(VOL,4) AND REF(VOL,3)<1.9*REF(VOL,4) AND 三日量缩)*TIM;
前三引用不成立:=COUNT(REF(四日前倍量柱 OR 四日前高量柱,1) AND (REF(三日不破,1) OR REF(三日价涨C,1)),3)=0 AND COUNT(REF(四日前高量柱,1) AND (REF(三日不破,1) OR REF(三日价涨C,1)),3)=0;
倍量黄金柱:=四日前倍量柱 AND 三日量缩 AND 三日不破 AND 三日价涨A AND 前三引用不成立;
高量黄金柱:=四日前高量柱 AND 三日量缩 AND 三日不破 AND 三日价涨A AND 前三引用不成立;
黄金柱:=倍量黄金柱 OR 高量黄金柱;
BACKSET101:=BACKSET(黄金柱,4);
FILTER101:=FILTER(BACKSET101,3);
K1:=SUMBARS(FILTER101,1);
黄金值_实:REF(C,K1-1),NODRAW,COLORYELLOW;
虚:REF(L,K1-2),NODRAW,COLORYELLOW;
倍量:=C>REF(C,1) AND (VOL>=1.9*REF(VOL,1))*TIM;
BACKSET102:=BACKSET(倍量,1);
FILTER102:=FILTER(BACKSET102,1);
K2:=SUMBARS(FILTER102,1);
STICKLINE(K2,REF(C,K2-1),REF(C,K2-1),7,0),COLORBLUE;{高位线};
STICKLINE(K2,REF(O,K2-1),REF(O,K2-1),7,0),COLORLIGREEN;{低位线};
STICKLINE(K1,REF(L,K1-2),REF(L,K1-2),2,0),COLORYELLOW;
STICKLINE(K1,REF(C,K1-1),REF(C,K1-1),5,0),COLORYELLOW;{低位线}
{STICKLINE(FILTER102,OPEN,CLOSE,2,0),COLORRED;
STICKLINE(FILTER102,H,L,0,0),COLORRED;
STICKLINE(FILTER101,OPEN,CLOSE,2,0),COLORYELLOW;
STICKLINE(FILTER101,H,L,0,0),COLORYELLOW;}
波谷值:= CONST(TROUGH(2,5,1)),COLORYELLOW,NODRAW;{前M个ZIG转向波谷值}
   波谷距离:= 1+CONST(TROUGHBARS(2,百分比,1)),NODRAW;{前M个ZIG转向波谷到当前距离}
   波峰值:= CONST(PEAK(1,5,2));
   允许误差:=0.024;
   XG:= ABS(波峰值-波谷值)<=允许误差 {AND BARSCOUNT(V)>60};
   波峰距离:= 1+CONST(PEAKBARS(1,百分比,2)),NODRAW;
   距离:=CURRBARSCOUNT;
风骨: DRAWLINE(距离=波峰距离 AND XG,波谷值,距离=1,波谷值,1),COLORWHITE;
   DRAWTEXT(距离=波谷距离 AND XG,L*0.99,'风骨'),COLORWHITE;
   精准点:=(ABS(H-波谷值)<=允许误差 OR ABS(L-波谷值)<=0.024){AND 距离<=120};
   STICKLINE(精准点,波谷值,波谷值,6,0),COLORYELLOW;
   波谷值2:= CONST(TROUGH(2,百分比,2));
   波谷值3:= CONST(TROUGH(2,百分比,3));
   波谷值4:= CONST(TROUGH(2,百分比,4));
   波谷距离2:= 1+CONST(TROUGHBARS(2,百分比,2));
   波谷距离3:= 1+CONST(TROUGHBARS(2,百分比,3));
   波谷距离4:= 1+CONST(TROUGHBARS(2,百分比,4));
   XG2:= ABS(波谷值-波谷值2)<=允许误差;
   XG3:= ABS(波谷值-波谷值3)<=允许误差;
   XG4:= ABS(波谷值-波谷值4)<=允许误差;
   XGL:=(距离=波谷距离2 AND XG2) OR (距离=波谷距离3 ANDXG3)
   OR (距离=波谷距离4 ANDXG4);
   精准线RAWLINE(XGL,波谷值,距离=2,波谷值,1),COLOR00CCA0;
   DRAWTEXT(XGL,L*0.99, '精准' ),COLOR00CCA0;
五十日低量:=(VOL=LLV(VOL,50))*TIM&&V>0;
STICKLINE(五十日低量,L*0.98,L*0.93,0,-1);
DRAWTEXT(五十日低量,L*0.98,'五十');
百日低量:=(VOL=LLV(VOL,144))*TIM&&V>0;
STICKLINE(百日低量,L*0.98,L*0.93,0,-1);
DRAWTEXT(百日低量,L*0.96,'百日');
价值:FINANCE(34)+FINANCE(18)+FINANCE(32)+FINANCE(33)/4,COLOR00CCFF,NODRAW;
溢价率C/价值-1)*100,NODRAW;
C3:=REF(C,1);
涨停:=IF((C-C3)*100/C3>=(10-0.009*100/C3),1,0);
CC21:=STICKLINE(涨停,OPEN,CLOSE,1,0),COLORBLUE;
上板:REF(HIGH,BARSLAST(涨停)),COLORRED,POINTDOT,LINETHICK3;
STICKLINE(涨停,O,C,3,0),COLORRED;
跌停:=IF((C3-C)*100/C3>=(10-0.009*100/C3),1,0);
STICKLINE(跌停,OPEN,CLOSE,1,0),COLORBLUE;
AB:=C/REF(C,1)<1.0992 AND C/REF(C,1)>0.049;
STICKLINE(C/REF(C,1)<1.0992 AND C/REF(C,1)>=1.09,C,O,2,0),COLORMAGENTA;
STICKLINE(C/REF(C,1)<1.09 AND C/REF(C,1)>=1.07,C,O,1,0),COLORWHITE;
STICKLINE(C/REF(C,1)<1.07 AND C/REF(C,1)>1.049,C,O,1,0),COLORYELLOW;
STICKLINE(C/O>=1.1,C,O,1,0),COLORBROWN;
{多彩K线-主图公式, 显示大阳\大阴\涨停\跌停\假阴\假阳\跳空\大K线中点,适用于通达信 }
DRAWTEXT_FIX(ISLASTBAR,0,0,0,HYBLOCK);{在屏幕左上角显示所属行业板块}
DRAWTEXT_FIX(ISLASTBAR,0.05,0,0,DYBLOCK);{在屏幕左上角显示所属地域板块}
DRAWTEXT_FIX(ISLASTBAR,0.1,0,0,GNBLOCK);{在屏幕左上角显示所属概念板块}
{跳空}
STICKLINE(REF(L,1)>H,H,REF(L,1),5,0),COLORGRAY;
STICKLINE(REF(H,1)<L,L,REF(H,1),5,0),COLORGRAY;
中跌:=IF((C3-C)*100/C3>=(3-0.01*100/C3),1,0);
中阴:=IF((O-C)*100/O>=(3-0.01*100/O),1,0);
大阴:=IF((O-C)*100/O>=(5-0.01*100/O),1,0);
大跌:=IF((C3-C)*100/C3>=(5-0.01*100/C3),1,0);
平底阳:=O=L&&C>O&&EXIST(L=LLV(L,24),3);
STICKLINE(中跌,OPEN,CLOSE,2,10),COLORBLUE;
STICKLINE(中阴,OPEN,CLOSE,2,10),COLORGREEN;
STICKLINE(大跌,OPEN,CLOSE,2,0),COLORBLUE;
STICKLINE(大阴,OPEN,CLOSE,2,0),COLORGREEN;
DD:=中阴||中跌;
SS:=大跌||大阴;
DING:=MAX(O,C);
DING1:=MAX(O,C)&&DD;{实顶}
DING2:=MAX(O,C)&&SS;{实顶}
SDING1:=CURRBARSCOUNT>=N AND DING1=HHV(DING1,1) AND
DING1>REFX(HHV(DING1,N-1),N-1);
SDING2:=CURRBARSCOUNT>=N AND DING2=HHV(DING2,N) AND
DING2>REFX(HHV(DING2,N-1),N-1);
中阴实顶RAWLINE(DD,DING,REF(DD,1),REF(DING,1),1),COLORMAGENTA;
大阴实顶RAWLINE(SDING2,DING,REF(SDING2,1),REF(DING,1),1),COLORRED;
MA5:=MA(C,5);
M5角: ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416,NODRAW;

bonroi 发表于 2016-10-29 15:50

沙发自己坐！:lol:lol:lol

bonroi 发表于 2016-10-29 15:51

沙发自己坐！:lol:lol:lol

火运发表于 2016-10-29 16:26

ddddddddddddddddddddddddddddd

羊快跑 发表于 2016-10-29 16:45

谢谢分享！

三杯两盞看股 发表于 2016-10-29 17:02

谢谢楼主分享．

Josephx 发表于 2016-10-29 17:05

谢谢分享！！！！！！

俺来了 发表于 2016-10-29 17:18

学习学习下

妙方发表于 2016-10-29 19:01

谢谢楼主分享

ljxlxq 发表于 2016-10-29 19:47

谢谢楼主分享

飘柔发表于 2016-10-29 20:07

沙发自己坐！

有有发表于 2016-10-29 20:18

高低杠战法

zanwo 发表于 2016-10-29 21:42

通达信买卖黄金线幅图公式源码

大漠孤独老鹰 发表于 2016-10-29 22:16

AA:=(O+H+L+C)/4;
BB:=MA(AA,3);
CC:=SUM(IF(AA>REF(AA,1),AA*VOL,0),4)/SUM(IF(AA<REF(AA,1),AA*VOL,0),4);
DD:=REF(100-(100/(1+CC)),1);
A1:=HHV(AA,15);
A2:=LLV(AA,15);
A3:=A1-A2;
A4:=EMA((AA-A2)/A3,2)*100;
B1:=HHV(AA,60);
B2:=LLV(AA,60);
B3:=B1-B2;
B4:=EMA((AA-B2)/B3,2)*100;
C1:=HHV(AA,240);
C2:=LLV(AA,240);
C3:=C1-C2;
C4:=EMA((AA-C2)/C3,2)*100;

股海游侠117 发表于 2016-10-29 22:29

谢谢版主，学习

页: [1] 2 3 4 5 6 7 8 9 10

股海明灯官网's Archiver

通达信买卖黄金线幅图公式源码