自用精選指標(biāo)

漲停:=CLOSE>REF(CLOSE,1)*1.095;
STICKLINE(漲停,H,L,0.28,0),COLORMAGENTA;
STICKLINE(漲停,O,C,3,0),LINETHICK2,COLORMAGENTA;
{有莊關(guān)注}
VAR1:=EMA(EMA(CLOSE,13),13);
控盤:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
{分時(shí)價(jià)格原碼}
JJ:=DYNAINFO(11);
{波段買賣原碼}
PPP:=55;S:=8;M1:=3;
財(cái):=(EMA(CLOSE,S)-EMA(CLOSE,PPP))*10,COLORRED,LINETHICK2;
神:=EMA(財(cái),M1),COLORGREEN,LINETHICK1;
{股價(jià)與均線偏離買賣條件}
BTJ1:=(C-JJ)/JJ<-0.005;
BTJ11:=(C-JJ)/JJ<-0.03;
BTJ12:=LAST(JJ>=REF(JJ,1),5,1) AND (C-JJ)/JJ<0.005;
STJ1:=(C-JJ)/JJ>0.005;
{控盤買賣條件}
STJ01:=控盤<REF(控盤,1)  AND 控盤>0.5;
STJ02:=控盤>0;
BTJ2:=控盤>REF(控盤,1) AND 控盤<-0.2;
BTJ22:=控盤>REF(控盤,1) AND 控盤<0 ;
{波段買賣條件}
BTJ3:=CROSS(財(cái),神) AND  財(cái)<-0.3;
BTJ32:=CROSS(財(cái),神) AND  財(cái)<-0.1;
STJ31:=CROSS(神,財(cái));
STJ32:=CROSS(神,財(cái)) AND  財(cái)>1.618;
{以下為信號};
BTJ81:=FILTER(BTJ1 AND BTJ2 AND BTJ3,13);
BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,13);
BTJ82:=FILTER(BTJ12 AND BTJ22 AND BTJ32,13);
DRAWICON(BTJ82,L,11);{追買};
DRAWICON(BTJ81 AND TIME>10,H,27);{};
DRAWICON(BTJ811 AND TIME>10,L,26);{有莊};
DRAWTEXT(BTJ811,L*1,'有莊關(guān)注'),COLORMAGENTA;
STJ81:=FILTER(STJ1 AND STJ01 AND STJ31,13);
DRAWICON(STJ81,H,19);
STJ82:=FILTER(STJ02 AND STJ32 ,13);
DRAWICON(STJ82,H,15);
STJ83:=STJ81 AND STJ82;
DRAWTEXT(STJ83,H*1,'必賣'),COLOR00FF00;
{DRAWTEXT(ISLASTBAR,H,HYBLOCK);
DRAWTEXT(ISLASTBAR,L,DYBLOCK);}
LOW COLORCYAN;

半年開盤價(jià):REF(O,BARSLAST(MOD(MONTH,7)=0)-1),COLOR009900,LINETHICK3;
年:=YEAR,NODRAW;
月:=MONTH,NODRAW;
星期:=WEEKDAY,NODRAW;
日1:=DATETODAY(DATE);
上市日:=REF(DATE,TOTALBARSCOUNT-CURRBARSCOUNT);
自然日:=日1-DATETODAY(上市日)+1;
ZB:=(自然日-REF(自然日,1))!=星期-REF(星期,1)
OR TOTALBARSCOUNT-CURRBARSCOUNT=0;
本周第幾天:=BARSLAST(ZB)+1;
本月第幾天:=BARSLAST(年*100+月!=REF(年*100+月,1))+1;
MA1:=REF(C,本周第幾天);
MA2:=REF(MA1,本周第幾天);
MA3:=REF(MA2,本周第幾天);
MA4:=REF(MA3,本周第幾天);
MA5:=REF(MA4,本周第幾天);
MA6:=REF(MA5,本周第幾天);
MA7:=REF(MA6,本周第幾天);
MA8:=REF(MA7,本周第幾天);
MA9:=REF(MA8,本周第幾天);
MA10:=REF(MA9,本周第幾天);
MA11:=REF(MA10,本周第幾天);
十周價(jià):=(C+MA1+MA2+MA3+MA4+MA5)/6;
出擊突破:REFDATE(十周價(jià),DATE),COLORYELLOW;
DRAWTEXT(ISLASTBAR,出擊突破,' -----出擊突破'),COLORWHITE;
N8:=10;
T1:=CONST(HHVBARS(V,N8));
T0:IF(CURRBARSCOUNT<=N8+3,CONST(IF(T1=0,C,REF(C,T1))),DRAWNULL),COLORWHITE;
IF(CURRBARSCOUNT=T1+1,T0,DRAWNULL),CIRCLEDOT,COLORWHITE;
DRAWTEXT(ISLASTBAR,T0,' --------量能平臺'),COLORWHITE;

DRAWTEXT_FIX(1,0.6,0,0,GNBLOCK)COLOR0080FF;
DRAWTEXT_FIX(1,0.53,0,0,DYBLOCK)COLOR00FFFF;
DRAWTEXT_FIX(1,0.53,0.06,0,HYBLOCK)COLORFF00FF;
DRAWTEXT_FIX(1,0.6,0.06,0,FGBLOCK)COLOR0000FF;

{均線與K線}

