通达信股池测试主图指标源码

 
{填入代码、买入时间、价位,至今情况用后面括号中的替换前面}
代码:=1;{CODELIKE('002716')};
入池时间:=YEAR{年}=2017 AND MONTH{月}=12 AND DAY{日}=12;
入池价位:=REF(C,BARSLAST(入池时间));
测试天数:=IF(BARSLAST(入池时间)>20,20,BARSLAST(入池时间));
{--------------------------------------------------------------------------------}
个股入池时间:=IF(代码,入池时间,0);
个股入池价格:=IF(个股入池时间,入池价位,0);
买入价:=REF(入池价位,BARSLAST(入池时间));
测试止价:=IF(BARSLAST(个股入池时间)+1>=1,CONST(REF(C,(BARSLAST(个股入池时间)-测试天数))),0);
最高价条件:=IF(BARSLAST(个股入池时间)+1>=1,H=FINDHIGH(H,BARSLAST(个股入池时间)-测试天数,测试天数,1),0);
最高价横线:=IF(BARSLAST(最高价条件)>=0 AND BARSLAST(个股入池时间)+1>=1,CONST(REF(H,BARSLAST(最高价条件))),0);
最低价条件:=IF(BARSLAST(个股入池时间)+1>=1,L=FINDLOW(L,BARSLAST(个股入池时间)-测试天数,测试天数,1),0);
最低价横线:=IF(BARSLAST(最低价条件)+1>=1 AND BARSLAST(个股入池时间)+1>=1,CONST(REF(L,BARSLAST(最低价条件))),0);
{---------------------------------------------------------------------------------};
持股天数:IF(代码,测试天数,DRAWNULL),NODRAW;
最高价:IF(代码,最高价横线,DRAWNULL),COLOR00009B;
最低价:IF(代码,最低价横线,DRAWNULL),COLOR009B00;
入池价:IF(代码,买入价,DRAWNULL),COLORGREEN;
止价:IF(代码,测试止价,DRAWNULL),COLORMAGENTA;
买入时间:=IF(代码,入池时间,DRAWNULL);
STICKLINE(CROSS(买入时间,0.5),IF(止价>入池价,止价,入池价),最高价,0,0),COLOR00009B;
STICKLINE(ISLASTBAR,IF(止价>入池价,止价,入池价),最高价,0,0),COLOR00009B;
STICKLINE(CROSS(买入时间,0.5),IF(止价<入池价,止价,入池价),最低价,0,0),COLOR009B00;
STICKLINE(ISLASTBAR,IF(止价<入池价,止价,入池价),最低价,0,0),COLOR009B00;
DRAWBAND(止价,RGB(155,0,0),入池价,RGB(0,155,0));
DRAWBAND(入池价,RGB(0,255,0),入池价,RGB(0,255,0));
DRAWBAND(止价,RGB(255,0,255),止价,RGB(255,0,255));
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);

现赢利:(止价-入池价)/入池价*100,NODRAW;
曾浮赢:(最高价-入池价)/入池价*100,NODRAW;
曾浮亏:(最低价-入池价)/入池价*100,NODRAW;
金额:=入池价*现赢利/100;
WW1:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT('【','曾浮赢'),'】'),':'),CON2STR(曾浮赢,2)),'﹪');
WW2:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT('【','曾浮亏'),'】'),':'),CON2STR(曾浮亏,2)),'﹪');
WW3:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT('【','现赢利'),'】'),':'),CON2STR(现赢利,2)),'﹪');
WW4:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT('【','现亏损'),'】'),':'),CON2STR(现赢利,2)),'﹪');
WW5:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT('【','利润'),'】'),':'),CON2STR(金额,2)),'元');
WW6:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT('【','亏损'),'】'),':'),CON2STR(金额,2)),'元');
DRAWTEXT_FIX(HHV(H,80)=最高价,0.8,0,0,WW1),COLOR00009B;
DRAWTEXT_FIX(ISLASTBAR AND (HHV(H,80)>最高价 OR HHV(H,80)<最高价) AND 最高价>0,0.83,0,0,WW1),COLOR00009B;
DRAWTEXT_FIX(HHV(H,80)=最高价,0.64,0,0,WW2),COLOR009B00;
DRAWTEXT_FIX(ISLASTBAR AND (HHV(H,80)>最高价 OR HHV(H,80)<最高价) AND 最高价>0,0.67,0,0,WW2),COLOR009B00;
DRAWTEXT_FIX(HHV(H,80)=最高价 AND 止价>=入池价,0.64,1,0,WW3),COLORRED;
DRAWTEXT_FIX(ISLASTBAR AND (HHV(H,80)>最高价 OR HHV(H,80)<最高价) AND 最高价>0 AND 止价>=入池价,0.67,1,0,WW3),COLORRED;
DRAWTEXT_FIX(HHV(H,80)=最高价 AND 止价<入池价,0.64,1,0,WW4),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR AND (HHV(H,80)>最高价 OR HHV(H,80)<最高价) AND 最高价>0 AND 止价<入池价,0.67,1,0,WW4),COLORGREEN;
DRAWTEXT_FIX(HHV(H,80)=最高价 AND 止价>=入池价,0.8,1,0,WW5),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR AND (HHV(H,80)>最高价 OR HHV(H,80)<最高价) AND 最高价>0 AND 止价>=入池价,0.83,1,0,WW5),COLORYELLOW;
DRAWTEXT_FIX(HHV(H,80)=最高价 AND 止价<入池价,0.8,1,0,WW6),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR AND (HHV(H,80)>最高价 OR HHV(H,80)<最高价) AND 最高价>0 AND 止价<入池价,0.83,1,0,WW6),COLORWHITE;

