通达信发一自编主买量能优化指标感谢大家

BB:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));

主动买:=IF(CLOSE>OPEN,BB*(HIGH-LOW),IF(CLOSE<OPEN,BB*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));

主买:=主动买/10000,COLORRED,;

主动卖:=IF(CLOSE>OPEN,0-BB*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-BB*(HIGH-LOW),0-VOL/2));

主卖:=-主动卖/10000,COLORGREEN;

空线:=MA(主卖,5),LINETHICK1,COLORWHITE;

启线:=MA(主买,5),COLORYELLOW;

DRAWBAND(启线,RGB(255,0,0),空线, RGB(100,300,150));

VAREE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;

VAR122:=(HIGH+LOW+CLOSE)/3;

VAR133:=(VAR122-MA(VAR122,14))/(0.015*AVEDEV(VAR122,14));

VAR144:=(VAR122-MA(VAR122,70))/(0.015*AVEDEV(VAR122,70));

VAR155:=IF(VAR133>=150 AND VAR133<200 AND VAR144>=150 AND VAR144<200,10,0);

VAR166:=IF(VAR133<=-150 AND VAR133>-200 AND VAR144<=-150 AND VAR144>-200,-10,VAR155);

VAR177:=(CLOSE-MA(CLOSE,133))/MA(CLOSE,133)*100;

VAR188:=100-ABS(VAR177);

VAR199:=IF(VAR188<90,VAR188,100);

VAR1AA:=IF(VAREE>0,VAREE,0);

VAR1BB:=IF(VAR144>=200 AND VAR133>=150,15,IF(VAR144<=-200 AND VAR133<=-150,-15,VAR166))+60;

VAR1CC:=VAR1AA>48 AND VAR1BB>60 AND VAR199<100;

STICKLINE(VAR1CC AND COUNT(VAR1CC,30)=1,(空线+(启线-空线)*0.125),(空线+(启线-空线)*0.75),1,0),COLORFFCC66;

STICKLINE(C>MA(C,10),启线,空线,0.00000005,1),COLORYELLOW;

DRAWICON(VAR1CC AND COUNT(VAR1CC,30)=1,(空线+(启线-空线)*0.4),2);
 

空头线:MA(主卖,5),LINETHICK1,COLORWHITE;

启动线:MA(主买,5),COLORYELLOW;

洗盘线:MA(主买,35)COLORMAGENTA,LINETHICK1;

异动线:MA(主买,135)COLORGREEN,LINETHICK1;

中线:=(CLOSE-MA(CLOSE,4))/MA(CLOSE,4)*20;

蓝柱:=SMA(中线,3,1),COLORSTICK;
 

WW:=CROSS(启动线,空头线) AND REF(启动线,1)<REF(异动线,1) AND REF(启动线,1)>REF(洗盘线,1) ;

SS:=CROSS(启动线,空头线) AND REF(启动线,1)<REF(洗盘线,1) AND REF(启动线,1)>REF(异动线,1) ;

YY:=CROSS(启动线,空头线) AND REF(启动线,1)<REF(异动线,1) AND REF(启动线,1)<REF(洗盘线,1) ;

HH:=异动线>洗盘线 AND CROSS(异动线,启动线) AND CROSS(洗盘线,启动线) ;

JJ:=洗盘线>异动线 AND CROSS(异动线,启动线) AND CROSS(洗盘线,启动线) ;

ZZ:=洗盘线>异动线 AND REF(CROSS(洗盘线,启动线),1) AND CROSS(异动线,启动线) ;

DD:=异动线>洗盘线 AND REF(CROSS(异动线,启动线),1) AND CROSS(洗盘线,启动线) ;

QQ:=REF(异动线,1)>REF(洗盘线,1) AND CROSS(空头线,异动线);

GG:=REF(洗盘线,1)>REF(异动线,1) AND CROSS(空头线,洗盘线);

TT:=洗盘线>异动线 AND CROSS(启动线,异动线) AND CROSS(启动线,洗盘线);

LL:=异动线>洗盘线 AND CROSS(启动线,异动线) AND CROSS(启动线,洗盘线);

TL:=洗盘线>异动线 AND REF(CROSS(启动线,异动线),1) AND CROSS(启动线,洗盘线);

QG:=异动线>洗盘线 AND REF(CROSS(启动线,洗盘线),1) AND CROSS(启动线,异动线);

DRAWICON(WW,(启动线+空头线)/2,1 );

DRAWICON(SS,(启动线+空头线)/2,1 );

DRAWICON(YY,(启动线+空头线)/2,1 );

DRAWICON(TT,(启动线+空头线)/2,1 );

DRAWICON(LL,(启动线+空头线)/2,1 );

DRAWICON(TL,(启动线+空头线)/2,1 );

DRAWICON(QG,(启动线+空头线)/2,1 );

DRAWICON(QQ,异动线,2);

DRAWICON(GG,洗盘线,2);

DRAWICON(HH,洗盘线,2);

DRAWICON(JJ,异动线,2);

DRAWICON(ZZ,异动线,2);

DRAWICON(DD,洗盘线,2);