{XS2 }
N2:=102;
M:=7;
A11:=MA((2*CLOSE+HIGH+LOW)/4,5);
薛通A:A11*N2/100,COLORWHITE,DOTLINE;
薛通B:A11*(200-N2)/100,COLORWHITE,DOTLINE;
DRAWBAND(薛通A,RGB(120,80,60),薛通B,RGB(0,100,0));
MA5:MA(C,5),LINETHICK1,COLORGRAY;
MA10:MA(C,10),LINETHICK1,COLORGRAY;
MA20:=MA(C,20),LINETHICK1,COLORGRAY;
MA60:=MA(C,60),LINETHICK1,COLORGREEN;
MA90:=MA(C,90),LINETHICK1,COLORGREEN;
MA120:=MA(C,120),LINETHICK1,COLORGREEN;
MA250:=MA(C,250),LINETHICK1,COLORGREEN;
MA470:=MA(C,470),LINETHICK1,COLORGREEN;

M5:IF(MA5>REF(MA5,1),MA5,DRAWNULL),LINETHICK1,COLORWHITE;
M10:IF(MA10>REF(MA10,1),MA10,DRAWNULL),LINETHICK1,COLORLIMAGENTA;
M20:IF(MA20>REF(MA20,1),MA20,DRAWNULL),LINETHICK1,COLORLIMAGENTA;
M60:IF(MA60>REF(MA60,1),MA60,DRAWNULL),LINETHICK1,COLORLIMAGENTA;
M90:IF(MA90>REF(MA90,1),MA90,DRAWNULL),LINETHICK1,COLORRED;
M120:IF(MA120>REF(MA120,1),MA120,DRAWNULL),LINETHICK1,COLORYELLOW;
M250:IF(MA250>REF(MA250,1),MA250,DRAWNULL),LINETHICK2,COLORWHITE;
IF(MA470>REF(MA470,1),MA470,DRAWNULL),LINETHICK2,COLORRED;

VAR2:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
VAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));
STICKLINE(VAR2 < MA(VAR3,6),LOW,HIGH,0,1),COLORLIBLUE;
STICKLINE(VAR2 > MA(VAR3,6),LOW,HIGH,0,1),COLORRED;
STICKLINE(((OPEN>CLOSE)AND(VAR2<MA(VAR3,6))),CLOSE,OPEN,3,0),COLORLIBLUE;
STICKLINE(((OPEN<CLOSE)AND(VAR2<MA(VAR3,6))),CLOSE,OPEN,3,1),COLORLIBLUE;
STICKLINE(((OPEN>CLOSE)AND(VAR2>MA(VAR3,6))),OPEN,CLOSE,3,0),COLORRED;
STICKLINE(((OPEN<CLOSE)AND(VAR2>MA(VAR3,6))),OPEN,CLOSE,3,1),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0,0,0,DYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.1,0,0,HYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.2,0,0,GNBLOCK),COLORYELLOW;
ZDF:=(C-REF(C,1))/REF(C,1)*100;
STICKLINE(ZDF>4 ,C,O,2,0),COLORYELLOW;
STICKLINE(ZDF<-4,C,O,2,0),COLORBLUE;
{STICKLINE(ZDF>9.0 AND C=H,O,C,2,0),COLORRED;
STICKLINE(ZDF<-9.0 AND C=L,O,C,2,0),COLORGREEN;}
C2:=REF(C,1);
漲停1:=IF((C-C2)*100/C2>=(10-0.01*100/C2),1,0);
STICKLINE(漲停,OPEN,CLOSE,3,0),COLORMAGENTA;
STICKLINE(漲停,H,L,0,0),COLORRED;
跌停:=IF((C2-C)*100/C2>=(10-0.01*100/C2),1,0);
STICKLINE(跌停,OPEN,CLOSE,3,0),COLORBLUE;
STICKLINE(跌停,H,L,0,1),COLORGREEN;
C21:=REF(C,1);
非ST漲停:=IF((C-C2)*100/C2>=(10-0.01*100/C2),1,0);
漲停:=非ST漲停;
NUMBER:=COUNT(非ST漲停,BARSSINCE(非ST漲停)+1);
DRAWNUMBER(非ST漲停,HIGH*1.04,NUMBER),COLORYELLOW;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.92,0,0,NUMBER),COLORLIRED;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.80,0,0,'上市以來共漲停'),COLORLIRED;

VA1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);
VA2:=SMA(ABS(LOW-VA1),13,1)/SMA(MAX(LOW-VA1,0),10,1);
VA3:=EMA(VA2,10);
VA4:=LLV(LOW,33);
VA5:=EMA(IF(LOW<=VA4,VA3,0),3);
BB:=BARSLAST(VA5>REF(VA5,1));
TT:=BB+1;
HH:REF(H,TT)LINETHICK2,COLORBROWN;
HJ:=(C+HH)/2;
HK:=(C+HJ)/2;
HL:=(C+HK)/2;
HG:=MA(HL,3);
HF:=IF(HG>REF(HG,1),HG*1.008,HG*0.993);
HF30:HHV(HF,30);
H30:HHV(C,25);

{市場成本}

{N(1,50,10)}
N:=10;
MCST:=DMA(AMOUNT/(100*VOL),VOL/CAPITAL),LINETHICK;
MMCST:=MA(MCST,N),COLORBLACK,LINETHICK;
DRAWBAND(MCST,RGB(241,82,54),MMCST,RGB(48,143,16));
1.2*MCST,COLORGRAY,DOTLINE;
1.3*MCST,COLORGRAY,DOTLINE;

{通達(dá)信周月日K線主圖}