DRAWKLINE(H,O,L,C);





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

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

相关指标公式

代码赋值:1

入池时间赋值:年份=2017 AND 月份=12 AND 日=12
入池价位赋值:上次入池时间距今天数日前的收盘价
测试天数赋值:如果上次入池时间距今天数>20,返回20,否则返回上次入池时间距今天数
个股入池时间赋值:如果代码,返回入池时间,否则返回0
个股入池价格赋值:如果个股入池时间,返回入池价位,否则返回0
买入价赋值:上次入池时间距今天数日前的入池价位
测试止价赋值:如果上次个股入池时间距今天数+1>=1,返回(上次个股入池时间距今天数-测试天数)日前的收盘价的最后一日取值设为常数,否则返回0
最高价条件赋值:如果上次个股入池时间距今天数+1>=1,返回最高价=最高价在上次个股入池时间距今天数-测试天数日前的测试天数天内第1个最高价,否则返回0
最高价横线赋值:如果上次最高价条件距今天数>=0ANDBARSLAST(个股入池时间)+1>=1,返回上次最高价条件距今天数日前的最高价的最后一日取值设为常数,否则返回0
最低价条件赋值:如果上次个股入池时间距今天数+1>=1,返回最低价=最低价在上次个股入池时间距今天数-测试天数日前的测试天数天内第1个最低价,否则返回0
最低价横线赋值:如果上次最低价条件距今天数+1>=1ANDBARSLAST(个股入池时间)+1>=1,返回上次最低价条件距今天数日前的最低价的最后一日取值设为常数,否则返回0

输出持股天数:如果代码,返回测试天数,否则返回无效数,NODRAW
输出最高价:如果代码,返回最高价横线,否则返回无效数,COLOR00009B
输出最低价:如果代码,返回最低价横线,否则返回无效数,COLOR009B00
输出入池价:如果代码,返回买入价,否则返回无效数,画绿色
输出止价:如果代码,返回测试止价,否则返回无效数,画洋红色
买入时间赋值:如果代码,返回入池时间,否则返回无效数
当满足条件买入时间上穿0.5时,在如果止价>入池价,返回止价,否则返回入池价和最高价位置之间画柱状线,宽度为0,0不为0则画空心柱.,COLOR00009B
当满足条件是否最后一个周期时,在如果止价>入池价,返回止价,否则返回入池价和最高价位置之间画柱状线,宽度为0,0不为0则画空心柱.,COLOR00009B
当满足条件买入时间上穿0.5时,在如果止价<入池价,返回止价,否则返回入池价和最低价位置之间画柱状线,宽度为0,0不为0则画空心柱.,COLOR009B00
当满足条件是否最后一个周期时,在如果止价<入池价,返回止价,否则返回入池价和最低价位置之间画柱状线,宽度为0,0不为0则画空心柱.,COLOR009B00
画带状线
画带状线
画带状线
K线
输出现赢利:(止价-入池价)/入池价*100,NODRAW
输出曾浮赢:(最高价-入池价)/入池价*100,NODRAW
输出曾浮亏:(最低价-入池价)/入池价*100,NODRAW
金额赋值:入池价*现赢利/100
WW1赋值:字符串相加
WW2赋值:字符串相加
WW3赋值:字符串相加
WW4赋值:字符串相加
WW5赋值:字符串相加
WW6赋值:字符串相加
当满足条件80日内最高价的最高值=最高价时,在横轴0.8纵轴0位置书写文字,COLOR00009B
当满足条件ISLASTBARAND(80日内最高价的最高值>最高价ORHHV(最高价,80)<最高价)AND最高价>0时,在横轴0.83纵轴0位置书写文字,COLOR00009B
当满足条件80日内最高价的最高值=最高价时,在横轴0.64纵轴0位置书写文字,COLOR009B00
当满足条件ISLASTBARAND(80日内最高价的最高值>最高价ORHHV(最高价,80)<最高价)AND最高价>0时,在横轴0.67纵轴0位置书写文字,COLOR009B00
当满足条件80日内最高价的最高值=最高价AND止价>=入池价时,在横轴0.64纵轴1位置书写文字,画红色
当满足条件ISLASTBARAND(80日内最高价的最高值>最高价ORHHV(最高价,80)<最高价)AND最高价>0AND止价>=入池价时,在横轴0.67纵轴1位置书写文字,画红色
当满足条件80日内最高价的最高值=最高价AND止价<入池价时,在横轴0.64纵轴1位置书写文字,画绿色
当满足条件ISLASTBARAND(80日内最高价的最高值>最高价ORHHV(最高价,80)<最高价)AND最高价>0AND止价<入池价时,在横轴0.67纵轴1位置书写文字,画绿色
当满足条件80日内最高价的最高值=最高价AND止价>=入池价时,在横轴0.8纵轴1位置书写文字,画黄色
当满足条件ISLASTBARAND(80日内最高价的最高值>最高价ORHHV(最高价,80)<最高价)AND最高价>0AND止价>=入池价时,在横轴0.83纵轴1位置书写文字,画黄色
当满足条件80日内最高价的最高值=最高价AND止价<入池价时,在横轴0.8纵轴1位置书写文字,画白色
当满足条件ISLASTBARAND(80日内最高价的最高值>最高价ORHHV(最高价,80)<最高价)AND最高价>0AND止价<入池价时,在横轴0.83纵轴1位置书写文字,画白色
K线

指标安装下载帮助  |   热门标签  | 联系我们  |  股朋指标网  |  指标网   |  指标公式网  |  加入收藏   

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