您现在的位置:好股网 >> 股票公式 >> 通达信公式 >> 一键转帖:通达信波神八线主图源码 附图

通达信波神八线主图源码 附图


指标功能:[B]国产软件[/B]
指标类型:简体中文
所需积分:0
推荐星级:
授权方式:共享版
公式大小:0 Bytes
更新时间:2016-09-15 20:49:00
公式简介:

波神八线 (通达信源码 主图 附图)

指标的用法就不多说了,这是N年前的老指标~~~删减一些,源码公开随便你攺编。(留有足够的空间随便你攺编)

附:一年时间之窗转折日 (带*是神奇数字)
一月:6、15、21、*25 七月:8、15、*1 9、23
二月:6、15、21 八月:*6、8、15、23
三月:6、15、*20、21 九月:8、15、*1 8、23
四月:6、15、21 十月:8、15、23、*31
五月:6、*12、15、21 十一月:8、15、23、*28
六月:6、*14、21 十二月:8、15、23、*31

指标源码:

DRAWGBK(O>C,RGB(57,35,146),RGB(0,0,0),0,'1',0);
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
K:=BARSLAST(CURRBARSCOUNT=60);
GD:=CONST(IF(ISLASTBAR=1,HHV(H,K),0)),NODRAW;
DDA:=CONST(IF(ISLASTBAR=1,LLV(L,K),0)),NODRAW;
KJ:=GD-DDA;
一:IF(CURRBARSCOUNT<=5,DDA+KJ*0.1,DRAWNULL),COLORYELLOW,DOTLINE;
二: IF(CURRBARSCOUNT<=5,DDA+KJ*0.28,DRAWNULL),COLORYELLOW,DOTLINE;
三:IF(CURRBARSCOUNT<=5,DDA+KJ*0.41,DRAWNULL),COLORYELLOW,DOTLINE;
四:IF(CURRBARSCOUNT<=5,DDA+KJ*0.54,DRAWNULL),COLORYELLOW,DOTLINE;
五:IF(CURRBARSCOUNT<=5,DDA+KJ*0.62,DRAWNULL),COLORYELLOW,DOTLINE;
六:IF(CURRBARSCOUNT<=5,DDA+KJ*0.74,DRAWNULL),COLORYELLOW,DOTLINE;
七:IF(CURRBARSCOUNT<=5,DDA+KJ*0.88,DRAWNULL),COLORYELLOW,DOTLINE;
八:IF(CURRBARSCOUNT<=5,DDA+KJ*1,DRAWNULL),COLORYELLOW,DOTLINE;
DRAWTEXT(CURRBARSCOUNT=1,一,' 一线'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=1,二,' 二线'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=1,三,' 三线'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=1,四,' 四线'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=1,五,' 五线'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=1,六,' 六线'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=1,七,' 七线'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=1,八,' 八线'),COLOR00FFFF;
跟A7:=C-REF(C,1);
跟A8:=100*EMA(EMA(跟A7,6),6)/EMA(EMA(ABS(跟A7),6),6);
买:=LLV(跟A8,2)=LLV(跟A8,7) AND COUNT(跟A8<0,2) AND CROSS(跟A8,MA(跟A8,2));
跟庄买进:DRAWTEXT(FILTER(买=1,5),L*0.9999,'∠跟庄买进')COLORMAGENTA;
TA:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
ATR:=EMA(TA,13);
VAR8A:=REF(CLOSE,1)-REF(ATR,1);
永不套牢线:HHV(VAR8A,13), COLORCYAN;
DRAWTEXT(ISLASTBAR,永不套牢线,' 永不套牢线'), COLORWHITE;
N8:=STRCAT(CON2STR(YEAR,0),' 年 ');
Y8:=STRCAT(CON2STR(MONTH,0),' 月 ');
R8:=STRCAT(CON2STR(DAY,0),' 日 ');
SJ8:=STRCAT(STRCAT(N8,Y8), R8);
SJ9:=STRCAT(STRCAT(N8,Y8), R8);
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.00,1.02,0,SJ8),COLORYELLOW;


 


[url=http://www.goodgupiao.com/gupiaogongshi/42661.html][B]通达信波神八线主图源码 附图[/B][/url]