同花顺庄家控盘线副图源码

2017-10-10网络编辑：翔博软件

N:=3;
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);
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,资金流向,colorgreen);
PARTLINE(资金流向<80,资金流向,colorgreen);
PARTLINE(资金流向<80 AND 资金流向>60,资金流向,colorred);
PARTLINE(资金流向>50 AND (资金流向<60 OR 资金流向=60),资金流向,coloryellow);
PARTLINE(资金流向,资金流向>=REF(资金流向,1),RGB(255,0,0),资金流向<=REF(资金流向,1),RGB(0,255,0)),LINETHICK2;