WC:=C#WEEK,LINETHICK0;
WO1:=IF(WEEKDAY<REF(WEEKDAY,1),O,DRAWNULL);
WO:=HHV(WO1,WEEKDAY),LINETHICK0;
WH:=HHV(H,WEEKDAY),LINETHICK0;
WL:=LLV(L,WEEKDAY),LINETHICK0;
MC:=C#MONTH,LINETHICK0;
MO1:=IF(DAY<REF(DAY,1),O,DRAWNULL);
MO:=HHV(MO1,DAY),LINETHICK0;
AG:=DAY<REF(DAY,1);
BG:=BARSLAST(AG)+1;
MH:=HHV(H,BG),LINETHICK0;
ML:=LLV(L,BG),LINETHICK0;
STICKLINE(MC>=MO,MO,MC,4,0),COLOR5CA8FD;
STICKLINE(MC<MO,MO,MC,4,0),COLOR008B00;
STICKLINE(WC>=WO,WO,WC,4,0),COLOR003399;
STICKLINE(WC<WO,WO,WC,4,0),COLOR993300;
DRAWKLINE(H,O,L,C);

{黃金柱}{主圖}
價(jià)漲不破:=LLV(L,3)>=REF(L,3);
三日量縮:=HHV(VOL,3)<REF(VOL,3);
高量柱:=C/REF(C,1)>=1.03 AND VOL=HHV(VOL,35);
倍量柱:=C/REF(C,1)>=1.03 AND VOL>=REF(VOL,1)*1.91;
梯量柱:=VOL>REF(VOL,1) AND REF(VOL,1)>REF(VOL,2) AND C/REF(C,1)>=1.03;
高黃金柱:=REF(高量柱,3) AND 價(jià)漲不破 AND 三日量縮;
倍黃金柱:=REF(倍量柱,3) AND 價(jià)漲不破 AND 三日量縮;
梯黃金柱:=REF(梯量柱,3) AND 價(jià)漲不破 AND 三日量縮;
STICKLINE(高量柱,OPEN,CLOSE,2,0),COLORLIRED;
STICKLINE(倍量柱,OPEN,CLOSE,2,0),COLORLIMAGENTA;
STICKLINE(梯量柱,OPEN,CLOSE,2,0),COLORYELLOW;
STICKLINE(高黃金柱,LLV(L,3),LLV(L,3),25,1),COLORRED;
STICKLINE(倍黃金柱,LLV(L,3),LLV(L,3),25,1),COLORMAGENTA;
STICKLINE(梯黃金柱,LLV(L,3),LLV(L,3),25,1),COLORYELLOW;

DRAWICON(C<MA(C,20)*0.92,L*0.98,9);
ZT:=C/REF(C,1)>1.097;
BH:=BARSLAST(ZT);
STICKLINE(C,REF(H,BH),REF(H,BH),7,0),COLORMAGENTA;
STICKLINE(ZT,REF(O,BH),REF(C,BH),3,0),COLORMAGENTA;
C3:=REF(C,1);
跌停:=IF((C3-C)*100/C3>=(4.55-0.01*100/C3),1,0);
STICKLINE(跌停,OPEN,CLOSE,1,0),COLORFF0000;
HH:=BARSLAST(跌停);
STICKLINE(C,REF(H,HH),REF(H,HH),7,0),COLORLIBLUE;
STICKLINE(跌停,REF(O,HH),REF(C,HH),3,0),COLORBLUE;
DRAWICON(C<MA(C,20)*0.92,L*0.98,9);

豆1:=REF(豆豆,10)=HHV(豆豆,2*10+1); 豆3:=FILTER(豆1,10); 豆5:=BACKSET(豆3,10+1); H豆:=FILTER(豆5,10);
豆2:=REF(豆豆,10)=LLV(豆豆,2*10+1); 豆4:=FILTER(豆2,10); 豆6:=BACKSET(豆4,10+1); L豆:=FILTER(豆6,10);
A:=REF(C,BARSLAST(H豆)); B:=REF(L,BARSLAST(L豆));
T豆:=BARSLAST(H豆)<BARSLAST(L豆) AND NOT(H豆) ;
T豆2:=BARSLAST(H豆)>BARSLAST(L豆) AND NOT(L豆);
壓力:IF(T豆,A,A),COLORYELLOW,POINTDOT,LINETHICK3;
支撐:IF(T豆2,B,B),COLORGREEN,POINTDOT,LINETHICK3;

FL:=MA(CLOSE,17)+ABS(MA(CLOSE,17)-REF(MA(CLOSE,17),1)),COLORWHITE;
FS:=MA(CLOSE,17)+MA(CLOSE,17)-REF(MA(CLOSE,17),1),COLORWHITE;
BB:IF(MA(CLOSE,17)<FS,FS,MA(CLOSE,17)),COLORWHITE;
{年線:=EMA(C,250);
A11:=BB-(EMA(C,3)-BB),COLORWHITE;
DIFF:EMA((年線-(EMA(C,3)-年線)),5),LINETHICK2;}
IF(BB=FS,BB,BB), COLORWHITE,LINETHICK2;
追漲跌破止損: EMA(COST(81),10) COLORRED,LINETHICK2;
牛熊線: EMA(COST(27),120), COLORYELLOW;

