咨詢內(nèi)容：

請老師編寫一個分形指標(biāo) 謝謝

這是文化財經(jīng)里面的分形指標(biāo)源碼 ?

A:=H;
A1:=REF(H,1);
A2:=REF(H,2);
A3:=REF(H,3);
A4:=REF(H,4);
A5:=REF(H,5);
A6:=REF(H,6);
A7:=REF(H,7);
A8:=REF(H,8);
B:=L;
B1:=REF(L,1);
B2:=REF(L,2);
B3:=REF(L,3);
B4:=REF(L,4);
B5:=REF(L,5);
B6:=REF(L,6);
B7:=REF(L,7);
B8:=REF(L,8);
HF1:=A2>A1 AND A2>A AND A2>A3 AND A2>A4;
HF2:=A3=A2 AND A2>A1 AND A2>A AND A2>A4 AND A2>A5;
HF3:=A2=A4 AND A2>A1 AND A2>A AND A2>A3 AND A2>A5 AND A2>A6;
HF4:=A4=A3 AND A3=A2 AND A2>A1 AND A2>A AND A2>A5 AND A2>A6;
HF5:=A2=A4 AND A2=A6 AND A2>A1 AND A2>A AND A2>A3 AND A2>A5 AND A2>A7 AND A2>A8;
HF6:=A2=A3 AND A2=A5 AND A2>A1 AND A2>A AND A2>A4 AND A2>A6 AND A2>A7;
HF7:=A2=A4 AND A2=A5 AND A2>A1 AND A2>A AND A2>A3 AND A2>A6 AND A2>A7;
LF1:=B2<B1 AND B2<B AND B2<B3 AND B2<B4;
LF2:=B3=B2 AND B2<B1 AND B2<B AND B2<B4 AND B2<B5;
LF3:=B2=B4 AND B2<B1 AND B2<B AND B2<B3 AND B2<B5 AND B2<B6;
LF4:=B2=B3 AND B2=B4 AND B2<B1 AND B2<B AND B2<B5 AND B2<B6;
LF5:=B2=B4 AND B2=B6 AND B2<B1 AND B2<B AND B2<B3 AND B2<B5 AND B2<B7 AND B2<B8;
LF6:=B2=B3 AND B2=B5 AND B2<B1 AND B2<B AND B2<B4 AND B2<B6 AND B2<B7;
LF7:=B2=B4 AND B2=B5 AND B2<B1 AND B2<B AND B2<B3 AND B2<B6 AND B2<B7;
HD:=HF1 OR HF2 OR HF3 OR HF4 OR HF5 OR HF6 OR HF7;
LD:=LF1 OR LF2 OR LF3 OR LF4 OR LF5 OR LF6 OR LF7;
HD1:=BACKSET(HD,3);
HD2:=FILTER(HD1,2);
LD1:=BACKSET(LD,3);
LD2:=FILTER(LD1,2);
DRAWTEXT(HD2,H,'↑'),VALIGN2,COLORGREEN;
DRAWTEXT(LD2,L,'↓'),VALIGN0,COLORRED;

上向分形: REF(HIGH,BARSLAST(HD2)), NODRAW;
//STICKLINE1(CLOSE,REF(HIGH,BARSLAST(HD2)),REF(HIGH,BARSLAST(HD2)),0.1,1),COLORMAGENTA;
向下分形: REF(LOW,BARSLAST(LD2)), NODRAW;
//STICKLINE1(CLOSE,REF(LOW,BARSLAST(LD2)),REF(LOW,BARSLAST(LD2)),0.1,1),COLORYELLOW;
?
?

? <!-- 咨詢內(nèi)容：

附件 :

-->

?

?來源:程序化99網(wǎng)（ www.kzuj.com.cn ）

博易技術(shù)人員： 您好，以上指標(biāo)可以直接使用 來源 程序化久久網(wǎng)