飞狐亚当理论指标

{亚当理论指标}
 HH:=HIGH; LL:=LOW; OO:=OPEN; CC:=CLOSE;
<%
 vh=ffl.vardata("hh")
 vl=ffl.vardata("ll")
 vo=ffl.vardata("oo")
 vc=ffl.vardata("cc")
 last=ubound(vh)
 if last<101 then
 b=last+1
 else
 b=0
 for i=last-101 to last-51
 vh(i)=vh(i+51)
 vl(i)=vl(i+51)
 vo(i)=vo(i+51)
 vc(i)=vc(i+51)
 next
 a=(vh(last-51)+vl(last-51))/2
 j=1
 for i=last-49 to last
 j=j+2
 vh(i)=2*a-vl(i-j)
 vl(i)=2*a-vh(i-j)
 vo(i)=2*a-vc(i-j)
 vc(i)=2*a-vo(i-j)
 next
 end if
 ffl.vardata("hh")=vh
 ffl.vardata("ll")=vl
 ffl.vardata("oo")=vo
 ffl.vardata("cc")=vc
 ffl.varstartindex("hh")=b
 ffl.varstartindex("ll")=b
 ffl.varstartindex("oo")=b
 ffl.varstartindex("cc")=b
 %>
A:=BACKSET(ISLASTBAR,50);
 STICKLINE(A AND CC>=OO,OO,CC,6,1),COLORMAGENTA,SHIFT50;
 STICKLINE(A AND CC>=OO,LL,OO,0.1,1),COLORMAGENTA,SHIFT50;
 STICKLINE(A AND CC>=OO,CC,HH,0.1,1),COLORMAGENTA,SHIFT50;
 STICKLINE(A AND CC<OO,OO,CC,6,0),COLORGREEN,SHIFT50;
 STICKLINE(A AND CC<OO,LL,HH,0.1,0),COLORGREEN,SHIFT50;
 VERTLINE(ISLASTBAR),COLORYELLOW,POINTDOT;