通达信大旗天眼通主图指标公式

编程思路破译

填充背景

输出MA10:收盘价的10日简单移动平均

输出MA60:收盘价的60日简单移动平均

VAR6赋值:(( (开盘价-收盘价)的绝对值/(最高价-最低价))*成交量(手))

VAR7赋值:(( (最高价-如果(收阳线),返回收盘价,否则返回开盘价)/(最高价-最低价))*成交量(手))

VAR8赋值:(( (如果(收阳线),返回开盘价,否则返回收盘价-最低价)/(最高价-最低价))*成交量(手))

VAR9赋值:如果((成交量(手)/当前流通股本(手))>0.001),返回1,否则返回((成交量(手)/当前流通股本(手))*100)的对数的绝对值的指数

输出加仓:VAR6>=VAR7 AND VAR6>=VAR8 AND 收阳线,NODRAW,画红色

输出减仓:VAR6>=VAR7 AND VAR6>=VAR8 AND 收阴线,NODRAW,画蓝色

输出洗盘:VAR8>VAR6 AND VAR8>VAR7,NODRAW,画白色

输出高抛:VAR7>VAR6 AND VAR7>VAR8,NODRAW,画洋红色

输出地量:VAR9>2 AND 成交量(手)<成交量(手)的5日简单移动平均/2,NODRAW,画绿色

K线

TY赋值:收盘价

A1赋值:10日前的TY=2*10+1日内TY的最高值

B1赋值:A1的10日过滤

C1赋值:若B1则将最近10+1周期置为1

HD赋值:C1的10日过滤

A2赋值:10日前的TY=2*10+1日内TY的最低值

B2赋值:A2的10日过滤

C2赋值:若B2则将最近10+1周期置为1

LD赋值:C2的10日过滤

输出前期高位:上次HD距今天数日前的最高价, COLORFF00FF,POINTDOT,线宽为3

输出前期低位:上次LD距今天数日前的最低价, 画绿色,POINTDOT,线宽为3

当满足条件加仓时,在开盘价和收盘价位置之间画柱状线,宽度为1,0不为0则画空心柱.,画红色

当满足条件洗盘时,在开盘价和收盘价位置之间画柱状线,宽度为1,0不为0则画空心柱.,画白色

当满足条件减仓时,在开盘价和收盘价位置之间画柱状线,宽度为1,0不为0则画空心柱.,画蓝色

当满足条件高抛时,在开盘价和收盘价位置之间画柱状线,宽度为1,0不为0则画空心柱.,画洋红色

当满足条件地量时,在开盘价和收盘价位置之间画柱状线,宽度为1,0不为0则画空心柱.,画绿色

JJ赋值:(3*收盘价+最高价+最低价+开盘价)/6

VAR1赋值:(8*JJ+7*1日前的JJ+6*2日前的JJ+5*3日前的JJ+4*4日前的JJ+3*5日前的JJ+2*6日前的JJ+8日前的JJ)/36

TJ1赋值:成交量(手)=10日内成交量(手)的最高值 AND 成交量(手)>2*1日前的成交量(手) AND 收盘价>VAR1 AND 收盘价>1日前的收盘价

LJL赋值:TJ1的5日过滤

当满足条件收盘价时,在上次LJL距今天数日前的最低价和上次LJL距今天数日前的最低价位置之间画柱状线,宽度为1,0不为0则画空心柱.,画红色

当满足条件收盘价时,在上次LJL距今天数日前的收盘价和上次LJL距今天数日前的收盘价位置之间画柱状线,宽度为1,0不为0则画空心柱.,画黄色

当满足条件LJL时,在开盘价和收盘价位置之间画柱状线,宽度为1,0不为0则画空心柱.,画黄色

当满足条件1时,在横轴0.0纵轴0.0位置书写文字,画蓝色,线宽为1

当满足条件1时,在横轴0.00纵轴0.06位置书写文字,画白色,线宽为1

当满足条件1时,在横轴0.00纵轴0.12位置书写文字,画绿色,线宽为1

当满足条件1时,在横轴0.00纵轴0.18位置书写文字,COLORFF00FF,线宽为1

当满足条件1时,在横轴0.00纵轴0.24位置书写文字,画红色,线宽为1

当满足条件1时,在横轴0.00纵轴0.3位置书写文字,画黄色,线宽为1

当满足条件收盘价>0时,在横轴0.004纵轴1位置书写文字,画黄色,线宽为2

当满足条件收盘价>0时,在横轴0.06纵轴1位置书写文字,画红色,线宽为2

当满足条件收盘价>0时,在横轴0.12纵轴1位置书写文字,画白色,线宽为2

EN1赋值:收盘价5%的之字转向>1日前的收盘价5%的之字转向 AND 1日前的收盘价5%的之字转向<=2日前的收盘价5%的之字转向 AND 2日前的收盘价5%的之字转向<=3日前的收盘价5%的之字转向

