通达信均线粘合同图指标公式源码
N:=5;
M:=3;
JX5:=MA(C,5);JX13:=MA(C,13);JX24:=MA(C,24);JX60:=MA(C,60);JX120:=MA(C,120);JX250:=MA(C,250);
NHD1:=100*(MAX(JX5,MAX(JX13,JX24))/MIN(JX5,MIN(JX13,JX24))-1);
NHD2:=100*(MAX(JX13,MAX(JX24,JX60))/MIN(JX13,MIN(JX24,JX60))-1);
NHD3:=100*(MAX(JX24,MAX(JX60,JX120))/MIN(JX24,MIN(JX60,JX120))-1);
NHD4:=100*(MAX(JX60,MAX(JX120,JX250))/MIN(JX60,MIN(JX120,JX250))-1);
NHD5:=100*(MAX(JX5,MAX(JX13,MAX(JX24,JX60)))/MIN(JX5,MIN(JX13,MIN(JX24,JX60)))-1);
NHD6:=100*(MAX(JX13,MAX(JX24,MAX(JX60,JX120)))/MIN(JX13,MIN(JX24,MIN(JX60,JX120)))-1);
NHD7:=100*(MAX(JX24,MAX(JX60,MAX(JX120,JX250)))/MIN(JX24,MIN(JX60,MIN(JX120,JX250)))-1);
NHD8:=100*(MAX(JX5,MAX(JX13,MAX(JX24,MAX(JX60,JX120))))/MIN(JX5,MIN(JX13,MIN(JX24,MIN(JX60,JX120))))-1);
NHD9:=100*(MAX(JX5,MAX(JX13,MAX(JX24,MAX(JX60,JX250))))/MIN(JX5,MIN(JX13,MIN(JX24,MIN(JX60,JX250))))-1);
NHD10:=100*(MAX(JX5,MAX(JX13,MAX(JX24,MAX(JX120,JX250))))/MIN(JX5,MIN(JX13,MIN(JX24,MIN(JX120,JX250))))-1);
NHD11:=100*(MAX(JX5,MAX(JX13,MAX(JX60,MAX(JX120,JX250))))/MIN(JX5,MIN(JX13,MIN(JX60,MIN(JX120,JX250))))-1);
NHD12:=100*(MAX(JX5,MAX(JX24,MAX(JX60,MAX(JX120,JX250))))/MIN(JX5,MIN(JX24,MIN(JX60,MIN(JX120,JX250))))-1);
NHD13:=100*(MAX(JX13,MAX(JX24,MAX(JX60,MAX(JX120,JX250))))/MIN(JX13,MIN(JX24,MIN(JX60,MIN(JX120,JX250))))-1);
NHD14:=100 * (MAX(JX5, MAX(JX13, MAX(JX24, MAX(JX60, MAX(JX120, JX250))))) / MIN(JX5, MIN(JX13, MIN(JX24, MIN(JX60, MIN(JX120, JX250))))) - 1);
NF1:=EVERY(REF(NHD1,1)>NHD1,M) AND NHD1<N ;
NF2:=EVERY(REF(NHD2,1)>NHD2,M) AND NHD2<N;
NF3:=EVERY(REF(NHD3,1)>NHD3,M) AND NHD3<N;
NF4:=EVERY(REF(NHD4,1)>NHD4,M) AND NHD4<N ;
NF5:=EVERY(REF(NHD5,1)>NHD5,M) AND NHD5<N ;
NF6:=EVERY(REF(NHD6,1)>NHD6,M) AND NHD6<N;
NF7:=EVERY(REF(NHD7,1)>NHD7,M) AND NHD7<N;
NF8:=EVERY(REF(NHD8,1)>NHD8,M) AND NHD8<N ;
NF9:=EVERY(REF(NHD9,1)>NHD9,M) AND NHD9<N ;
Nf10:=EVERY(REF(NHD10,1)>NHD10,M) AND NHD10<N;
NF11:=EVERY(REF(NHD11,1)>NHD11,M) AND NHD11<N;
NF12:=EVERY(REF(NHD12,1)>NHD12,M) AND NHD12<N;
NF13:=EVERY(REF(NHD13,1)>NHD13,M) AND NHD13<N;
NF14:=EVERY(REF(NHD14,1)>NHD14,M) AND NHD14<N;
1.05,POINTDOT,COLORWHITE;
NH3:=IF(NF1 OR NF2 OR NF3 OR NF4,3,0);
NH4:=IF(NF5 OR NF6 OR NF7,4,0);
NH5:=IF(NF8 OR NF9 OR NF10 OR NF11 OR NF12 OR NF13,5,0);
NH6:=IF(NF14,6,0);
STICKLINE(NF1,0,0.8,1,0),COLORE47833;
STICKLINE(NF5,0,0.8,1,0),COLOR32CD32;
STICKLINE(NF8,0,0.8,1,0),COLOR0B86B8;
STICKLINE(NF14,0,0.8,1,0),COLORCD00CD;
三粘:100*(MAX(JX5,MAX(JX13,JX24))/MIN(JX5,MIN(JX13,JX24))-1),COLORE47833,NODRAW;
四粘:100*(MAX(JX5,MAX(JX13,MAX(JX24,JX60)))/MIN(JX5,MIN(JX13,MIN(JX24,JX60)))-1),COLOR32CD32,NODRAW;
五粘:100*(MAX(JX5,MAX(JX13,MAX(JX24,MAX(JX60,JX120))))/MIN(JX5,MIN(JX13,MIN(JX24,MIN(JX60,JX120))))-1),COLOR0B86B8,NODRAW;
六粘:100 * (MAX(JX5, MAX(JX13, MAX(JX24, MAX(JX60, MAX(JX120, JX250))))) / MIN(JX5, MIN(JX13, MIN(JX24, MIN(JX60, MIN(JX120, JX250))))) - 1),COLORCD00CD,NODRAW;