当前位置：分析家公式网 → 股票公式 → 通达信公式 → 一键转帖：缠论自动划线，在之前的版本修改，贴图，源码
软件名称：[B]缠论自动划线，在之前的版本修改，贴图，源码[/B]
软件类型：国产软件
运行环境：Win10/Win9X/Win8/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：分享版
软件大小：2.00 KB
官方主页：Home Page
更新时间：2025-03-08 00:15:25
软件简介:
缠论自动划线
在上个版本基础上修复项目：
阶段顶部标注最高价格+低点到高点的涨幅，
在阶段底部标注最低价格+高点到低点的跌幅，
顶周期:=TOPRANGE(H);
底周期:=LOWRANGE(L);
上内:=LLVBARS(H,顶周期);
上外:=LLVBARS(L,顶周期);
下内:=HHVBARS(L,底周期);
下外:=HHVBARS(H,底周期);
上力度:=HHV(L,上内+1)>LLV(H,上内+1);
下力度:=HHV(L,下内+1)>LLV(H,下内+1);
上包含:=COUNT(L>=REF(L,1),上外)>2 AND COUNT(H>=REF(H,1),上内)>2;
下包含:=COUNT(H<=REF(H,1),下外)>2 AND COUNT(L<=REF(L,1),下内)>2;
顶0:=顶周期 AND 上力度 AND 上包含 AND 上外>3;
底0:=底周期 AND 下力度 AND 下包含 AND 下外>3;
顶分天数:=BARSLAST(顶0);
底分天数:=BARSLAST(底0);
含中间K线:=IF(顶分天数=0,底分天数,顶分天数)>=3;
顶:=顶0 AND 含中间K线 AND H=HHV(H,BARSLAST(底0));
底:=底0 AND 含中间K线 AND L=LLV(L,BARSLAST(顶0));
NOTEXT上笔划线:DRAWLINE(底,L,顶,H,0),COLORRED,LINETHICK3;
NOTEXT下笔划线:DRAWLINE(顶,H,底,L,0),COLORLIGREEN,LINETHICK3;
分界点:=NOTEXT上笔划线 AND NOTEXT下笔划线;
{偏移位置}
W1:=(MA(H,15)-MA(L,15))/200*10;
W2:=10/1.1*W1;
W3:=(MA(H,15)-MA(L,15))/200*15;
W4:=15/1.1*W3;
{标注价格和涨跌幅度}
顶位:=分界点 AND 顶;
底位:=分界点 AND 底;
顶位高:=REF(H,BARSLAST(顶));
底位低:=REF(L,BARSLAST(底));
上涨幅度:=(顶位高-底位低)/底位低*100;
下跌幅度:=(底位低-顶位高)/顶位高*100;
高标注:=H;
低标注:=L;
DRAWTEXT(顶位,H+0.5,VARCAT(VAR2STR(高标注,2),VARCAT('【',VARCAT(VAR2STR(上涨幅度,2),'%】')))),COLORMAGENTA;
DRAWTEXT(底位,L-0.5,VARCAT(VAR2STR(低标注,2),VARCAT('【',VARCAT(VAR2STR(下跌幅度,2),'%】')))),COLORYELLOW;
[url=http://www.70822.com/soft/sort013/sort05/down-176705.html]缠论自动划线，在之前的版本修改，贴图，源码[/url]