自动黄金分割通达信公式 主图 源码附图

 
全息成本直线:=REFDATE(SUM(CLOSE*VOL,0)/SUM(VOL,0),DATE),COLORRED,LINETHICK2;
 
市场成本曲线:DMA(AMOUNT/(100*VOL),VOL/CAPITAL),COLORBROWN,LINETHICK2; 
市场成本直线:=REFDATE(CONST(DMA(AMOUNT/(100*VOL),VOL/CAPITAL)),DATE),COLORBROWN,LINETHICK2;
 
 
机构成本曲线:COST(50),COLORRED,COLORMAGENTA,LINETHICK2;
机构成本直线:=REFDATE(CONST(COST(50)),DATE),COLORMAGENTA,LINETHICK2;
 
 
高点:=REFDATE(CONST(REF(HHV(H,0),0)),DATE),DOTLINE;
低点:=REFDATE(CONST(REF(LLV(L,0),0)),DATE),DOTLINE;
 
GD:=CONST(FINDHIGH(H,0,高点*10,1));
DD:=CONST(FINDLOW(L,0,低点*10,1));
GT:=CONST(BARSLAST(GD=H))+1;
DT:=CONST(BARSLAST(DD=L))+1;
SH:=CONST(IF(GT=1,H,REF(H,GT-1)));
SL:=CONST(IF(DT=1,L,REF(L,DT-1)));
CC:=IF(DT>GT,DT,GT);
CD:=INTPART(CC-(DT+GT)/2);
CG:=IF(高点>CD,CD/2,高点);
 
上涨周期:IF(CURRBARSCOUNT<=DT,BARSLAST(DD=L),DRAWNULL),COLORBROWN,NODRAW;
上涨幅度:IF(CURRBARSCOUNT<=DT,C/SL*100-100,DRAWNULL),NODRAW,COLORRED;
上涨均价:=IF(CURRBARSCOUNT<=DT,SUM(AMOUNT,DT)/SUM(V,DT)/100,DRAWNULL),NODRAW,COLORGRAY;
上涨换手:IF(CURRBARSCOUNT<=DT,SUM(HSL.HSL,DT),DRAWNULL),COLORMAGENTA,NODRAW;
 
下跌周期:BARSLAST(GD=H),COLORBLACK,NODRAW;
下跌幅度:IF(CURRBARSCOUNT<=GT,C/SH*100-100,DRAWNULL),NODRAW,COLORRED;
下跌均价:=IF(CURRBARSCOUNT<=GT,SUM(AMOUNT,GT)/SUM(V,GT)/100,DRAWNULL),NODRAW,COLORGRAY;
下跌换手:IF(CURRBARSCOUNT<=GT,SUM(HSL.HSL,GT),DRAWNULL),COLORBLUE,NODRAW;
 
 
{竖线表示统计起点位置}
 
上限:=CONST(HHV(H,0));
下限:=CONST(LLV(L,0));
STICKLINE(CURRBARSCOUNT=DT,上限,下限,1,0),COLORMAGENTA;
STICKLINE(CURRBARSCOUNT=GT,上限,下限,1,0),COLORGRAY;
 
{画K线} 
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
 
 
{自动黄金分割 普通等系坐标}
DRAWRECTREL(990,1,382,1,RGB(250,250,0));
DRAWTEXT_FIX(C>0,0.382,0.00,0,'99.99%'),COLOR00CCCC;
DRAWRECTREL(990,188,382,188,RGB(200,200,0));
DRAWTEXT_FIX(C>0,0.382,0.189,0,'19.1%'),COLOR00CCCC;
DRAWRECTREL(990,375,382,375,RGB(200,200,0));
DRAWTEXT_FIX(C>0,0.382,0.376,0,'38.2%'),COLOR00CCCC;
DRAWRECTREL(990,491,382,491,RGB(200,200,0));
DRAWTEXT_FIX(C>0,0.382,0.492,0,'50.0%'),COLOR00CCCC;
DRAWRECTREL(990,607,382,607,RGB(200,200,0));
DRAWTEXT_FIX(C>0,0.382,0.608,0,'61.8%'),COLOR00CCCC;
DRAWRECTREL(990,794,382,794,RGB(200,200,0));
DRAWTEXT_FIX(C>0,0.382,0.795,0,'80.9%'),COLOR00CCCC;
DRAWRECTREL(990,982,382,982,RGB(250,250,0));
DRAWTEXT_FIX(C>0,0.382,0.936,0,'BASE'),COLOR00CCCC;
DRAWRECTREL(990,232,382,232,RGB(100,100,0));
DRAWRECTREL(990,144.6,382,144.6,RGB(100,100,0));
DRAWRECTREL(990,750,382,750,RGB(100,100,0));
DRAWRECTREL(990,839,382,839,RGB(100,100,0));
 
 
{画K线} 
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);



来函数检测结果如下
该公式包含未来函数:COST
该公式包含未来函数:CAPITAL
该公式包含未来函数:DHIGH
该公式包含未来函数:DLOW

