【通达信免费源码】简单实用主图,进来瞧瞧不后悔(源码 说明 用通达信
2022-07-03    来源:未知    编辑:掌上指标
VAR1:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14)))); VAR2:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14)))); VAR3:=(1

	VAR1:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
	VAR2:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
	VAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));
	DIR2:=ABS(CLOSE-REF(CLOSE,10));
	VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),10);
	ER2:=DIR2/VIR2;
	CS2:=ER2*(0.8-2/24)+2/24;
	CQ2:=CS2*CS2;
	AMA2:EMA(DMA(CLOSE,CQ2),2),COLORGREEN,LINETHICK2;
	AMA3:IF(AMA2/REF(AMA2,1)>0.997,AMA2,DRAWNULL),COLORYELLOW,LINETHICK2;
	AMA4:IF(AMA2/REF(AMA2,1)>1.001,AMA2,DRAWNULL),COLORRED,LINETHICK2;
	PT:=REF(H,1)-REF(L,1);
	CDP:=(REF(H,1)+REF(L,1)+REF(C,1)*2)/4;
	AH:=CDP+PT;
	AL:=CDP-PT;
	NH:=CDP*2-REF(L,1);
	NL:=CDP*2-REF(H,1);
	强:IF(AH>REF(C,1)*1.1,REF(C,1)*1.1,AH)NODRAW;
	阻:IF(NH>强,(强-CDP)*0.618+CDP,NH)NODRAW,COLORCYAN;
	M:=IF(AL<REF(C,1)/1.1,REF(C,1)/1.1,AL);
	撑:IF(NL<M,CDP-(CDP-M)*0.618,NL)NODRAW;
	底:IF(AL<REF(C,1)/1.1,REF(C,1)/1.1,AL)NODRAW;
	STICKLINE(((OPEN < CLOSE) AND (VAR2 < MA(VAR3,6))),(CLOSE * 0.998),(OPEN * 1.002),2,0),COLORRED;
	A1:=EMA(C,14)COLORWHITE,LINETHICK1;
	A1X:=(A1-REF(A1,1))/REF(A1,1)*100,NODRAW;
	突破:REF(EMA(C,14),1),NODRAW;
	距离:(C-突破)/突破*100,NODRAW;




					  
					  
					  
					  
					  
