通達信主力震倉選股指標

㈠ 請高手老師幫我把通達信主力持倉量2指標改成選股指標.

換手:=V*100/CAPITAL;
主力:=MA(換手,4);
大戶:=MA(換手,9);
中戶:=MA(換手,17);
散戶版:=MA(換手,34);
均量權:=(主力+大戶+中戶+散戶)/4;
主力能量:=(主力-均量);
大戶量:=(大戶-均量);
中戶量:=(中戶-均量);
散戶量:=(散戶-均量);
紅買盤:=MA(C,3);
綠賣盤:=MA(C,3);
黃反彈:=MA(C,3);
藍尋底:=MA(C,3);
成交量:=VOL;
均量5:=MA(成交量,5)/50000;
均量20:=MA(成交量,20)/50000;
均量120:=MA(成交量,120)/50000;
B:=ZIG(3,50/5)*1;
G:=MA(B,2);
D:=CROSS(B,G)*10;
W:=CROSS(G,B)*10;
D=10;

㈡ 求大神把此通達信指標改個主力莊家秘密進的選股公式，

XG:2*(EMA((C*2+H+L)/4*10,13)-EMA((C*2+H+L)/4*10,34)-EMA(EMA((C*2+H+L)/4*10,13)-EMA((C*2+H+L)/4*10,34),5))*5.5>=0 AND CROSS(2*(EMA((C*2+H+L)/4*10,13)-EMA((C*2+H+L)/4*10,34)-EMA(EMA((C*2+H+L)/4*10,13)-EMA((C*2+H+L)/4*10,34),5))*5.5,0);

㈢ 請幫助修改通達信主力控盤選股公式，謝謝

以下是修改過的，按問題要求做的主力控盤選股公式，用軟體實際測試過能達到要求，可以使用：
VUR1:=VOL/CAPITAL;
VUR2:=1.1*(MAX(HIGH,REF(CLOSE,1))/MIN(LOW,REF(CLOSE,1))-1);
VUR3:=2.5*MAX(VUR1,VUR2);
VUR4:=DMA(CLOSE,VUR3);
VUR5:=20*(VUR4/REF(VUR4,1)-1)*38;
VUR6:=EMA(VUR5,3);
VUR7:=EMA(VUR5,3);
VUR8:=EMA(VUR7,5);
VURS:=EMA(VUR7,8);
VUR9:=1.1*(MAX(INDEXH,REF(INDEXC,1))/MIN(INDEXL,REF(INDEXC,1))-1);
VURA:=2.5*MAX(VUR1,VUR9);
VURB:=DMA(INDEXC,VURA);
VURC:=EMA(20*(VURB/REF(VURB,1)-1),1)*38;
VURD:=EMA(VURC,2);
VURE:=EMA(VURC,2);
DX1:=VURE;
DX2:=VURS;
DX3:=VUR8;
DX4:=VUR7;
ZMIN:CROSS(VUR7,20);

㈣ 請高手老師幫我把通達信主力動向優化指標改成選股指標.選股條件：散戶線上出黃色尖柱狀

換手:=V*100/CAPITAL;
主力:=MA(換手,4);
大戶:=MA(換手,9);
中戶:=MA(換手,17);
散戶版:=MA(換手,34);
均量:=(主力+大戶+中戶+散戶)/4;
主力能量權:=(主力-均量);
大戶能量:=(大戶-均量);
中戶能量:=(中戶-均量);
散戶能量:=(散戶-均量);
B:=ZIG(3,50/5)*1;
G:=MA(B,2);
D:=CROSS(B,G)*10;
W:=CROSS(G,B)*10;
散戶能量>=0 AND 散戶能量< REF(散戶能量,1) AND D=10;

㈤ 幫忙做個通達信「主力進出」選股公式

VAR1:=EMA(SMA((CLOSE-LLV(LOW,19))/(HHV(HIGH,19)-LLV(LOW,19))*100,8,1),3);

ABV:=MA(SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),-VOL,0)),0)/25000,2);

M1:=EMA(ABV,12);

M2:=EMA(ABV,26);

MTM:=CLOSE-REF(CLOSE,1);

MMS:=((100)*(EMA(EMA(MTM,6),6)))/(EMA(EMA(ABS(MTM),6),6));

MMM:=((100)*(EMA(EMA(MTM,12),12)))/(EMA(EMA(ABS(MTM),12),12));

MML:=((100)*(EMA(EMA(MTM,26),26)))/(EMA(EMA(ABS(MTM),26),26));

MMA:=C-REF(C,1);

