【原】五线谱主图指标公式 程序源码和编程思路破译

编程思路破译

HH赋值:如果日期位于1150601和1150630之间,返回最高价,否则返回-999

T赋值:历史HH距今天数

TT赋值:上次最低价=T+1日内最低价的最低值距今天数

T1赋值:上次到最后交易的周期=TT的最后一日取值设为常数+1距今天数

XL赋值:下次T1=0距今天数日后的最低价

输出高位价:当满足条件到最后交易的周期=T的最后一日取值设为常数+1时,在HH位置画直线起点，当满足条件是否最后一个周期时,在T日前的HH位置画直线终点,0表示是否延长.,画黄色

输出NOTEXT1:当满足条件到最后交易的周期=T的最后一日取值设为常数+1时,在(HH-XL)/2+XL位置画直线起点，当满足条件是否最后一个周期时,在T日前的(HH-XL)/2+XL位置画直线终点,0表示是否延长.,DOTLINE,画绿色

输出NOTEXT2:当满足条件到最后交易的周期=T的最后一日取值设为常数+1时,在(HH-XL)*2/3+XL位置画直线起点，当满足条件是否最后一个周期时,在T日前的(HH-XL)*2/3+XL位置画直线终点,0表示是否延长.,DOTLINE,画淡洋红色

输出NOTEXT3:当满足条件到最后交易的周期=T的最后一日取值设为常数+1时,在(HH-XL)/3+XL位置画直线起点，当满足条件是否最后一个周期时,在T日前的(HH-XL)/3+XL位置画直线终点,0表示是否延长.,DOTLINE,画棕色

输出低位价:当满足条件到最后交易的周期=T的最后一日取值设为常数+1时,在XL位置画直线起点，当满足条件是否最后一个周期时,在T1日前的最低价位置画直线终点,0表示是否延长.,画红色

当满足条件到最后交易的周期=T的最后一日取值设为常数+1时,在NOTEXT1*1.04位置书写文字,画绿色

当满足条件到最后交易的周期=T的最后一日取值设为常数+1时,在NOTEXT2*1.04位置书写文字,画淡洋红色

当满足条件到最后交易的周期=T的最后一日取值设为常数+1时,在NOTEXT3*1.04位置书写文字,画棕色

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

当满足条件T1=0时,在最高价和最低价位置之间画柱状线,宽度为0,0不为0则画空心柱.,画黄色

程序源码

HH:=IF(BETWEEN(DATE,1150601,1150630),H,-999);

T:=HHVBARS(HH,0);

TT:=BARSLAST(L=LLV(L,T+1));

T1:=BARSLAST(CURRBARSCOUNT=CONST(TT)+1);

XL:=REFX(L,BARSNEXT(T1=0));

高位价:DRAWLINE(CURRBARSCOUNT=CONST(T)+1,HH,ISLASTBAR,REF(HH,T),0),COLORYELLOW;

NOTEXT1:DRAWLINE(CURRBARSCOUNT=CONST(T)+1,(HH-XL)/2+XL,ISLASTBAR,REF((HH-XL)/2+XL,T),0),DOTLINE,COLORGREEN;

NOTEXT2:DRAWLINE(CURRBARSCOUNT=CONST(T)+1,(HH-XL)*2/3+XL,ISLASTBAR,REF((HH-XL)*2/3+XL,T),0),DOTLINE,COLORLIMAGENTA;

NOTEXT3:DRAWLINE(CURRBARSCOUNT=CONST(T)+1,(HH-XL)/3+XL,ISLASTBAR,REF((HH-XL)/3+XL,T),0),DOTLINE,COLORBROWN;

低位价:DRAWLINE(CURRBARSCOUNT=CONST(T)+1,XL,ISLASTBAR,REF(L,T1),0),COLORRED;

DRAWTEXT(CURRBARSCOUNT=CONST(T)+1,NOTEXT1*1.04,VARCAT(VARCAT('中间价：',VAR2STR(NOTEXT1,2)),'元')),COLORGREEN;

DRAWTEXT(CURRBARSCOUNT=CONST(T)+1,NOTEXT2*1.04,VARCAT(VARCAT('上阻力价：',VAR2STR(NOTEXT2,2)),'元')),COLORLIMAGENTA;

DRAWTEXT(CURRBARSCOUNT=CONST(T)+1,NOTEXT3*1.04,VARCAT(VARCAT('下阻力价：',VAR2STR(NOTEXT3,2)),'元')),COLORBROWN;

STICKLINE(T1=0,C,O,2,0),COLORYELLOW;

STICKLINE(T1=0,H,L,0,0),COLORYELLOW;

该公式包含未来函数:BARSNEXT
该公式包含未来函数:REFX
未发现:REFXV...
该公式包含未来函数:DRAWLINE

注：

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