?DRAWGBK(O>C,RGB(10,0,1),RGB(10,0,1),0,'01',0);

短高H1:=(20*H+19*REF(H,1)+18*REF(H,2)+17*REF(H,3)+16*REF(H,4)+15*REF(H,5)+14*REF(H,6)

+13*REF(H,7)+12*REF(H,8)+11*REF(H,9)+10*REF(H,10)+9*REF(H,11)+8*REF(H,12)

+7*REF(H,13)+6*REF(H,14)+5*REF(H,15)+4*REF(H,16)+3*REF(H,17)+2*REF(H,18)+

REF(H,20))/210,COLORBLUE,LINETHICK1;

短低L1:=(20*L+19*REF(L,1)+18*REF(L,2)+17*REF(L,3)+16*REF(L,4)+15*REF(L,5)+14*REF(L,6)

+13*REF(L,7)+12*REF(L,8)+11*REF(L,9)+10*REF(L,10)+9*REF(L,11)+8*REF(L,12)

+7*REF(L,13)+6*REF(L,14)+5*REF(L,15)+4*REF(L,16)+3*REF(L,17)+2*REF(L,18)+

REF(L,20))/210,COLORBLUE,LINETHICK1;

D90H1:=EMA(短高H1,90)-(EMA(短高H1,90)-EMA(短低L1,90))*0.2,COLORRED,LINETHICK1;

D90L1:=EMA(短低L1,90)+(EMA(短高H1,90)-EMA(短低L1,90))*0.2,COLORRED,LINETHICK1;

高01:=(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),LINETHICK1,COLORWHITE;

低01:=XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,LINETHICK1,COLORWHITE;

多頭定位1:=(高01+低01)/2>(D90H1+D90L1)/2;

空頭定位1:=(高01+低01)/2<(D90H1+D90L1)/2;

頂11:=(MA(CLOSE,55)+MA(CLOSE,110))/2*1.204,COLORYELLOW,LINETHICK0;

底11:=(MA(CLOSE,55)+MA(CLOSE,110))/2*1.102,COLORYELLOW,LINETHICK0;

STICKLINE(多頭定位1=1,頂11,底11,5,0),COLOR203070;

STICKLINE(空頭定位1=1,頂11,底11,5,0),COLOR208700;

頂12:=(MA(CLOSE,55)+MA(CLOSE,110))/2*0.898,COLORYELLOW,LINETHICK0;

底12:=(MA(CLOSE,55)+MA(CLOSE,110))/2*0.796,COLORYELLOW,LINETHICK0;

STICKLINE(多頭定位1=1,頂12,底12,5,0),COLOR203070;

STICKLINE(空頭定位1=1,頂12,底12,5,0),COLOR208700;

短高H:=(20*H+19*REF(H,1)+18*REF(H,2)+17*REF(H,3)+16*REF(H,4)+15*REF(H,5)+14*REF(H,6)

+13*REF(H,7)+12*REF(H,8)+11*REF(H,9)+10*REF(H,10)+9*REF(H,11)+8*REF(H,12)

+7*REF(H,13)+6*REF(H,14)+5*REF(H,15)+4*REF(H,16)+3*REF(H,17)+2*REF(H,18)+

REF(H,20))/210,COLORBLUE,LINETHICK1;

短低L:=(20*L+19*REF(L,1)+18*REF(L,2)+17*REF(L,3)+16*REF(L,4)+15*REF(L,5)+14*REF(L,6)

+13*REF(L,7)+12*REF(L,8)+11*REF(L,9)+10*REF(L,10)+9*REF(L,11)+8*REF(L,12)

+7*REF(L,13)+6*REF(L,14)+5*REF(L,15)+4*REF(L,16)+3*REF(L,17)+2*REF(L,18)+

REF(L,20))/210,COLORBLUE,LINETHICK1;

D90H:=EMA(短高H,90),COLORRED,LINETHICK1;

D90L:=EMA(短低L,90),COLORRED,LINETHICK1;

D90差:=D90H-D90L;

D90頂:=D90H+D90差*2,COLORRED,LINETHICK1;

D90底:=D90L-D90差*2,COLORRED,LINETHICK1;

高0:=(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),LINETHICK1,COLORWHITE;

低0:=XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,LINETHICK1,COLORWHITE;

多頭定位:=低0>=D90底 AND 高0>=D90頂;

空頭定位:=高0<=D90頂 AND 低0<=D90底;

震蕩定位:=低0>=D90底 AND 高0<=D90頂;

頂1:=(MA(CLOSE,55)+MA(CLOSE,110))/2*1.102,COLORYELLOW,LINETHICK0;

底1:=(MA(CLOSE,55)+MA(CLOSE,110))/2*0.898,COLORYELLOW,LINETHICK0;

STICKLINE(多頭定位=1,頂1,底1,5,0),COLOR003585;

STICKLINE(空頭定位=1,頂1,底1,5,0),COLOR608810;

STICKLINE(震蕩定位=1,頂1,底1,5,0),COLOR555555;

XCLOSE:=EMA((OPEN+HIGH+LOW+CLOSE)/4,3);

XOPEN:=EMA((REF(OPEN,1)+REF(XCLOSE,1))/2,3);

TEMPG:=MAX(HIGH,XOPEN);

XHIGH:=EMA(MAX(TEMPG,XCLOSE),3);

