「翔博精选指标」跟庄买进+黄金分割金叉(通达信公式 主图 源码免费资源
公式只是协助看盘分析的工具,没有100%准确,不喜好者勿下勿喷。
	跟庄买进+黄金分割金叉  主图指标}
	{参数  T:10, 10000, 150; TT:1,100,3 ;  N1: 0 , 500 , 0}
	
	
	MAA5:MA(C,5),COLORFF00FF,LINETHICK2;
	MAA10:=MA(C,10);
	MAA30:MA(C,30),COLORRED;
	KS:IF(MAA10>MAA30,MAA10,MAA30),COLOR999900;
	A3:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
	A4:=SMA(A3,3,1);
	A5:=SMA(A4,3,1);
	A6:=3*A4-2*A5;
	A7:=C-REF(C,1);
	A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6);
	买:=LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2));
	DRAWTEXT(FILTER(买=1,5),LOW*0.98,'↖跟庄买进'),COLORYELLOW;
	STICKLINE(买,O,C,2,0),COLORYELLOW;
	VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
	VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
	VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
	VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
	VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
	VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
	VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
	VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
	VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
	VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
	VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
	VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
	STICKLINE(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR
	VAR8 OR VAR9 OR VARA OR VARB OR VARC,C,O,3,1),COLORRED;{红1}
	VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
	VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
	VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
	VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
	VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
	VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
	VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
	VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
	VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
	VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
	VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
	VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
	STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR
	VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,C,O,3,0),COLORFFCC66;
	VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR
	VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1;
	STICKLINE(VAR19,C,O,3,1),COLORYELLOW;
	VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR
	VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD;
	STICKLINE(VAR1A,REF(C,1),REF(O,1),3,2),COLOR00FF00{98FD};
	STICKLINE(VAR19,REF(C,1),REF(O,1),3,0),COLOR00C8FF;
	STICKLINE(VAR19,REF(C,1),REF(O,1),3,0),COLOR10ECFF;
	STICKLINE(VAR19,REF(C,1),REF(O,1),3,0),COLOR10FFFF;
	STICKLINE(VAR1A,REF(C,1),REF(O,1),3,0),COLOR00D900;
	STICKLINE(VAR1A,REF(C,1),REF(O,1),3,0),COLORBLUE;
	STICKLINE(VAR1A,REF(C,1),REF(O,1),0,0),COLOR090FF2;
	PMA:MA(C,5),COLORWHITE,LINETHICK2;
	IF(PMA>REF(PMA,1),PMA,DRAWNULL),COLORRED,LINETHICK2;
	IF(PMA<REF(PMA,1),PMA,DRAWNULL),COLORGREEN,LINETHICK2;
	
	
	
	
	{T:10 10000 150;TT:1,100,3 ; N1: 0 , 500 , 0}
	AMOV:=VOL*(OPEN+CLOSE)/2;
	
	
	MAA:MA(C,N1),COLOR00FF00;
	DRAWTEXT(ISLASTBAR AND N1>0 AND MAA>REF(MAA,1),MAA,'↑'),COLOR00FF00;
	DRAWTEXT(ISLASTBAR AND N1>0 AND MAA<REF(MAA,1),MAA,'↓'),COLOR00FF00;
	高1:=REF(HHV(H,T),TT);
	低1:=REF(LLV(L,T),TT);
	H1:=高1-(高1-低1)*0.191;
	H2:=高1-(高1-低1)*0.382;
	H3:=高1-(高1-低1)*0.5;
	H4:=高1-(高1-低1)*0.618;
	H5:=高1-(高1-低1)*0.809;
	顶:REFDATE(高1,DATE),COLORFFFF00;
	一:REFDATE(H1,DATE),DOTLINE,COLORYELLOW;
	二:REFDATE(H2,DATE),DOTLINE,COLORMAGENTA;
	三:REFDATE(H3,DATE),COLOR00FFFF;
	四:REFDATE(H4,DATE),DOTLINE,COLORMAGENTA;
	五:REFDATE(H5,DATE),DOTLINE,COLORYELLOW;
	低:REFDATE(低1,DATE),COLOR00FF00;
	TT3:=(CURRBARSCOUNT=3);
	TT4:=(CURRBARSCOUNT=1);
	DRAWNUMBER(TT3 AND 顶,顶,顶),COLOR999900;
	DRAWTEXT(TT4 AND 顶,顶,'顶:'),COLOR208FFF;
	DRAWNUMBER(TT3 AND 一,一,一),COLOR999999;
	DRAWTEXT(TT4 AND 一,一,'0.191:'),COLOR208FFF;
	DRAWNUMBER(TT3 AND 二,二,二),COLOR999999;
	DRAWTEXT(TT4 AND 二,二,'0.382:'),COLOR208FFF;
	DRAWNUMBER(TT3 AND 三,三,三),COLOR999999;
	DRAWTEXT(TT4 AND 三,三,'0.500:'),COLOR208FFF;
	DRAWNUMBER(TT3 AND 四,四,四),COLOR999999;
	DRAWTEXT(TT4 AND 四,四,'0.618:'),COLOR208FFF;
	DRAWNUMBER(TT3 AND 五,五,五),COLOR999999;
	DRAWTEXT(TT4 AND 五,五,'0.809:'),COLOR208FFF;
	DRAWNUMBER(TT3 AND 低,低*1.01,低),COLOR999900;
	DRAWTEXT(TT4 AND 低,低*1.009,'低:'),COLOR208FFF;
	AS:=(O+H+L+C)/4;
	BL:EMA(AS,17),LINETHICK2,COLOR0000FF;
	DRAWNUMBER(ISLASTBAR AND BL,BL*1.005,BL);
	XGM:=CROSS(C,BL);
	DRAWICON(XGM,BL,9);
	IF(BL>REF(BL,1),BL,DRAWNULL),LINETHICK2,COLORYELLOW;
	IF(BL<REF(BL,1),BL,DRAWNULL),LINETHICK2,COLOR00FF00;
	DRAWTEXT(ISLASTBAR AND BL>REF(BL,1),BL,'↑'),COLOR00FFFF;
	DRAWTEXT(ISLASTBAR AND BL<REF(BL,1),BL,'↓'),COLOR00FF00;
	DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
	DEA:=EMA(DIFF,9);
	MACD:=2*(DIFF-DEA),;
	GMB:IF(CROSS(DIFF,DEA) AND DIFF>0,L*0.999,DRAWNULL),CROSSDOT,LINETHICK3,COLOR00FFFF;
	GMC:IF(CROSS(DIFF,DEA) AND DIFF<0,L*0.999,DRAWNULL),CROSSDOT,LINETHICK3,COLOR208FFF;
	DRAWTEXT(CROSS(DIFF,DEA) AND DIFF>0,L*0.998,'金叉>0'),COLORYELLOW;
	DRAWTEXT(CROSS(DIFF,DEA) AND DIFF<0,L*0.998,'金叉<0'),COLORYELLOW;
	RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
	K:=SMA(RSV,3,1);
	D:=SMA(K,3,1);
	GJD:IF(CROSS(K,D) AND K>20 AND D<50,L*0.999,DRAWNULL),CROSSDOT,LINETHICK3,COLORFF00FF;
	DRAWTEXT(CROSS(K,D) AND K>20 AND D<50,L*0.998,'K>20 D<50 KD金叉 '),COLOREEAAEE;
	




 
					   
					   
					   
					   
					  

 