前20內(nèi)高:=HHV(C,20);
昨前高:CONST(REF(前20內(nèi)高,2)),COLORYELLOW;
XX:=DRAWLINE(CURRBARSCOUNT=5,昨前高*0.98,CURRBARSCOUNT=1,昨前高,0);
DRAWBAND(昨前高,RGB(255,255,0),XX,RGB(0,0,0));
XX1:=DRAWLINE(CURRBARSCOUNT=9,昨前高,CURRBARSCOUNT=5,昨前高*0.98,0);
DRAWBAND(昨前高,RGB(255,255,0),XX1,RGB(0,0,0));
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
DRAWRECTREL(780,850,920,980,90);
DRAWTEXT_FIX(1,0.81,0.9,0,'兩山凹陷處有大陽'),COLORYELLOW;
DRAWRECTREL(680,50,820,170,90);
DRAWTEXT_FIX(1,0.70,0.10,0,'黃金三角上是望高臺'),COLORYELLOW;

{一陽穿3線為洋紅柱,一陽穿4線為紫羅蘭紅柱,一陽穿五線為紅紅柱}
MA5:MA(C,5),LINETHICK1,COLORWHITE;
MA11:MA(C,11),LINETHICK1,COLORMAGENTA;
MA25:MA(C,25),LINETHICK1,COLORGREEN;
MA60:MA(C,60),LINETHICK1,COLORRED;
MA120:MA(C,120),COLORYELLOW;
MA250:MA(CLOSE,250),COLORWHITE,LINETHICK2;
YCX:=MA5>=REF(MA5,1); X1:= MA250>REF(MA250,1);
X2:=MA250>=O AND MA250<=C;
X5:=MA5>=O AND MA5<=C;
X17:=MA11>=O AND MA11<=C;
X30:=MA25>=O AND MA25<=C;
X55:=MA60>=O AND MA60<=C;
一陽穿3線:=X5 AND X17 AND X30;
一陽穿4線:=X2 AND X5 AND X17 AND X30;
一陽穿5線:=X1 AND X5 AND X17 AND X30 AND X55;
STICKLINE(一陽穿3線,O,C,2,0),COLORMAGENTA;{洋紅色柱}
STICKLINE(一陽穿4線,O,C,3,0),COLORCC3299;{紫羅蘭紅色柱}
STICKLINE(一陽穿5線,O,C,3,0),COLOR0000FF;{紅色柱};
漲停:=C/REF(C,1)>1.09;
BH:=BARSLAST(漲停);
STICKLINE(C,REF(H,BH),REF(H,BH),7,0),COLORMAGENTA;
STICKLINE(漲停,REF(O,BH),REF(C,BH),3,0),COLORMAGENTA;
C3:=REF(C,1);
跌:=IF((C3-C)*100/C3>=(3.55-0.01*100/C3),1,0);
STICKLINE(跌,OPEN,CLOSE,1,0),COLORFF0000;
HH:=BARSLAST(跌);
STICKLINE(C,REF(H,HH),REF(H,HH),7,0),COLORLIBLUE;
STICKLINE(跌,REF(O,HH),REF(C,HH),3,0),COLORBLUE;
DRAWTEXT(漲停,H*1.01,'↓漲停'),COLOR0000FF;
射線5: DRAWLINE(H=HHV(H,5),H,L=LLV(L,5),L,0),COLORGRAY;  
射線5X: DRAWLINE(L=LLV(L,5),L,H=HHV(H,5),L,0),COLORBROWN;
射線10:DRAWLINE(H=HHV(H,10),H,L=LLV(L,10),L,0),COLORE67010,LINETHICK2;
射線10X:DRAWLINE(L=LLV(L,10),L,H=HHV(H,10),L,0),COLORLICYAN,LINETHICK2;

DRAWTEXT(ISLASTBAR=1,MA11,'MA11'),COLORMAGENTA;
DRAWTEXT(ISLASTBAR=1,MA60,'MA60'),COLORRED;
DRAWTEXT(ISLASTBAR=1,MA120,'半年線'),COLORYELLOW;
DRAWTEXT(ISLASTBAR=1,MA250,'年線'),COLORWHITE;
DRAWTEXT_FIX((DYNAINFO(23)/DYNAINFO(22))>1,0.86,0.95,0,'★外盤大1倍'),COLORRED;
DRAWTEXT_FIX((DYNAINFO(23)/DYNAINFO(22))>2,0.86,0.95,0,'★外盤大2倍'),COLORWHITE;
DRAWTEXT_FIX((DYNAINFO(23)/DYNAINFO(22))>3,0.86,0.95,0,'★外盤大3倍'),COLORYELLOW;

{啟動(dòng)點(diǎn)}