PL10赋值:收盘价10%的之字转向

走强2赋值:上次PL10<1日前的PL10距今天数

ZTJZ5赋值:如果PL10>1日前的PL10,返回统计走强2日中满足EN1的天数,否则返回0

追2赋值:EN1 AND PL10>1日前的PL10 AND ZTJZ5=2

追4赋值:EN1 AND PL10>1日前的PL10 AND ZTJZ5=3

当满足条件追2OR追4时,在最低价*0.978位置书写文字,画黄色

PL5赋值:收盘价5%的之字转向

EX1赋值:收盘价5%的之字转向=2日前的收盘价5%的之字转向 AND 2日前的收盘价5%的之字转向>=3日前的收盘价5%的之字转向

EN2赋值:收盘价10%的之字转向>1日前的收盘价10%的之字转向 AND 1日前的收盘价10%的之字转向<=2日前的收盘价10%的之字转向 AND 2日前的收盘价10%的之字转向<=3日前的收盘价10%的之字转向

EX2赋值:收盘价10%的之字转向=2日前的收盘价10%的之字转向 AND 2日前的收盘价10%的之字转向>=3日前的收盘价10%的之字转向

PL20赋值:收盘价20%的之字转向

EN3赋值:收盘价20%的之字转向>1日前的收盘价20%的之字转向 AND 1日前的收盘价20%的之字转向<=2日前的收盘价20%的之字转向 AND 2日前的收盘价20%的之字转向<=3日前的收盘价20%的之字转向

EX3赋值:收盘价20%的之字转向=2日前的收盘价20%的之字转向 AND 2日前的收盘价20%的之字转向>=3日前的收盘价20%的之字转向

PL40赋值:收盘价40%的之字转向

走强1赋值:上次PL5<1日前的PL5距今天数

走弱1赋值:上次PL5>1日前的PL5距今天数

走弱2赋值:上次PL10>1日前的PL10距今天数

走强3赋值:上次PL20<1日前的PL20距今天数

走弱3赋值:上次PL20>1日前的PL20距今天数

ZTJD5赋值:如果PL10>1日前的PL10,返回统计走强2日中满足EX1的天数,否则返回0

DTJZ5赋值:如果PL10<1日前的PL10,返回统计走弱2日中满足EN1的天数,否则返回0

DTJD5赋值:如果PL10<1日前的PL10,返回统计走弱2日中满足EX1的天数,否则返回0

ZTJZ10赋值:如果PL20>1日前的PL20,返回统计走强3日中满足EN2的天数,否则返回0

ZTJD10赋值:如果PL20>1日前的PL20,返回统计走强3日中满足EX2的天数,否则返回0

DTJZ10赋值:如果PL20<1日前的PL20,返回统计走弱3日中满足EN2的天数,否则返回0

DTJD10赋值:如果PL20<1日前的PL20,返回统计走弱3日中满足EX2的天数,否则返回0

当满足条件EN1ANDDTJZ5=1时,在最低价*0.98位置书写文字,画淡红色

当满足条件EX1ANDDTJD5=2时,在最高价*1.02位置书写文字,画淡蓝色

当满足条件EN2ANDZTJZ5=1时,在最低价*0.98位置书写文字,画黄色

当满足条件EX1ANDPL10>1日前的PL10ANDZTJD5=1时,在最高价*1.02位置书写文字,COLORFFFF00

当满足条件EN1ANDPL10>1日前的PL10ANDZTJZ5=2时,在最低价*0.98位置书写文字,COLOR0000FF

当满足条件EX1ANDPL10>1日前的PL10ANDZTJZ5=2时,在最高价*1.02位置书写文字,画绿色

当满足条件EN1ANDPL10>1日前的PL10ANDZTJZ5=3时,在最低价*0.98位置书写文字,COLOR0000FF

当满足条件EX2ANDPL20>1日前的PL20ANDZTJD10=1时,在最高价*1.02位置书写文字,画绿色

当满足条件EN2ANDDTJZ10=1时,在最低价*0.96位置书写文字,COLORFF00FF

当满足条件EX2ANDDTJD10=2时,在最高价*1.03位置书写文字,COLORFF6000

当满足条件EN3ANDZTJZ10=1时,在最低价*0.95位置书写文字,画黄色

当满足条件EX2ANDPL20>1日前的PL20ANDZTJD10=1时,在最高价*1.06位置书写文字,线宽为3,COLORFFFF00

当满足条件EN2ANDPL20>1日前的PL20ANDZTJZ10=2时,在最低价*0.96位置书写文字,线宽为3,画黄色

