咨詢內容：

通達信的指標改文化可用，謝謝老師。

主力籌碼估算:=EMA(WINNER(CLOSE)*70,3),NODRAW;
散戶籌碼估算:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3),NODRAW;
主力控盤比率0:=主力籌碼估算/(主力籌碼估算+散戶籌碼估算)*100;
主力控盤比率:=IF(主力控盤比率0<-6,-6,IF(主力控盤比率0>100,100+SQRT(主力控盤比率0-100),主力控盤比率0));
市場總量:=MA(主力籌碼估算+散戶籌碼估算,13),NODRAW;
散戶套牢比率:=散戶籌碼估算/(主力籌碼估算+散戶籌碼估算)*100,NODRAW;
散戶警戒:=EMA(散戶套牢比率,89);
主力警戒:EMA(主力控盤比率,89),COLOR0000FF,LINETHICK4;

VAR11:=(HHV(HIGH,8)-CLOSE)/(HHV(HIGH,20)-LLV(LOW,20))*100;
VAR33:=100-3*SMA((CLOSE-LLV(LOW,72))/(HHV(HIGH,72)-LLV(LOW,72))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,72))/(HHV(HIGH,72)-LLV(LOW,72))*100,20,1),15,1);
活籌OAMV:=EMA(VAR33,2);
做空資金:=EMA(EMA(SMA(VAR11,6,1)-7,2),2);
WR線:=EMA(EMA(100*(HHV(HIGH,42)-CLOSE)/(HHV(HIGH,42)-LLV(LOW,42)),3),3);
SBZLPA1:=BARSLAST(L=HHV(L,7));
SBZLPA2:=EMA(SBZLPA1*SBZLPA1,13);
我心飛揚:=IF(SBZLPA2>88,88+SQRT(SBZLPA2-88),SBZLPA2);
TPV:=(我心飛揚+做空資金+活籌OAMV)/3;
T我心飛揚:=(我心飛揚+TPV)/2+8;
T做空資金:=(做空資金+TPV)/2+8;
T飛揚資金:=(T我心飛揚+T做空資金)/2;
WR慢:=EMA(EMA(100*(HHV(HIGH,42)-CLOSE)/(HHV(HIGH,42)-LLV(LOW,42)),2),2);
ZLCQ:=EMA((WINNER(CLOSE) * 69),3);
SHCQ:=EMA(((WINNER((CLOSE * 1.1)) - WINNER((CLOSE * 0.93))) * 80),3);
主力控盤Q:=EMA(((ZLCQ / (ZLCQ+ SHCQ)) * 110),2);
上限Q:=HHV(主力控盤Q,20);
下限Q:=LLV(主力控盤Q,20);
圈Q:=100*(HHV(HIGH,42)-C)/(HHV(HIGH,42)-LLV(LOW,42));
M圈Q:=EMA(EMA(圈Q,3),2);
MM圈Q:=EMA(EMA(EMA(圈Q,4),3),2);
控盤主升Q:=EMA(主力控盤Q,2);
KONGQ0:=(上限Q/控盤主升Q)*(下限Q/控盤主升Q)*50;
KONGQ:=IF(KONGQ0>100,100,IF(KONGQ0<1,1,KONGQ0));
MAXV:=MAX(T做空資金,T我心飛揚);
MINV:=MIN(T做空資金,T我心飛揚);
MMV0:=MAXV/MINV;
MMV1:=T做空資金/REF(T做空資金,1);
MMV2:=T我心飛揚/REF(T我心飛揚,1);
散籌集中度Q:=EMA(EMA((WINNER(C*1.1)-WINNER(C*0.9))*50/(WR慢/MM圈Q)/MMV0/MMV1/MMV2,3),2);
KKONG0:=KONGQ*KONGQ*5/SQRT(散籌集中度Q)/控盤主升Q;
KKONG:=IF(KKONG0>100,100,KKONG0);
KV0:=KKONG/KONGQ;
KV1:=KONGQ/REF(KONGQ,1);
KV2:=KKONG/REF(KKONG,1);
KV3:=EMA(KV0*KV0*KV1*KV2*30,2);
OKV:=IF(KV3>100,100,IF(KV3<0,0,KV3));
WVQ0:=1.18*(上限Q*下限Q+5)/(KONGQ+2)/SQRT(SQRT((OKV+2)/(KONGQ+5)));
WVQ1:=100-IF(WVQ0>90,90+SQRT(WVQ0-90),IF(WVQ0<1,1,WVQ0));
WVVQ:=EMA(EMA(IF(WVQ1<0.5,0.5,WVQ1),2),2);
EVVQ:=EMA(EMA(WVVQ*0.96,3),3);