A:=(3*C+H+L+O)/6;
XJ:=(A+0.618*REF(A,1)+0.382*REF(A,2)+0.236*REF(A,3)+0.146*REF(A,4))/2.382;
YCZXH:=(MA(HHV(A,2),5)+MA(HHV(A,2),13)+MA(HHV(A,2),21)+MA(HHV(A,2),32))/4;
YCZXL:=(MA(LLV(A,2),5)+MA(LLV(A,2),13)+MA(LLV(A,2),21)+MA(LLV(A,2),32))/4;
SMH:EMA(YCZXH,21),COLOR004000,LINETHICK2;
SML:EMA(YCZXL,21),COLOR004000,LINETHICK2;
SMJ:(SML+SMH)/2,COLOR004000,LINETHICK2;
PJ:=(10*A+9*REF(A,1)+8*REF(A,2)+7*REF(A,3)+6*REF(A,4)+5*REF(A,5)+4*REF(A,6)+3*REF(A,7)+2*REF(A,8)+REF(A,9))/55;
A1:=EMA(PJ,3),COLOR004000;A2:=EMA(PJ,5),COLOR004000;
A3:=EMA(PJ,7),COLOR004000;A4:=EMA(PJ,9),COLOR004000;
A5:=EMA(PJ,11),COLOR004000;
LX:=REF(XJ,1);
ZD:=(SMA(MAX(XJ-LX,0),5,1)/SMA(ABS(XJ-LX),5,1))*100;
KX1:=(CLOSE>=OPEN) AND ZD>=50;
KX2:=(CLOSE<OPEN) AND ZD>=50;
KX3:=(CLOSE>=OPEN) AND ZD<50;
KX4:=(CLOSE<OPEN) AND ZD<50;
IF(A5<REF(A5,1),A5,DRAWNULL),COLOR820000,LINETHICK2;
IF(A5>REF(A5,1),A5,DRAWNULL),COLOR00005B,LINETHICK2;
IF(A4<REF(A4,1),A4,DRAWNULL),COLOR8C0000,LINETHICK1;
IF(A4>REF(A4,1),A4,DRAWNULL),COLOR000055,LINETHICK1;
IF(A3<REF(A3,1),A3,DRAWNULL),COLOR9B0000,LINETHICK1;
IF(A3>REF(A3,1),A3,DRAWNULL),COLOR00006C,LINETHICK1;
IF(A2<REF(A2,1),A2,DRAWNULL),COLORBB0000,LINETHICK1;
IF(A2>REF(A2,1),A2,DRAWNULL),COLOR00007D,LINETHICK1;
IF(A1<REF(A1,1),A1,DRAWNULL),COLORCC0000,LINETHICK1;
IF(A1>REF(A1,1),A1,DRAWNULL),COLOR00009B,LINETHICK1;
AAA2:=SUM(IF( CLOSE>REF(CLOSE,1),VOL*C,0),0);
AAA3:=SUM(IF( CLOSE<REF(CLOSE,1),VOL*C,0),0);
AAA4:=SUM(IF( CLOSE=REF(CLOSE,1),VOL*C,0),0);
BB1:=0;
B1萬元:=DVOL*DCLOSE/100;
B1差:=B1萬元-REF(B1萬元,1);
B2萬元:=DVOL*DCLOSE/100;
B2比:=B2萬元/REF(B2萬元,1);
凈流入萬元:=(AAA2-AAA3-0.5*AAA4);
PM:=MA(凈流入萬元,1);
PMA:=PM/REF(PM,1)>1;
PMB:=REF(PMA,1)<1 AND PMA;
密碼:=(EMA(MA(B1萬元,2),2))/100000,COLORYELLOW,NODRAW;
二日比:=密碼/REF(密碼,1);
選股:=PMB AND 密碼>REF(密碼,1) AND 二日比>1 ,COLORRED,NODRAW;
均價(jià)線:=AMOUNT/V/100;
均價(jià)線2:=MA(均價(jià)線,3);
均價(jià)線5:=MA(均價(jià)線,5);
均價(jià)線10:=MA(均價(jià)線,10);
均價(jià)線30:=MA(均價(jià)線,30);
突破:=C>均價(jià)線2 AND 均價(jià)線2<REF(均價(jià)線2,1) AND REF(均價(jià)線2,1)<REF(均價(jià)線2,2)
AND REF(均價(jià)線2,2)<REF(均價(jià)線2,3) AND 選股;
STICKLINE(突破,H,L,5,0),LINETHICK1,COLORRED;
STICKLINE(突破,H,L,0.2,0),COLORYELLOW;
STICKLINE(突破,O,C,2,0),LINETHICK1,COLORYELLOW;

{分時(shí)，日K線 都可用}

{量突破}

{昨收:DYNAINFO(3),COLORFF9900,LINETHICK3;
DRAWTEXT(CURRBARSCOUNT=8,昨收,' 昨'),COLORFF9900,LINETHICK2;}
今開:DYNAINFO(4),COLORFF00FF,LINETHICK2;
DRAWTEXT(CURRBARSCOUNT=8,今開,'開 '),COLORFF00FF,LINETHICK2;
今高:DYNAINFO(5),COLOREE2255,LINETHICK2;
DRAWTEXT(CURRBARSCOUNT=8,今高,' 高'),COLOREE2255,LINETHICK2;
今低:DYNAINFO(6),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=8,今低,' 低'),COLORGREEN,LINETHICK2;
均價(jià):SUM(V*C,0)/SUM(V,0),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=4,均價(jià),'均'),COLORYELLOW,LINETHICK2;
CC:=HHV(IF(TIME<103000,C,0),0);
VV:=HHV(IF(TIME<103000,V,0),0);
ZF:=CC/DYNAINFO(3)<1.04;
XH:=C>=CC AND V>=VV AND TIME>=103000 AND DYNAINFO(7)=C;
GL:=FILTER(XH,60);
DRAWTEXT(GL,DYNAINFO(7)*0.99,'突破'),COLORYELLOW,LINETHICK2;
STICKLINE(GL,DYNAINFO(7)*0.98,DYNAINFO(7)*0.999,10,0) COLOR0000FF;

時(shí)間:=TIME=100000;
N:=BARSLAST(時(shí)間);
常數(shù):CONST(IF(N=0,C,REF(C,N))),COLORGREEN,DOTLINE;
CS1:=CONST(IF(N,HHV(H,0),REF(HHV(H,0),N)));
CS2:=CONST(IF(N,LLV(L,0),REF(LLV(L,0),N)));
STICKLINE(時(shí)間=1,CS1,CS2,-1,0),COLORGREEN;

