资金流向

资金流向

a1:30,colorwhite;
a2:50,colorred;
a3:60,pointdot,coloryellow;
a4:70,pointdot;
a5:80,colorred;

TYP := amount/vol/100;
V1:=SUM(IF(TYP>REF(TYP,1),TYP*VOL,0),21)/SUM(IF(TYP<REF(TYP,1),TYP*VOL,0),21);
MFI:=100-(100/(1+V1));
资金流向:ema(mfi,5);
drawtext(last(count(资金流向<50,200)/count(资金流向>50,200)<0.2 )=1 and 50<(c-llv(c,200))/(hhv(c,200)-llv(c,200))<80,40,'主力吸筹');

A:=amount/vol/100;
X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+
14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)
+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+
REF(A,20))/210;
工作线:=EMA(X,13);

drawtext(资金流向>=hhv(资金流向,20) and ma(vol,20)>ref(ma(vol,20),1) and ma(vol,5)>ma(vol,10)
and ma(c,238)>ref(ma(c,238),1) and c>工作线 and cross(资金流向,60),资金流向,'买');

partline(资金流向,资金流向<50,rgb(0,255,0));
partline(资金流向,资金流向>80,rgb(255,0,255));
partline(资金流向,资金流向<80 and 资金流向>60,rgb(255,0,0));
partline(资金流向,资金流向>50 and 资金流向<=60,rgb(255,255,0));