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));