{強(qiáng)勢追}

DIFZ:=EMA(C,12)-EMA(C,26);
DEAZ:=EMA(DIFZ,9);
MACDZ:=2*(DIFZ-DEAZ);

零軸:DYNAINFO(3)*0.97,NODRAW;
STICKLINE(MACDZ>0,MACDZ*4+零軸,零軸,1,0),COLORLIRED;
STICKLINE(MACDZ>0 AND MACDZ>REF(MACDZ,1),MACDZ*4+零軸,零軸,1,0),COLORLIRED;
STICKLINE(MACDZ<0,MACDZ*4+零軸,零軸,1,0),COLORLICYAN;
STICKLINE(MACDZ<0 AND MACDZ>REF(MACDZ,1),MACDZ*4+零軸,零軸,1,0),COLORLICYAN;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0,0,'  牢記以下買入原則：'),COLORRED;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0.050,0,'  1、追勢（強(qiáng)勢追）.追底（長時(shí)間橫盤啟動(dòng)追）.追時(shí)（追漲不追高）.追頭（追領(lǐng)頭羊）'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0.100,0,'  2、高位不買.誘多不買.出貨不買.高位放量更不買'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0.150,0,'  3、順勢而為.分批買入.高拋低吸.止盈止損3-5％'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0.200,0,'  4、短線重消息.中線重題材.長線重業(yè)績'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0.250,0,'  5、上午看仔細(xì)2.30后買入為最佳選擇'),COLORYELLOW;

{副圖}

變動(dòng)率:100*(CLOSE-REF(CLOSE,12))/REF(CLOSE,12);
MAROC:MA(ROC,6);
DRAWKLINE(變動(dòng)率,變動(dòng)率,變動(dòng)率,變動(dòng)率);

獲利盤:=WINNER(C)/WINNER(HHV(H,0))*100;
近鄰籌碼:(WINNER(C*1.075)-WINNER(C*0.925))/WINNER(HHV(H,0))*100,COLORGREEN;
獲利縱橫:獲利盤-近鄰籌碼,COLORRED;
強(qiáng)勢線50:STICKLINE(C>0,50,50,8,8),COLORYELLOW;

{機(jī)構(gòu)絕密}

LC:=REF(CLOSE,1);
RSI5:=((SMA(MAX((CLOSE - LC),0),5,1) / SMA(ABS((CLOSE - LC)),5,1)) * 100);
TR1:=SUM(MAX(MAX((HIGH - LOW),ABS((HIGH - REF(CLOSE,1)))),ABS((LOW - REF(CLOSE,1)))),10);
HD:=(HIGH - REF(HIGH,1));
LD:=(REF(LOW,1) - LOW);
DMP:=SUM(IF(((HD > 0) AND (HD > LD)),HD,0),10);
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),10);
PDI:=((DMP * 100) / TR1);
MDI:=((DMM * 100) / TR1);
ADX:=MA(((ABS((MDI - PDI)) / (MDI + PDI)) * 100),5);
AV:=(RSI5 + ADX);
DXR:=(((ADX + REF(ADX,5)) / 2) + RSI5);
WR10:=((100 * (HHV(HIGH,10) - CLOSE)) / (HHV(HIGH,10) - LLV(LOW,10)));
NEWVOL:=(RSI5 - WR10);
最佳買入:=(AV + NEWVOL);
買入選股:IF(CROSS(最佳買入,0),4,0),STICK,COLOR00FFFF,LINETHICK2;
VARA1:=SMA(買入選股,3,1);
VARA2:=SMA(VARA1,3,1),COLOR0000FF;
VARA3:=SMA(VARA2,3,1),COLOR00FFFF;
建倉買點(diǎn):IF(CROSS(VARA2,VARA3) AND (VARA2<40),5,0* 10000),COLOR0000FF,LINETHICK1;
STICKLINE(建倉買點(diǎn),0,1.5,6,0),COLORFF80FF;
STICKLINE(建倉買點(diǎn),0.5,2.8,2,0),COLOR3000FF;
RSV:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 50);
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
X:=LLV(J,2)=LLV(J,8);
最佳買入時(shí)機(jī): IF(CROSS(J,3),1,0),STICK,COLORFFFF00;
STICKLINE(最佳買入時(shí)機(jī),0,1,3,0),COLOR009999;
STICKLINE(最佳買入時(shí)機(jī),0,1,2,0),COLOR00DDDD;
STICKLINE(最佳買入時(shí)機(jī),0,1,1,0),COLOR00FFFF;
機(jī)構(gòu)建倉: IF(最佳買入<5,-0.5,0),STICK,COLOR00FF00,LINETHICK1;
機(jī)構(gòu)建倉日:STICKLINE(機(jī)構(gòu)建倉,0,-1,4,1),COLOR00FF00,LINETHICK5;
趨勢:3*SMA((CLOSE-LLV(LOW,38))/(HHV(HIGH,38)-LLV(LOW,38))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1),LINETHICK2,COLORFF99FF,NODRAW;
備錢: IF(趨勢<=20,-0.8,0),COLORD0D0D0,STICK,LINETHICK3;
快買: IF(趨勢<=10,1,0),COLORFF38FF,STICK,LINETHICK3;
BIAS1:=(C-MA(C,6))/MA(C,6)*100,COLORFFDDCC;
BIAS2:(C-MA(C,13))/MA(C,13)*100,COLORFFFFFF,LINETHICK1;
BIAS3:=(C-MA(C,26))/MA(C,26)*100,COLORFFFFFF,LINETHICK1;
乖離:(BIAS1+2*BIAS2+3*BIAS3)/6,COLOR00FFFF;
乖離超限:MA(乖離,3),COLORFF80FF;
STICKLINE(CROSS(乖離,乖離超限)  AND 乖離超限<-9,-4,0,1,1),COLORFFFFFF;
STICKLINE(CROSS(乖離超限,乖離)  AND 乖離>10,6,0,3,0),COLORFF88FF;
DRAWBAND(MA(乖離,1),RGB(240,120,40),MA(乖離超限,1),RGB(256,200,20));
警跌:IF(BIAS2<REF(BIAS2,1),BIAS2,DRAWNULL),COLORFF6128,LINETHICK3;
回升:IF(BIAS2>REF(BIAS2,1),BIAS2,DRAWNULL),COLOR00FFFF,LINETHICK3;
R:SMA(MAX(CLOSE- REF(C,1),0),6,1)/SMA(ABS(CLOSE- REF(C,1)),6,1)*100,COLORFFCCFF,NODRAW;
R2:SMA(MAX(CLOSE- REF(C,1),0),13,1)/SMA(ABS(CLOSE- REF(C,1)),13,1)*100,COLOR00CCFF,NODRAW;
STICKLINE(CROSS(R2,R)  AND R2>78,2,0,3,-1),COLOR30FFFF;