MTR:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);
HD :=HIGH-REF(HIGH,1);
LD :=REF(LOW,1)-LOW;
DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),14);
DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),14);
PDI:=DMP*100/MTR;
MDI:=DMM*100/MTR;
ADX0:=EMA(100-EMA(ABS(MDI-PDI)/(MDI+PDI)*主力控盤Q+下限Q,6),3);
ADX:=IF(ADX0<0.5,0.5,IF(ADX0>106,106,ADX0));
ADXR:=EXPMEMA(ADX,6),COLORGRAY,LINETHICK3;

RSV1:=(CLOSE-LLV(LOW,4))/(HHV(HIGH,4)-LLV(LOW,4))*100;
FASTK:=SMA(RSV1,3,1);
龍Ｋ:=SMA(FASTK,2,1);
龍Ｄ:=SMA(龍Ｋ,5,1);
UK0:=EVVQ*39/龍Ｄ;
UK:=IF(UK0>98,98,IF(UK0<1,1,UK0));
價量:=EMA(0.98*3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1),2);
主線:=EMA(0.98*(((價量-LLV(價量,27))/(HHV(價量,27)-LLV(價量,27)))*(4))*(25),2);
主價:=SQRT(價量*主線*1.1);
OKK0:(價量+主價)/2,NODRAW;
OKK1:=UK*10/(OKK0+1)+40;
OKK2:=IF(OKK1>96,96+SQRT(SQRT(OKK1-96)),IF(OKK1<1,1,OKK1));
OKK3:=(100-OKK2);
OKK4:=IF(OKK3>0,IF(OKK3>100,100,OKK3),0-SQRT(0-OKK3));
OKK5:=(OKK2-UK)-UK+100,NODRAW;
NOK:=106-IF(OKK5>96,96+SQRT(OKK5-96),IF(OKK5<1,1,OKK5)),COLORBLUE,LINETHICK2;
OKK7:=((OKK2+10)/(OKK0+10))*((NOK+10)/(OKK0+10))*((OKK4+10)/(OKK0+10))*2;
OKK8:=IF(OKK7>100,100+SQRT(OKK7-100),OKK7);
OKK99:=98-SQRT(OKK8*NOK);
OKK9:=IF(OKK99<1,1-SQRT(ABS(OKK99)),OKK99);
OOK0:=(ABS(OKK0-OKK9)*1.18+18);
OOK1:=IF(OOK0<1,1,IF(OOK0>100,100,OOK0));
OOK2:=((ABS(OKK0-OKK9)*1.14+14));
{106-}
OOK3:=IF(OOK2<1,1,IF(OOK2>100,100,OOK2)),COLORWHITE,LINETHICK2;
{106-}
OPK0:=EMA(SQRT(OKK2*NOK/OOK3)*12.6*ABS((OOK1+10)/(OKK9+10)),2);
OPK1:=0.76*OPK0*((REF(OKK0,1)+10)/(OKK0+10))*((REF(OKK0,1)+10)/(OKK0+10))*((REF(OKK9,1)+10)/(OKK9+10))*((REF(OKK9,1)+10)/(OKK9+10));
OPK:=IF(OPK1>96,96+SQRT(SQRT((OPK1-96)/2)),IF(OPK1<1,1,OPK1));
OQK0:=(OPK-OOK1)+50;
OQK:=IF(OQK0>98,98+SQRT(OQK0-98),IF(OQK0<1,1,OQK0));

VKK2:=EMA(SQRT((106-UK)*OOK0)/(SQRT(OQK*OPK)/NOK+0.16)/SQRT(ADXR/ADX),2)*0.88;
WLL:IF(VKK2<1,1,IF(VKK2>95,96,VKK2)),COLORWHITE,LINETHICK2;
OKK0,COLORRED,LINETHICK2;

10;
90;

?

?來源:程序化99網（ m.kzuj.com.cn ）

