HH:=(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;
LL:=(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(HH,90),COLORRED,LINETHICK1;
D90L:=EMA(LL,90),COLORRED,LINETHICK1;
{DGH:=(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;
DDL:=(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;}
D90C:=D90H-D90L;
D90D:=D90H+D90C*2,COLORRED,LINETHICK1;
D90T:=D90L-D90C*2,COLORRED,LINETHICK1;
{XMA(H,25)
XMA(XMA(H,25),25)
G0:=(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),LINETHICK1,COLORWHITE;
D0:=XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,LINETHICK1,COLORWHITE;}
TH25:=REFX(MA((H-FORCAST(H,CEILING(25/2))),25)+MA(H,25),CEILING(25/2));
TL25:=REFX(MA((L-FORCAST(L,CEILING(25/2))),25)+MA(L,25),CEILING(25/2));
TTH25:=REFX(MA((TH25-FORCAST(TH25,CEILING(25/2))),25)+MA(TH25,25),CEILING(25/2));
TTL25:=REFX(MA((TL25-FORCAST(TL25,CEILING(25/2))),25)+MA(TL25,25),CEILING(25/2));
G0:=(TTH25-TTL25)*1+TTH25,LINETHICK1,COLORWHITE;
D0:=TTL25-(TTH25-TTL25)*1,LINETHICK1,COLORWHITE;
DTD:=D0>=D90T AND G0>=D90D;
KTD:=G0<=D90D AND D0<=D90T;
ZDD:=D0>=D90T AND G0<=D90D;
{XMA(H,60)
XMA(XMA(H,60),60)}
TH60:=REFX(MA((H-FORCAST(H,CEILING(60/2))),60)+MA(H,60),CEILING(60/2));
TL60:=REFX(MA((L-FORCAST(L,CEILING(60/2))),60)+MA(L,60),CEILING(60/2));
TTH60:=REFX(MA((TH60-FORCAST(TH60,CEILING(60/2))),25)+MA(TH60,60),CEILING(60/2));
TTL60:=REFX(MA((TL60-FORCAST(TL60,CEILING(60/2))),25)+MA(TL60,60),CEILING(60/2));
{BDD0:=(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*3+XMA(XMA(H,60),60),LINETHICK2,COLORGREEN;
BDT0:=XMA(XMA(L,60),60)-(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*3,LINETHICK2,COLORGREEN;}
BDD0:=(TTH60-TTL60)*3+TTH60,LINETHICK2,COLORGREEN;
BDT0:=TTL60-(TTH60-TTL60)*3,LINETHICK2,COLORGREEN;
{STICKLINE(DTD=1,G0,D0,5,0),COLOR000066;
STICKLINE(KTD=1,G0,D0,5,0),COLOR003300;
STICKLINE(ZDD=1,G0,D0,5,0),COLOR555555;}
FILLRGN(DTD=1,G0,D0),COLORBROWN;
FILLRGN(KTD=1,G0,D0),color57AE00;
FILLRGN(ZDD=1,G0,D0),COLORGRAY;
{ZK1:(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),DOTLINE,COLORWHITE;
ZD1:XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,DOTLINE,COLORWHITE;}
ZK1:G0,LINEDOT,COLORWHITE;
ZD1:D0,LINEDOT,COLORWHITE;
{STICKLINE(1=1,D90H,D90L,5,0),COLORLIGRAY;}
STICKLINE(1,D90H,D90L,3,0),COLORWHITE;
{HD:=DRAWLINE(HIGH>=HHV(HIGH,20),HIGH,LOW<=LLV(LOW,20),HHV(HIGH,4),1),LINETHICK2,COLORMAGENTA;
HK:=DRAWLINE(LOW<=LLV(LOW,20),LOW,HIGH>=HHV(HIGH,20),LLV(LOW,4),1),LINETHICK2,COLORWHITE;}
BSB:=EMA((CLOSE+HIGH+LOW)/3,3);
BSM:=EMA(SLOPE((CLOSE+HIGH+LOW)/3,24)*20+(CLOSE+HIGH+LOW)/3,48),POINTDOT,COLORYELLOW;
STICKLINE(BSB>=BSM,LOW,HIGH,0.9,0),COLORRED;
STICKLINE(BSB>=BSM,CLOSE,OPEN,9,1),COLORRED;
STICKLINE(BSB<=BSM,LOW,HIGH,0.9,0),COLORGREEN;
STICKLINE(BSB<=BSM,CLOSE,OPEN,9,1),COLORGREEN;
白色點(diǎn)多定位1:=L<ZD1 AND H>ZD1;
白色點(diǎn)空定位1:=H>ZK1 AND L<ZK1;
STICKLINE(白色點(diǎn)多定位1=1,L,ZD1,12,0),COLORWHITE;
STICKLINE(白色點(diǎn)空定位1=1,H,ZK1,12,0),COLORWHITE;
白色點(diǎn)多定位2:=H<ZD1;
白色點(diǎn)空定位2:=L>ZK1;
STICKLINE(白色點(diǎn)多定位2=1,L,H,0.9,0),COLORWHITE;
STICKLINE(白色點(diǎn)多定位2=1,C,O,18,0),COLORWHITE;
STICKLINE(白色點(diǎn)空定位2=1,L,H,0.9,0),COLORWHITE;
STICKLINE(白色點(diǎn)空定位2=1,C,O,18,0),COLORWHITE;
多頭多定位:=CROSS(ZD1,L) AND DTD=1;
多頭平定位:=CROSS(H,ZK1) AND DTD=1 AND ZDD=0;
空頭空定位:=CROSS(H,ZK1) AND KTD=1;
空頭平定位:=CROSS(ZD1,L) AND KTD=1 AND ZDD=0;
震蕩多定位:=CROSS(ZD1,L) AND ZDD=1;
震蕩空定位:=CROSS(H,ZK1) AND ZDD=1;
DRAWICON(空頭平定位=1,L,1);
DRAWICON(多頭平定位=1,H,3);
DRAWICON(多頭多定位=1 OR 震蕩多定位=1,L,1);
DRAWICON(空頭空定位=1 OR 震蕩空定位=1,H,3);
{DRAWTEXT(ISLASTBAR,ZK1,'賣'),COLORGREEN;
DRAWTEXT(ISLASTBAR,ZD1,'買'),COLORRED;}
{大單動(dòng)向:=(LARGEINTRDVOL-LARGEOUTTRDVOL)*10000/FINANCE(7);
漲跌動(dòng)因:=IF(TRADENUM>0,(TRADEOUTNUM-TRADEINNUM)*100/TRADENUM,0);
大單差分:=IF(TRADENUM>0,(LARGETRDINNUM-LARGETRDOUTNUM)/TRADENUM*100,0);
DDZ1:=大單差分*7;
DDZ2:=大單差分*3;
主力活躍度:=LARGEINTRDVOL-LARGEOUTTRDVOL;
主力凈流入:=(LARGEINTRDVOL-LARGEOUTTRDVOL)*AMO/V/10000;
買入力度:=LARGEINTRDVOL*100/VOL;
賣出力度:=LARGEOUTTRDVOL*100/VOL;
超B:=L2_AMO(0,2)/10000.0;
大B:=L2_AMO(1,2)/10000.0;
中B:=L2_AMO(2,2)/10000.0;
小B:=L2_AMO(3,2)/10000.0;
超S:=L2_AMO(0,3)/10000.0;
大S:=L2_AMO(1,3)/10000.0;
中S:=L2_AMO(2,3)/10000.0;
小S:=L2_AMO(3,3)/10000.0;
資金流向:=(超B+大B+中B+小B)-(超S+大S+中S+小S);
資金選股:=資金流向>0 AND 大單動(dòng)向>0 AND 漲跌動(dòng)因>0 AND DDZ1>0 AND DDZ2>0 AND 主力活躍度>0 AND 主力凈流入>0 AND 買入力度>賣 出力度;
STICKLINE(資金選股=1 AND (H-C)<(C-L),LOW,HIGH,0.0,0),COLORRED;
STICKLINE(資金選股=1 AND (H-C)<(C-L),CLOSE,OPEN,3,0),COLORRED;}
{灰色線:=(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*4+XMA(XMA(H,60),60),LINETHICK2,COLORGREEN;
綠色線:=(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*5+XMA(XMA(H,60),60),LINETHICK2,COLORGREEN;
紅色線:=(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*6+XMA(XMA(H,60),60),LINETHICK2,COLORGREEN;
冠軍線:=(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*7+XMA(XMA(H,60),60),LINETHICK2,COLORGREEN;}
灰色線:=(TTH60-TTL60)*4+TTH60,LINETHICK2,COLORGREEN;
綠色線:=(TTH60-TTL60)*5+TTH60,LINETHICK2,COLORGREEN;
紅色線:=(TTH60-TTL60)*6+TTH60,LINETHICK2,COLORGREEN;
冠軍線:=(TTH60-TTL60)*7+TTH60,LINETHICK2,COLORGREEN;
{DRAWTEXT(1=1 AND CURRBARSCOUNT=50,紅色線,'【紅色：多頭趨勢,順勢買賣】'),COLORRED;
DRAWTEXT(1=1 AND CURRBARSCOUNT=50,綠色線,'【綠色：空頭趨勢,空倉觀望】'),COLORGREEN;
DRAWTEXT(1=1 AND CURRBARSCOUNT=50,灰色線,'【灰色：震蕩趨勢,投機(jī)買賣】'),COLORLIGRAY;}
本站僅提供存儲(chǔ)服務(wù)，所有內(nèi)容均由用戶發(fā)布，如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容，請
點(diǎn)擊舉報(bào)。