MMB:=100*EMA(EMA(MMA,9),9)/EMA(EMA(ABS(MMA),9),9);

MMC:=MA(MMB,5);

A:=((VOL)/(CAPITAL))*(100);

S:=((MA(A,30))/(MA(INDEXA,10)))*(MA(INDEXA,60));

Y:=((MA(A,120))/(MA(INDEXA,10)))*(MA(INDEXA,60));

X:=1;

V1:=(HIGH+OPEN+LOW+(2)*(CLOSE))/(5);

V2:=REF(V1,1);

V3:=MAX(V1-V2,0);

V4:=ABS(V1-V2);

V5:=SMA(V3,10,1);

V6:=SMA(V4,10,1);

V8:=COUNT(((V5)/(V6)<0.2),5);

V9:=COUNT((LLV(V1,10)=V1),10);

主力進出:IF((MMS>REF(MMS,1) AND MMB>REF(MMB,1) AND CROSS(ABV,M2) AND ABV>REF(ABV,1) AND M1>REF(M1,1) AND M2>REF(M2,1)),65,0);

㈥ 這是通達信主力力道指標，懇請高手將其改成預警公式或選股公式，以便能在第一個紅柱出現時將其選出來...

換手:=V*100/CAPITAL;
主力:=MA(換手,4);
大戶:=MA(換手,9);
中戶:=MA(換手,17);
散戶:=MA(換手,34);
均量:=(主力+大戶+中戶+散戶)/4;
主力能量:=(主力-均量);

操盤:主力能量>=0 AND 主力能量>=REF(主力能量,1);

㈦ 如何將主力倉位監測指標公式改成通達信選股公式

N:=BARSLAST(CROSS(MA(C,5),MA(C,10)));
STICKLINE(CROSS(MA(C,5),MA(C,10)),0,100*WINNER(C),2,0),COLOR666666;
金叉倉位:100*WINNER(REF(C,N)),POINTDOT,LINETHICK1,COLOR666666;
STICKLINE(0=0,金叉倉位,金叉倉位,2,0),COLOR666666;
預警:DRAWICON(CROSS(金叉倉位,50),50,2);

㈧ 通達信金牛判勢指標源碼和機構震倉指標怎麼寫，如下圖效果

1. 金牛判勢主圖公式：

• DRAWGBK(C>O,RGB(60,0,0),RGB(0,0,0),1,2,1);

• DRAWTEXT_FIX(1,0.88,5,0,'~☆~皓天~☆~'),COLORBLUE;

• Z1:=STRCAT(HYBLOCK,' ');

• Z2:=STRCAT(Z1,DYBLOCK);

• Z3:=STRCAT(Z2,' ');

• DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORRED;

• 金牛:(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),DOTLINE,COLORYELLOW;

• 金鑽趨勢:XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,LINETHICK2,COLORRED;

• 金牛2:EMA(金鑽趨勢,25)COLORCYAN,LINETHICK2;

• DRAWBAND(金鑽趨勢,RGB(55,0,0),金牛2,RGB(0,91,0));

• DRAWKLINE(H,O,L,C);

• STICKLINE(金鑽趨勢>LOW AND 金鑽趨勢<HIGH,金鑽趨勢,MIN(MIN(OPEN,CLOSE),金鑽趨勢),2,0),COLORYELLOW;

• STICKLINE(金鑽趨勢>MIN(C,O) AND 金鑽趨勢<MAX(C,O),金鑽趨勢,MIN(OPEN,CLOSE),2,0),COLORYELLOW;

• STICKLINE(金鑽趨勢>HIGH,OPEN,CLOSE,2,0),COLORYELLOW;

• STICKLINE(金鑽趨勢>HIGH,HIGH,LOW,0,0),COLORYELLOW;

• VAR23:=100*XMA(XMA((C-REF(C,1)),6),6)/XMA(XMA(ABS((C-REF(C,1))),6),6);

• 回調買:=LLV(VAR23,2)=LLV(VAR23,7) AND COUNT(VAR23<0,2) AND CROSS(VAR23,MA(VAR23,2));

• XG:=金鑽趨勢>HIGH AND 回調買 AND L<=金鑽趨勢;

• DRAWTEXT(XG,L,'▲買入'),COLORRED;

• JJ:=(HIGH+LOW+CLOSE)/3;

• QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);

• QJ1:=IF(CAPITAL=0,QJ0*(JJ-MIN(CLOSE,OPEN)),QJ0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));

