都是从网收集来的指标,我放在一起啦,方便看。信号较多,可靠程度自已参照历史分析吧,不同个股的准确度是不一样的,因为主力操作手法不一样的。
	股市变幻不定,主力也要跟大势,大家也要跟大势操作,先分析大盘,再分析个股。
	安全点操作,就是MA18变绿时操作。
	有什么建议可说出控讨一下,以便修改,因为在大智慧中运行太慢,不建议在大智慧中使用。
	参数较多,自已看图添加吧。共七个参数。
	公式取名:世事如棋
	以下源码是一个公式,不要分开,不想输参数把这个放在第一行试下:
	input:N1(30,1,100),N2(3,1,100),P1(15,1,100),P2(3,1,100),Long(26,1,100),Short(12,1,100),M(9,1,100),N(5,1,10);
上百人看了,只有一个回贴的,可能大家不喜欢这类公式吧。
	更改记录:
	11-Feb-2010: 增加了波段趋势的买卖点提示及老砖家K线及买卖点
	请同时选中"主图叠加"及"主图"。
	==============================================================================
	input:N1(30,1,100),N2(3,1,100),P1(15,1,100),P2(3,1,100),Long(26,1,100),Short(12,1,100),M(9,1,100),N(5,1,10);
variable:a1=0;
	MA5:MA(C,5),COLORYELLOW;
	MA10:=MA(CLOSE,10);
	MA18:MA(CLOSE,18),colorgreen;
	IF(MA10>MA18,MA10,MA18),COLORRED;
	{薛斯通道}
	薛斯长顶: MA(HIGH,n1)*(1+p1/100),colorwhite;
	薛斯短顶: MA(HIGH,n2)*(1+p2/100),colorFFCCCC;
	薛斯短底: MA(LOW,n2)*(1-p2/100),colorff00ff;
	薛斯长底: MA(LOW,n1)*(1-p1/100),colorFF9933;
	{机构MACD买卖}
	{需要参数Long:26,20,100 Short:12,5,40 M:9,2,60}
	DIFF:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);
	DEA:=EMA(DIFF,M);
	MACD2:=2*(DIFF-DEA);
	DU0:=CROSS(DIFF,0);
	UD0:=CROSS(0,DIFF);
	TDU0:=BARSLAST(DU0);
	TUD0:=BARSLAST(UD0);
	DU3:=REF(DU0,1);
	UD3:=REF(UD0,1);
	TDU3:=BARSLAST(DU3);
	TUD3:=BARSLAST(UD3);
	UDGLINE:=IF(TDU3<TUD3,REF(HHV(HIGH,2),TDU3),REF(LLV(LOW,2),TUD3));
	JDU0:=REF(CLOSE,1)<=REF(UDGLINE,1) AND CLOSE>UDGLINE AND TDU0<TUD0;
	JUD0:=REF(CLOSE,1)>=REF(UDGLINE,1) AND CLOSE<UDGLINE AND TUD0<TDU0;
	JDU1:=JDU0 AND COUNT(JDU0,TDU0)=1;
	JUD1:=JUD0 AND COUNT(JUD0,TUD0)=1;
	JDU2:=JDU1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1);
	JUD2:=JUD1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1);
	JDU3:=JDU1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1);
	JUD3:=JUD1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1);
	{BSLINE:=IF(BARSLAST(JDU2)<BARSLAST(JUD2),IF(REF(CROSS(0,MACD2),1),LLV(LOW,2),REF(LLV(LOW,2),BARSLAST(REF(CROSS(0,MACD2),1)))),IF(REF(CROSS(MACD2,0),1),HHV(HIGH,2),REF(HHV(HIGH,2),BARSLAST(REF(CROSS(MACD2,0),1)))));}
	DEFUT:=BARSLAST(CROSS(MACD2,0));
	DEFDT:=BARSLAST(CROSS(0,MACD2));
	DEFUL:=IF(MACD2>=0,HHV(MACD2,DEFUT+1),REF(HHV(MACD2,DEFUT+1),DEFDT+1));
	DEFDL:=IF(MACD2<0,LLV(MACD2,DEFDT+1),REF(LLV(MACD2,DEFDT+1),DEFUT+1));
	DEFU2L:=REF(DEFUL,DEFUT+1);
	DEFD2L:=REF(DEFDL,DEFDT+1);
	DRAWTEXT(LLV(MACD2,4)>0 AND MACD2<REF(MACD2,1) AND REF(MACD2,1)>REF(MACD2,2) AND REF(MACD2,2)>REF(MACD2,3),HIGH*1.04,'机构卖'),colorgreen;
	DRAWTEXT(HHV(MACD2,4)<0 AND MACD2>REF(MACD2,1) AND REF(MACD2,1)<REF(MACD2,2) AND REF(MACD2,2)<REF(MACD2,3),LOW*0.98,'机构买'),color0033CC;
	DRAWTEXT((JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1)) AND MACD2>=0 AND REF(MACD2,1)<REF(DEFU2L,1) AND MACD2>DEFU2L,HIGH*1.04,'关注卖'),colorFFFF33;
	DRAWTEXT((JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1)) AND MACD2<0 AND REF(MACD2,1)>REF(DEFD2L,1) AND MACD2<DEFD2L,LOW*0.98,'关注买'),color66cccc;
	{创幻搜牛-主图}
	生命线:=WMA(WMA((3*CLOSE+LOW+OPEN+HIGH)/6,18),1);
	Var1:=(OPEN+CLOSE+LOW+HIGH)/4;
	分水岭:= WMA(3*Var1-2*WMA(Var1,38),18);
	Var2:=IF(Var1<分水岭,Var1,分水岭);
	Var3:=2*WMA(LLV(Var1,18),18)-Var1;
	搜牛:=3*Var3-2*DMA(Var3,10)+0.05*9;
	DRAWTEXT(CROSS(生命线,搜牛),LOW*0.84,'牛起'),colorred;
	CYC5:=0.01*EMA(AMOUNT,P1)/EMA(VOL,P1);
	maxcyc:=dma((c+o)/2,v/capital);
	c1:=INTPART(CYC5*100*0.96)/100;
	a2:=INTPART(REF(CYC5,1)*100)/100;
	a3:=INTPART(REF(CYC5,1)*0.96*100)/100;
	vv:=INTPART(MIN(CAPITAL*0.05,REF(MA(VOL,34),1))/100);
	a40:=INTPART(maxcyc*100)/100;
	a41:=INTPART(REF(MAXCYC,1)*100)/100;
	a4:=a1=0 and CLOSE>a2 or (REF(VOL/100,1)<vv and CLOSE>INTPART(a2*0.98*100)/100 and VOL>MIN(CAPITAL*0.05,REF(MA(VOL,34),1)));
	a5:=a1=1 and CLOSE<MIN(a3,a41);
	a1:=IF(a4=1,1,IF(a5=1,0,REF(a1,1)));
	DRAWTEXT(CROSS(a1,0),LOW*0.94,'B'),coloryellow;
	DRAWTEXT(CROSS(1,a1),HIGH*1.06,'S'),COLORgreen;
	{DRAWFLAGTEXT(a1=0 and (c1*0.98-CLOSE)/CLOSE>0.1,CLOSE,'持币');
	DRAWFLAGTEXT(a1=0 and (c1*0.98-CLOSE)/CLOSE<=0.1 and REF(VOL/100,1)<vv,CLOSE,'明日收盘价超过'+str(c1)+';或收盘价超过 '+str(INTPART(c1*0.98*100)/100)+'且成交量大于'+str(vv)+'买入');
	DRAWFLAGTEXT(a1=0 and (c1*0.98-CLOSE)/CLOSE<=0.1 and REF(VOL/100,1)>=vv,CLOSE,'明日收盘价超过'+str(c1)+'买入');
	DRAWFLAGTEXT(a1=1 and (CLOSE-MIN(c1,a40))/MIN(c1,a40)>0.1 ,CLOSE,'持股');
	DRAWFLAGTEXT(a1=1 and (CLOSE-MIN(c1,a40))/MIN(c1,a40)<=0.1 ,CLOSE,'明日收盘价跌破'+str(MIN(c1,a40))+'卖出');
	}
	{创幻雷达顶点}
	RSV1:=(HHV(HIGH,9.8)-CLOSE)/(HHV(HIGH,9.8)-LLV(LOW,9.8))*101;
	KK:=SMA(RSV1,3,1);
	DD:=SMA(KK,3,1);
	JJ:=3*KK-2*DD;
	XW1:=IF(JJ>=100,100,IF(JJ<=0,0,JJ));
	DRAWTEXT(REF(XW1,1)=0 AND XW1>0,HIGH*1.08,'见顶'),colorgreen;

 
       
       
       
       
      