咨詢內容：

請老師幫忙修改

?DIFF:EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:EMA(DIFF,9);
MACD:=2*(DIFF-DEA),COLORSTICK;
JC:=CROSS(DIFF,DEA);
SC:=CROSSDOWN(DIFF,DEA);
N1:=BARSLAST(JC)+1;
N2:=BARSLAST(SC)+1;
HH:=REF(HHV(H,N1),N2);//上次MACD紅柱期間合約最大值
HH2:=REF(REF(HH,1),N2);//上上次MACD紅柱期間合約最大值
MHD:=VALUEWHEN(SC,HHV(DIFF,N1));//上次MACD紅柱期間DIFF最大值
MHD2:=VALUEWHEN(SC,REF(MHD,1));//上上次MACD紅柱期間DIFF最大值

LL:=REF(LLV(L,N2),N1);
LL2:=REF(REF(LL,1),N1);
MLD:=VALUEWHEN(JC,LLV(DIFF,N2));
MLD2:=VALUEWHEN(JC,REF(MLD,1));
A:MACD<0&&HH>HH2&&MHD<MHD2;//頂背離
B:MACD>0&&LL<LL2&&MLD>MLD2;//底背離
A1:=BACKSET(CROSS(A,0.5),REF(HHVBARS(DIFF,N1),1)+1+1);
A2:=BACKSET(CROSS(A,0.5),REF(HHVBARS(DIFF,N1),SUMBARS(SC,2))+SUMBARS(SC,2)+1);
B1:=BACKSET(CROSS(B,0.5),REF(LLVBARS(DIFF,N2),1)+1+1);
B2:=BACKSET(CROSS(B,0.5),REF(LLVBARS(DIFF,N2),SUMBARS(JC,2))+SUMBARS(JC,2)+1);
DRAWLINE1(CROSS(A2,0.5),DIFF,CROSS(A1,0.5),DIFF,0),COLORRED,LINETHICK2;
DRAWLINE1(CROSS(B2,0.5),DIFF,CROSS(B1,0.5),DIFF,0),COLORGREEN,LINETHICK2;

STICKLINE(MACD>=0,MACD,0,4,1),COLORBLUE;
STICKLINE(MACD<0,MACD,0,4,0),COLORCYAN;
STICKLINE(MACD<REF(MACD,1)&&MACD>0,0,MACD,4,0?);
STICKLINE(MACD<REF(MACD,1)&&MACD>0,0,MACD,3.3,0?);
STICKLINE(MACD<REF(MACD,1)&&MACD>0,0,MACD,2.2,0?);
STICKLINE(MACD<REF(MACD,1)&&MACD>0,0,MACD,1.65,0?);
STICKLINE(MACD<REF(MACD,1)&&MACD>0,0,MACD,1.1,0?);
STICKLINE(MACD<REF(MACD,1)&&MACD>0,0,MACD,0.55,0?),COLORBLUE;
STICKLINE(MACD>=REF(MACD,1)&&MACD>0,0,MACD,4?,0?);
STICKLINE(MACD>=REF(MACD,1)&&MACD>0,0,MACD,3.3?,0?);
STICKLINE(MACD>=REF(MACD,1)&&MACD>0,0,MACD,2.2,0?);
STICKLINE(MACD>=REF(MACD,1)&&MACD>0,0,MACD,1.65?,0?);
STICKLINE(MACD>=REF(MACD,1)&&MACD>0,0,MACD,1.1?,0?);
STICKLINE(MACD>=REF(MACD,1)&&MACD>0,0,MACD,0.55?,0?),COLORRED;
STICKLINE(MACD>REF(MACD,1)&&MACD<0,0,MACD,4,0?);
STICKLINE(MACD>REF(MACD,1)&&MACD<0,0,MACD,3.3?,0?);
STICKLINE(MACD>REF(MACD,1)&&MACD<0,0,MACD,2.2,0?);
STICKLINE(MACD>REF(MACD,1)&&MACD<0,0,MACD,1.65,0?);
STICKLINE(MACD>REF(MACD,1)&&MACD<0,0,MACD,1.1,0?);
STICKLINE(MACD>REF(MACD,1)&&MACD<0,0,MACD,0.55?,0?),COLORMAGENTA;
STICKLINE(MACD<=REF(MACD,1)&&MACD<0,0,MACD,4,0?);

