盈亏平衡主图源码 EA

盈亏平衡主图源码

rn

{系统设置：  多日 = 3日 ；}   
rn {参数设置：N(1,9,3),阶段顶底处采样K线的个数; KG(0,1,0),平衡线、普通MA均线的转换开关}

rn

INPUT:N(3,1,9),KG(0,0,1);
rnA:=DATATYPE;KK:=0;  
rnTJ1:=A<1 OR A>6 AND A<>9 OR KG;  
rnTJ2:=A<2 OR A>6 AND A<>9 OR KG;  
rnTJ3:=A<3 OR A>7 AND A<>9 OR KG;  
rnTJ4:=A<4 OR A=8 OR KG;  
rnTJ5:=A<5 OR A=8 OR KG;  
rn{10日盈亏平衡线，根据牛熊界线基准线内插；当KG=1时，显示普通均线MA(C,10)}  
rnN1:=IF(A=6,10,IF(A=7,2,IF(A=10,3,IF(A=5,40,IF(A=4,80,IF(A=3,160,480))))));  
rnH10:=IF(TJ1,KK,IF(CAPITAL,HHV(EMA(H+C,N),N1)*0.933,HHV(EMA(H+C,N),N1)*0.983));  
rnL10:=IF(TJ1,KK,IF(CAPITAL,LLV(EMA(L+C,N),N1)*1.067,LLV(EMA(L+C,N),N1)*1.017));  
rnYK10R:IF(TJ1,MA(C,10),(H10+L10)/4),LINETHICK1,PRECISION2;  
rn{30日盈亏平衡线，根据牛熊界线基准线内插；当KG=1时，显示普通均线MA(C,30)}  
rnN2:=IF(A=6,30,IF(A=7,6,IF(A=10,10,IF(A=5,120,IF(A=4,240,480)))));  
rnH30:=IF(TJ2,KK,IF(CAPITAL,HHV(EMA(H+C,N),N2)*0.9,HHV(EMA(H+C,N),N2)*0.95));  
rnL30:=IF(TJ2,KK,IF(CAPITAL,LLV(EMA(L+C,N),N2)*1.1,LLV(EMA(L+C,N),N2)*1.05));  
rnYK30R:IF(TJ2,MA(C,30),(H30+L30)/4),LINETHICK1,PRECISION2;  
rn{60日盈亏平衡线，根据牛熊界线基准线内插；当KG=1时，显示普通均线MA(C,60)}  
rnN3:=IF(A=6,60,IF(A=7,12,IF(A=8,3,IF(A=10,20,IF(A=5,240,IF(A=4,480,480))))));  
rnH60:=IF(TJ3,KK,IF(CAPITAL,HHV(EMA(H,N),N3)*0.8,HHV(EMA(H,N),N3)*0.9));  
rnL60:=IF(TJ3,KK,IF(CAPITAL,LLV(EMA(L,N),N3)*1.2,LLV(EMA(L,N),N3)*1.1));  
rnYK60R:IF(TJ3,MA(C,60),(H60+L60)/2),LINETHICK1,PRECISION2;  
rn{120日盈亏平衡线，牛熊界线基准线；当KG=1时，显示普通均线MA(C,120)即半年线}  
rnN4:=IF(A=5,480,IF(A=6,120,IF(A=7,24,IF(A=8,6,IF(A=10,40,IF(A=9,2,480))))));  
rnH120:=IF(TJ4,KK,IF(CAPITAL,HHV(EMA(H,N),N4)*0.7,HHV(EMA(H,N),N4)*0.8));  
rnL120:=IF(TJ4,KK,IF(CAPITAL,LLV(EMA(L,N),N4)*1.3,LLV(EMA(L,N),N4)*1.2));  
rnYK120R:IF(TJ4,MA(C,120),(H120+L120)/2),COLOR1389EE,LINETHICK2,PRECISION2;  
rn{240日盈亏平衡线，根据牛熊界线基准线外推；当KG=1时，显示普通均线MA(C,240)即年线}  
rnN5:=IF(A=6,240,IF(A=7,48,IF(A=8,12,IF(A=9,1,IF(A=10,80,480)))));  
rnH240:=IF(TJ5,KK,IF(CAPITAL,HHV(EMA(H,N),N5)*0.8,HHV(EMA(H,N),N5)*0.9));  
rnL240:=IF(TJ5,KK,IF(CAPITAL,LLV(EMA(L,N),N5)*1.2,LLV(EMA(L,N),N5)*1.1));  
rnYK240R:IF(TJ5,MA(C,240),(H240+L240)/2),LINETHICK2,PRECISION2;  
rn{480日盈亏平衡线，根据牛熊界线基准线外推；当KG=1时，显示普通均线MA(C,480)即2年线}  
rnN6:=IF(A=6,480,IF(A=7,96,IF(A=8,24,IF(A=10,160,IF(A=9,2,480)))));  
rnH480:=IF(TJ5,KK,IF(CAPITAL,HHV(EMA(H,N),N6)*0.70,HHV(EMA(H,N),N6)*0.8));  
rnL480:=IF(TJ5,KK,IF(CAPITAL,LLV(EMA(L,N),N6)*1.3,LLV(EMA(L,N),N6)*1.2));  
rnYK480R:IF(TJ5,MA(C,480),(H480+L480)/2),COLORBLUE,LINETHICK2,PRECISION2;

rn