通达信量5102060 副图源码

以下是通达信量5102060 副图源码

{量5102060

参数1: M1, 最小: 2, 最大: 500, 缺省: 5

参数2: M2, 最小: 2, 最大: 500, 缺省: 10

参数3: M3, 最小: 2, 最大: 500, 缺省: 20

参数4: M4, 最小: 2, 最大: 500, 缺省: 60

注释：本公式有未来函数

}

VAR1:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,TOTALFZNUM,1)))));

VAR2:=MOD(FROMOPEN,VAR1);

VAR3:=IF(VAR2<0.5,VAR1,VAR2);

VVOL:IF(CURRBARSCOUNT=1 AND DYNAINFO(8)>1,VOL*VAR1/VAR3,DRAWNULL),NODRAW;

STICKLINE(CURRBARSCOUNT=1 AND DYNAINFO(8)>1,VVOL,0,(-1),(-1)),COLOR00C0C0;

VOLUME:VOL,VOLSTICK;

MAVOL1:MA(VOLUME,M1);

MAVOL2:MA(VOLUME,M2);

MAVOL3:MA(VOLUME,M3);

MAVOL4:MA(VOLUME,M4);

VAR4:=VOL>REF(VOL,1)*1.9;

VAR5:=VOL<REF(LLV(VOL,13),1);

VAR6:=VOL<REF(LLV(VOL,55),1);

STICKLINE(VAR4,0,VOL,1,0),COLORYELLOW;

STICKLINE(VAR6,0,VOL,1,0),COLORMAGENTA;

VAR7:=CLOSE/REF(CLOSE,3)>=1.1;

VAR8:=BACKSET(VAR7,2);

OK:STICKLINE(VAR8 AND COUNT(VAR8,2)=1,VOL,0,3,0),COLORRED;