通达信量坑成交量及选股指标公式源码

通达信量坑成交量及选股指标公式源码

源码正文：

TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,240,1))))){XG51};
MTIME:=MOD(FROMOPEN,TOTAL){XG51};
CTIME:=IF(MTIME<0.5,TOTAL,MTIME){XG51};
Vvol:IF(CURRBARSCOUNT=1,VOL*TOTAL/CTIME,DRAWNULL),NODRAW{XG51};
stICKLINE(CURRBARSCOUNT=1 && (SETCODE=0 || SETCODE=1),VVOL,0,-1,-1),COLOR00C0C0{XG51};
VOLUME:VOL,VOLSTICK{XG51};
maVOL1:MA(VOLUME,5){XG51};
MAVOL2:MA(VOLUME,10){XG51};
N:=10{XG51};
V5:=MA(VOL,5){XG51};
HT:=HHVBARS(V5,60){XG51};
T:=BArslAST(V5=REF(V5,HT)){XG51};
LT:=LLVBARS(V5,30){XG51};
T1:=BARSLAST(V5=REF(V5,LT)){XG51};
FD:=REF(V5,T)/REF(V5,T1){XG51};
TJ:=T>T1 AND crOSS(C,REF(H,T)) AND FD>N{XG51};
XG:=COUNT(TJ,T+1)=1 AND TJ{XG51};
XGT:=BARSLAST(XG){XG51};
QF:=BacKSET(XG,T1+1){XG51};
QFT:=BARSLAST(CROSS(QF=1,0.5)){XG51};
QF1:=BACKSET(XG,T+1){XG51};
QFT1:=BARSLAST(CROSS(QF1=1,0.5)){XG51};
A:=REFX(FD,BARSNEXT(QFT=0)){XG51};
STICKLINE(QFT=0,VOL,0,1.5,0),COLORBLUE{XG51};
STICKLINE(QFT1=0,VOL,0,1.5,0),COLORBLUE{XG51};
NOTEXT1:DRAWLINE(QFT1=0,REF(V5,QFT1),QFT=0,REF(V5,QFT),0),COLORCYAN,LINETHICK2{XG51};
NOTEXT2:DRAWLINE(QFT=0,REF(V5,QFT),XGT=0,REF(V5,XGT),0),COLORCYAN,LINETHICK2{XG51};
NOTEXT:DRAWLINE(QFT1=0,REF(V5,QFT1),QFT1=28,REF(V5,QFT1),0),COLORRED,LINETHICK4{XG51};
DRAWTEXT(QFT1=0,NOTEXT*1.04,VARCAT(VARCAT('下一个量坑深：',VAR2STR(A,2)),'米'))COLORBLUE{XG51};
DRAWICON(XG,V+1000,25){X+G_5-1+C+N+{};