?

?

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

博易技術人員： 老師辛苦修改一下
?DIFF:EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:EMA(DIFF,9);
MACD:=2*(DIFF-DEA),COLORSTICK;
JC:=CROSS(DIFF,DEA);
SC:=CROSSDOWN(DIFF,DEA);
N1:=BARSLAST(JC)+1;
N2:=BARSLAST(SC)+1;
HH:=REF(HHV(H,N1),N2);//上次MACD紅柱期間合約最大值
HH2:=REF(REF(HH,1),N2);//上上次MACD紅柱期間合約最大值
MHD:=VALUEWHEN(SC,HHV(DIFF,N1));//上次MACD紅柱期間DIFF最大值
MHD2:=VALUEWHEN(SC,REF(MHD,1));//上上次MACD紅柱期間DIFF最大值

LL:=REF(LLV(L,N2),N1);
LL2:=REF(REF(LL,1),N1);
MLD:=VALUEWHEN(JC,LLV(DIFF,N2));
MLD2:=VALUEWHEN(JC,REF(MLD,1));
A:MACD<0&&HH>HH2&&MHD<MHD2;//頂背離
B:MACD>0&&LL<LL2&&MLD>MLD2;//底背離
A1:=BACKSET(CROSS(A,0.5),REF(HHVBARS(DIFF,N1),1)+1+1);
A2:=BACKSET(CROSS(A,0.5),REF(HHVBARS(DIFF,N1),SUMBARS(SC,2))+SUMBARS(SC,2)+1);
B1:=BACKSET(CROSS(B,0.5),REF(LLVBARS(DIFF,N2),1)+1+1);
B2:=BACKSET(CROSS(B,0.5),REF(LLVBARS(DIFF,N2),SUMBARS(JC,2))+SUMBARS(JC,2)+1);
DRAWLINE1(CROSS(A2,0.5),DIFF,CROSS(A1,0.5),DIFF,0),COLORRED,LINETHICK2;
DRAWLINE1(CROSS(B2,0.5),DIFF,CROSS(B1,0.5),DIFF,0),COLORGREEN,LINETHICK2;

STICKLINE(MACD>=0,MACD,0,4,1),COLORBLUE;
STICKLINE(MACD<0,MACD,0,4,0),COLORCYAN;
STICKLINE(MACD<REF(MACD,1)&&MACD>0,0,MACD,4,0?);
STICKLINE(MACD<REF(MACD,1)&&MACD>0,0,MACD,3.3,0?);
STICKLINE(MACD<REF(MACD,1)&&MACD>0,0,MACD,2.2,0?);
STICKLINE(MACD<REF(MACD,1)&&MACD>0,0,MACD,1.65,0?);
STICKLINE(MACD<REF(MACD,1)&&MACD>0,0,MACD,1.1,0?);
STICKLINE(MACD<REF(MACD,1)&&MACD>0,0,MACD,0.55,0?),COLORBLUE;
STICKLINE(MACD>=REF(MACD,1)&&MACD>0,0,MACD,4?,0?);
STICKLINE(MACD>=REF(MACD,1)&&MACD>0,0,MACD,3.3?,0?);
STICKLINE(MACD>=REF(MACD,1)&&MACD>0,0,MACD,2.2,0?);
STICKLINE(MACD>=REF(MACD,1)&&MACD>0,0,MACD,1.65?,0?);
STICKLINE(MACD>=REF(MACD,1)&&MACD>0,0,MACD,1.1?,0?);
STICKLINE(MACD>=REF(MACD,1)&&MACD>0,0,MACD,0.55?,0?),COLORRED;
STICKLINE(MACD>REF(MACD,1)&&MACD<0,0,MACD,4,0?);
STICKLINE(MACD>REF(MACD,1)&&MACD<0,0,MACD,3.3?,0?);
STICKLINE(MACD>REF(MACD,1)&&MACD<0,0,MACD,2.2,0?);
STICKLINE(MACD>REF(MACD,1)&&MACD<0,0,MACD,1.65,0?);
STICKLINE(MACD>REF(MACD,1)&&MACD<0,0,MACD,1.1,0?);
STICKLINE(MACD>REF(MACD,1)&&MACD<0,0,MACD,0.55?,0?),COLORMAGENTA;
STICKLINE(MACD<=REF(MACD,1)&&MACD<0,0,MACD,4,0?);
? DIFF:EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:EMA(DIFF,9);
MACD:=2*(DIFF-DEA),COLORSTICK;
JC:=CROSS(DIFF,DEA);
SC:=CROSS(DEA,DIFF);
N1:=BARSLAST(JC)+1;
N2:=BARSLAST(SC)+1;
HH:=REF(HHV(H,N1),N2);//上次MACD紅柱期間合約最大值
HH2:=REF(REF(HH,1),N2);//上上次MACD紅柱期間合約最大值
MHD:=VALUEWHEN(SC,HHV(DIFF,N1));//上次MACD紅柱期間DIFF最大值
MHD2:=VALUEWHEN(SC,REF(MHD,1));//上上次MACD紅柱期間DIFF最大值

