通达信基础位移指标公式源码
{基础位移：指的就是成本谷底或者是成本峰顶的偏移，英文叫BPR。BPR是一个阶越函数。如果运算股价运行的上升趋势，则应计算股价偏移成本谷底的格数；如拟把握股价运行的下降趋势，计算的参照点则在成本峰顶。成本峰顶是绝对成本均线的阶段高点，下降趋势中的股票，其当前股价一般低于成本峰顶，因而BPR值一般是负的。所以，BPR的市场含义分成两个部分：如果是正值，表明的是主力最大可能的浮动盈利；如果是负值，则计算出的是市场最大可能的浮动亏损。BPR是根据相对中文词意的英文单词缩写而成的，中文应叫基础位移。基础位移是判断市场成本的指标。
绝对成本均线代表着市场的整体成本状况。如果股价处在这条均线附近，其市场含义是投资者的投资持平。换句话说，股票价咯接近投资成本，但是股价并非必须完全等于成本均线才具有特殊性质，绝对成本均线会影响价咯的范围，这个范围叫市场成本区。在这个区域内，投资者近乎不赔不赚。}
{cyc5:CYC(5),COLORYELLOW;
CYC13:CYC(13),COLORFF00FF;
CYC34:CYC(34),COLORGREEN;}
CYC∞:=CYC.CYC∞,COLORFF9900;
{CYC∞:=maXCYC;}
CYS∞:(CLOSE-CYC∞)/CYC∞*100,COLORRED,CIRCLEDOT;
成本谷:REF(CYC∞,BArslAst(cys∞<=0)-1){,PRECIS2},LINETHICK0,COLORRED;{赋值指标为最近一次刚上穿CYC∞时的CYC∞的数值}
负成本谷:=REF(CYC∞,BARSLAST(CYS∞>0)-1);
基础位移1:=100*(CLOSE-成本谷)/成本谷;
负基础位移1:=100*(CLOSE-负成本谷)/负成本谷;
基础位移:IF(CYS∞>=0,基础位移1,负基础位移1){,PRECIS2},COLORYELLOW;
牛天数:=BARSLAST(crOSS(CYS∞,0))+1;
熊天数:=(-1)*BARSLAST(CROSS(0,CYS∞))-1;
牛熊天数:IF(CYS∞>0,牛天数,熊天数){,PRECIS0},NODRAW,COLORMAGENTA;
STICKLINE(CROSS(CYS∞,0),10,0,2,0),COLORRED;
STICKLINE(CROSS(0,CYS∞),10,0,2,0),COLORBLUE;
【获利】:WINNER(CLOSE)*100,COLORYELLOW,NODRAW;
【活筹】:(WINNER(C*1.075)-WINNER(C*0.925))*100,COLORFFFFFF,NODRAW;
【获利纵横】:【获利】-【活筹】,NODRAW;
IF(【获利纵横】<=50,【获利纵横】,DRAWNULL),COLORGREEN,NODRAW;
IF(【获利纵横】>50,【获利纵横】,DRAWNULL),COLORRED,NODRAW;
【换手率】:vol/CAPITAL*100,COLORWHITE,NODRAW;
【涨跌】:CLOSE-REF(C,1),COLORWHITE,NODRAW;
【涨跌幅】:(C-REF(C,1))/REF(C,1)*100,COLORWHITE,NODRAW;
DRAWTEXT_FIX(C>0,0,0,0,'【成本谷单位】：元'),COLORWHITE;
DRAWTEXT_FIX(C>0,0,0.08,0,'【基础位移单位】：百分数“%”'),COLORWHITE;
{DRAWTEXT_FIX(C>0,0,0,0,'(【超大、大户、主力】：单位为万元。)'),COLORWHITE;
DRAWTEXT_FIX(C>0,0,0.08,0,'(【柱状图、线条】：黄柱，当日超大净买。)'),COLORWHITE;
DRAWTEXT_FIX(C>0,0,0.16,0,'(【仓位】：单位为%。)'),COLORWHITE;};
未来函数检测结果如下：
该公式包含未来函数:WINNER
该公式包含未来函数:CAPITAL
解密、定制、编写股票指标请联系QQ或微信同号：88652583
相关股票指标公式
原理解析：
输出{基础位移：指的就是成本谷底或者是成本峰顶的偏移，英文叫BPR。BPR是一个阶越函数。如果运算股价运行的上升趋势，则应计算股价偏移成本谷底的格数；如拟把握股价运行的下降趋势，计算的参照点则在成本峰顶。成本峰顶是绝对成本均线的阶段高点，下降趋势中的股票，其当前股价一般低于成本峰顶，因而BPR值一般是负的。所以，BPR的市场含义分成两个部分：如果是正值，表明的是主力最大可能的浮动盈利；如果是负值，则计算出的是市场最大可能的浮动亏损。BPR是根据相对中文词意的英文单词缩写而成的，中文应叫基础位移。基础位移是判断市场成本的指标。
绝对成本均线代表着市场的整体成本状况。如果股价处在这条均线附近，其市场含义是投资者的投资持平。换句话说，股票价咯接近投资成本，但是股价并非必须完全等于成本均线才具有特殊性质，绝对成本均线会影响价咯的范围，这个范围叫市场成本区。在这个区域内，投资者近乎不赔不赚。}
{CYC5:CYC(5),画黄色
输出CYC13:CYC(13),COLORFF00FF
输出CYC34:CYC(34),画绿色
}
CYC∞赋值:CYC.CYC∞,COLORFF9900
{CYC∞赋值:MAXCYC
输出}
CYS∞:(收盘价-CYC∞)/CYC∞*100,画红色,CIRCLEDOT
输出成本谷:REF(CYC∞,上次CYS∞<=0距今天数-1){,PRECIS2},LINETHICK0,画红色
{赋值指标为最近一次刚上穿CYC∞时的CYC∞的数值}
负成本谷赋值:REF(CYC∞,上次CYS∞>0距今天数-1)
基础位移1赋值:100*(收盘价-成本谷)/成本谷
负基础位移1赋值:100*(收盘价-负成本谷)/负成本谷
如果CYS∞>=0返回基础位移1否则返回负基础位移1
牛天数赋值:上次CYS∞上穿0距今天数+1
熊天数赋值:(-1)*上次0上穿CYS∞距今天数-1
如果CYS∞>0返回牛天数否则返回熊天数
STICKLINE(CYS∞上穿0,10,0,2,0),画红色
STICKLINE(0上穿CYS∞,10,0,2,0), 画蓝色
输出【获利】:收盘价计算的获利盘比例*100,画黄色,NODRAW
输出【活筹】:(C*1.075计算的获利盘比例-WINNER(C*0.925))*100,COLORFFFFFF,NODRAW
输出【获利纵横】:【获利】-【活筹】,NODRAW
如果【获利纵横】<=50返回【获利纵横】否则返回DRAWNULL
如果【获利纵横】>50返回【获利纵横】否则返回DRAWNULL
输出【换手率】:成交量/当前流通股本*100,画白色,NODRAW
输出【涨跌】:收盘价-1日前的C,画白色,NODRAW
输出【涨跌幅】:(C-1日前的C)/1日前的C*100,画白色,NODRAW
当满足条件C>0时,在横轴0纵轴0位置书写文字
当满足条件C>0时,在横轴0纵轴0.08位置书写文字
{DRAWTEXT_FIX(C>0,0,0,0,'(【超大、大户、主力】：单位为万元。)'),画白色
DRAWTEXT_FIX(C>0,0,0.08,0,'(【柱状图、线条】：黄柱，当日超大净买。)'),画白色
DRAWTEXT_FIX(C>0,0,0.16,0,'(【仓位】：单位为%。)'),画白色
}