{籌碼集中}
VAR1:=MA(WINNER(CLOSE),9)*100;
買！:= CROSS(VAR1,2)*30,COLOR0000FF ,LINETHICK3 ;
VAR2:=(1-EMA((HHV(HIGH,15)-CLOSE)/(HHV(HIGH,15)-LLV(LOW,15)),15))*100;
VAR3:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
VAR4:=SMA(VAR3,9,1);
VAR5:=SMA(VAR4,9,1);
VAR6:=(CLOSE-SMA(CLOSE,13,1))/SMA(CLOSE,13,1)*(-100);
VAR7:=REF(VAR6,1)>13 AND REF(VAR6,1) /VAR6>1.23 AND CLOSE/REF(CLOSE,1)>1.03;
春筍: IF(VAR7 AND REF(CLOSE,1)<=COST(5),10,0),LINESTICK ,COLOR00FF00,LINETHICK2;
VAR8:=MA(CLOSE,27);
VAR9:=(CLOSE-VAR8) /VAR8*100;
VARA:=MA(VAR9,2);
VARB:=BARSLAST(CROSS(-10,VARA)=1);
VARC:=BARSLAST(CROSS(VARA,10)=1);
VARD:=VARA<-10 AND VARB>3;
VARE:=VARA>10 AND VARC>3;
準(zhǔn)備下套: IF(VARD,VARA,0),LINESTICK ,LINETHICK2, COLORYELLOW;
收網(wǎng)走人: IF(VARE,VARA,0),LINESTICK , COLORGREEN;
偷著樂: IF(VARA>REF(VARA,1) AND VARD AND VARA<-15,30,0),LINETHICK2,LINESTICK,COLORFFA2AF;

A:=90+(100-90)/2;
B:=(100-90)/2;
CC:=COST(A);
DD:=COST(B);
CMJZD:=(CC-DD)/(CC+DD)*100/2;
籌碼集中度:MA(CMJZD,3),COLORGRAY;
籌碼集中度升:IF(籌碼集中度>=REF(籌碼集中度,3),籌碼集中度,DRAWNULL),COLORRED,LINETHICK2;
籌碼集中度降:IF(籌碼集中度<REF(籌碼集中度,3),籌碼集中度,DRAWNULL),COLORFAABEC,LINETHICK2;
比例變化:(籌碼集中度-REF(籌碼集中度,1))/REF(籌碼集中度,1)*100,COLORYELLOW,LINETHICK2;
拉高加倉:IF(籌碼集中度>REF(籌碼集中度,3) AND  MA(C,20)>REF(MA(C,20),3),1,0),COLOR0095FF;
拉高加倉1:STICKLINE(拉高加倉>0,0,籌碼集中度*0.33,2.7,0),COLOR0095FF;
STICKLINE(拉高加倉>0,0,籌碼集中度*0.33,2.1,0),COLOR0064FF;
STICKLINE(拉高加倉>0,0,籌碼集中度*0.33,1.5,0),COLOR0093FF;
STICKLINE(拉高加倉>0,0,籌碼集中度*0.33,0.9,0),COLOR00C2FF;
STICKLINE(拉高加倉>0,0,籌碼集中度*0.33,0.3,0),COLOR00FFFF;
下跌加倉:IF(籌碼集中度>REF(籌碼集中度,3) AND MA(C,20)<REF(MA(C,20),3),1,0),COLORFF0066;
下跌加倉1:STICKLINE(下跌加倉>0,0,籌碼集中度*0.33,2.7,0),COLORFF0033;
STICKLINE(下跌加倉>0,0,籌碼集中度*0.33,2.7,0),COLORFF0066;
STICKLINE(下跌加倉>0,0,籌碼集中度*0.33,1.5,0),COLORFF0099;
STICKLINE(下跌加倉>0,0,籌碼集中度*0.33,0.9,0),COLORFF00CC;
STICKLINE(下跌加倉>0,0,籌碼集中度*0.33,0.3,0),COLORFF00FF;

