量学论坛 › 股票公式 › 通达信凹口起柱主图及画线

rizkq 发表于 2015-7-24 11:46

1111111111111111111111111111111111111111111111111111111111111

如烟小号 发表于 2015-7-26 18:34

谢谢分享。。。。。。。。。。。。。。。。。。

809624277 发表于 2015-7-27 16:29

谢谢分享 快乐学习

月明泉清 发表于 2015-7-27 20:36

感谢老师提供的精彩分享

zenbin88 发表于 2015-7-27 21:10

向各位学习

lsasm88 发表于 2015-7-30 20:22

多谢楼主分享！！！

东方红3210 发表于 2015-7-30 20:59

{:soso_e179:}

黎振球 发表于 2015-7-30 21:50

谢谢楼主分享！！！

dszps 发表于 2015-7-30 22:11

信凹口起柱主图及画线

yeyong009 发表于 2015-8-1 23:57

{1.黄金柱} JJ:=(3*C+H+L+O)/6; VAR1:=(8*JJ+7*REF(JJ,1)+6*REF(JJ,2)+5*REF(JJ,3)+4*REF(JJ,4)+3*REF(JJ,5)+2*REF(JJ,6)+REF(JJ,8))/36; TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1 AND C>REF(C,1); LJL:=FILTER(TJ1,3); 黄金柱:=FILTER(TJ1,3); P:=REF(VOL,6)/REF(VOL,7)>=2; G:=REF(VOL,5)/REF(VOL,6)>=2; F:=REF(VOL,5)/REF(VOL,4)>=1.5; E:=REF(VOL,4)/REF(VOL,3)>=1.5; D:=REF(VOL,2)/REF(VOL,3)>=1.5; B:=V/REF(VOL,1)>2; A:=C>O AND C>REF(C,1); 凹口起柱:= P AND B AND A OR G AND B AND A OR F AND B AND A OR E AND B AND A OR D AND B AND A ; {凹口起柱} K:= 黄金柱 AND 凹口起柱; STICKLINE(K,C,O,0.5,0),COLORMAGENTA; DRAWTEXT(ABS(K)>0,O,'——————————————————————————————————————————————————————————————————————————————————————————————'),COLORFFFF00; DRAWTEXT(ABS(K)>0,C,'——————————————————————————————————————————————————————————————————————————————————————————————'),COLORYELLOW;

如果有如果 发表于 2015-8-9 19:31

11111111111111111

dfzj2014 发表于 2015-8-9 19:36

绿低量:=10;{WWW.178448.COM WEN98编制}
蓝低量:=50;
灰低量:=100;
H_L:=0.1*CONST(HHV(VOL,240));
{MAV10:MA(V,10),COLORYELLOW;}
异动135:MA(V,135),COLORMAGENTA;
洗盘40:MA(V,40),COLORBLUE;
启动5:MA(V,5),COLORWHITE;
VVOL:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL);{模拟量}
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,VVOL,0,1,-1),COLOR00C0C0;
量:VOL,VOLSTICK,COLORLIGRAY;
换手: VOL*10000/FINANCE(7),NODRAW,COLORGREEN; {DYNAINFO(37)*100}
全换手周期: SUMBARS(V,CAPITAL),NODRAW,COLORLIGREEN;{求完全换手到现在的周期数}
量比: V/REF(MA(V,5),1),COLORBROWN,NODRAW;
几倍: V/REF(V,1),COLORYELLOW,NODRAW;
倍数:=1.9;
倍量: VOL>=REF(V,1)*倍数 AND (IF(C<O,C>REF(C,1),1)),COLORYELLOW,NODRAW;
倍缩: REF(V,1)>=VOL*倍数,COLORMAGENTA,NODRAW;
平量: RANGE(V/REF(V,1),0.97,1.03) AND BARSCOUNT(V)>=2,COLORWHITE,NODRAW;
低量10: VOL=LLV(VOL,绿低量) AND BARSCOUNT(V)>=绿低量,COLORGREEN,NODRAW;
低量50: VOL=LLV(VOL,蓝低量) AND BARSCOUNT(V)>=蓝低量,COLORBLUE,NODRAW;
地量:   VOL=LLV(VOL,灰低量) AND BARSCOUNT(V)>=灰低量,COLORGRAY,NODRAW;
V1:=VOL*0.95;{图标位置}
V2:=VOL*0.85;
STICKLINE(倍量, 0,V1,1,0),COLORYELLOW;
STICKLINE(平量,0,V1,1,0),COLORWHITE;
STICKLINE(低量10,0,V2,1,0),COLORLIGREEN;
STICKLINE(低量50,0,V2,1,0),COLORBLUE;
STICKLINE(地量,0,V2,1,0),COLORGRAY;
STICKLINE(倍缩,0,V*0.45,1,0),COLORMAGENTA;
STICKLINE(C<O AND C>REF(C,1),0,V1,0,0),COLORRED;{假阴柱}

真阳或假阴:=C>O OR C>REF(C,1);
收阳:= REF(真阳或假阴,3);
倍量1:=REF(倍量,3);
高量:=REF(V,3)>=HHV(V,7);
三日不破:= LLV(C,3)>=REF(L,3);
价升:=COUNT(C>=REF(C,1),3)=3;{收盘价逐升}
量缩:=COUNT(V<=REF(V,1),3)=3;
连阳:= COUNT(真阳或假阴,3)=3;
倍量将军柱:= 倍量1 AND 三日不破 AND 收阳;
高量将军柱:= 高量AND 三日不破 AND 收阳;
将军柱:= 倍量将军柱 OR 高量将军柱;
黄金柱:= 将军柱 AND 价升 AND 量缩 AND 连阳 ;{标准黄金柱}
STICKLINE(黄金柱,0.3*V,0.7*V,1,0),COLORRED; {红柱}
DRAWICON(黄金柱,V*1.5,1);
V100:= V<=LLV(V,100)*1.2 AND V>0 AND BARSCOUNT(V)>=100;
百日地量群:=COUNT(V100,5)>=3;
DRAWTEXT(FILTER(百日地量群,4),V+3*H_L,'地量群'),COLORGRAY;
长阴短柱:=C/REF(C,1)<=0.96 AND V<HHV(V,30)/1.9;
DRAWTEXT(长阴短柱 ,V+1.6*H_L,'！'),COLORLICYAN;

{----VOL.量能饱和----不喜欢可删去下面语句----}
N1:=21;
SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));
量能饱和:IF(SAT>1,1,SAT)*100,COLOR00AAFF,NODRAW;
中点:=REFDATE(HHV(V,180)*0.5,DATE);
STICKLINE(CURRBARSCOUNT=N1,中点*1.9,中点*1.5,100,1),COLOR00AAFF;
STICKLINE(CURRBARSCOUNT=N1,中点*1.88,中点*1.52,量能饱和,0),COLOR0077FF;
DRAWTEXT(CURRBARSCOUNT=N1+3,中点*1.7,'饱和度'),COLORYELLOW;

lpfljlzy 发表于 2015-8-12 08:24

非常感谢吴老师的源码和分享

迷失的方舟 发表于 2015-8-12 08:30

感谢老师无私的分享。

肖阳 发表于 2015-8-12 09:14

谢谢老师分享 周末愉快

查看完整版本: 通达信凹口起柱主图及画线