（無源碼的請下載附件導(dǎo)入）
資金監(jiān)測：細(xì)分為主力、機(jī)構(gòu)、大戶、中戶、小戶，單位：萬元。機(jī)構(gòu)、大戶和主力，由K線表示。【主力占比】_主力（凈）與總成交額之比,%。
一.實體K線：機(jī)構(gòu)凈買入為黃色，機(jī)構(gòu)凈賣出為藍(lán)色；大戶凈買入為紅色，大戶凈賣出為綠色。底部粗紅實體和上下影_最底入，并寫有“紅底”，半部粗綠實體和上下影_最頂出，并寫有“--綠頂”（紅底、綠頂，不屬資金）；
二.空心K線：內(nèi)部黃色_主力凈買入，內(nèi)部淺藍(lán)_主力凈賣出；外部紅色_陽線，外部綠色_陰線；
三.立體K線：紅色立體_30天主力總和上穿其10天指數(shù)移動平均，藍(lán)色立體_30天主力總和下穿其10天指數(shù)移動平均。
四.小圖標(biāo)：
1）13號，紅圓底上斜白道_獲利盤和股價；2）21號，小藍(lán)房子_加倉，復(fù)雜乖離率；3）12號，黃色向下手指_清倉，復(fù)雜乖離率；4）11號黃色向上手指_強(qiáng)勢狙擊，復(fù)雜乖離率；5）34號，淺藍(lán)圓底對勾尖向下_{一絕}股價計算；6）35號，黃圓底對勾尖向上_{一絕}股價計算；7）黃笑臉、藍(lán)哭臉，為波段底頂，屬未來。
獲利盤:WINNER(C)*100,COLORYELLOW,NODRAW;
活籌:(WINNER(C*1.075)-WINNER(C*0.925))*100,COLORFFFFFF,NODRAW;
獲利縱橫:獲利盤-活籌,NODRAW,COLORMAGENTA;
換手率:=VOL/CAPITAL*100,COLORWHITE,NODRAW;
預(yù)換手:IF(CURRBARSCOUNT=1 AND PERIOD=5,換手率*240/FROMOPEN,DRAWNULL),NODRAW;
ZLCM:=EMA(WINNER(C)*70,3);
SHCM:=EMA((WINNER(C*1.10)-WINNER(C*0.90))*80,3);
主力控盤系數(shù):(ZLCM/(ZLCM+SHCM))*100,COLORYELLOW,NODRAW;
【穿籌量】:(WINNER(CLOSE)-REF(WINNER(C),1))*100,NODRAW,COLORMAGENTA;
頂籌價:COST(99.99),COLORRED,LINETHICK2;
中籌價:COST(50),COLORRED,LINETHICK2;
底籌價:COST(0.01),COLORCYAN,LINETHICK2;
DRAWBAND(COST(99.99),RGB(100,0,0),COST(90),RGB(150,0,0));
DRAWBAND(COST(90.00),RGB(0,200,0),COST(80.00),RGB(0,250,0));
DRAWBAND(COST(80.00),RGB(200,110,250),COST(70.00),RGB(200,100,250));
DRAWBAND(COST(70.00),RGB(250,200,0),COST(60.00),RGB(250,200,0));
DRAWBAND(COST(60.00),RGB(0,150,250),COST(50.00),RGB(0,150,250));
DRAWBAND(COST(50.00),RGB(200,0,0),COST(40.00),RGB(0,250,0));
DRAWBAND(COST(40.00),RGB(0,200,0),COST(30.00),RGB(0,250,0));
DRAWBAND(COST(30.00),RGB(200,110,250),COST(20.00),RGB(200,110,250));
DRAWBAND(COST(20.00),RGB(250,200,0),COST(10.00),RGB(250,200,0));
DRAWBAND(COST(10.00),RGB(0,150,250),COST(00.01),RGB(0,150,250));
MA5:MA(CLOSE,5),LINETHICK3,COLORGREEN;
MA5上升:IF(MA5>=REF(MA5,1),MA5,DRAWNULL),LINETHICK3,COLORRED;
X_54:=MA(CLOSE,5);{MA5角度取自量學(xué)太極線}
MA5角度:ATAN((X_54/REF(X_54,1)-1)*100)*180/3.1416,NODRAW;
MA10:MA(CLOSE,10),LINETHICK3,COLORGREEN;
MA30:MA(CLOSE,30),LINETHICK2,COLORMAGENTA;
MA60:MA(CLOSE,60),LINETHICK2,COLORYELLOW;
{MA120:MA(CLOSE,120),LINETHICK2,COLORCYAN;
MA250:MA(CLOSE,250),LINETHICK2,COLORBLUE;}
{主力成本線:EMA(COST(9),250),COLORYELLOW,,DOTLINE;{原有}
CYC∞:CYC.CYC∞,CIRCLEDOT,COLORYELLOW;
{DRAWBAND(MA5,RGB(150,0,0),MA10,RGB(0,150,0));}
MA20:MA(CLOSE,20),COLORCYAN,LINETHICK4;
上升趨勢:IF(MA(CLOSE,20)>=REF(MA(CLOSE,20),1),MA(CLOSE,20),DRAWNULL),COLORMAGENTA,LINETHICK4;
{DRAWKLINE(H,O,L,C);} {畫K線}
超B:=L2_AMO(0,0)/10000.0;
大B:=L2_AMO(1,0)/10000.0;
中B:=L2_AMO(2,0)/10000.0;
小B:=L2_AMO(3,0)/10000.0;
超S:=-L2_AMO(0,1)/10000.0;
大S:=-L2_AMO(1,1)/10000.0;
中S:=-L2_AMO(2,1)/10000.0;
小S:=-L2_AMO(3,1)/10000.0;
主力:(超B+大B)+(超S+大S),COLORYELLOW,NODRAW;
{散戶凈買:(中B+小B)+(中S+小S),NODRAW;}
成交額:=AMOUNT/10000;
主力占比:主力/成交額*100,COLORYELLOW,NODRAW;
機(jī)構(gòu):(超B)+(超S),COLORYELLOW,NODRAW;
大戶:(大B)+(大S)COLORRED,NODRAW;
中戶:(中B)+(中S),COLORMAGENTA,NODRAW;
小戶:(小B)+(小S),COLORWHITE,NODRAW;
STICKLINE(主力>0,O,C,2,1),COLORYELLOW;
STICKLINE(主力<0,O,C,2,1),COLORLIBLUE;
STICKLINE(機(jī)構(gòu)>0,O,C,1,0),COLORYELLOW;
STICKLINE(機(jī)構(gòu)<0,O,C,1,0),COLORBLUE;
STICKLINE(大戶>0,O,(O+C)/2,1,0),COLORRED;
STICKLINE(大戶<0,O,(O+C)/2,1,0),COLORGREEN;
累計:=SUM(主力,30),COLORMAGENTA;
均值:=EMA(累計,MIN(10,30)),COLORWHITE;
{紅}
STICKLINE(CROSS(累計,均值),H,L,0,0),COLORRED,LINETHICK1;
STICKLINE(CROSS(累計,均值),CLOSE,OPEN,1.4,0),COLOR000088;
STICKLINE(CROSS(累計,均值),CLOSE,OPEN,1,0),COLOR0000BB;
STICKLINE(CROSS(累計,均值),CLOSE,OPEN,0.6,0),COLOR0000DD;
STICKLINE(CROSS(累計,均值),CLOSE,OPEN,{0}0.2,0),COLOR0000FF;
{藍(lán)}
STICKLINE(CROSS(均值,累計),H,L,0,0),COLORFF8800,LINETHICK1;
STICKLINE(CROSS(均值,累計),CLOSE,OPEN,1.4,0),COLORBB4400;
STICKLINE(CROSS(均值,累計),CLOSE,OPEN,1,0),COLORCC5500;
STICKLINE(CROSS(均值,累計),CLOSE,OPEN,0.6,0),COLORDD6600;
STICKLINE(CROSS(均值,累計),CLOSE,OPEN,{0}0.2,0),COLOREE7700;
半分位:=(REF(C,1)+REF(O,1))/2,COLORWHITE,DOTLINE;
STICKLINE(半分位,半分位,半分位,4,0),COLORWHITE;
{五線順上的拐點定位線，有未來函數(shù)}
局部低點預(yù)選A:=BACKSET(LLV(L,5)<REF(LLV(L,4),1),4);
局部低點預(yù)選B:=BACKSET(局部低點預(yù)選A=0 AND REF(局部低點預(yù)選A,1)=1,2);
局部低點預(yù)選C:=IF(局部低點預(yù)選B=1 AND REF(局部低點預(yù)選B,1)=0,-1,0);
局部高點預(yù)選A:=BACKSET(HHV(H,5)>REF(HHV(H,4),1),4);
局部高點預(yù)選B:=BACKSET(局部高點預(yù)選A=0 AND REF(局部高點預(yù)選A,1)=1,2);
局部高點預(yù)選C:=IF(局部高點預(yù)選B=1 AND REF(局部高點預(yù)選B,1)=0,1,0);
缺口判斷:=IF(L>REF(H,1),1,IF(H<REF(L,1),-1,0));
距前高天:=BARSLAST(局部高點預(yù)選C=1);
距前低天:=BARSLAST(局部低點預(yù)選C=-1);
小值周期:=LOWRANGE(L);
大值周期:=TOPRANGE(H);
低保留AA:=IF(局部低點預(yù)選C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0);
低保留AB:=IF(局部低點預(yù)選C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判斷,距前高天)=-1 OR LLV(L,距前低天+2)<REF(LLV(L,距前低天+1),1)),-1,0);
低保留S:=IF((低保留AA=-1 OR 低保留AB=-1) AND L<REF(H,距前高天+1),-1,0);
預(yù)判:=IF((距前低天<4 AND HHV(缺口判斷,距前低天)!=1) OR REF(低保留S,距前低天)=0,1,0);
判斷:=IF(局部高點預(yù)選C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND 預(yù)判=1 AND 大值周期>REF(小值周期,距前低天+1) AND 大值周期>REF(小值周期,距前低天) AND 大值周期>REF(大值周期,距前高天),1,0);
高保留A:=IF(局部高點預(yù)選C=1 AND REF(距前低天,1)>REF(距前高天,1) AND HHV(H,距前低天+1)>REF(HHV(H,距前低天+1),1),1,0);
高保留B:=IF(局部高點預(yù)選C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND REF(低保留S,距前低天)=-1 AND (距前低天>=4 OR HHV(缺口判斷,距前低天)=1),1,0);
高保留:=IF((高保留A=1 OR 高保留B=1 OR 判斷=1) AND H>REF(L,距前低天+1),1,0);
預(yù)判A:=IF((距前高天<4 AND HHV(缺口判斷,距前高天)!=1) OR REF(高保留,距前高天)=0,1,0);
判斷A:=IF(局部低點預(yù)選C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND 預(yù)判A=1 AND 小值周期>REF(大值周期,距前高天+1) AND 小值周期>REF(大值周期,距前高天) AND 小值周期>REF(小值周期,距前低天),-1,0);
低保留A:=IF(局部低點預(yù)選C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0);
低保留B:=IF(局部低點預(yù)選C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判斷,距前高天)=-1 OR 判斷A=-1),-1,0);
低保留:=IF((低保留A=-1 OR 低保留B=-1) AND L<REF(H,距前高天+1),-1,0);
距前高天A:=BARSLAST(高保留=1);
距前低天A:=BARSLAST(低保留=-1);
預(yù)判X:=IF((距前低天A<4 AND HHV(缺口判斷,距前低天A)!=1) OR REF(低保留,距前低天A)=0,1,0);
判斷X:=IF(局部高點預(yù)選C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND 預(yù)判X=1 AND 大值周期>REF(小值周期,距前低天A+1) AND 大值周期>REF(小值周期,距前低天A) AND 大值周期>REF(大值周期,距前高天A),1,0);
高保留XA:=IF(局部高點預(yù)選C=1 AND REF(距前低天A,1)>REF(距前高天A,1) AND HHV(H,距前低天A+1)>REF(HHV(H,距前低天A+1),1),1,0);
高保留XB:=IF(局部高點預(yù)選C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND REF(低保留,距前低天A)=-1 AND (距前低天A>=4 OR HHV(缺口判斷,距前低天A)=1),1,0);
高保留X:=IF((高保留XA=1 OR 高保留XB=1 OR 判斷X=1) AND H>REF(L,距前低天A+1),1,0);
預(yù)判XA:=IF((距前高天A<4 AND HHV(缺口判斷,距前高天A)!=1) OR REF(高保留XA,距前高天A)=0,1,0);
判斷XA:=IF(局部低點預(yù)選C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND 預(yù)判XA=1 AND 小值周期>REF(大值周期,距前高天A+1) AND 小值周期>REF(大值周期,距前高天A) AND 小值周期>REF(小值周期,距前低天A),-1,0);
低保留XA:=IF(局部低點預(yù)選C=-1 AND REF(距前高天A,1)>REF(距前低天A,1) AND LLV(L,距前高天A+1)<REF(LLV(L,距前高天A+1),1),-1,0);
低保留XB:=IF(局部低點預(yù)選C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND (距前高天A>=4 OR LLV(缺口判斷,距前高天A)=-1 OR 判斷XA=-1),-1,0);
低保留X:=IF((低保留XA=-1 OR 低保留XB=-1) AND L<REF(H,距前高天A+1),-1,0);
距前高天YA:=BARSLAST(高保留X=1);
距前低天YA:=BARSLAST(低保留X=-1);
預(yù)判YX:=IF((距前低天YA<4 AND HHV(缺口判斷,距前低天YA)!=1) OR REF(低保留X,距前低天YA)=0,1,0);
判斷YX:=IF(局部高點預(yù)選C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND 預(yù)判YX=1 AND 大值周期>REF(小值周期,距前低天YA+1) AND 大值周期>REF(小值周期,距前低天YA) AND 大值周期>REF(大值周期,距前高天YA),1,0);
高保留YXA:=IF(局部高點預(yù)選C=1 AND REF(距前低天YA,1)>REF(距前高天YA,1) AND HHV(H,距前低天YA+1)>REF(HHV(H,距前低天YA+1),1),1,0);
高保留YXB:=IF(局部高點預(yù)選C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND REF(低保留X,距前低天YA)=-1 AND (距前低天YA>=4 OR HHV(缺口判斷,距前低天YA)=1),1,0);
高保留YX:=IF((高保留YXA=1 OR 高保留YXB=1 OR 判斷YX=1) AND H>REF(L,距前低天YA+1),1,0);
預(yù)判YXA:=IF((距前高天YA<4 AND HHV(缺口判斷,距前高天YA)!=1) OR REF(高保留YXA,距前高天YA)=0,1,0);
判斷YXA:=IF(局部低點預(yù)選C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND 預(yù)判YXA=1 AND 小值周期>REF(大值周期,距前高天YA+1) AND 小值周期>REF(大值周期,距前高天YA) AND 小值周期>REF(小值周期,距前低天YA),-1,0);
低保留YXA:=IF(局部低點預(yù)選C=-1 AND REF(距前高天YA,1)>REF(距前低天YA,1) AND LLV(L,距前高天YA+1)<REF(LLV(L,距前高天YA+1),1),-1,0);
低保留YXB:=IF(局部低點預(yù)選C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND (距前高天YA>=4 OR LLV(缺口判斷,距前高天YA)=-1 OR 判斷YXA=-1),-1,0);
低保留YX:=IF((低保留YXA=-1 OR 低保留YXB=-1) AND L<REF(H,距前高天YA+1),-1,0);
AAAD:=IF(高保留YX=1 AND 低保留YX=-1 AND H>REF(H,REF(距前高天YA,1)+2),1,IF(高保留YX=1 AND 低保留YX=-1 AND L<REF(L,REF(距前低天YA,1)+2),-1,0));
極點保留:=IF(AAAD=0,高保留YX+低保留YX,AAAD);
局部極點:IF(極點保留=-1,L,IF(極點保留=1,H,DRAWNULL)),CIRCLEDOT,COLORYELLOW;
DRAWLINE(極點保留=-1,局部極點,極點保留=1,局部極點,0)COLORGREEN,LINETHICK1;
DRAWLINE(極點保留=1,局部極點,極點保留=-1,局部極點,0)COLORYELLOW,LINETHICK1;
DD1:=BARSLAST(ABS(極點保留)!=1);
DRAWTEXT(極點保留=1,局部極點*1.01,'↓賣'),COLORGREEN;
{ STICKLINE(極點保留=1,局部極點,局部極點,30,1),COLORCYAN;}
{ DRAWNUMBER(極點保留=1,局部極點,局部極點)COLORGREEN;}
DRAWTEXT(極點保留=-1,局部極點*0.95,'↖買'),COLORYELLOW;
{ STICKLINE(極點保留=-1,局部極點,局部極點,30,1),COLORRED;}
{ DRAWNUMBER(極點保留=-1,局部極點,局部極點)COLORYELLOW;}
{一絕}
Q_1:=C-REF(C,1);
Q_2:=100*EMA(EMA(Q_1,6),6)/EMA(EMA(ABS(Q_1),6),6);
Q_3:=CROSS(EMA(C,19),EMA(C,7));
Q_4:=CROSS(EMA(C,7),EMA(C,19));
ZD1:=L=LLV(L,BARSLAST(Q_3)+1);
ZD2:=LLV(L,BARSLAST(Q_3)+1);
ZD3:=H=HHV(H,BARSLAST(Q_4)+1);
ZD4:=HHV(H,BARSLAST(Q_4)+1);
Q_A:=DRAWLINE(ZD1,ZD2,ZD3,ZD4,0);
U1:=H=HHV(H,BARSLAST(Q_4)+1);
U2:=HHV(H,BARSLAST(Q_4)+1);
U3:=L=LLV(L,BARSLAST(Q_3)+1);
U4:=LLV(L,BARSLAST(Q_3)+1);
Q_B:=DRAWLINE(U1,U2,U3,U4,0);
TJ:=IF(Q_B<REF(Q_B,1) AND Q_B=Q_A,1,0);
BB:=REF(TJ,1)=0 AND TJ>=1 ;
DRAWICON(BB,L*0.998,34);{圖標(biāo)_黃圓、對勾向上}
SS:=REF(Q_A<REF(Q_A,1) AND Q_B=Q_A,1)=0 AND TJ<1;
DRAWICON(SS,H*1.002,35);{圖標(biāo)_綠源、對勾向下}
{私募公式}
AAE:= WINNER(CLOSE+CLOSE*15/100)*100;
BBE:= WINNER(CLOSE+CLOSE*0/100)*100;
CCE:= AAE-BBE;
DDE:= (WINNER(CLOSE-CLOSE*0.1/100)-WINNER(CLOSE-CLOSE*15/100))*100;
EEE:= CCE<3 AND DDE<0.5 AND OPEN>LOW;
AE1:= DYNAINFO(6);
AE2:= IF(LOW>AE1,0,IF(HIGH<AE1,1,(AE1-LOW+0.01)/(HIGH-LOW+0.01)));
AE3:= VOL/WINNER(LOW);
AE4:= REF(HHV(CLOSE,120),1);
AE5:= REF(LLV(CLOSE,120),1);
AE6:= 100*(CLOSE-AE5)/(AE4-AE5);
AE7:= AE2>0 OR AE2=1;
AE8:= AE7 AND AE3/REF(AE3,3)>=3 AND AE6<80;
AE9:= REF(AE8,1) OR REF(AE8,2) OR REF(AE8,3) OR REF(AE8,4);
AE10:= AE8 AND AE9;
AE11:= IF(FILTER(AE8,3),5,0);
AE12:= FILTER(IF(FILTER(AE10,3) OR EEE,10,0),3);
DRAWICON(AE12,L-0.0018,13);{圖標(biāo)_粉紅圓、右上飄}
{伏擊漲停}
T1:=MA(C,21)>REF(MA(C,21),1);
T2:=EXIST(C>REF(C,1)*1.093,21);
T3:=C<O AND C<REF(C,1) AND EVERY(MA(C,5)<REF(MA(C,5),1),3);
T5:=EVERY(V<REF(V,1),2) AND EVERY(V<MA(V,5),2);
T6:=MA(C,5)>MA(C,21);
DRAWTEXT(T1 AND T2 AND T3 AND T5 AND T6,L,'↖伏擊漲停');
{紅底綠頂}
低:=REF(LLV(L,150),3);
近期底:=REFDATE(低,DATE);
最底:=REFDATE(近期底,DATE);
入:=最底=L AND ((C+L)<(O+C) OR (O+L)<(C+O));
STICKLINE(入,O,(C+O)/2,2,0),COLORRED;
STICKLINE(入,H,L,0.1,0),COLORRED;
DRAWTEXT(入,L*0.9958,'↖紅底'),COLORLIMAGENTA;
高:=REF(HHV(H,150),3);
近期頂:=REFDATE(高,DATE);
最頂:=REFDATE(近期頂,DATE),NODRAW;
出:=最頂=H AND ((C-L)<(O-C) OR (O-L)<(C-O)),NODRAW;
STICKLINE(出,O,(C+O)/2,2,0),COLORGREEN;
STICKLINE(出,H,L,0.1,0),COLORGREEN;
DRAWTEXT(出,H*1.008,'--綠頂'),COLORGREEN;
XL1:=((LLV(LOW,3) = LLV(LOW,60)) AND ((CLOSE / REF(CLOSE,1)) >= 1.04));
XL2:=(((CLOSE - EMA(CLOSE,21)) / EMA(CLOSE,21)) * 100);
XL3:=CROSS(XL2,(0 - 20));
DRAWTEXT(FILTER(((XL1 > 0) AND LOW),5),(LOW - 0.0014),'●買點');
DRAWTEXT((XL3 > 0),(LOW - 0.010),'●絕對底部')COLORYELLOW;
X6:=REF(CLOSE,1);
X7:=((SMA(MAX((CLOSE - X6),0),7,1) / SMA(ABS((CLOSE - X6)),7,1)) * 100);
X8:=CROSS(79,X7);
X9:=FILTER(X8,4);
DRAWTEXT(X9,(HIGH * 0.9989),'-●出貨'),COLORGREEN;
{金牛啟動}
年:=MA(CLOSE,240);
漲幅%:=(C-REF(C,1))/REF(C,1)*100;
RSVV:=(CLOSE-LLV(LOW,10))/(HHV(HIGH,10)-LLV(LOW,10))*100;
VARB2:=(RSVV/2+22)*1;
量:=EMA(VOL,13);
資金:=EMA(AMOUNT,13);
過濾:=((資金 /量) / 100);
提純:=(((CLOSE -過濾) / 過濾) * 100);
黃金:=((提純 < (0)) AND ZXNH);
買:=IF(黃金 AND RSVV<VARB2-2,180,0) AND 漲幅%>0 AND C<年;
DRAWTEXT(買>0,L*0.995,'↖牛'),COLORFFFFFF;
{DRAWTEXT(買>0,L*0.985,'▲'),COLORFF00FF;}
五日乖離率:=((C-MA5)/MA5)*100;
BB05:=ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416;
速度5:=SMA(EMA((MA5-REF(MA5,1))/REF(MA5,1),3)*100,3,1);
加速度5:EMA((速度5-REF(速度5,1)),3),NODRAW;
BB10:=ATAN((MA10/REF(MA10,1)-1)*100)*180/3.1416;
三拾日乖離率:=(C-MA30)/MA30*100;
VAR11:=(MA20-MA30)>REF((MA20-MA30),1) AND MA20>REF(MA20,1) AND MA30>REF(MA30,1);
VAR22:=(MA30-MA20)<REF((MA30-MA20),1) AND MA20<REF(MA20,1) AND MA30<REF(MA30,1);
BB30:=ATAN((MA30/REF(MA30,1)-1)*100)*180/3.1416;
強(qiáng)勢狙擊:=FILTER(BB30>30 AND BB10>45 AND CROSS(BB05,60),10);
加倉:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND
MA5>REF(MA5,1) AND 三拾日乖離率>REF(三拾日乖離率,1) AND
MA10>REF(MA10,1) AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1),10) ;
清倉:=FILTER(COUNT(CROSS(30,BB05),5)>=1 AND (C>MA30 OR O>MA30) AND
MA5<REF(MA5,1) AND 三拾日乖離率<REF(三拾日乖離率,1) AND
MA10<REF(MA10,1),10);
DRAWICON(加倉 ,LOW*0.997,21);{圖標(biāo)_小房子}
DRAWICON(清倉 ,HIGH*1.005,12);{黃手指向下}
DRAWICON(強(qiáng)勢狙擊 ,LOW*0.997,11);{黃手指向上}
{俊俊出擊-選股}
S1:=MA((2*C+H+L)/4,5);
S2:=S1*(200-102)/100;
S3:=(1-7/100)*DMA(C,ABS((2*C+H+L)/4-MA(C,20))/MA(C,20));
S4:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
S5:=3*SMA(S4,3,1)-2*SMA(SMA(S4,3,1),3,1);
S6:=((H+L+C)/3-MA((H+L+C)/3,14))/(0.015*AVEDEV((H+L+C)/3,14));
DRAWTEXT(S2<S3&&S5>REF(S5,1)&&REF(S5,1)<REF(S5,2)&&S6<-100&&S6>REF(S6,1),L-0.0018,'俊'),COLORYELLOW;
N:=10;
T1K:=CONST(LLVBARS(LOW,N));
T1HIGH:=CONST(REF(HIGH,T1K));
CC:=CONST(CURRBARSCOUNT);
T2K:=CONST(BARSLAST((CURRBARSCOUNT >(CC+T1K)) AND (HIGH>T1HIGH)));
T2HIGH:=CONST(REF(HIGH,T2K));
T3K:=CONST(BARSLAST((CURRBARSCOUNT >(CC+T2K)) AND (HIGH>T2HIGH)));
T3HIGH:=CONST(REF(HIGH,T3K));
洗盤殺入線:DRAWLINE(CURRBARSCOUNT=10+1,T3HIGH,ISLASTBAR, T3HIGH,1),LINETHICK1,COLORLIRED;
DRAWTEXT(ISLASTBAR, T3HIGH,'殺入線')LINETHICK1,COLORLIRED;
AQ1:=REF(V,1);AQ2:=DVOL;AQ3:=AQ2/AQ1;
LNX:=AQ3-REF(AQ3,1);
E1:=REF(C,1);E2:=DCLOSE;E3:=(E2-E1)/E1*100;
QMX:=E3-REF(E3,1);
XG:=CROSS(LNX,500) AND CROSS(QMX,10);
DRAWTEXT(XG=1,L*0.995,'↖鉆石'),COLORFFCC88;
{ DRAWICON(XG=1,L*0.993,25);}
{有莊控盤}
VAW1:=EMA(EMA(CLOSE,13),13);
控盤:=(VAW1-REF(VAW1,1))/REF(VAW1,1)*1000;
無莊控盤:=控盤<0;
有莊控盤:=控盤>REF(控盤,1) AND 控盤>0;
{分時價格原碼}
JJ:=DYNAINFO(11);
{波段買賣原碼}
P:=21;S:=8;M1:=3;
財:=(EMA(CLOSE,S)-EMA(CLOSE,P))*50;
神:=EMA(財,M1);
{股價與均線偏離買賣條件}
BTJ1:=(C-JJ)/JJ<-0.03;
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(財,神) AND 財<-0.3;
BTJ32:=CROSS(財,神) AND 財<-0.1;
STJ31:=CROSS(神,財);
STJ32:=CROSS(神,財) AND 財>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);
STJ81:=FILTER(STJ1 AND STJ01 AND STJ31,13);
STJ82:=FILTER(STJ02 AND STJ32 ,13);
STJ83:=STJ81 AND STJ82;
DRAWTEXT(STJ83,H*1.002,'↓莊出'),COLORGREEN;
{DRAWICON(STJ83,H+0.003,24);}
莊:= BTJ11 AND BTJ2 AND BTJ3;
有莊:=FILTER(莊,30);
DRAWTEXT(有莊,L-0.0011,'↖莊進(jìn)'),COLORYELLOW;
{DRAWICON(有莊,L*0.999,23);}
{牛熊軌道上抓啟爆點 適合抓爆漲股}
AHC1:=CLOSE*VOL;
AHC22:=EMA((EXPMA(AHC1,27)/EXPMA(VOL,27)+EXPMA(AHC1,54)/EXPMA(VOL,54)+EXPMA(AHC1,108)/EXPMA(VOL,108)+EXPMA(AHC1,316)/EXPMA(VOL,316))/4,34);
上軌:=1.06*AHC22;
下軌:=AHC22*0.94;
ZT:=REF(C,1)*1.1-C<0.01 AND H=C;
啟爆:=CROSS(C,上軌) OR CROSS(C,下軌) AND ZT;
DRAWTEXT(啟爆,L,'↖啟爆'),COLORCYAN;
{STYLE:抄底鉆石王--可以用于選股預(yù)警，也可以放到附圖}
YY:=(REF(H,4)-REF(L,1))/C*100>10;{4天前的最高到昨天最低跌幅為10個點}
YY1:=(REF(L,1)-L)/C*100>=0;{昨天的最低價跟今天最低價相平或收下影線}
YY2:=REF(C<O,1) AND C>O;{昨天收陰，今天收陽線}
YY3:= CLOSE>REF(CLOSE,1)*1.03 ;{股價3個點預(yù)警}
YY4:=(H-C)/C*100<1.5;{上影線少于1.5個點}
YY5:=V<=LLV(V,5) OR V>=HHV(V,5);{成交量是五天最低或五天最高}
DRAWICON(YY AND YY1 AND YY2 AND YY3 AND YY4 AND YY5,L*0.988,26);{滿足所有條件,圖標(biāo)};
DRAWTEXT(YY AND YY1 AND YY2 AND YY3 AND YY4 AND YY5,L*0.920,'↖鉆石王'),COLORRED;
{波段頂?shù)?，屬未來，大馬路123}
VAR111:=ZIG(3,10);
DRAWICON((REF(VAR111,2) > REF(VAR111,1)) AND (VAR111 > REF(VAR111,1)),LOW*0.97,5);
{DRAWTEXT((REF(VAR111,2) > REF(VAR111,1)) AND (VAR111 > REF(VAR111,1)),LOW*0.95,'全倉'),COLORYELLOW;}
DRAWICON((REF(VAR111,2) < REF(VAR111,1)) AND (VAR111 < REF(VAR111,1)),HIGH*1.10,6);
{DRAWTEXT((REF(VAR111,2) < REF(VAR111,1)) AND (VAR111 < REF(VAR111,1)),HIGH*1.06,'清倉'),COLORYELLOW;}
Y_1:=STRCAT(HYBLOCK,' ');{行業(yè)}
Y_2:=STRCAT(Y_1,DYBLOCK);{地域}
Y_3:=STRCAT(Y_2,' ');
Y_4:=STRCAT(Y_3,GNBLOCK);{所屬概念}
Y_5:=STRCAT(Y_4,' ');
Y_6:=STRCAT(Y_5,FGBLOCK);{所屬風(fēng)格}
DRAWTEXT_FIX(ISLASTBAR,0.00,0.00,0,STRCAT(Y_5,FGBLOCK)),COLORYELLOW;{以上組合};
DRAWTEXT_FIX(1,0.00,0.06,0,STRCAT('業(yè)績預(yù)報：',EXTERNSTR(0,3))),COLORYELLOW;
DRAWTEXT_FIX(1,0.00,0.12,0,STRCAT('解禁日期：',EXTERNSTR(0,4))),COLORYELLOW;
今日波幅:=100*(DYNAINFO(5)-DYNAINFO(6))/DYNAINFO(6);
今日價差:=DYNAINFO(5)-DYNAINFO(6);
DRAWTEXT_FIX(1,0.00,0.18,0,STRCAT(STRCAT('今日最大振幅: ',CON2STR(今日波幅,2)),' %')),COLORWHITE;
DRAWTEXT_FIX(1,0.12,0.18,0,STRCAT(STRCAT('今日高低價差: ',CON2STR(今日價差,2)),' 元')),COLORWHITE;
DRAWNUMBER(ISLASTBAR ,C,C),COLORFF00FF;
