咨詢內容：

麻煩老師把這個黃金分割源碼轉換彭博用！！謝謝?。?！

M:= 150;

頂1:=REFX1(HHV(H,M),10000);
底1:=REFX1(LLV(L,M),10000);
H1:=頂1-(頂1-底1)*0.191;
H2:=頂1-(頂1-底1)*0.382;
H3:=頂1-(頂1-底1)*0.5;
H4:=頂1-(頂1-底1)*0.618;
H5:=頂1-(頂1-底1)*0.809;
頂部:REFX1(頂1,10000),COLOR666666,DOT;
.8:REFX1(H1,10000),COLOR666666,DOT;
%38.2:REFX1(H2,10000),COLOR666666,DOT;
%50:REFX1(H3,10000),COLOR666666,DOT;
%61.8:REFX1(H4,10000),COLOR666666,DOT;
%80.9:REFX1(H5,10000),COLOR666666,DOT;
底部:REFX1(底1,10000),COLOR666666,DOT;
DRAWTEXT(ISLASTBAR,頂部,'? ?頂部'),COLORGREEN;
DRAWTEXT(ISLASTBAR,.8,'? ?19.8％'),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,%38.2,'? ?38.2％'),COLORYELLOW;
DRAWTEXT(ISLASTBAR,%50,'? ?50％'),COLORWHITE;
DRAWTEXT(ISLASTBAR,%61.8,'? ?61.8％'),COLORYELLOW;
DRAWTEXT(ISLASTBAR,%80.9,'? ?80.9％'),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,底部,'? ?底部'),COLORRED;
?
DRAWTEXT(CROSS(REF(ZIGZAG(C,1,1),1),ZIGZAG(C,1,1)),HIGH,'空'),COLORGREEN;
DRAWTEXT(CROSS(ZIGZAG(C,1,1),REF(ZIGZAG(C,1,1),1)),LOW,'多'),COLORYELLOW;
?

?

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

博易技術人員： M:= 150;

頂1:=REFX(HHV(H,M),DATACOUNT-BARPOS-1);
底1:=REFX(LLV(L,M),DATACOUNT-BARPOS-1);
H1:=頂1-(頂1-底1)*0.191;
H2:=頂1-(頂1-底1)*0.382;
H3:=頂1-(頂1-底1)*0.5;
H4:=頂1-(頂1-底1)*0.618;
H5:=頂1-(頂1-底1)*0.809;
頂部:REFX(頂1,DATACOUNT-BARPOS-1),COLOR666666,POINTDOT;
A8:REFX(H1,DATACOUNT-BARPOS-1),COLOR666666,POINTDOT;
A382:REFX(H2,DATACOUNT-BARPOS-1),COLOR666666,POINTDOT;
A50:REFX(H3,DATACOUNT-BARPOS-1),COLOR666666,POINTDOT;
A618:REFX(H4,DATACOUNT-BARPOS-1),COLOR666666,POINTDOT;
A809:REFX(H5,DATACOUNT-BARPOS-1),COLOR666666,POINTDOT;
底部:REFX(底1,DATACOUNT-BARPOS-1),COLOR666666,POINTDOT;
DRAWTEXT(ISLASTBAR,頂部,'? ?頂部'),COLORGREEN;
DRAWTEXT(ISLASTBAR,A8,'? ?19.8％'),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,A382,'? ?38.2％'),COLORYELLOW;
DRAWTEXT(ISLASTBAR,A50,'? ?50％'),COLORWHITE;
DRAWTEXT(ISLASTBAR,A618,'? ?61.8％'),COLORYELLOW;
DRAWTEXT(ISLASTBAR,A809,'? ?80.9％'),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,底部,'? ?底部'),COLORRED;
?
DRAWTEXT(CROSS(REF(ZIG(C,1,1),1),ZIG(C,1,1)),HIGH,'空'),COLORGREEN;
DRAWTEXT(CROSS(ZIG(C,1,1),REF(ZIG(C,1,1),1)),LOW,'多'),COLORYELLOW; 謝謝老師，，新年快樂 來源 程序化久久網