吴建新 发表于 2015-5-23 20:16

通达信凹口起柱主图及画线

通达信凹口起柱主图及画线{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;

股友量 发表于 2022-6-21 00:47

绿低量:=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;

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;

lsrxcg 发表于 2015-10-18 23:03

绿低量:=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;

fqj2000 发表于 2015-5-23 20:19

本帖最后由 fqj2000 于 2015-5-23 21:12 编辑

感谢老师提供的精彩分享。{:soso_e179:}
愿股海明灯越来越亮,获益股民越来越多!非常感谢吴老师的源码和分享 {:soso_e181:}



红军 发表于 2015-5-23 20:23

A:=EVERY(BETWEEN(C/REF(C,1),0.97,1.03),5);

seedtime 发表于 2015-5-23 20:27

wylu168 发表于 2015-5-23 20:27

very good!

弘量学 发表于 2015-5-23 20:28

谢谢分享      

莎奇 发表于 2015-5-23 20:29

:victory:不错。谢谢老师。。。。

独自风雨 发表于 2015-5-23 20:29

{:soso_e163:}

鲁皮皮 发表于 2015-5-23 20:32

{:soso_e163:}

冰心妹 发表于 2015-5-23 20:34

{:soso_e178:}

江大富翁 发表于 2015-5-23 20:36

4月30日的最高价17.29元,5月6日的最高 价17.30元5月15日收盘价17.28元,5月18日的最低价17.28元,5月19日的最低价17.30元精准对接.

luop1152 发表于 2015-5-23 20:37

通达信凹口起柱主图及画

David321 发表于 2015-5-23 20:41

通达信凹口起柱主图及画线

股市三星 发表于 2015-5-23 20:45

谢谢分享,晚上好........   

童心缘 发表于 2015-5-23 20:47

谢谢老师分享 周末愉快
页: [1] 2 3 4 5 6 7 8 9 10
查看完整版本: 通达信凹口起柱主图及画线