博易技術人員： 主力籌碼估算:=EMA(WINNER(CLOSE)*70,3),NODRAW;
散戶籌碼估算:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3),NODRAW;
主力控盤比率0:=主力籌碼估算/(主力籌碼估算+散戶籌碼估算)*100;
主力控盤比率:=IF(主力控盤比率0<-6,-6,IF(主力控盤比率0>100,100+SQRT(主力控盤比率0-100),主力控盤比率0));
市場總量:=MA(主力籌碼估算+散戶籌碼估算,13),NODRAW;
散戶套牢比率:=散戶籌碼估算/(主力籌碼估算+散戶籌碼估算)*100,NODRAW;
散戶警戒:=EMA(散戶套牢比率,89);
主力警戒:EMA(主力控盤比率,89),COLOR0000FF,LINETHICK4;

VAR11:=(HHV(HIGH,8)-CLOSE)/(HHV(HIGH,20)-LLV(LOW,20))*100;
VAR33:=100-3*SMA((CLOSE-LLV(LOW,72))/(HHV(HIGH,72)-LLV(LOW,72))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,72))/(HHV(HIGH,72)-LLV(LOW,72))*100,20,1),15,1);
活籌OAMV:=EMA(VAR33,2);
做空資金:=EMA(EMA(SMA(VAR11,6,1)-7,2),2);
WR線:=EMA(EMA(100*(HHV(HIGH,42)-CLOSE)/(HHV(HIGH,42)-LLV(LOW,42)),3),3);
SBZLPA1:=BARSLAST(L=HHV(L,7));
SBZLPA2:=EMA(SBZLPA1*SBZLPA1,13);
我心飛揚:=IF(SBZLPA2>88,88+SQRT(SBZLPA2-88),SBZLPA2);
TPV:=(我心飛揚+做空資金+活籌OAMV)/3;
T我心飛揚:=(我心飛揚+TPV)/2+8;
T做空資金:=(做空資金+TPV)/2+8;
T飛揚資金:=(T我心飛揚+T做空資金)/2;
WR慢:=EMA(EMA(100*(HHV(HIGH,42)-CLOSE)/(HHV(HIGH,42)-LLV(LOW,42)),2),2);
ZLCQ:=EMA((WINNER(CLOSE) * 69),3);
SHCQ:=EMA(((WINNER((CLOSE * 1.1)) - WINNER((CLOSE * 0.93))) * 80),3);
主力控盤Q:=EMA(((ZLCQ / (ZLCQ+ SHCQ)) * 110),2);
上限Q:=HHV(主力控盤Q,20);
下限Q:=LLV(主力控盤Q,20);
圈Q:=100*(HHV(HIGH,42)-C)/(HHV(HIGH,42)-LLV(LOW,42));
M圈Q:=EMA(EMA(圈Q,3),2);
MM圈Q:=EMA(EMA(EMA(圈Q,4),3),2);
控盤主升Q:=EMA(主力控盤Q,2);
KONGQ0:=(上限Q/控盤主升Q)*(下限Q/控盤主升Q)*50;
KONGQ:=IF(KONGQ0>100,100,IF(KONGQ0<1,1,KONGQ0));
MAXV:=MAX(T做空資金,T我心飛揚);
MINV:=MIN(T做空資金,T我心飛揚);
MMV0:=MAXV/MINV;
MMV1:=T做空資金/REF(T做空資金,1);
MMV2:=T我心飛揚/REF(T我心飛揚,1);
散籌集中度Q:=EMA(EMA((WINNER(C*1.1)-WINNER(C*0.9))*50/(WR慢/MM圈Q)/MMV0/MMV1/MMV2,3),2);
KKONG0:=KONGQ*KONGQ*5/SQRT(散籌集中度Q)/控盤主升Q;
KKONG:=IF(KKONG0>100,100,KKONG0);
KV0:=KKONG/KONGQ;
KV1:=KONGQ/REF(KONGQ,1);
KV2:=KKONG/REF(KKONG,1);
KV3:=EMA(KV0*KV0*KV1*KV2*30,2);
OKV:=IF(KV3>100,100,IF(KV3<0,0,KV3));
WVQ0:=1.18*(上限Q*下限Q+5)/(KONGQ+2)/SQRT(SQRT((OKV+2)/(KONGQ+5)));
WVQ1:=100-IF(WVQ0>90,90+SQRT(WVQ0-90),IF(WVQ0<1,1,WVQ0));
WVVQ:=EMA(EMA(IF(WVQ1<0.5,0.5,WVQ1),2),2);
EVVQ:=EMA(EMA(WVVQ*0.96,3),3);

