【原】通达信进入强势区主图指标公式源码 编程思路

编程思路:

N赋值:20

TA赋值:(最高价-最低价)和1日前的收盘价-最高价的绝对值的较大值和1日前的收盘价-最低价的绝对值的较大值

ATR赋值:TA的181日指数移动平均

VAR81赋值:N日前的收盘价-1日前的ATR

红牛赋值:181日内VAR81的最高值,画黄色

上赋值:(1+7/100)*红牛

下赋值:(1-7/100)*红牛

中赋值:(上+下)/2

画带状线

输出A1:上,DOTLINE,画绿色

输出B1:下,DOTLINE,画绿色

输出C1:中,线宽为2,画黄色

K线

黑马赋值:收盘价上穿上

当满足条件黑马时,在最低价位置书写文字,画黄色,线宽为4

公式源码:

N:=20;

TA:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));

ATR:=EMA(TA,181);

VAR81:=REF(CLOSE,N)-REF(ATR,1);

红牛:=HHV(VAR81,181),COLORYELLOW;

上:=(1+7/100)*红牛;

下:=(1-7/100)*红牛;

中:=(上+下)/2;

DRAWBAND(上,RGB(136,30,0),下,RGB(0,0,0));

A1:上,DOTLINE,COLORGREEN;

B1:下,DOTLINE,COLORGREEN;

C1:中,LINETHICK2,COLORYELLOW;

DRAWKLINE(H,O,L,C);

黑马:=CROSS(C,上);

DRAWTEXT(黑马,L,'↖进入强势区'),COLORYELLOW,LINETHICK4;