预判大盘的利器：时间趋势动力线指标
MA1:向前引用(简单移动平均(收盘价,3),3),LINETHICK2,COLORRED;
fbars:=系统参数(3)-1;
tj:=第一个条件成立位置(收盘价)>fbars-3;
fc:=MA1;
fo:=MA1;
fl:=最低值(MA1,2);
fh:=最高值(MA1,2);
<%
vbars=ffl.vardata("fbars")
vc=ffl.vardata("fc")
vo=ffl.vardata("fo")
vh=ffl.vardata("fh")
vl=ffl.vardata("fl")
vend=ubound(vc)
n=3
if vbars<=vend and vbars>vend-vbars+n then
redim temp(vend-vbars+n,3)
for i=2*vbars-vend-n to vbars
ii=i+vend-2*vbars+n
temp(ii,0)=2*vc(vbars)-vo(i)
temp(ii,1)=2*vc(vbars)-vh(i)
temp(ii,2)=2*vc(vbars)-vl(i)
temp(ii,3)=2*vc(vbars)-vc(i)
next
for i=vbars-n to vend
ii=vend-i
vo(i)=temp(ii,3)
vh(i)=temp(ii,2)
vl(i)=temp(ii,1)
vc(i)=temp(ii,0)
next
ffl.vardata("fc")=vc
ffl.vardata("fo")=vo
ffl.vardata("fh")=vh
ffl.vardata("fl")=vl
end if
%>
画分段线(tj,fc),shift3;
MA3:向前引用(简单移动平均(收盘价,25),5),LINETHICK2,COLORBLUE;
fbars:=系统参数(3)-1;
tj:=第一个条件成立位置(收盘价)>fbars-3;
fc:=MA3;
fo:=MA3;
fl:=最低值(MA3,2);
fh:=最高值(MA3,2);
<%
vbars=ffl.vardata("fbars")
vc=ffl.vardata("fc")
vo=ffl.vardata("fo")
vh=ffl.vardata("fh")
vl=ffl.vardata("fl")
vend=ubound(vc)
n=3
if vbars<=vend and vbars>vend-vbars+n then
redim temp(vend-vbars+n,3)
for i=2*vbars-vend-n to vbars
ii=i+vend-2*vbars+n
temp(ii,0)=2*vc(vbars)-vo(i)
temp(ii,1)=2*vc(vbars)-vh(i)
temp(ii,2)=2*vc(vbars)-vl(i)
temp(ii,3)=2*vc(vbars)-vc(i)
next
for i=vbars-n to vend
ii=vend-i
vo(i)=temp(ii,3)
vh(i)=temp(ii,2)
vl(i)=temp(ii,1)
vc(i)=temp(ii,0)
next
ffl.vardata("fc")=vc
ffl.vardata("fo")=vo
ffl.vardata("fh")=vh
ffl.vardata("fl")=vl
end if
%>
画分段线(tj,fc),shift3 | 