当满足条件EX2ANDPL20>1日前的PL20ANDZTJD10=2OR(ZTJD10=0ORZTJD10=2)ANDEX2时,在最高价*1.02位置书写文字,线宽为3,画白色

当满足条件EN2ANDPL20>1日前的PL20ANDZTJZ10=3时,在最低价*0.96位置书写文字,线宽为3,画黄色

当满足条件EN1ANDPL10>1日前的PL10ANDZTJZ5=3时,在最低价*0.95位置书写文字,画黄色

EMA13赋值:收盘价的13日指数移动平均

EMA34赋值:收盘价的34日指数移动平均

EMA55赋值:收盘价的55日指数移动平均

EMA120赋值:收盘价的120日指数移动平均

CR1赋值:(收盘价-1日前的收盘价)/1日前的收盘价*100>0.5

CR2赋值:成交量(手)>成交量(手)的5日简单移动平均*0.6

CR3赋值:统计3日中满足EMA13上穿EMA55的天数=1

CR4赋值:EMA34-EMA55的绝对值/EMA55<0.03

CR5赋值:EMA55<=EMA120 AND EMA55>=1日前的EMA55

CR6赋值:CR1ANDCR2ANDCR3ANDCR4ANDCR5的2日过滤

当满足条件CR6时,在收盘价*0.98位置书写文字,画白色

程序源码

DRAWGBK(C>0, RGB(0,0,00),RGB(0,0,0),0,'11',0);

MA10:MA(C,10);

MA60:MA(C,60);

VAR6:=(( ABS((OPEN-CLOSE))/(HIGH-LOW))*VOL);

VAR7:=(( (HIGH-IF((CLOSE>OPEN),CLOSE,OPEN))/(HIGH-LOW))*VOL);

VAR8:=(( (IF((CLOSE>OPEN),OPEN,CLOSE)-LOW)/(HIGH-LOW))*VOL);

VAR9:=IF(((VOL/CAPITAL)>0.001),1,EXP(ABS(LOG(((VOL/CAPITAL)*100)))));

加仓:VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE>OPEN,NODRAW,COLORRED;

减仓:VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE<OPEN,NODRAW,COLORBLUE;

洗盘:VAR8>VAR6 AND VAR8>VAR7,NODRAW,COLORWHITE;

高抛:VAR7>VAR6 AND VAR7>VAR8,NODRAW,COLORMAGENTA;

地量:VAR9>2 AND VOL<MA(VOL,5)/2,NODRAW,COLORGREEN;

DRAWKLINE(H,O,L,C);

TY:=C;

A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1); HD:=FILTER(C1,10);

A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1); LD:=FILTER(C2,10);

前期高位:REF(H,BARSLAST(HD)), COLORFF00FF,POINTDOT,LINETHICK3;

前期低位:REF(L,BARSLAST(LD)), COLORGREEN,POINTDOT,LINETHICK3;

STICKLINE(加仓,O,C,1,0),COLORRED;

STICKLINE(洗盘,O,C,1,0),COLORWHITE;

STICKLINE(减仓,O,C,1,0),COLORBLUE;

STICKLINE(高抛,O,C,1,0),COLORMAGENTA;

STICKLINE(地量,O,C,1,0),COLORGREEN;

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,5);

STICKLINE(CLOSE,REF(LOW,BARSLAST(LJL)),REF(LOW,BARSLAST(LJL)),1,0),COLORRED;

STICKLINE(CLOSE,REF(CLOSE,BARSLAST(LJL)),REF(CLOSE,BARSLAST(LJL)),1,0),COLORYELLOW;

STICKLINE(LJL,OPEN,CLOSE,1,0),COLORYELLOW;

DRAWTEXT_FIX(1,0.0,0.0,0,'蓝芯-主力低位深度洗盘或高位出货坚决'),COLORBLUE,LINETHICK1;

DRAWTEXT_FIX(1,0.00,0.06,0,'白芯-主力轻度洗盘'),COLORWHITE,LINETHICK1;

DRAWTEXT_FIX(1,0.00,0.12,0,'棕芯-出现了近期相对地量'),COLORGREEN,LINETHICK1;

DRAWTEXT_FIX(1,0.00,0.18,0,'粉芯-主力在做高抛低吸或低吸高抛'),COLORFF00FF,LINETHICK1;

DRAWTEXT_FIX(1,0.00,0.24,0,'红芯-主力吸筹进货积极主动'),COLORRED,LINETHICK1;

DRAWTEXT_FIX(1,0.00,0.3,0,'黄芯-主力吸筹进货强并且成交量出现黄金柱'),COLORYELLOW,LINETHICK1;

DRAWTEXT_FIX(C>0,0.004,1,0,DYBLOCK),COLORYELLOW,LINETHICK2;

DRAWTEXT_FIX(C>0,0.06,1,0,HYBLOCK),COLORRED,LINETHICK2;

