通达信涨跌标尺主图指标 江哥小工具 源码 贴图
T:=100;
CU:CURRBARSCOUNT,NODRAW;
T1:=BARSLAST(H=HHV(H,T));
T2:=BARSLAST(L=LLV(L,T));
TH:=CONST(REF(H,T1));
TL:=CONST(REF(L,T2));
X1:=SQRT(TH/TL);
X2:=SQRT(X1);
CA:=TL*X2;
CB:=TL*X1;
CD:=TL*(X1+X2-1);
zbgs3:=CONST(T2)+1;
NOTEXT1:IF(CU<=zbgs3,CONST(CA),DRAWNULL),COLORRED,DOTLINE;
NOTEXT2:IF(CU<=zbgs3,CONST(CB),DRAWNULL),COLORRED,DOTLINE;
NOTEXT3:IF(CU<=zbgs3,CONST(CD),DRAWNULL),COLORRED,DOTLINE;
DRAWTEXT(CU=zbgs3,CA,VAR2STR(CA,2));
DRAWTEXT(CU=zbgs3,CB,VAR2STR(CB,2));
DRAWTEXT(CU=zbgs3,CD,VAR2STR(CD,2));
NOTEXTA:DRAWLINE(CU=zbgs3,L,CD,CD,-1),DOTLINE,COLORRED;
STICKLINE(CU=zbgs3,H,CONST(CD),0,-1),COLORRED;
{zbgs3.com}
CF:=TH/X2;
CG:=TH/X1;
CJ:=TH/(X2+X1-1);
T6:=CONST(T1)+1;
NOTEXT4:IF(CU<=T6,CONST(CF),DRAWNULL),COLORGREEN,DOTLINE;
NOTEXT5:IF(CU<=T6,CONST(CG),DRAWNULL),COLORGREEN,DOTLINE;
NOTEXT6:IF(CU<=T6,CONST(CJ),DRAWNULL),COLORGREEN,DOTLINE;
DRAWTEXT(CU=T6,CF,VAR2STR(CF,2));
DRAWTEXT(CU=T6,CG,VAR2STR(CG,2));
DRAWTEXT(CU=T6,CJ,VAR2STR(CJ,2));
NOTEXTB:DRAWLINE(CU=T6,H,CJ,CJ,-1)DOTLINE,LINETHICK1,COLORGREEN;
STICKLINE(CU=T6,H,CONST(CJ),0,-1),COLORGREEN;
来函数检测结果如下：
该公式没有未来函数
解密、定制、编写股票指标请联系QQ或微信同号：88652583
相关股票指标公式
T赋值:100
输出CU:CURRBARSCOUNT,NODRAW
T1:=上次H=T日内H最高值距今天数
T2:=上次L=T日内L最低值距今天数
TH:=CONST(T1日前的H)
TL:=CONST(T2日前的L)
X1赋值:SQRT(TH/TL)
X2赋值:SQRT(X1)
CA赋值:TL*X2
CB赋值:TL*X1
CD赋值:TL*(X1+X2-1)
ZBGS3赋值:CONST(T2)+1
NOTEXT1:IF(CU<=ZBGS3,CONST(CA),DRAWNULL),画红色,DOTLINE
NOTEXT2:IF(CU<=ZBGS3,CONST(CB),DRAWNULL),画红色,DOTLINE
NOTEXT3:IF(CU<=ZBGS3,CONST(CD),DRAWNULL),画红色,DOTLINE
DRAWTEXT(CU=ZBGS3,CA,VAR2STR(CA,2))
DRAWTEXT(CU=ZBGS3,CB,VAR2STR(CB,2))
DRAWTEXT(CU=ZBGS3,CD,VAR2STR(CD,2))
NOTEXTA:DRAWLINE(CU=ZBGS3,L,CD,CD,-1),DOTLINE,画红色
STICKLINE(CU=ZBGS3,H,CONST(CD),0,-1),画红色
{ZBGS3.COM}
CF:=TH/X2
CG赋值:TH/X1
CJ赋值:TH/(X2+X1-1)
T6:=CONST(T1)+1
NOTEXT4:IF(CU<=T6,CONST(CF),DRAWNULL),画绿色,DOTLINE
NOTEXT5:IF(CU<=T6,CONST(CG),DRAWNULL),画绿色,DOTLINE
NOTEXT6:IF(CU<=T6,CONST(CJ),DRAWNULL),画绿色,DOTLINE
DRAWTEXT(CU=T6,CF,VAR2STR(CF,2))
DRAWTEXT(CU=T6,CG,VAR2STR(CG,2))
DRAWTEXT(CU=T6,CJ,VAR2STR(CJ,2))
NOTEXTB:DRAWLINE(CU=T6,H,CJ,CJ,-1)DOTLINE,LINETHICK1,画绿色
STICKLINE(CU=T6,H,CONST(CJ),0,-1),画绿色
