請老師修改為博易大師　[博易POBO]

咨詢內容： 請老師修改為博易大師 DIR2:=ABS(CLOSE-REF(CLOSE,60));

VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),60);

ER2:=DIR2/VIR2;

CS2:=ER2*(0.8-2/24)+2/24;

CQ2:=CS2*CS2;

AMA2:=EMA(DMA(CLOSE,CQ2),2),COLORGREEN,LINETHICK1;

牛熊分界:=AMA2,STICK,COLORGRAY;

AMA3:=IF(AMA2/REF(AMA2,1)>0.997,AMA2,NULL),COLORBLUE,LINETHICK1;

AMA4:=IF(AMA2/REF(AMA2,1)>1.001,AMA2,NULL),COLORRED,LINETHICK1;


DRAWCOLORKLINE(C>=O AND C>牛熊分界,COLORRED,1);
DRAWCOLORKLINE(C<O AND C>牛熊分界,COLORRED,0);
DRAWCOLORKLINE(C>=O AND C<牛熊分界,COLORWHITE,1);
DRAWCOLORKLINE(C<O AND C<牛熊分界,COLORWHITE,0);

XX1:=C>牛熊分界 AND 牛熊分界>REF(牛熊分界,1);
DRAWTEXT(ISLASTBAR AND XX1,L,'【做多】'),COLORRED;

XX2:=C<牛熊分界 AND 牛熊分界<=REF(牛熊分界,1);

DRAWTEXT(ISLASTBAR AND XX2,H,'【做空】'),COLORGREEN;

?

?來源:程序化99網（ www.tumamayizhan.com ）

博易技術人員： DIR2:=ABS(CLOSE-REF(CLOSE,60));

VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),60);

ER2:=DIR2/VIR2;

CS2:=ER2*(0.8-2/24)+2/24;

CQ2:=CS2*CS2;

AMA2:=EMA(DMA(CLOSE,CQ2),2),COLORGREEN,LINETHICK1;

牛熊分界:=AMA2,STICK,COLORGRAY;

AMA3:=IF(AMA2/REF(AMA2,1)>0.997,AMA2,DRAWNULL),COLORBLUE,LINETHICK1;

AMA4:=IF(AMA2/REF(AMA2,1)>1.001,AMA2,DRAWNULL),COLORRED,LINETHICK1;


DRAWKLINEEX(C>=O AND C>牛熊分界,H,O,L,C),COLORRED;
DRAWKLINEEX(C<O AND C>牛熊分界,H,O,L,C),COLORRED;
DRAWKLINEEX(C>=O AND C<牛熊分界,H,O,L,C),COLORWHITE;
DRAWKLINEEX(C<O AND C<牛熊分界,H,O,L,C),COLORWHITE;

XX1:=C>牛熊分界 AND 牛熊分界>REF(牛熊分界,1);
DRAWTEXT(ISLASTBAR AND XX1,L,'【做多】'),COLORRED;

XX2:=C<牛熊分界 AND 牛熊分界<=REF(牛熊分界,1);

DRAWTEXT(ISLASTBAR AND XX2,H,'【做空】'),COLORGREEN; 來源 程序化久久網