DRAWTEXT_FIX(C>0,0.12,1,0,EXTERNSTR(0,1)),COLORWHITE,LINETHICK2;

EN1:=ZIG(3,5)>REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)<=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)<=REF(ZIG(3,5),3);

PL10:=ZIG(3,10);

走强2:=BARSLAST(PL10<REF(PL10,1));

ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走强2),0);

追2:=EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2;

追4:=EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3;

DRAWTEXT(追2 OR 追4,LOW*0.978,'追'),COLORYELLOW;

PL5:=ZIG(3,5);

EX1:=ZIG(3,5)=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)>=REF(ZIG(3,5),3);

EN2:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)<=REF(ZIG(3,10),3);

EX2:=ZIG(3,10)=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)>=REF(ZIG(3,10),3);

PL20:=ZIG(3,20);

EN3:=ZIG(3,20)>REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)<=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)<=REF(ZIG(3,20),3);

EX3:=ZIG(3,20)=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)>=REF(ZIG(3,20),3);

PL40:=ZIG(3,40);

走强1:=BARSLAST(PL5<REF(PL5,1));

走弱1:=BARSLAST(PL5>REF(PL5,1));

走弱2:=BARSLAST(PL10>REF(PL10,1));

走强3:=BARSLAST(PL20<REF(PL20,1));

走弱3:=BARSLAST(PL20>REF(PL20,1));

ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走强2),0);

DTJZ5:=IF(PL10<REF(PL10,1),COUNT(EN1,走弱2),0);

DTJD5:=IF(PL10<REF(PL10,1),COUNT(EX1,走弱2),0);

ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走强3),0);

ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走强3),0);

DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱3),0);

DTJD10:=IF(PL20<REF(PL20,1),COUNT(EX2,走弱3),0);

DRAWTEXT(EN1 AND DTJZ5=1,L*0.98,'反弹低点'),COLORLIRED;

DRAWTEXT(EX1 AND DTJD5=2,H*1.02,'反弹高点!'),COLORLIBLUE;

DRAWTEXT(EN2 AND ZTJZ5=1,L*0.98,'底'),COLORYELLOW;

DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJD5=1,H*1.02,'减仓'),COLORFFFF00;

DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2,L*0.98,'----买'),COLOR0000FF;

DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJZ5=2,H*1.02,'短卖'),COLORGREEN;

DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,L*0.98,'----短买'),COLOR0000FF;

DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.02,'短卖'),COLORGREEN;

DRAWTEXT(EN2 AND DTJZ10=1,L*0.96,'Ⅰ'),COLORFF00FF;

DRAWTEXT(EX2 AND DTJD10=2,H*1.03,'Ⅱ'),COLORFF6000;

DRAWTEXT(EN3 AND ZTJZ10=1,L*0.95,'Ⅲ'),COLORYELLOW;

DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.06,'①'),LINETHICK3,COLORFFFF00;

DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2,L*0.96,'②'),LINETHICK3,COLORYELLOW;

DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,H*1.02,'清仓!'),LINETHICK3,COLORWHITE;

DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=3,L*0.96,'④'),LINETHICK3,COLORYELLOW;

DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,L*0.95,'⑷'),COLORYELLOW;

EMA13:=EMA(C,13);

EMA34:=EMA(C,34);

EMA55:=EMA(C,55);

EMA120:=EMA(C,120);

CR1:=(C-REF(C,1))/REF(C,1)*100>0.5;

CR2:=V>MA(V,5)*0.6;

CR3:=COUNT(CROSS(EMA13,EMA55),3)=1;

CR4:=ABS(EMA34-EMA55)/EMA55<0.03;

CR5:=EMA55<=EMA120 AND EMA55>=REF(EMA55,1);

CR6:=FILTER(CR1 AND CR2 AND CR3 AND CR4 AND CR5,2);

DRAWTEXT(CR6,C*0.98,'风险'),COLORWHITE;

该公式包含未来函数:ZIG
未发现:PEAK...
未发现:PEAKBARS...
未发现:TROUGH...
未发现:TROUGHBARS...
未发现:FLATZIG...
未发现:FLATZIGA...
未发现:PEAKA...
未发现:PEAKBARSA...
未发现:TROUGHA...
未发现:ZIGA...
未发现:FFT...
该公式包含未来函数:BACKSET
未发现:WINNER...
未发现:LWINNER...
未发现:PWINNER...
未发现:COST...
该公式包含未来函数:CAPITAL

注:

       馆内各种公式为学习编而保存,实战使用前一定要看其中是否有未来函数并自己亲自测试成功率决不能依据公式名称的描述和形容去投资,据此入市造成投资损失由投资者自己承担

       发文不易,如获益,欢迎赞赏,赞赏必复!

(0)

相关推荐