|
马上注册,享用更多功能,让你轻松玩转本论坛。
您需要 登录 才可以下载或查看,没有账号?立即注册
×
{定义成交量}
TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,TOTALFZNUM,1)))));
MTIME:=MOD(FROMOPEN,TOTAL);
CTIME:=IF(MTIME<0.5,TOTAL,MTIME);
VVOL:IF((CURRBARSCOUNT=1 AND DYNAINFO(8)>1),VOL*TOTAL/CTIME,DRAWNULL),NODRAW;
STICKLINE((CURRBARSCOUNT=1 AND DYNAINFO(8)>1),VVOL,0,-1,-1),COLOR00C0C0;
成交量:VOL,VOLSTICK,COLORWHITE;
倍量_柱内上黄色:0,COLORYELLOW,NODRAW;
小倍阳_柱内上浅红色:1,COLORLIRED,NODRAW;
平量_柱内下白色:0,COLORWHITE,NODRAW;
当日均价:=AMOUNT/VOL/100;
低量:=100;
H_L:=0.1*CONST(HHV(VOL,240));
地量:=VOL=LLV(VOL,低量) AND BARSCOUNT(V)>=低量,COLORGRAY,NODRAW;
V100:= V<=LLV(V,100)*1.2 AND V>0 AND BARSCOUNT(V)>=100;
百日地量群:=COUNT(V100,5)>=3;
DRAWTEXT(FILTER(百日地量群,4),V+2*H_L,'地'),COLORWHITE;
{定义倍量和小倍阳柱}
倍量阳:=当日均价>REF(CLOSE,1) AND VOL/REF(VOL,1)>=1.8;
小倍阳:=当日均价>REF(CLOSE,1) AND VOL/REF(VOL,1)>=1.8 AND VOL/REF(VOL,1)<=2.618;
STICKLINE(倍量阳,0.666*VOL,0.99*VOL,1.25,0),COLORYELLOW;
STICKLINE(倍量阳,0.5*VOL,0.5*VOL,1.25,0),COLORYELLOW;
STICKLINE(小倍阳,0.666*VOL,0.99*VOL,1.25,0),COLORLIRED;
STICKLINE(小倍阳,0.5*VOL,0.5*VOL,1.25,0),COLORLIRED;
{定义平量柱}
平量柱:=VOL/REF(VOL,1)>0.9525 AND VOL/REF(VOL,1)<1.0425;
STICKLINE(平量柱,0,0.5*VOL,0.85,0),COLORWHITE;
{定义量柱3121}
缩量31:=VOL/REF(VOL,1)<=0.75 AND VOL/REF(VOL,1)>0.55;
缩量21:=VOL/REF(VOL,1)<=0.55;
DRAWTEXT(缩量31,1.55*VOL,'3'),COLORLIBLUE;
DRAWTEXT(缩量21,1.55*VOL,'2'),COLORYELLOW;
出来的效果参见附图片:
1.在公式编辑器最好这样设定“名称”;
2.然后在K线图时,直接敲键盘“3121”,然后回车就直接套用了这个指标公式。
希望能给大家有点帮助!!!
补充内容 (2018-3-16 20:18):
小倍阳_柱内上浅红色:1,COLORLIRED,NODRAW;
红色字,这里多了2个字符,你去掉2个就可以了,通达信只支持最多8个字符,我这里为了说明的更清楚,写了10个。
补充内容 (2018-3-17 18:56):
把这句:
小倍阳_柱内上浅红色:1,COLORLIRED,NODRAW;
修改成:
小倍阳_柱上浅红:1,COLORLIRED,NODRAW;
就可以通过了!!
补充内容 (2024-7-16 10:17):
很多朋友在直接copy我发出来的程序到通达信里面时,有的会出现报错的现象,这是因为前期我发出来的时候为了说明的更清楚,超出了软件允许字节
补充内容 (2024-7-16 10:21):
请不要老是问我不同软件兼容的问题,在你copy代码时,你要先简单的学习这些程序代码的基本意思和基本的语法规则,不要直接去套用它。 |
评分
-
1
查看全部评分
-
|