LL:=REF(LLV(L,N2),N1);
LL2:=REF(REF(LL,1),N1);
MLD:=VALUEWHEN(JC,LLV(DIFF,N2));
MLD2:=VALUEWHEN(JC,REF(MLD,1));
A:MACD<0&&HH>HH2&&MHD<MHD2;//頂背離
B:MACD>0&&LL<LL2&&MLD>MLD2;//底背離
A1:=BACKSET(CROSS(A,0.5),REF(HHVBARS(DIFF,N1),1)+1+1);
A2:=BACKSET(CROSS(A,0.5),REF(HHVBARS(DIFF,N1),SUMBARS(SC,2))+SUMBARS(SC,2)+1);
B1:=BACKSET(CROSS(B,0.5),REF(LLVBARS(DIFF,N2),1)+1+1);
B2:=BACKSET(CROSS(B,0.5),REF(LLVBARS(DIFF,N2),SUMBARS(JC,2))+SUMBARS(JC,2)+1);
DRAWLINE(CROSS(A2,0.5),DIFF,CROSS(A1,0.5),DIFF,0),COLORRED,LINETHICK2;
DRAWLINE(CROSS(B2,0.5),DIFF,CROSS(B1,0.5),DIFF,0),COLORGREEN,LINETHICK2;

STICKLINE(MACD>=0,MACD,0,4,1),COLORBLUE;
STICKLINE(MACD<0,MACD,0,4,0),COLORCYAN;
STICKLINE(MACD<REF(MACD,1)&&MACD>0,0,MACD,4,0);
STICKLINE(MACD<REF(MACD,1)&&MACD>0,0,MACD,3.3,0);
STICKLINE(MACD<REF(MACD,1)&&MACD>0,0,MACD,2.2,0);
STICKLINE(MACD<REF(MACD,1)&&MACD>0,0,MACD,1.65,0);
STICKLINE(MACD<REF(MACD,1)&&MACD>0,0,MACD,1.1,0);
STICKLINE(MACD<REF(MACD,1)&&MACD>0,0,MACD,0.55,0),COLORBLUE;
STICKLINE(MACD>=REF(MACD,1)&&MACD>0,0,MACD,4,0);
STICKLINE(MACD>=REF(MACD,1)&&MACD>0,0,MACD,3.3,0);
STICKLINE(MACD>=REF(MACD,1)&&MACD>0,0,MACD,2.2,0);
STICKLINE(MACD>=REF(MACD,1)&&MACD>0,0,MACD,1.65,0);
STICKLINE(MACD>=REF(MACD,1)&&MACD>0,0,MACD,1.1,0);
STICKLINE(MACD>=REF(MACD,1)&&MACD>0,0,MACD,0.55,0),COLORRED;
STICKLINE(MACD>REF(MACD,1)&&MACD<0,0,MACD,4,0);
STICKLINE(MACD>REF(MACD,1)&&MACD<0,0,MACD,3.3,0);
STICKLINE(MACD>REF(MACD,1)&&MACD<0,0,MACD,2.2,0);
STICKLINE(MACD>REF(MACD,1)&&MACD<0,0,MACD,1.65,0);
STICKLINE(MACD>REF(MACD,1)&&MACD<0,0,MACD,1.1,0);
STICKLINE(MACD>REF(MACD,1)&&MACD<0,0,MACD,0.55,0),COLORMAGENTA;
STICKLINE(MACD<=REF(MACD,1)&&MACD<0,0,MACD,4,0); 來源 程序化久久網