通达信双底主图及选股指标公式源码

通达信双底主图及选股指标公式源码

源码正文：

N:=15{XG51};
T:=LLVBARS(L,N){XG51};
HT:=HHVBARS(H,N){XG51};
TT:=BArslAst(T=0){XG51};
XG:=T=0 AND REF(TT,1)<20 AND L>REF(L,REF(TT,1)){XG51};
XGT:=BARSLAST(XG){XG51};
QF:=BacKSET(XG=1,HT+1){XG51};
QFT:=BARSLAST(crOSS(QF=1,0.5)){XG51};
DRAWLINE(QFT=0,H,XG,L,0),COLORBLUE{XG51};
QF1:=BACKSET(QFT=0,TT+1){XG51};
QF1T:=BARSLAST(CROSS(QF1=1,0.5)){XG51};
DRAWLINE(QF1T=0,L,QFT=0,H,0),COLORBLUE{XG51};
STICKLINE(QF1T=0,C,O,1.8,0),COLORRED{XG51};
STICKLINE(QF1T=0,H,L,0,0),COLORRED{XG51};
DRAWTEXT(QF1T=0,H*1.02,VARCAT(VARCAT('第一底价',VAR2STR(REF(L,QF1T),2)),'元'))COLORBLUE{XG51};
STICKLINE(XG,C,O,1.8,0),COLORRED{XG51};
STICKLINE(XG,H,L,0,0),COLORRED{XG51};
DRAWTEXT(XGT=0,H*1.04,VARCAT(VARCAT('双底价',VAR2STR(REF(L,XGT),2)),'元'))COLORBLUE{XG51};
DRAWICON(XG,L*0.94,1){X_G^5+1_C_N_{};