解密、定制、编写公式指标请联系QQ或微信同号:88652583
置顶指标

相关指标公式

全息成本直线赋值:日期日收盘价*成交量(手)的历史累和/成交量(手)的历史累和,画红色,线宽为2
输出 市场成本曲线:以成交量(手)/当前流通股本(手)为权重成交额(元)/(100*成交量(手))的动态移动平均,画棕色,线宽为2
市场成本直线赋值:日期日以成交量(手)/当前流通股本(手)为权重成交额(元)/(100*成交量(手))的动态移动平均的最后一日取值设为常数,画棕色,线宽为2
输出 机构成本曲线:获利盘为50%的成本分布,画红色,画洋红色,线宽为2
机构成本直线赋值:日期日获利盘为50%的成本分布的最后一日取值设为常数,画洋红色,线宽为2
高点赋值:日期日0日前的0日内最高价的最高值的最后一日取值设为常数,DOTLINE
低点赋值:日期日0日前的0日内最低价的最低值的最后一日取值设为常数,DOTLINE
GD赋值:最高价在0日前的高点*10天内第1个最高价的最后一日取值设为常数
DD赋值:最低价在0日前的低点*10天内第1个最低价的最后一日取值设为常数
GT赋值:上次GD=最高价距今天数的最后一日取值设为常数+1
DT赋值:上次DD=最低价距今天数的最后一日取值设为常数+1
SH赋值:如果GT=1,返回最高价,否则返回GT-1日前的最高价的最后一日取值设为常数
SL赋值:如果DT=1,返回最低价,否则返回DT-1日前的最低价的最后一日取值设为常数
CC赋值:如果DT>GT,返回DT,否则返回GT
CD赋值:CC-(DT+GT)/2的整数部分
CG赋值:如果高点>CD,返回CD/2,否则返回高点
输出 上涨周期:如果到最后交易的周期<=DT,返回上次DD=最低价距今天数,否则返回无效数,画棕色,NODRAW
输出上涨幅度:如果到最后交易的周期<=DT,返回收盘价/SL*100-100,否则返回无效数,NODRAW,画红色
上涨均价赋值:如果到最后交易的周期<=DT,返回成交额(元)的DT日累和/成交量(手)的DT日累和/100,否则返回无效数,NODRAW,画深灰色
输出上涨换手:如果到最后交易的周期<=DT,返回换手线的HSL的DT日累和,否则返回无效数,画洋红色,NODRAW
输出 下跌周期:上次GD=最高价距今天数,画黑色,NODRAW
输出下跌幅度:如果到最后交易的周期<=GT,返回收盘价/SH*100-100,否则返回无效数,NODRAW,画红色
下跌均价赋值:如果到最后交易的周期<=GT,返回成交额(元)的GT日累和/成交量(手)的GT日累和/100,否则返回无效数,NODRAW,画深灰色
输出下跌换手:如果到最后交易的周期<=GT,返回换手线的HSL的GT日累和,否则返回无效数,画蓝色,NODRAW
上限赋值:0日内最高价的最高值的最后一日取值设为常数
下限赋值:0日内最低价的最低值的最后一日取值设为常数
当满足条件到最后交易的周期=DT时,在上限和下限位置之间画柱状线,宽度为1,0不为0则画空心柱.,画洋红色
当满足条件到最后交易的周期=GT时,在上限和下限位置之间画柱状线,宽度为1,0不为0则画空心柱.,画深灰色
K线
相对位置上画矩形
当满足条件收盘价>0时,在横轴0.382纵轴0.00位置书写文字,COLOR00CCCC
相对位置上画矩形
当满足条件收盘价>0时,在横轴0.382纵轴0.189位置书写文字,COLOR00CCCC
相对位置上画矩形
当满足条件收盘价>0时,在横轴0.382纵轴0.376位置书写文字,COLOR00CCCC
相对位置上画矩形
当满足条件收盘价>0时,在横轴0.382纵轴0.492位置书写文字,COLOR00CCCC
相对位置上画矩形
当满足条件收盘价>0时,在横轴0.382纵轴0.608位置书写文字,COLOR00CCCC
相对位置上画矩形
当满足条件收盘价>0时,在横轴0.382纵轴0.795位置书写文字,COLOR00CCCC
相对位置上画矩形
当满足条件收盘价>0时,在横轴0.382纵轴0.936位置书写文字,COLOR00CCCC
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
K线

指标安装下载帮助  |   联系我们  |  乐淘公式网  |  公式网   |  指标公式  |   加入收藏   |  设为主页

@2005-2025 浙ICP备2024071487号-1 乐淘公式网公式网均来源互联网收集整理,如不慎侵犯了你的权益,请联系我们告知,我们将做删除处理
免责声明:乐淘公式网所有指标公式及文章由网络收集,不保障实时性和真实性, 仅供学习研究并不构成投资建议,请勿以此为依据进行股票交易,由此引起的投资亏损与本站无关。
QQ:88652583 微信 88652583
sitemap站点地图