软件名称:[B]A股盈亏平衡线[/B]
软件类型:国产软件
运行环境:Win9X/Win2000/WinXP/Win2003/
软件语言:简体中文
授权方式:免费版
软件大小:4.00 KB
官方主页:Home Page
更新时间:2009-09-29 16:29:54
软件简介:
{盈亏平衡
平衡表线,JIP_YKPH;TDX版;发明人及版权.JIPGEMLING.见凌见}
{系统设置: 多日 = 3日 ;}
{参数设置:N(1,9,3),阶段顶底处采样个数}
N:=3;
A:=PERIOD;KK:=DRAWNULL;
TJ1:=(A<1 OR A>6 AND A!=9);
TJ2:=(A<2 OR A>6 AND A!=9);
TJ3:=(A<3 OR A>7 AND A!=9);
TJ4:=(A<4 OR A=8);
TJ5:=(A<5 OR A=8);
{10日盈亏平衡线,根据牛熊界线基准线内插}
N1:=IF(A=5,10,IF(A=6,2,IF(A=9,3,IF(A=4,40,IF(A=3,80,IF(A=2,160,KK))))));
H10:=IF(TJ1,KK,IF(CAPITAL,HHV(EMA(H+C,N)/2,N1)*0.933,HHV(EMA(H+C,N)/2,N1)*0.983));
L10:=IF(TJ1,KK,IF(CAPITAL,LLV(EMA(L+C,N)/2,N1)*1.067,LLV(EMA(L+C,N)/2,N1)*1.017));
YK10R:IF(TJ1,KK,(H10+L10)/2),LINETHICK1;
{30日盈亏平衡线,根据牛熊界线基准线内插}
N2:=IF(A=5,30,IF(A=6,6,IF(A=9,10,IF(A=4,120,IF(A=3,240,KK)))));
H30:=IF(TJ2,KK,IF(CAPITAL,HHV(EMA(H+C,N)/2,N2)*0.9,HHV(EMA(H+C,N)/2,N2)*0.95));
L30:=IF(TJ2,KK,IF(CAPITAL,LLV(EMA(L+C,N)/2,N2)*1.1,LLV(EMA(L+C,N)/2,N2)*1.05));
YK30R:IF(TJ2,KK,(H30+L30)/2),LINETHICK1;
{60日盈亏平衡线,根据牛熊界线基准线内插}
N3:=IF(A=5,60,IF(A=6,12,IF(A=7,3,IF(A=9,20,IF(A=4,240,IF(A=3,480,KK))))));
H60:=IF(TJ3,KK,IF(CAPITAL,HHV(EMA(H,N),N3)*0.8,HHV(EMA(H,N),N3)*0.9));
L60:=IF(TJ3,KK,IF(CAPITAL,LLV(EMA(L,N),N3)*1.2,LLV(EMA(L,N),N3)*1.1));
YK60R:IF(TJ3,KK,(H60+L60)/2),LINETHICK1;
{120日盈亏平衡线,牛熊界线基准线}
N4:=IF(A=4,480,IF(A=5,120,IF(A=6,24,IF(A=7,6,IF(A=9,40,IF(A>=10,2,KK))))));
H120:=IF(TJ4,KK,IF(CAPITAL,HHV(EMA(H,N),N4)*0.7,HHV(EMA(H,N),N4)*0.8));
L120:=IF(TJ4,KK,IF(CAPITAL,LLV(EMA(L,N),N4)*1.3,LLV(EMA(L,N),N4)*1.2));
YK120R:IF(TJ4,KK,(H120+L120)/2),COLOR1389EE,LINETHICK2;
{240日盈亏平衡线,根据牛熊界线基准线外推}
N5:=IF(A=5,240,IF(A=6,48,IF(A=7,12,IF(A=10,4,IF(A=11,1,IF(A=9,80,KK))))));
H240:=IF(TJ5,KK,IF(CAPITAL,HHV(EMA(H,N),N5)*0.8,HHV(EMA(H,N),N5)*0.9));
L240:=IF(TJ5,KK,IF(CAPITAL,LLV(EMA(L,N),N5)*1.2,LLV(EMA(L,N),N5)*1.1));
YK240R:IF(TJ5,KK,(H240+L240)/2),LINETHICK2;
{480日盈亏平衡线,根据牛熊界线基准线外推}
N6:=IF(A=5,480,IF(A=6,96,IF(A=7,24,IF(A=9,160,IF(A=10,8,IF(A=11,2,KK))))));
H480:=IF(TJ5,KK,IF(CAPITAL,HHV(EMA(H,N),N6)*0.70,HHV(EMA(H,N),N6)*0.8));
L480:=IF(TJ5,KK,IF(CAPITAL,LLV(EMA(L,N),N6)*1.3,LLV(EMA(L,N),N6)*1.2));
YK480R:IF(TJ5,KK,(H480+L480)/2),LINETHICK2;
[url=http://www.70822.com/soft/sort013/sort05/down-13049.html]A股盈亏平衡线[/url]