• QJ2:=IF(CAPITAL=0,QJ0*(MIN(OPEN,CLOSE)-LOW),QJ0*IF(HIGH=LOW,1,(JJ-MIN(CLOSE,OPEN))));

• QJ3:=IF(CAPITAL=0,QJ0*(HIGH-MAX(OPEN,CLOSE)),QJ0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));

• QJ4:=IF(CAPITAL=0,QJ0*(MAX(CLOSE,OPEN)-JJ),QJ0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-JJ)));

• DDX:=((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,10000,10000),COLOR00AAAA,LINETHICK;

• V2:=SMA(IF(C>=REF(C,1),DDX,-DDX/100),2,1);

• V5:=SMA(V2*120/FROMOPEN*5,2,1);

• V10:=SMA(V5,5,1);

• V20:=SMA(V10,5,1);

• DY:=CURRBARSCOUNT=1 AND C<REF(C,1);

• DY2:=REF(V2,1)-DY;

• XG2:=C>O AND DY2<0.02 AND MA(C,5)>MA(C,60) AND C/REF(C,1)>=1.02 AND H<金牛;

• {DRAWTEXT(XG2,L,'▲抓牛'),COLORYELLOW;}

• DRAWTEXT(XG2 AND L<金鑽趨勢,L,'↖金鑽起漲'),COLORMAGENTA;

2機構震倉副圖公式：

• 
  

  

• VAR1:=(CLOSE+HIGH+LOW)/3;

• VAR2:=EMA(VAR1,10);

• VAR3:=REF(VAR2,1);

• 綠探底震倉:IF(VAR2,10,DRAWNULL),COLORGREEN,LINETHICK9;

• 紅買: IF(VAR2>VAR3,10,DRAWNULL), COLORRED,LINETHICK9;

• 藍賣: IF(VAR2<VAR3,10,DRAWNULL),COLORFFFF00,LINETHICK9;

• RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;

• 上穿買:SMA(RSV,3,1),COLORRED;

• 下穿賣:SMA(上穿買,3,1),COLORFFFF00;

希望我的回答能使你滿意。

㈨ 請老師寫一個通達信選股公式（出現洗盤時選股）

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1) ;
D:=SMA(K,3,1) ;
J:=3*K-2*D ;
A:=250;
DIFF:=(EMA(CLOSE,12) - EMA(CLOSE,26));
DEA:=EMA(DIFF,9) ;
MACD:=2*(DIFF-DEA);
MM:=IF(MACD< 0,MACD,0);
JJ:=MM> REF(MM,1);
ZZ:=REF(JJ,1)=1;
准備:=(JJ AND ZZ)*DEA;
JH:=HHV(MAX(K,MAX(D,J)),A);
DH:=HHV(MAX(DIFF,DEA),A);
SH:=INTPART(JH/DH)/2;
DIFF50:=SH*DIFF+50 ;
DEA50:=SH*DEA+50 ;
紅柱:=IF(1.5*(DIFF50-DEA50)>REF(1.5*(DIFF50-DEA50),1),1.5*(DIFF50-DEA50),0);
綠柱:=IF(1.5*(DIFF50-DEA50)<REF(1.5*(DIFF50-DEA50),1),1.5*(DIFF50-DEA50),0);
縮頭:=IF(1.5*(DIFF50-DEA50)>0 AND REF(1.5*(DIFF50-DEA50),1)>REF(1.5*(DIFF50-DEA50),2) AND 1.5*(DIFF50-DEA50)< REF(1.5*(DIFF50-DEA50),1),1,0);
縮腳:=IF(1.5*(DIFF50-DEA50)<0 AND REF(1.5*(DIFF50-DEA50),1)< REF(1.5*(DIFF50-DEA50),2) AND 1.5*(DIFF50-DEA50)>REF(1.5*(DIFF50-DEA50),1),1,0);
殺多:=IF(1.5*(DIFF50-DEA50)<0 AND REF(1.5*(DIFF50-DEA50),1)> REF(1.5*(DIFF50-DEA50),2) AND 1.5*(DIFF50-DEA50)<REF(1.5*(DIFF50-DEA50),1),1,0);
誘空:=IF(1.5*(DIFF50-DEA50)>0 AND REF(1.5*(DIFF50-DEA50),1)< REF(1.5*(DIFF50-DEA50),2) AND 1.5*(DIFF50-DEA50)>REF(1.5*(DIFF50-DEA50),1),1,0);
阻力:=IF(CROSS(C,MA(C,20)) OR CROSS(C,MA(C,60)),1,0);
洗盤:FILTER(誘空,3) AND 誘空;