咨詢內容：

請求老師轉換源碼！！謝謝

N02:=30;

高:=REFDATE(HHV(H,N02),DATE);

低:=REFDATE(LLV(L,N02),DATE);

H1:=高-(高-低)*0.191;

H2:=高-(高-低)*0.382;

H3:=高-(高-低)*0.5;

H4:=高-(高-低)*0.618;

H5:=高-(高-低)*0.809;

DRAWTEXT(CURRBARSCOUNT=1,高,'高位'),COLORRED;

DRAWTEXT(CURRBARSCOUNT=1,H1,'809'),COLORWHITE;

DRAWTEXT(CURRBARSCOUNT=1,H2,'618'),COLORRED;

DRAWTEXT(CURRBARSCOUNT=1,H3,'050'),COLORLIMAGENTA;

DRAWTEXT(CURRBARSCOUNT=1,H4,'382'),COLORRED;

DRAWTEXT(CURRBARSCOUNT=1,H5,'191'),COLORWHITE;

DRAWTEXT(CURRBARSCOUNT=1,低,'低位'),COLORRED;

STICKLINE(CURRBARSCOUNT=13,高,高,100,-1),COLORRED;

STICKLINE(CURRBARSCOUNT=13,H1,H1,100,-1),COLORWHITE;

STICKLINE(CURRBARSCOUNT=13,H2,H2,100,-1),COLORRED;

STICKLINE(CURRBARSCOUNT=13,H3,H3,100,-1),COLORLIMAGENTA;

STICKLINE(CURRBARSCOUNT=13,H4,H4,100,-1),COLORRED;

STICKLINE(CURRBARSCOUNT=13,H5,H5,100,-1),COLORWHITE;

STICKLINE(CURRBARSCOUNT=13,低,低,100,-1),COLORRED;

{黃金分割線結束};

N:=150;判斷高低:=3;

近期頂:REFDATE(高,DATE),COLORGREEN,LINETHICK3;

最頂:=REFDATE(近期頂,DATE),NODRAW;

出:=最頂=H AND ((C-L)<(O-C) OR (O-L)<(C-O)),NODRAW;

STICKLINE(出,C,O,3,0),COLORGREEN;

STICKLINE(出,C,O,2,0),COLORGREEN;

近期底:REFDATE(低,DATE),COLORRED,LINETHICK3;

最底:=REFDATE(近期底,DATE),NODRAW;

進:=最底=L AND ((C+L)<(O+C) OR (O+L)<(C+O)),NODRAW;

STICKLINE(進,C,O,3,0),COLORRED;

STICKLINE(進,C,O,2,0),COLORRED;

T1B:=CONST(LLVBARS(LOW,20));

T1HIGH:=CONST(REF(HIGH,T1B));

CC:=CONST(CURRBARSCOUNT);

{分析家公式網WWW.70822.COM}

T2B:=CONST(BARSLAST(CURRBARSCOUNT>CC+T1B AND H>T1HIGH));

T2HIGH:=CONST(REF(HIGH,T2B));

T3:=CONST(BARSLAST(CURRBARSCOUNT>CC+T2B AND HIGH>T2HIGH));

T3HIGH:=CONST(REF(HIGH,T3));

必殺線:DRAWLINE(CURRBARSCOUNT=T3+1, T3HIGH, ISLASTBAR, T3HIGH, 1),COLORRED,LINETHICK3;{,LINETHICK2,COLOR0000FF;}

DRAWTEXT(ISLASTBAR, T3HIGH, '必殺線')LINETHICK1,COLOR0000FF;

MA5K:必殺線,COLORYELLOW,LINETHICK1;

STICKLINE(ISLASTBAR,HHV(C,10),HHV(C,10),218,1)COLORYELLOW;

STICKLINE(ISLASTBAR,HHV(C,10)*0.95,HHV(C,10)*0.95,218,1)COLORYELLOW;

?

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

博易技術人員： N02:=30;

高:=REFDATE(HHV(H,N02),DATE);

低:=REFDATE(LLV(L,N02),DATE);

H1:=高-(高-低)*0.191;

H2:=高-(高-低)*0.382;

H3:=高-(高-低)*0.5;

H4:=高-(高-低)*0.618;

H5:=高-(高-低)*0.809;

DRAWTEXT(ISLASTBAR,高,'高位'),COLORRED;

DRAWTEXT(ISLASTBAR,H1,'809'),COLORWHITE;

DRAWTEXT(ISLASTBAR,H2,'618'),COLORRED;

DRAWTEXT(ISLASTBAR,H3,'050'),COLORMAGENTA;

DRAWTEXT(ISLASTBAR,H4,'382'),COLORRED;

DRAWTEXT(ISLASTBAR,H5,'191'),COLORWHITE;

DRAWTEXT(ISLASTBAR,低,'低位'),COLORRED;

STICKLINE(DATACOUNT-BARPOS=13,高,高,100,-1),COLORRED;

STICKLINE(DATACOUNT-BARPOS=13,H1,H1,100,-1),COLORWHITE;

STICKLINE(DATACOUNT-BARPOS=13,H2,H2,100,-1),COLORRED;

STICKLINE(DATACOUNT-BARPOS=13,H3,H3,100,-1),COLORMAGENTA;

STICKLINE(DATACOUNT-BARPOS=13,H4,H4,100,-1),COLORRED;

STICKLINE(DATACOUNT-BARPOS=13,H5,H5,100,-1),COLORWHITE;

STICKLINE(DATACOUNT-BARPOS=13,低,低,100,-1),COLORRED;

{黃金分割線結束};

N:=150;判斷高低:=3;

近期頂:REFDATE(高,DATE),COLORGREEN,LINETHICK3;

最頂:=REFDATE(近期頂,DATE),NODRAW;

出:=最頂=H AND ((C-L)<(O-C) OR (O-L)<(C-O)),NODRAW;

STICKLINE(出,C,O,3,0),COLORGREEN;

STICKLINE(出,C,O,2,0),COLORGREEN;

近期底:REFDATE(低,DATE),COLORRED,LINETHICK3;

最底:=REFDATE(近期底,DATE),NODRAW;

進:=最底=L AND ((C+L)<(O+C) OR (O+L)<(C+O)),NODRAW;

STICKLINE(進,C,O,3,0),COLORRED;

STICKLINE(進,C,O,2,0),COLORRED;

T1B:=LLVBARS(LOW,20);

T1HIGH:=REF(HIGH,T1B);

CC:=DATACOUNT-BARPOS;

{分析家公式網WWW.70822.COM}

T2B:=BARSLAST(DATACOUNT-BARPOS>CC+T1B AND H>T1HIGH);

T2HIGH:=REF(HIGH,T2B);

T3:=BARSLAST(DATACOUNT-BARPOS>CC+T2B AND HIGH>T2HIGH);

T3HIGH:=REF(HIGH,T3);

DRAWLINE(DATACOUNT-BARPOS=T3+1, HIGH, ISLASTBAR, HIGH, 1),COLORRED,LINETHICK3;{,LINETHICK2,COLOR0000FF;}

DRAWTEXT(ISLASTBAR, HIGH, '必殺線'),LINETHICK1,COLOR0000FF;



STICKLINE(ISLASTBAR,HHV(C,10),HHV(C,10),218,1),COLORYELLOW;

STICKLINE(ISLASTBAR,HHV(C,10)*0.95,HHV(C,10)*0.95,218,1),COLORYELLOW; 來源 程序化久久網