請老師幫忙改一下 [博易POBO]
咨詢內容:
DEA : EMA(DIFF,9);
MACD:=2*(DIFF-DEA);
ZERO : 0;
GJ:=MAX(C,O);
DRAWCOLORLINE(DIFF>=REF(DIFF,1),DIFF,COLORRED,COLORGREEN);
STICKLINE1(MACD>0 AND MACD>=REF(MACD,1),0,MACD,0.5,0),COLOR0000FF;
STICKLINE1(MACD>0 AND MACD<REF(MACD,1),0,MACD,0.5,0),RGB(255,123,189);
STICKLINE1(MACD<0 AND MACD>=REF(MACD,1),0,MACD,0.5,0),COLOR008000;
STICKLINE1(MACD<0 AND MACD<REF(MACD,1),0,MACD,0.5,0),COLOR00FF00;
DRAWICON(CROSS(DIFF,DEA),DIFF,'ICO4');
DRAWICON(CROSS(DEA,DIFF),DIFF,'ICO5');
L4:=LLV(GJ,4);
JL:=(HHV(DIFF,55)-LLV(DIFF,55))/5;
GT:=DEA>REF(DEA,1) AND REF(DEA,1)<REF(DEA,2);
A1:=BARSLAST(REF(GT,1));
底背:=REF(L4,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND GT;
DRAWLINE(A1=0,DEA,底背,REF(DEA,A1),0),COLORRED,LINETHICK2;
DRAWLINE(底背,DEA,底背,REF(DEA,A1),0),COLORRED,LINETHICK2;
DRAWTEXT(底背,REF(DEA,A1)*1.18,' 底背離'),COLORYELLOW;
H4:=HHV(GJ,4);
GT2:=DEA<REF(DEA,1) AND REF(DEA,1)>REF(DEA,2);
A2:=BARSLAST(REF(GT2,1));
頂背:= REF(H4,A2+1)<H4 AND DIFF<REF(DIFF,A2+1) AND GT2;
DRAWLINE(A2=0 ,DEA,頂背,REF(DEA,A2),0),COLORGREEN,LINETHICK2;
DRAWLINE(頂背,DEA,頂背,REF(DEA,A2),0),COLORGREEN,LINETHICK2;
DRAWTEXT(頂背,REF(DEA,A2)*1.18,' 頂背離'),COLORRED;
A0:=DIFF<0 AND DEA<0;
A11:=A0>REF(A0,1);
A3:=BARSLAST(A11);
A4:=COUNT(DEA>0 AND DIFF >0,A3)=0;
A5:=CROSS(DIFF ,DEA);
A6:=BARSLAST(A5);
A7:=REF(A6,A6+1)+A6;
A8:=(DIFF+DEA)/2;
A9:=(HIGH+LOW)/2;
A10:=A5 AND A7<A3 AND A4 AND A8>REF(A8,A7) AND A9<REF(A9,A7) AND MACD>0;
DRAWTEXT(A10,DIFF*0.95,'.'),COLORYELLOW;
//DRAWTEXT(CROSS(DIFF,DEA),DIFF,'多'),COLORYELLOW;
//DRAWTEXT(CROSS(DEA,DIFF),DEA,'空'),COLORGREEN;?
//CROSS(DIFF,DEA),SOUND('A');
//CROSS(DEA,DIFF),SOUND('B');
DEA : EMA(DIFF,9);
MACD:=2*(DIFF-DEA);
ZERO : 0;
GJ:=MAX(C,O);
PARTLINE2(DIFF,DIFF>=REF(DIFF,1),COLORRED,DIFF<REF(DIFF,1),COLORGREEN);
STICKLINE(MACD>0 AND MACD>=REF(MACD,1),0,MACD,0.5,0),COLOR0000FF;
STICKLINE(MACD>0 AND MACD<REF(MACD,1),0,MACD,0.5,0),COLORBD7BFF;
STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,0.5,0),COLOR008000;
STICKLINE(MACD<0 AND MACD<REF(MACD,1),0,MACD,0.5,0),COLOR00FF00;
DRAWICON(CROSS(DIFF,DEA),DIFF,'ICO4');
DRAWICON(CROSS(DEA,DIFF),DIFF,'ICO5');
L4:=LLV(GJ,4);
JL:=(HHV(DIFF,55)-LLV(DIFF,55))/5;
GT:=DEA>REF(DEA,1) AND REF(DEA,1)<REF(DEA,2);
A1:=BARSLAST(REF(GT,1));
底背:=REF(L4,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND GT;
DRAWLINE(A1=0,DEA,底背,REF(DEA,A1),0),COLORRED,LINETHICK2;
DRAWLINE(底背,DEA,底背,REF(DEA,A1),0),COLORRED,LINETHICK2;
DRAWTEXT(底背,REF(DEA,A1)*1.18,' 底背離'),COLORYELLOW;
H4:=HHV(GJ,4);
GT2:=DEA<REF(DEA,1) AND REF(DEA,1)>REF(DEA,2);
A2:=BARSLAST(REF(GT2,1));
頂背:= REF(H4,A2+1)<H4 AND DIFF<REF(DIFF,A2+1) AND GT2;
DRAWLINE(A2=0 ,DEA,頂背,REF(DEA,A2),0),COLORGREEN,LINETHICK2;
DRAWLINE(頂背,DEA,頂背,REF(DEA,A2),0),COLORGREEN,LINETHICK2;
DRAWTEXT(頂背,REF(DEA,A2)*1.18,' 頂背離'),COLORRED;
A0:=DIFF<0 AND DEA<0;
A11:=A0>REF(A0,1);
A3:=BARSLAST(A11);
A4:=COUNT(DEA>0 AND DIFF >0,A3)=0;
A5:=CROSS(DIFF ,DEA);
A6:=BARSLAST(A5);
A7:=REF(A6,A6+1)+A6;
A8:=(DIFF+DEA)/2;
A9:=(HIGH+LOW)/2;
A10:=A5 AND A7<A3 AND A4 AND A8>REF(A8,A7) AND A9<REF(A9,A7) AND MACD>0;
DRAWTEXT(A10,DIFF*0.95,'.'),COLORYELLOW;
//DRAWTEXT(CROSS(DIFF,DEA),DIFF,'多'),COLORYELLOW;
//DRAWTEXT(CROSS(DEA,DIFF),DEA,'空'),COLORGREEN;?
//CROSS(DIFF,DEA),SOUND('A');
//CROSS(DEA,DIFF),SOUND('B');
? 老師請再改一下標注1的劃線不要?圖標的小房子換成向上向下的箭頭謝謝 來源 程序化久久網
請老師幫忙改一下
請老師幫忙把這個文華的MACD指標改成博易指標 謝謝DIFF : EMA(CLOSE,12) - EMA(CLOSE,26);DEA : EMA(DIFF,9);
MACD:=2*(DIFF-DEA);
ZERO : 0;
GJ:=MAX(C,O);
DRAWCOLORLINE(DIFF>=REF(DIFF,1),DIFF,COLORRED,COLORGREEN);
STICKLINE1(MACD>0 AND MACD>=REF(MACD,1),0,MACD,0.5,0),COLOR0000FF;
STICKLINE1(MACD>0 AND MACD<REF(MACD,1),0,MACD,0.5,0),RGB(255,123,189);
STICKLINE1(MACD<0 AND MACD>=REF(MACD,1),0,MACD,0.5,0),COLOR008000;
STICKLINE1(MACD<0 AND MACD<REF(MACD,1),0,MACD,0.5,0),COLOR00FF00;
DRAWICON(CROSS(DIFF,DEA),DIFF,'ICO4');
DRAWICON(CROSS(DEA,DIFF),DIFF,'ICO5');
L4:=LLV(GJ,4);
JL:=(HHV(DIFF,55)-LLV(DIFF,55))/5;
GT:=DEA>REF(DEA,1) AND REF(DEA,1)<REF(DEA,2);
A1:=BARSLAST(REF(GT,1));
底背:=REF(L4,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND GT;
DRAWLINE(A1=0,DEA,底背,REF(DEA,A1),0),COLORRED,LINETHICK2;
DRAWLINE(底背,DEA,底背,REF(DEA,A1),0),COLORRED,LINETHICK2;
DRAWTEXT(底背,REF(DEA,A1)*1.18,' 底背離'),COLORYELLOW;
H4:=HHV(GJ,4);
GT2:=DEA<REF(DEA,1) AND REF(DEA,1)>REF(DEA,2);
A2:=BARSLAST(REF(GT2,1));
頂背:= REF(H4,A2+1)<H4 AND DIFF<REF(DIFF,A2+1) AND GT2;
DRAWLINE(A2=0 ,DEA,頂背,REF(DEA,A2),0),COLORGREEN,LINETHICK2;
DRAWLINE(頂背,DEA,頂背,REF(DEA,A2),0),COLORGREEN,LINETHICK2;
DRAWTEXT(頂背,REF(DEA,A2)*1.18,' 頂背離'),COLORRED;
A0:=DIFF<0 AND DEA<0;
A11:=A0>REF(A0,1);
A3:=BARSLAST(A11);
A4:=COUNT(DEA>0 AND DIFF >0,A3)=0;
A5:=CROSS(DIFF ,DEA);
A6:=BARSLAST(A5);
A7:=REF(A6,A6+1)+A6;
A8:=(DIFF+DEA)/2;
A9:=(HIGH+LOW)/2;
A10:=A5 AND A7<A3 AND A4 AND A8>REF(A8,A7) AND A9<REF(A9,A7) AND MACD>0;
DRAWTEXT(A10,DIFF*0.95,'.'),COLORYELLOW;
//DRAWTEXT(CROSS(DIFF,DEA),DIFF,'多'),COLORYELLOW;
//DRAWTEXT(CROSS(DEA,DIFF),DEA,'空'),COLORGREEN;?
//CROSS(DIFF,DEA),SOUND('A');
//CROSS(DEA,DIFF),SOUND('B');
?
?來源:程序化99網( www.tumamayizhan.com )
博易技術人員: DIFF : EMA(CLOSE,12) - EMA(CLOSE,26);DEA : EMA(DIFF,9);
MACD:=2*(DIFF-DEA);
ZERO : 0;
GJ:=MAX(C,O);
PARTLINE2(DIFF,DIFF>=REF(DIFF,1),COLORRED,DIFF<REF(DIFF,1),COLORGREEN);
STICKLINE(MACD>0 AND MACD>=REF(MACD,1),0,MACD,0.5,0),COLOR0000FF;
STICKLINE(MACD>0 AND MACD<REF(MACD,1),0,MACD,0.5,0),COLORBD7BFF;
STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,0.5,0),COLOR008000;
STICKLINE(MACD<0 AND MACD<REF(MACD,1),0,MACD,0.5,0),COLOR00FF00;
DRAWICON(CROSS(DIFF,DEA),DIFF,'ICO4');
DRAWICON(CROSS(DEA,DIFF),DIFF,'ICO5');
L4:=LLV(GJ,4);
JL:=(HHV(DIFF,55)-LLV(DIFF,55))/5;
GT:=DEA>REF(DEA,1) AND REF(DEA,1)<REF(DEA,2);
A1:=BARSLAST(REF(GT,1));
底背:=REF(L4,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND GT;
DRAWLINE(A1=0,DEA,底背,REF(DEA,A1),0),COLORRED,LINETHICK2;
DRAWLINE(底背,DEA,底背,REF(DEA,A1),0),COLORRED,LINETHICK2;
DRAWTEXT(底背,REF(DEA,A1)*1.18,' 底背離'),COLORYELLOW;
H4:=HHV(GJ,4);
GT2:=DEA<REF(DEA,1) AND REF(DEA,1)>REF(DEA,2);
A2:=BARSLAST(REF(GT2,1));
頂背:= REF(H4,A2+1)<H4 AND DIFF<REF(DIFF,A2+1) AND GT2;
DRAWLINE(A2=0 ,DEA,頂背,REF(DEA,A2),0),COLORGREEN,LINETHICK2;
DRAWLINE(頂背,DEA,頂背,REF(DEA,A2),0),COLORGREEN,LINETHICK2;
DRAWTEXT(頂背,REF(DEA,A2)*1.18,' 頂背離'),COLORRED;
A0:=DIFF<0 AND DEA<0;
A11:=A0>REF(A0,1);
A3:=BARSLAST(A11);
A4:=COUNT(DEA>0 AND DIFF >0,A3)=0;
A5:=CROSS(DIFF ,DEA);
A6:=BARSLAST(A5);
A7:=REF(A6,A6+1)+A6;
A8:=(DIFF+DEA)/2;
A9:=(HIGH+LOW)/2;
A10:=A5 AND A7<A3 AND A4 AND A8>REF(A8,A7) AND A9<REF(A9,A7) AND MACD>0;
DRAWTEXT(A10,DIFF*0.95,'.'),COLORYELLOW;
//DRAWTEXT(CROSS(DIFF,DEA),DIFF,'多'),COLORYELLOW;
//DRAWTEXT(CROSS(DEA,DIFF),DEA,'空'),COLORGREEN;?
//CROSS(DIFF,DEA),SOUND('A');
//CROSS(DEA,DIFF),SOUND('B');
? 老師請再改一下標注1的劃線不要?圖標的小房子換成向上向下的箭頭謝謝 來源 程序化久久網
有思路,想編寫各種指標公式,交易模型,選股公式,還原公式的朋友
可聯系技術人員 QQ: 262069696 或微信號:cxh99cxh99 進行 有償收費 編寫!
(注:由于人數限制,QQ或微信請選擇方便的一個聯系我們就行,加好友時請簡單備注下您的需求,否則無法通過。謝謝您!)
相關文章
-
沒有相關內容