飞狐一根多空线主图选股指标公式源码

飞狐一根多空线主图选股指标公式源码

源码正文：

DRAWGBK(C,COLORRGB(36,68,36),COLORRGB(100,100,100),1){XG51};
KLINE(O,H,L,C,0){XG51};
Fxc8:=C{XG51};
Ax8:=hhv(h,3){XG51};
Bx8:=llv(l,3){XG51};
ax18:=ma(H,3+1){XG51};
bx18:=ma(L,3+1){XG51};
axx18:=ema(h,3+1){XG51};
bxx18:=ema(l,3+1){XG51};
hh8:=cross(c,ax18){XG51};
ll8:=cross(bx18,c){XG51};
arh8:=ref(h,1){XG51};
arl8:=ref(l,1){XG51};
axxx18:=ema(h,3){XG51};
bxxx18:=ema(l,3){XG51};
hl8:=h{XG51};
Kk8:=h{XG51};
<%
Vc8=ffl.vardata("fxc8")
last=ubound(vc8)
vhh8=ffl.vardata("hh8")
vll8=ffl.vardata("ll8")
vhl8=ffl.vardata("hl8")
vhk8=ffl.vardata("Kk8")
vlk8=ffl.vardata("Kk8")
vax18=ffl.vardata("ax18")
vbx18=ffl.vardata("bx18")
VRax18=ffl.vardata("axxx18")
vrbx18=ffl.vardata("bxxx18")
for i8=2 to last
vhh8(i8)=0
vll8(i8)=0
if vc8(i8-1) <= vax18(i8-1)  and  vc8(i8) > vax18(i8)  then vhh8(i8)=1
if vc8(i8-1) >= vbx18(i8-1)  and  vc8(i8) < vbx18(i8) then vll8(i8)=1
next
for i8=2 to last
vhk8(i8)=0
vlk8(i8)=0
if vc8(i8-1) <= vrax18(i8-1)  and  vc8(i8) > vrax18(i8)  then vhk8(i8)=1
if vc8(i8-1) >= vrbx18(i8-1)  and  vc8(i8) < vrbx18(i8) then vlk8(i8)=1
next
th8=0
tl8=0
kh8=0
kl8=0
for i8=1 to last
if vhh8(i8)=1 then
th8=1
tl8=0
end if
if th8=1 and tl8=0 then vhl8(i8)=1
if vll8(i8)=1 then
th8=0
tl8=1
end if
if tl8=1 and th8=0 then vhl8(i8)=0
next
for i8=1 to last
if vhk8(i8)=1 then
kh8=1
kl8=0
end if
if kh8=1 and kl8=0 then vhk8(i8)=1
if vlk8(i8)=1 then
kh8=0
kl8=1
end if
if kl8=1 and kh8=0 then vhk8(i8)=0
next
ffl.vardata("hl8")=vhl8
ffl.vardata("Kk8")=vhk8
rem ffl.vardata("ll8")=vhl8
rem ffl.vardata("hh8")=vhl8
%&gt{XG51};
mm:=if(hl8=1,bx8,ax8),linethick1,colorblue{XG51};
mm1:=if(hl8=1,bx18,ax18),linethick1,colorgreen{XG51};
转:(mm+mm1)/2,PRECISION2,linethick1,COLORCYAN,linethick2{XG51};
partline(C>=转,转),PRECISION2,linethick2,COLORLIMAGENTA{X?G^5~1?C?N?{};