区间统计这是一个好公式通达信公式 副图 源码附图
统计:=1;始:10;终:=0;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
XZ:=IF(统计=1,1,DRAWNULL);
HSL:=V/FINANCE(7)*10000;
KD1:=(CURRBARSCOUNT=始)*XZ; ZD1:=(CURRBARSCOUNT-1=终)*XZ;
KD2:=BARSLAST(KD1); ZD2:=BARSLAST(ZD1);
HS1:=SUM(HSL,KD2+1),NODRAW;
HS2:=IF(ZD2!=0,SUM(HSL,ZD2),0);
QHS:=HS1-HS2,NODRAW;
HH:=CONST(FINDHIGH(H,终,始-终,1));
LL:=CONST(FINDLOW(L,终,始-终,1));
ZF:=(HH/LL-1)*100;
ZFD:(REF(C,终)/REF(C,始)-1)*100,NODRAW;
JC:REF(C,终)-REF(C,始),NODRAW;
始日:=REF(DAY,KD2);
始月:=REF(MONTH,KD2);
始年:=REF(YEAR,KD2);
终日:=REF(DAY,ZD2);
终月:=REF(MONTH,ZD2);
终年:=REF(YEAR,ZD2);
KK1:=STRCAT(STRCAT('起始日期:',CON2STR(始年,0)),'年');
KK2:=STRCAT(CON2STR(始月,0),'月');
KK3:=STRCAT(KK1,KK2);
KK4:=STRCAT(CON2STR(始日,0),'日');
KK5:=STRCAT(KK3,KK4);
ZZ1:=STRCAT(STRCAT(' 终止日期:',CON2STR(终年,0)),'年');
ZZ2:=STRCAT(CON2STR(终月,0),'月');
ZZ3:=STRCAT(ZZ1,ZZ2);
ZZ4:=STRCAT(CON2STR(终日,0),'日');
ZZ5:=STRCAT(ZZ3,ZZ4);
KZ:=STRCAT(KK5,ZZ5);
QQ1:=STRCAT(' 交易天数:',CON2STR(始-终,0));
QQ2:=STRCAT(STRCAT(' 区间换手:',CON2STR(QHS,2)),'%');
QQ3:=STRCAT(QQ1,QQ2);{}
QQ4:=STRCAT(STRCAT(' 区间振幅:',CON2STR(ZF,2)),'%');
QQ5:=STRCAT(QQ3,QQ4);
QQ6:=STRCAT(KZ,QQ5);
WW1:=STRCAT(STRCAT('(',CON2STR(JC,2)),')');
WW2:=STRCAT(' 区间涨幅:',WW1);
WW3:=STRCAT(CON2STR(ZFD,2),'%');
WW4:=STRCAT(WW2,WW3);
WW5:=STRCAT('【休闲人区间统计】 ',STRCAT(QQ6,WW4));
DRAWTEXT_FIX(ISLASTBAR AND XZ,0.05,0,0,
'████████████████████████████████████████
████████████████████████████████████████████████████'),COLOR555500;
DRAWTEXT_FIX(ISLASTBAR AND XZ,0.05,0,0,WW5),COLORBBBBBB;
NN:=90;
STICKLINE(KD1,CONST(HHV(H,NN)),CONST(LLV(L,NN)),0,-1),COLOR009FFF;
STICKLINE(ZD1,CONST(HHV(H,NN)),CONST(LLV(L,NN)),0,-1),COLOR9FFF00;
DRAWTEXT(KD1,CONST(HHV(H,NN)),'始'),COLOR009FFF;
DRAWTEXT(ZD1,CONST(HHV(H,NN)),'终'),COLOR9FFF00;
未来函数检测结果如下:
该公式包含未来函数:FINANCE
该公式包含未来函数:DHIGH
该公式包含未来函数:DLOW
解密、编写股票、期货策略请联系QQ或微信同号:88652583
相关股票指标公式
原理解析:
统计赋值:1
输出始:10
终赋值:0
DRAWKLINE(最高价,开盘价,最低价,收盘价)
如果统计=1返回1否则返回DRAWNULL
HSL赋值:V/FINANCE(7)*10000
KD1赋值:( 到最后交易的周期=始)*XZ
ZD1赋值:( 到最后交易的周期-1=终)*XZ
KD2赋值:上次KD1距今天数
ZD2赋值:上次ZD1距今天数
HS1赋值:KD2+1的HSL日累和,NODRAW
HS2赋值:IF(ZD2!=0,ZD2的HSL日累和,0)
QHS赋值:HS1-HS2,NODRAW
HH赋值:CONST(FIND最高价(H,终,始-终,1))
LL赋值:CONST(FIND最低价(L,终,始-终,1))
ZF赋值:(HH/LL-1)*100
ZFD:(终日前的C/始日前的C-1)*100,NODRAW
输出JC:终日前的C-始日前的C,NODRAW
始日:=KD2日前的DAY
始月:=KD2日前的MONTH
始年:=KD2日前的YEAR
终日:=ZD2日前的DAY
终月:=ZD2日前的MONTH
终年:=ZD2日前的YEAR
KK1:=STRCAT(STRCAT('起始日期:',CON2STR(始年,0)),'年')
KK2赋值:STRCAT(CON2STR(始月,0),'月')
KK3赋值:STRCAT(KK1,KK2)
KK4赋值:STRCAT(CON2STR(始日,0),'日')
KK5赋值:STRCAT(KK3,KK4)
ZZ1:=STRCAT(STRCAT(' 终止日期:',CON2STR(终年,0)),'年')
ZZ2赋值:STRCAT(CON2STR(终月,0),'月')
ZZ3赋值:STRCAT(ZZ1,ZZ2)
ZZ4赋值:STRCAT(CON2STR(终日,0),'日')
ZZ5赋值:STRCAT(ZZ3,ZZ4)
KZ赋值:STRCAT(KK5,ZZ5)
QQ1:=STRCAT(' 交易天数:',CON2STR(始-终,0))
QQ2:=STRCAT(STRCAT(' 区间换手:',CON2STR(QHS,2)),'%')
QQ3赋值:STRCAT(QQ1,QQ2)
{}
QQ4:=STRCAT(STRCAT(' 区间振幅:',CON2STR(ZF,2)),'%')
QQ5赋值:STRCAT(QQ3,QQ4)
QQ6赋值:STRCAT(KZ,QQ5)
WW1赋值:STRCAT(STRCAT('(',CON2STR(JC,2)),')')
WW2:=STRCAT(' 区间涨幅:',WW1)
WW3赋值:STRCAT(CON2STR(ZFD,2),'%')
WW4赋值:STRCAT(WW2,WW3)
WW5赋值:STRCAT('【休闲人区间统计】 ',STRCAT(QQ6,WW4))
当满足条件ISLASTBAR AND XZ时,在横轴0.05纵轴0位置书写文字
当满足条件ISLASTBAR AND XZ时,在横轴0.05纵轴0位置书写文字
NN赋值:90
STICKLINE(KD1,CONST(NN日内H最高值),CONST(NN日内L最低值),0,-1),COLOR009FFF
STICKLINE(ZD1,CONST(NN日内H最高值),CONST(NN日内L最低值),0,-1),COLOR9FFF00
DRAWTEXT(KD1,CONST(NN日内H最高值),'始'),COLOR009FFF
DRAWTEXT(ZD1,CONST(NN日内H最高值),'终'),COLOR9FFF00