MA1:MA(CLOSE,M1);
MA2:MA(CLOSE,M2);
MAK:MA(CLOSE,M3);
MAQ:MA(CLOSE,M4);
N1:=IF(BARSCOUNT(C)>=10,10,BARSCOUNT(C));
STICKLINE(C>=MA(C,N1),MA(C,N1),MA(C,N1*0.7),4,0),COLORMAGENTA;
STICKLINE(C<=MA(C,N1),MA(C,N1),MA(C,N1*0.7),4,0),COLORGREEN;
DRAWKLINE(H,O,L,C);
Q1:=MAX(MAK,MAQ);
K:=CROSS(C,Q1) AND (C-REF(C,1))/REF(C,1)*100>=3 AND FINANCE(42)>800;
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('创业板.........附件里的公式不加密
