//DRAWGBK(1,COLORRGB(240,240,240),COLORRGB(240,240,240),0);
{--------------------均线组----------------}
{18日收盘均价为安全生命线}
EMA(close,18),COLOR006600,LINETHICK4;
安全生命线:EMA(close,18),COLOR00CC00,LINETHICK2;
MA1:ema(close,3),COLORRED,LINETHICK2;
MA2:ema(close,5),color009900;
MA3:ema(close,8),color00aa00;
MA4:ema(close,10),COLOR00bb00;
MA5:ema(close,12),COLOR00CC00;
MA6:ema(close,15),COLOR00DD00;
MA7:ema(close,30),COLOR990099;
MA8:ema(close,35),COLORAA00AA;
MA9:ema(close,40),COLORBB00BB;
MA10:ema(close,45),COLORCC00CC;
MA11:ema(close,50),COLORDD00DD;
MA12:ema(close,60),COLOREE00EE;
eMA(close,3),COLORYELLOW,LINETHICK1;
{-------顾比倒数------------}
ff:=l;
fhf:=h;
fgf:=h;
ftf:=l;
fdf:=l;
zdtf:=c;
zqf:=c;
zqtf:=c;
{顾比倒数进场}
<%
f=ffl.vardata("ff")
fh=ffl.vardata("fhf")
fg=ffl.vardata("fgf")
ft=ffl.vardata("ftf")
fd=ffl.vardata("fdf")
zq=ffl.vardata("zqf")
zqt=ffl.vardata("zqtf")
zdt=ffl.vardata("zdtf")
zq(1)=0
zq(2)=0
zqt(1)=0
zqt(2)=0
tj=0
n=ubound(f)
for i=2 to n
k1=0
k2=0
k3=0
ii=i-2
for j=ii to 2 step -1
if f(j)
k1=j
exit for
end if
next
j=k1-1
while j>=0 and tj=0
if fh(j)>fh(k1) then
k2=j
tj=1
else
j=j-1
end if
wend
j=k2-1
tj=0
while j>=0 and tj=0
if fh(j)>fh(k2) then
k3=j
tj=1
else