当前位置：分析家公式网 → 股票公式 → 同花顺公式 → 一键转帖：愚人主力进退分析（同花顺指标 副图 源码 测试图）
软件名称：[B]愚人主力进退分析（同花顺指标 副图 源码 测试图）[/B]
软件类型：国产软件
运行环境：Win10/Win9X/Win8/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：分享版
软件大小：14.0 KB
官方主页：Home Page
更新时间：2024-11-17 00:05:30
软件简介:
愚人主力进退分析
大机构仓位:=100*(1-WINNER(CLOSE)),colorred,LINETHICK1;
VAR2M:=1/WINNER(CLOSE);
VAR3M:=MA(CLOSE,13);
VAR4M:=100-ABS((CLOSE-VAR3M)/VAR3M*100);
VAR5M:=LLV(LOW,120);
VAR6M:=HHV(HIGH,120);
VAR7M:=(VAR6M-VAR5M)/100;
VAR8M:=SMA((CLOSE-VAR5M)/VAR7M,20,1);
VAR9M:=SMA((OPEN-VAR5M)/VAR7M,20,1);
VARA:=3*VAR8M-2*SMA(VAR8M,10,1);
VARB:=3*VAR9M-2*SMA(VAR9M,10,1);
VARC:=100-VARB;
基金私募仓位:=(100-VARA),coloryellow,LINETHICK1;
VAR1:=HHV(HIGH,9)-LLV(LOW,9);
VAR2:=HHV(HIGH,9)-CLOSE;
VAR3:=CLOSE-LLV(LOW,9);
VAR4:=((VAR2)/(VAR1))*(100)-70;
VAR5:=((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60)))*(100);
VAR6:=((2)*(CLOSE)+HIGH+LOW)/(4);
VAR7:=SMA(((VAR3)/(VAR1))*(100),3,1);
VAR8:=LLV(LOW,34);
VAR9:=SMA(VAR7,3,1)-SMA(VAR4,9,1);
VAR10:=IF((VAR9>100),VAR9-100,0);
VAR11:=HHV(HIGH,34);
B1:=EMA(((VAR6-VAR8)/(VAR11-VAR8))*(100),8);
机构趋势:=EMA(B1,13),colorwhite,LINETHICK1;
V1:=(C*2+H+L)/4*10;
V2:=EMA(V1,13)-EMA(V1,34);
V3:=EMA(V2,5);
V4:=2*(V2-V3)*5.5;
V5:=(HHV(INDEXH,8)-INDEXC)/(HHV(INDEXH,8)-LLV(INDEXL,8))*8;
V6:=EMA(3*V5-2*SMA(V5,18,1),5);
V7:=(INDEXC-LLV(INDEXL,8))/(HHV(INDEXH,8)-LLV(INDEXL,8))*10;
V8:=(INDEXC*2+INDEXH+INDEXL)/4;
V9:=EMA(V8,13)-EMA(V8,34);
VA:=EMA(V9,3);
VB:=(V9-VA)/2;
V11:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);
V12:=(EMA(V11,3)-REF(EMA(V11,3),1))/REF(EMA(V11,3),1)*100;
AAO:=(EMA(V11,3)<=13) AND FILTER((EMA(V11,3)<=13),15);
买入股票: STICKLINE(EMA(V11,3)<=13 AND V12>13,0,50,1,0),LINETHICK1,colorred;
BBO:= (EMA(V11,3)<=13 AND V12>13) AND FILTER((EMA(V11,3)<=13 AND V12>13),10);
DRAWTEXT (BBO,60,'主力进'),colorwhite;
卖临界:=STICKLINE(EMA(V11,3)>60 AND EMA(V11,3)>REF(EMA(V11,3),1),100,95,15,1),coloryellow;
CCO:=(EMA(V11,3)>=90 AND V12) AND FILTER((EMA(V11,3)>=90 AND V12),10);
DDO:=(EMA(V11,3)>=120 AND V12) AND FILTER((EMA(V11,3)>=120 AND V12),10);
STICKLINE(IF(VB>=0,VB,0) AND EMA(V11,3)<13,0,30,2,0),colorwhite;
STICKLINE(IF(VB<=0,VB,0) AND EMA(V11,3)>90,0,7,10,0),colorgreen;
STICKLINE( IF(V4>=0,V4,1) AND EMA(V11,3)<13,0,15,1,0),COLORBB33BB;
STICKLINE(IF(V4<=0,V4,1) AND EMA(V11,3)>90,0,7,3,0),color00FF00,LINETHICK1;
DRAWTEXT (CCO,15,'减仓'),color00FFFF;
AA:=(O+H+L+C)/4;
BB:=MA(AA,3);
CC:=SUM(IF(AA>REF(AA,1),AA*VOL,0),4)/SUM(IF(AA<REF(AA,1),AA*VOL,0),4);
DD:=REF(100-(100/(1+CC)),1);
A1N:=HHV(AA,10);
A2N:=LLV(AA,30);
A3N:=A1N-A2N;
A4N:=EMA((AA-A2N)/A3N,1)*100;
B1N:=HHV(AA,16);
B2N:=LLV(AA,90);
B3N:=B1N-B2N;
B4N:=EMA((AA-B2N)/B3N,1)*100;
C1:=HHV(AA,30);
C2:=LLV(AA,240);
C3:=C1-C2;
C4:=EMA((AA-C2)/C3,1)*100;
中线趋势:=B4N,colormagenta,LINETHICK1;
VARE:=REF(LOW,1)*0.9;
VARF:=LOW*0.9;
VAR12:=(VARF*VOL+VARE*(CAPITAL-VOL))/CAPITAL;
VAR13:=EMA(VAR12,30);
VAR14:=CLOSE-REF(CLOSE,1);
VAR15:=MAX(VAR14,0);
VAR16:=ABS(VAR14);
VAR17:=SMA(VAR15,7,1)/SMA(VAR16,7,1)*100;
VAR18:=SMA(VAR15,13,1)/SMA(VAR16,13,1)*100;
VAR19:=BARSCOUNT(CLOSE);
VAR20:=SMA(MAX(VAR14,0),6,1)/SMA(ABS(VAR14),6,1)*100;
VAR21:=(-200)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+100;
VAR1A:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
VAR1B:=SMA((SMA(VAR1A,4,1)-50)*2,3,1);
VAR1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;
VAR1D:=SMA(VAR1C,4,1);
VAR1E:=SMA(VAR1D,3,1);
VAR1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100;
VAR22:=VAR20<=25 AND VAR21<-95 AND VAR1F>20 AND VAR1B<-30 AND VAR1E<30 AND VAR11-CLOSE>=-0.25 AND VAR17<22 AND VAR18<28 AND VAR19>50;
VAR23:=(HIGH+LOW+CLOSE)/3;
VAR24:=(VAR23-MA(VAR23,14))/(0.015*AVEDEV(VAR23,14));
VAR25:=(VAR23-MA(VAR23,70))/(0.015*AVEDEV(VAR23,70));
VAR26:=IF(VAR24>=150 AND VAR24<200 AND VAR25>=150 AND VAR25<200,10,0);
VAR27:=IF(VAR24<=-150 AND VAR24>-200 AND VAR25<=-150 AND VAR25>-200,-10,VAR26);
STICKLINE(VAR22,0,70,0,0),LINETHICK1,colormagenta;
DRAWTEXT(CROSS(VAR22,0.5) AND COUNT(VAR22=1,10)=1,80,'超级主力建仓!') , colormagenta;
VAREX:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
VARFX:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA
((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VAR10X:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA
((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VAR11X:=VARF<REF(VAR10X,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
DRAWTEXT(VAR11X AND COUNT(VAR11X,30)=1,70,'大资金进场'),LINETHICK1,coloryellow;
STICKLINE(VAR11X AND COUNT(VAR11X,30)=1,1,60,1,0),coloryellow,LINETHICK1;
VAR12X:=(HIGH+LOW+CLOSE)/3;
VAR13X:=(VAR12X-MA(VAR12X,14))/(0.015*AVEDEV(VAR12X,14));
VAR14X:=(VAR12X-MA(VAR12X,70))/(0.015*AVEDEV(VAR12X,70));
VAR15X:=IF(VAR13X>=150 AND VAR13X<200 AND VAR14X>=150 AND VAR14X<200,10,0);
VAR16X:=IF(VAR13X<=-150 AND VAR13X>-200 AND VAR14X<=-150 AND VAR14X>-200,-10,VAR15X);
VAR17X:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
VAR18X:=100-ABS(VAR17X);
VAR19X:=IF(VAR18X<90,VAR18X,100);
VAR1AX:=IF(VAREX>0,VAREX,0);
VAR1BX:=IF(VAR14X>=200 AND VAR13X>=150,15,IF(VAR14X<=-200 AND VAR13X<=-150,-15,VAR16X))+60;
VAR1CX:=VAR1AX>48 AND VAR1BX>60 AND VAR19X<100;
DRAWTEXT(VAR1CX AND COUNT(VAR1CX,30)=1,35,'大资金退场'),LINETHICK1,COLORFFCC66;
STICKLINE(VAR1CX AND COUNT(VAR1CX,30)=1,0,30,5,0),COLORFFCC66,LINETHICK1;
STICKLINE(VAR11X AND COUNT(VAR11X,30)=1,1,60,3,0),coloryellow;
爆发线: 80,colorred;
强弱分界线:50,colorgreen;
中心轴:0;
低位:20,,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);
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;
[url=http://www.70822.com/soft/sort013/sort036/down-175558.html]愚人主力进退分析（同花顺指标 副图 源码 测试图）[/url]