MTR:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);
HD :=HIGH-REF(HIGH,1);
LD :=REF(LOW,1)-LOW;
DMP:=EMA(IF(HD>0&&HD>LD,HD,0),14);
DMM:=EMA(IF(LD>0&&LD>HD,LD,0),14);
PDI:=DMP*100/MTR;
MDI:=DMM*100/MTR;
ADX0:=EMA(100-EMA(ABS(MDI-PDI)/(MDI+PDI)*主力控盤Q+下限Q,6),3);
ADX:=IF(ADX0<0.5,0.5,IF(ADX0>106,106,ADX0));
ADXR:=EMA(ADX,6),COLORGRAY,LINETHICK3;

RSV1:=(CLOSE-LLV(LOW,4))/(HHV(HIGH,4)-LLV(LOW,4))*100;
FASTK:=SMA(RSV1,3,1);
龍Ｋ:=SMA(FASTK,2,1);
龍Ｄ:=SMA(龍Ｋ,5,1);
UK0:=EVVQ*39/龍Ｄ;
UK:=IF(UK0>98,98,IF(UK0<1,1,UK0));
價量:=EMA(0.98*3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1),2);
主線:=EMA(0.98*(((價量-LLV(價量,27))/(HHV(價量,27)-LLV(價量,27)))*(4))*(25),2);
主價:=SQRT(價量*主線*1.1);
OKK0:(價量+主價)/2,NODRAW;
OKK1:=UK*10/(OKK0+1)+40;
OKK2:=IF(OKK1>96,96+SQRT(SQRT(OKK1-96)),IF(OKK1<1,1,OKK1));
OKK3:=(100-OKK2);
OKK4:=IF(OKK3>0,IF(OKK3>100,100,OKK3),0-SQRT(0-OKK3));
OKK5:=(OKK2-UK)-UK+100,NODRAW;
NOK:=106-IF(OKK5>96,96+SQRT(OKK5-96),IF(OKK5<1,1,OKK5)),COLORBLUE,LINETHICK2;
OKK7:=((OKK2+10)/(OKK0+10))*((NOK+10)/(OKK0+10))*((OKK4+10)/(OKK0+10))*2;
OKK8:=IF(OKK7>100,100+SQRT(OKK7-100),OKK7);
OKK99:=98-SQRT(OKK8*NOK);
OKK9:=IF(OKK99<1,1-SQRT(ABS(OKK99)),OKK99);
OOK0:=(ABS(OKK0-OKK9)*1.18+18);
OOK1:=IF(OOK0<1,1,IF(OOK0>100,100,OOK0));
OOK2:=((ABS(OKK0-OKK9)*1.14+14));
{106-}
OOK3:=IF(OOK2<1,1,IF(OOK2>100,100,OOK2)),COLORWHITE,LINETHICK2;
{106-}
OPK0:=EMA(SQRT(OKK2*NOK/OOK3)*12.6*ABS((OOK1+10)/(OKK9+10)),2);
OPK1:=0.76*OPK0*((REF(OKK0,1)+10)/(OKK0+10))*((REF(OKK0,1)+10)/(OKK0+10))*((REF(OKK9,1)+10)/(OKK9+10))*((REF(OKK9,1)+10)/(OKK9+10));
OPK:=IF(OPK1>96,96+SQRT(SQRT((OPK1-96)/2)),IF(OPK1<1,1,OPK1));
OQK0:=(OPK-OOK1)+50;
OQK:=IF(OQK0>98,98+SQRT(OQK0-98),IF(OQK0<1,1,OQK0));

VKK2:=EMA(SQRT((106-UK)*OOK0)/(SQRT(OQK*OPK)/NOK+0.16)/SQRT(ADXR/ADX),2)*0.88;
WLL:IF(VKK2<1,1,IF(VKK2>95,96,VKK2)),COLORWHITE,LINETHICK2;
OKK0,COLORRED,LINETHICK2;

10;
90; 來源 程序化久久網