复制内容到剪贴板
代码:
{n1 5 , n2 2 , n 20 , p 20 ,a1 8 , a2 20 , a3 8}
A:=wMA(C,n1);
B:=REF(A,n2);
{STICKLINE(A>=B,A,b,8,1),COLOR000099;
STICKLINE(A>=B,A,B,5,1),COLOR0000BB;
STICKLINE(A>=B,A,B,3,1),COLOR0000DD;
STICKLINE(A>=B,A,B,2,1),COLOR0000FF;
STICKLINE(A>B,A,H,1,1),COLOR0000ff;
STICKLINE(A<=B,A,B,8,2),COLOR009900;
STICKLINE(A<=B,A,B,5,2),COLOR00bb00;
STICKLINE(A<=B,A,B,3,2),COLOR00cc00;
STICKLINE(A<=B,A,B,2,2),COLOR00ee00;
STICKLINE(A<B,A,L,1,0),COLORGREEN; }
控盘点:(2*a+ref(a,1)+ref(a,2)+ref(a,3))/5,LINETHICK1;{Bollinger's Band Net , BBN , 天罗地网}
中:WMA(CLOSE,n),colorFF9999,LINETHICK2;
天:中+(p/A1)*STD(C,N),colorff9911,linethick2;
罗:中+(p/A2)*STD(CLOSE,N),COLORGREEN;
地:中-(p/A2)*STD(CLOSE,N),COLOR00FFFF;
网:中-(p/A3)*STD(CLOSE,N),COLORFF66ff,linethick2;
drawnumber(islastbar,中,中,2),shift3,align1,colormagenta;
drawnumber(islastbar,天,天,2),shift3,align1,colormagenta;
drawnumber(islastbar,罗,罗,2),shift3,align1,colormagenta;
drawnumber(islastbar,地,地,2),shift3,align1,colormagenta;
drawnumber(islastbar,网,网,2),shift3,align1,colormagenta;
fo:=OPEN;
fh:=HIGH;
fl:=LOW;
fc:=CLOSE;
<%
vo=ffl.vardata("fo")
vh=ffl.vardata("fh")
vl=ffl.vardata("fl")
vc=ffl.vardata("fc")
last=ubound(vc)
vc(0)=(vh(0)+vl(0)+2*vc(0))/4
for i=1 to last
vo(i)=(vo(i-1)+vc(i-1))/2
if vo(i)>vh(i) then vh(i)=vo(i) else vh(i)=vh(i)
if vo(i)<vl(i) then vl(i)=vo(i) else vl(i)=vl(i)
vc(i)=(2*vc(i)+vh(i)+vl(i))/4
next
ffl.vardata("fo")=vo
ffl.vardata("fh")=vh
ffl.vardata("fl")=vl
ffl.vardata("fc")=vc
%>
KK:=IF(fc>=fo AND (fc>=REF(fc,1) or REF(fc,1)>=REF(fo,1)),1,IF(fc<fo AND (fc<REF(fo,1) or REF(fc,1)<REF(fo,1)),-1,0));
多空线:=(MA(CLOSE,6)+MA(CLOSE,13)+MA(CLOSE,26))/3,COLORYELLOW;
今:=(fo+fc)/2,SHIFT1;
转:=IF(KK=1,MIN(fc,fo),IF(KK=-1,MAX(fc,fo),IF(REF(KK,1)=1,MIN(fc,fo),IF(REF(KK,1)=-1,MAX(fc,fo),(fc+fo)/2)))),POINTDOT,COLORYELLOW;
Balance:=If(C=O,C,If(C>O,C+(H-C)/2,C-(C-L)/2));
BBase:=(H-L)/2;
高点:=(Balance+BBase),SHIFT1,COLORGRAY;
低点:=(Balance-BBase),SHIFT1,COLORGRAY;
明高:=(Balance+BBase),LINETHICK0,COLORGRAY;
明低:=(Balance-BBase),LINETHICK0,COLORGRAY;
EXPLAIN(H>=L,'区 间 预 测:'),COLORMAGENTA;
EXPLAINEX(H>=L,'今日高点:',REF(高点,1),2,0),COLORCYAN;
EXPLAINEX(H>=L,'今日低点:',REF(低点,1),2,0),COLORCYAN;
EXPLAINEX(H>=L,'明日高点:',明高,2,0),COLORYELLOW;
EXPLAINEX(H>=L,'明日低点:',明低,2,0),COLORYELLOW;
drawicon(天<ref(天,1) AND ISLASTBAR,天,5),shift1,align2;
drawicon(天>ref(天,1) And ISLASTBAR,天,4),shift1,,align1;
drawicon(罗<ref(罗,1) and islastbar,罗,5),shift1,,align2;
drawicon(罗>ref(罗,1) and islastbar,罗,4),shift1,,align1;
drawicon(中>ref(中,1) and ISLASTBAR,中,4),shift1,,align1;
drawicon(中<ref(中,1) And ISLASTBAR,中,5),shift1,,align2;
drawicon(地<ref(地,1) and islastbar,地,5),shift1,,align2;
drawicon(地>ref(地,1) and islastbar,地,4),shift1,,align1;
drawicon(网>ref(网,1) and ISLASTBAR,网,4),shift1,,align1;
drawicon(网<ref(网,1) and ISLASTBAR,网,5),shift1,,align2;母倍数:=IF(DATAPERIOD>=6,10000,100000);