{阻擊}

VAR1:=EMA(SMA((CLOSE-LLV(LOW,19))/(HHV(HIGH,19)-LLV(LOW,19))*100,8,1),3);
STICKLINE(VAR1>20 AND VAR1<80,VAR1,VAR1,10,1),COLORRED;
STICKLINE(VAR1<REF(VAR1,1),VAR1,VAR1,10,1),COLORFFCC66;
STICKLINE(VAR1>80,VAR1,VAR1,8,1),COLOR00FF00;
STICKLINE(VAR1<20,VAR1,VAR1,8,1),COLORYELLOW;
ABV:=MA(SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),-VOL,0)),0)/25000,2);
M1:=EMA(ABV,12);
M2:=EMA(ABV,26);
MTM:=CLOSE-REF(CLOSE,1);
MMS:=((100)*(EMA(EMA(MTM,6),6)))/(EMA(EMA(ABS(MTM),6),6));
MMM:=((100)*(EMA(EMA(MTM,12),12)))/(EMA(EMA(ABS(MTM),12),12));
MML:=((100)*(EMA(EMA(MTM,26),26)))/(EMA(EMA(ABS(MTM),26),26));
MMA:=C-REF(C,1);
MMB:=100*EMA(EMA(MMA,9),9)/EMA(EMA(ABS(MMA),9),9);
MMC:=MA(MMB,5);
A:=((VOL)/(CAPITAL))*(100);
S:=((MA(A,30))/(MA(INDEXA,10)))*(MA(INDEXA,60));
Y:=((MA(A,120))/(MA(INDEXA,10)))*(MA(INDEXA,60));
X:=1;
V1:=(HIGH+OPEN+LOW+(2)*(CLOSE))/(5);
V2:=REF(V1,1);
V3:=MAX(V1-V2,0);
V4:=ABS(V1-V2);
V5:=SMA(V3,10,1);
V6:=SMA(V4,10,1);
V8:=COUNT(((V5)/(V6)<0.2),5);
V9:=COUNT((LLV(V1,10)=V1),10);
主力進(jìn)出:IF((MMS>REF(MMS,1) AND MMB>REF(MMB,1) AND CROSS(ABV,M2) AND ABV>REF(ABV,1) AND M1>REF(M1,1) AND M2>REF(M2,1)),65,0),COLORWHITE,POINTDOT;
主進(jìn)主軌:=ABV>M2 AND CROSS(ABV,M1) AND CROSS(MMB,MMC);
STICKLINE(主力進(jìn)出 OR 主進(jìn)主軌,65,0,4,1),COLORWHITE;
精準(zhǔn)買賣:=V8>=1 AND V9>=1 AND CLOSE>OPEN AND REF(CLOSE,1)>REF(OPEN,1) AND (VOL>REF(VOL,1)) AND MMS>MML AND CROSS(ABV,M2);
短線買點(diǎn):=V8>=1 AND V9>=1 AND CLOSE>OPEN AND REF(CLOSE,1)>REF(OPEN,1) AND (VOL>REF(VOL,1)) AND CROSS(MMS,MML) AND ABV>REF(ABV,1);
中線買點(diǎn):=V8>=1 AND V9>=1 AND CLOSE>OPEN AND REF(CLOSE,1)>REF(OPEN,1) AND (VOL>REF(VOL,1))
AND ABV>REF(ABV,1) AND MMS>MML AND CROSS(MMM,MML) AND MMS>REF(MMS,1) AND MMM>REF(MMM,1) AND MML>REF(MML,1);
主進(jìn)主買:=ABV>M2 AND MMB>MMC AND CROSS(MMS,MML) AND MMS>REF(MMS,1) AND MMM>REF(MMM,1) AND MML>REF(MML,1);
短中精:=精準(zhǔn)買賣 OR 短線買點(diǎn) OR 中線買點(diǎn) OR 主進(jìn)主買;
主力買賣:IF(短中精,60,0),COLORFF00FF,POINTDOT;
STICKLINE(主力買賣,60,0,4,1),COLORFF00FF;
主力軌跡:IF(ABV>M2 AND MMS>MML AND CROSS(MMB,MMC) AND MMB>REF(MMB,1) AND MMC>REF(MMC,1),55,0),COLORFFCC66,POINTDOT;
STICKLINE(主力軌跡,55,0,4,1),COLORFFCC66;
拉升在即:IF(S<X AND Y<X AND MMS>MML AND ABV>M1 AND CROSS(S,Y),50,0),COLORYELLOW,POINTDOT;
STICKLINE(拉升在即,50,0,4,1),COLORYELLOW;
底部構(gòu)成:IF(V8>=1 AND V9>=1 AND CLOSE>OPEN AND REF(CLOSE,1)>REF(OPEN,1) AND VOL>REF(VOL,1)
AND ABV>M2 AND MMB>MMC,45,0),COLOR00FF00,POINTDOT;
STICKLINE(底部構(gòu)成,45,0,4,1),COLOR00FF00;
ROC:=(CLOSE-REF(CLOSE,12))/REF(CLOSE,12)*100;
HSL:=100*VOL/CAPITAL;
沖擊波:IF(CROSS(ROC,16) AND HSL>3.5,40,0),COLOR0099FF,POINTDOT;
STICKLINE(沖擊波,40,0,4,1),COLOR0099FF;