TEMP:=MIN(LOW,XOPEN);

XLOW:=EMA(MIN(TEMP,XCLOSE),3);

O1:=IF(XOPEN<XCLOSE,XOPEN,XCLOSE);

C1:=IF(XOPEN<XCLOSE,XCLOSE,XOPEN);

{K線}

STICKLINE(XOPEN>=XCLOSE,XHIGH,XLOW,0,0 ),COLORCYAN;

{WWW.GUPANG.COM 股旁網(wǎng)_通達(dá)信股票指標(biāo)公式}

STICKLINE(XOPEN>=XCLOSE,C1,O1,5,0 ),COLOR990000;

STICKLINE(XOPEN>=XCLOSE,C1,O1,3,0 ),COLORCC0000;

STICKLINE(XOPEN>=XCLOSE,C1,O1,2.5,0 ),COLORFF4400;

STICKLINE(XOPEN>=XCLOSE,C1,O1,1.5,0 ),COLORFF8800;

STICKLINE(XOPEN>=XCLOSE,C1,O1,0.9,0 ),COLORFFCC00;

STICKLINE(XOPEN>=XCLOSE,C1,O1,0.3,0 ),COLORCYAN;

STICKLINE(XOPEN<XCLOSE,XHIGH,XLOW,0,0 ),COLORRED;

STICKLINE(XOPEN<XCLOSE,C1,O1,4,0 ),COLOR000055;

STICKLINE(XOPEN<XCLOSE,C1,O1,3,0 ),COLOR000077;

STICKLINE(XOPEN<XCLOSE,C1,O1,2.5,0 ),COLOR000099;

STICKLINE(XOPEN<XCLOSE,C1,O1,1.5,0 ),COLOR0000BB;

STICKLINE(XOPEN<XCLOSE,C1,O1,0.9,0 ),COLOR0000DD;

STICKLINE(XOPEN<XCLOSE,C1,O1,0.3,0 ),COLOR0000FF;

HH:=(6*H+5*REF(H,1)+4*REF(H,2)+3*REF(H,3)+2*REF(H,4)+REF(H,5))/21;

LL:=(6*L+5*REF(L,1)+4*REF(L,2)+3*REF(L,3)+2*REF(L,4)+REF(L,5))/21;

{TDX沒(méi)有WMA函數(shù)，上面的寫法代替}

{A1:=IF(C>REF(EXPMEMA(H,6),1),1,0);

A2:=IF(C<REF(EXPMEMA(L,6),1),-1,0);}

A1A:=IF(C>REF(HH,1),1,0);

A2A:=IF(C<REF(LL,1),-1,0);

A3A:=A1A+A2A;

A4A:=IF(A3A=0,REF(A3A,BARSLAST(NOT(A3A=0))),A3A);

轉(zhuǎn)折:=IF(A4A=-1,MA(HIGH,6),MA(LOW,6))LINETHICK1,COLORYELLOW;

帝:=(COST(99)+COST(93)+COST(85))/3,COLORLIGREEN,DOTLINE,LINETHICK3;

漢:=(COST(84)+COST(67)+COST(50))/3,COLORBLUE,DOTLINE,LINETHICK3;

楚:=(COST(16)+COST(34)+COST(49))/3,COLORRED,DOTLINE,LINETHICK3;

刎:=(COST(1)+COST(7)+COST(15))/3,COLORMAGENTA,DOTLINE,LINETHICK3;

漢飄移:(漢-REF(漢,3))/REF(漢,3)*100,COLORLIMAGENTA,NODRAW;

河飄移:(楚-REF(楚,3))/REF(楚,3)*100,COLORRED,NODRAW;

水:(MA(CLOSE,55)+MA(CLOSE,110))/2,COLORMAGENTA,LINETHICK1;

木:水*1.102,COLORGRAY,LINETHICK1;

火:水*0.898,COLORGRAY,LINETHICK1;

金:水*1.204,COLORGRAY,LINETHICK1;

土:水*0.796,COLORGRAY,LINETHICK1;

S5:=MA(C,1);

J5:MA(C,5),COLORWHITE,LINETHICK2;

Z5:=REF(MA(C,6),1);

IF(J5>Z5,J5,DRAWNULL),COLORRED,LINETHICK2;

IF(J5<Z5,J5,DRAWNULL),COLORGREEN,LINETHICK2;

DRAWTEXT(CURRBARSCOUNT=10,金,STRCAT('5日買線:',CON2STR(J5,2))),COLORYELLOW;

DRAWICON(CROSS(S5,水),L,26);

DRAWTEXT(CURRBARSCOUNT=5,金,STRCAT('金:',CON2STR(金,2))),COLORWHITE;

DRAWTEXT(CURRBARSCOUNT=5,木,STRCAT('木:',CON2STR(木,2))),COLORWHITE;

DRAWTEXT(CURRBARSCOUNT=5,水,STRCAT('水:',CON2STR(水,2))),COLORMAGENTA;

DRAWTEXT(CURRBARSCOUNT=5,火,STRCAT('火:',CON2STR(火,2))),COLORWHITE;

DRAWTEXT(CURRBARSCOUNT=5,土,STRCAT('土:',CON2STR(土,2))),COLORWHITE;

DRAWTEXT_FIX(1,0.15,0,0,'~☆~符美勝作品~☆~'),COLORYELLOW;