NK:=IF(BARSCOUNT(C)>=45,45,BARSCOUNT(C));
STICKLINE(C>=MA(C,NK),MA(C,NK),MA(C,NK*0.7),4,0),COLORYELLOW;
STICKLINE(C<=MA(C,NK),MA(C,NK),MA(C,NK*0.7),4,0),COLORBLUE;
DRAWKLINE(H,O,L,C);{中线}
NN:=IF(BARSCOUNT(C)>=10,10,BARSCOUNT(C));
STICKLINE(C>=MA(C,NN),MA(C,NN),MA(C,NN*0.7),4,0),COLORMAGENTA;
STICKLINE(C<=MA(C,NN),MA(C,NN),MA(C,NN*0.7),4,0),COLORGREEN;
DRAWKLINE(H,O,L,C);{短线}
MAK:MA(CLOSE,450),COLORMAGENTA;
MAQ:MA(CLOSE,550),COLORGREEN;
Q1:=MAX(MAK,MAQ);
K:=CROSS(C,Q1) AND (C-REF(C,1))/REF(C,1)*100>=3;
DRAWTEXT(K,L*0.97,'神奇B点'),COLOR0000FF;
STICKLINE(K,H,L,0.3,0.1),COLOR00FF80;
STICKLINE(K,O,C,3,0),COLOR00FF80;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.01,0,HYBLOCK),COLOR0000FF;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.07,0,DYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.13,0,GNBLOCK),COLORFF00FF;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.2,0,FGBLOCK),COLOR0080FF;
DD11:=0.9;
DD22:=1.2;
{黄金柱}
M:=30;
N:=15;
AJ:=HHV(H,M)=H;
AJT:=BARSLAST(AJ);
AJ1:=LLV(L,N)=L;
AJ1T:=BARSLAST(AJ1);
TJ:=HHV(H,M)=H;
TJT:=BARSLAST(TJ);
TJ1T:=BARSLAST(AJ1);
{STICKLINE((TJT=0,H,TJ1T=0) AND AJ1 AND FILTERX(AJ1,TJT+1) ,REF(L,TJ1T)
,REF(H,TJT),0,0)COLORBLUE,LINETHICK3;}
OUT:=STICKLINE((TJT=0,H,TJ1T=0) AND AJ1 AND FILTERX(AJ1,TJT+1) ,REF(L,TJ1T)
,REF(H,TJT),0,0);
{KDJ日金}
日K:="KDJ.K#DAY"(9,3,3);
日D:="KDJ.D#DAY"(9,3,3);
{MACD日金}
日DIF:="MACD.DIF#DAY"(12,26,9);
日DEA:="MACD.DEA#DAY"(12,26,9);
{RSI日}
日RSI:="RSI.RSI1#DAY"(9);
{KDJ周金}
周K:="KDJ.K#WEEK"(9,3,3);
周D:="KDJ.D#WEEK"(9,3,3);
{MACD周金}
周DIF:="MACD.DIF#WEEK"(12,26,9);
周DEA:="MACD.DEA#WEEK"(12,26,9);
{RSI周}
周RSI:="RSI.RSI1#WEEK"(9);
{KDJ月金}
月K:="KDJ.K#MONTH"(9,3,3);
月D:="KDJ.D#MONTH"(9,3,3);
{MACD月金}
月DIF:="MACD.DIF#MONTH"(12,26,9);
月DEA:="MACD.DEA#MONTH"(12,26,9);
{RSI月}
月RSI:="RSI.RSI1#MONTH"(9);
X1:=日K>日D;
X2:=日DIF>日DEA;
X3:=日RSI>50;
X4:=周K>周D;
X5:=周DIF>周DEA;
X6:=周RSI>50;
X7:=月K>月D;
X8:=月DIF>月DEA;
X9:=月RSI>50;
黑马初显:=X1 AND X2 AND X3 AND X4 AND X5 AND X6 AND X7 AND X8 AND X9;
月RSI1:="RSI.RSI1#MONTH"(9);
A:=月RSI1>50;
月共振:=CROSS(A>REF(A,1),0.5);
周RSI1:="RSI.RSI1#WEEK"(9);
AAAA:=周RSI1>50;
周共振:=CROSS(AAAA>REF(AAAA,1),0.5);
周K1:="KDJ.K#WEEK"(9,3,3),COLORBLUE;
周D1:="KDJ.D#WEEK"(9,3,3),COLORBLUE;
AAAAAA:=周K1>周D1;
首周K:=CROSS(AAAAAA>REF(AAAAAA,1),0.5);
AK1:=IF(INBLOCK('创业板'),1,0);
{创业板}
流通市值:=FINANCE(40)/100000000;
AK2:=流通市值<=300 AND FINANCE(42)>30 AND C<=65;
{流通市值小于300亿，上市天数大于30天，股价低于65元}
AK:=AK1 AND AK2;
MMM1:=月共振 AND NOT(周共振)AND AK;
MMM2:=月共振 AND 周共振 AND AK;
MMM3:=MMM1 AND 首周K;
MMM4:=MMM2 AND 首周K;
DRAWICON(MMM1,L*0.98,26);
DRAWICON(MMM2,L*0.98,9);
DRAWBMP(MMM1,H*1.2,'Q1A');
DRAWBMP(MMM2,H*1.2,'15A');
DRAWICON(MMM1,L*0.92,44);
DRAWICON(MMM2,L*0.92,42);
DRAWICON(MMM3,L*0.86,1);
DRAWICON(MMM4,L*0.86,1);
十大股东占比:(FINVALUE(244)/FINVALUE(239))*100,NODRAW,COLORYELLOW;
筹码衰减系数:100/(100-十大股东占比),NODRAW,COLORCYAN;
{十大股东占比小于65%时，无需修改衰减系数 分析家公式网HTTP://WWW.70822.COM}
DRAWTEXT_FIX(1,0.5,0,0,'注：黄蓝带为中线级别，粉绿带为短线级别'),COLORYELLOW;
