咨詢內容：

請老師幫忙把這個指標改成博易大師

VAR1:=EMA(EMA(CLOSE,13),13);

控盤:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;

STICKLINE(控盤<0,控盤,0,1,1),COLOR00FF00;

STICKLINE(控盤>REF(控盤,1) AND 控盤<0,控盤,0,1,1),COLORFF00FF;

無莊控盤:=控盤<0;

STICKLINE(控盤>REF(控盤,1) AND 控盤>0,控盤,0,1,1),COLOR0000FF;

有莊控盤:=控盤>REF(控盤,1) AND 控盤>0;

VAR2:=100*WINNER(CLOSE*0.95);

STICKLINE(控盤<REF(控盤,1) AND 控盤>0,控盤,0,1,1),COLORFFFF00;

主力出貨:=控盤<REF(控盤,1) AND 控盤>0;

STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盤>0,控盤,0,1,1),COLOR00FFFF;

: VAR2>50 AND COST(85)<CLOSE AND 控盤>0,COLOR00FFFF,LINETHICK2;

A10:=CROSS(控盤,0);

控盤B:=FILTER(IF(A10,1,0),5);

{分時價格原碼}

JJ:=REFX1(AVPRICE,10000);

P:=55;

S:=8;

M1:=3;

財:=(EMA(CLOSE,S)-EMA(CLOSE,P))*10,COLORRED,LINETHICK2;

神:=EMA(財,M1),COLORGREEN,LINETHICK1;

FILLRGN1(財>神,神,財),RGB(255,0,0);

FILLRGN1(財<神,神,財),RGB(0,100,50);

{股價與均線偏離買賣條件}

BTJ1:=(C-JJ)/JJ<-0.005;

BTJ11:=(C-JJ)/JJ<-0.03;

BTJ12:=LAST(JJ>=REF(JJ,1),5,1) AND (C-JJ)/JJ<0.005;

STJ1:=(C-JJ)/JJ>0.005;

{控盤買賣條件}

STJ01:=控盤<REF(控盤,1) AND 控盤>0.5;

STJ02:=控盤>0;

BTJ2:=控盤>REF(控盤,1) AND 控盤<-0.2;

BTJ22:=控盤>REF(控盤,1) AND 控盤<0 ;

BTJ3:=CROSS(財,神) AND 財<-0.3;

BTJ32:=CROSS(財,神) AND 財<-0.1;

STJ31:=CROSS(神,財);

STJ32:=CROSS(神,財) AND 財>1.618;

BTJ81:=FILTER(BTJ1 AND BTJ2 AND BTJ3,13);

BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,13);

BTJ82:=FILTER(BTJ12 AND BTJ22 AND BTJ32,13);

DRAWICON(BTJ82,神,23);

DRAWICON(BTJ81 AND TIME>10,神,27);

DRAWICON(BTJ811 AND TIME>10,神,26);

DRAWTEXT(BTJ81,神,'買底'),COLORRED;

DRAWTEXT(BTJ811,神*1.2,'必買'),COLORWHITE;

STJ81:=FILTER(STJ1 AND STJ01 AND STJ31,13);

DRAWICON(STJ81,神,10);

STJ82:=FILTER(STJ02 AND STJ32 ,13);

DRAWICON(STJ82,神,15);

STJ83:=STJ81 AND STJ82;

DRAWTEXT(STJ83,神,'必賣'),COLORLIGHTGREEN; <!-- 咨詢內容：

附件 :

-->

?

?來源:程序化99網（ www.weiqiv.net.cn ）

博易技術人員： VAR1:=EMA(EMA(CLOSE,13),13);

控盤:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;

STICKLINE(控盤<0,控盤,0,1,1),COLOR00FF00;

STICKLINE(控盤>REF(控盤,1) AND 控盤<0,控盤,0,1,1),COLORFF00FF;

無莊控盤:=控盤<0;

STICKLINE(控盤>REF(控盤,1) AND 控盤>0,控盤,0,1,1),COLOR0000FF;

有莊控盤:=控盤>REF(控盤,1) AND 控盤>0;

VAR2:=100*WINNER(CLOSE*0.95);

STICKLINE(控盤<REF(控盤,1) AND 控盤>0,控盤,0,1,1),COLORFFFF00;

主力出貨:=控盤<REF(控盤,1) AND 控盤>0;

STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盤>0,控盤,0,1,1),COLOR00FFFF;

VAR2>50 AND COST(85)<CLOSE AND 控盤>0,COLOR00FFFF,LINETHICK2;

A10:=CROSS(控盤,0);

控盤B:=FILTER(IF(A10,1,0),5);

{分時價格原碼}

JJ:=REFX(C,DATACOUNT-BARPOS-1);

P:=55;

S:=8;

M1:=3;

財:=(EMA(CLOSE,S)-EMA(CLOSE,P))*10,COLORRED,LINETHICK2;

神:=EMA(財,M1),COLORGREEN,LINETHICK1;

FILLRGN(財>神,神,財),COLOR0000FF;

FILLRGN(財<神,神,財),COLOR326400;

{股價與均線偏離買賣條件}

BTJ1:=(C-JJ)/JJ<-0.005;

BTJ11:=(C-JJ)/JJ<-0.03;

BTJ12:=COUNT(JJ>=REF(JJ,1),5)=1 AND (C-JJ)/JJ<0.005;

STJ1:=(C-JJ)/JJ>0.005;

{控盤買賣條件}

STJ01:=控盤<REF(控盤,1) AND 控盤>0.5;

STJ02:=控盤>0;

BTJ2:=控盤>REF(控盤,1) AND 控盤<-0.2;

BTJ22:=控盤>REF(控盤,1) AND 控盤<0 ;

BTJ3:=CROSS(財,神) AND 財<-0.3;

BTJ32:=CROSS(財,神) AND 財<-0.1;

STJ31:=CROSS(神,財);

STJ32:=CROSS(神,財) AND 財>1.618;

BTJ81:=FILTER(BTJ1 AND BTJ2 AND BTJ3,13);

BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,13);

BTJ82:=FILTER(BTJ12 AND BTJ22 AND BTJ32,13);

DRAWICON(BTJ82,神,23);

DRAWICON(BTJ81 AND TIME>10,神,27);

DRAWICON(BTJ811 AND TIME>10,神,26);

DRAWTEXT(BTJ81,神,'買底'),COLORRED;

DRAWTEXT(BTJ811,神*1.2,'必買'),COLORWHITE;

STJ81:=FILTER(STJ1 AND STJ01 AND STJ31,13);

DRAWICON(STJ81,神,10);

STJ82:=FILTER(STJ02 AND STJ32 ,13);

DRAWICON(STJ82,神,15);

STJ83:=STJ81 AND STJ82;

DRAWTEXT(STJ83,神,'必賣'),COLORGREEN; 通過不了 來源 程序化久久網