|
新浪博客
OPEN,VOL,0,9,0),color6666CC;STICKLINE(CLOSE>OPEN,VOL,0,6,0),color7777DD;STICKLINE(CLOSE>OPEN,VOL,0,2.4,0),color8888EE;STICKLINE(CLOSE>OPEN,VOL,0,1.1,0),color9999FF;STICKLINE(CLOSE>OPEN,OPEN,LOW,0.5,0),color1199FF;STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0.5,0),color1199FF;STICKLINE(OPEN>=CLOSE,CLOSE,LOW,0.5,0),colorCCCCCC;STICKLINE(OPEN>=CLOSE,OPEN,HIGH,0.5,0),colorCCCCCC;VAR1:=DYNAINFO(17)*REF(MA(VOL,5),1);VAR2:STICKLINE(DYNAINFO(7)=CLOSE
AND
DYNAINFO(10)=AMOUNT,VAR1,0,4,1);VARC:=(SMA(ABS(LOW-REF(LOW,1)),3,1))/(SMA(MAX(LOW-REF(LOW,1),0),3,1));RSV1:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;K1:=SMA(RSV1,3,1);D1:=SMA(K1,3,1);J1:=3*K1-2*D1;RSV:=(CLOSE-LLV(LOW,26))/(HHV(HIGH,26)-LLV(LOW,26))*100;K:=SMA(RSV,6,1);D:=SMA(K,3,1);J:=3*K-2*D;LC:=REF(CLOSE,1);XA:=(IF(CROSS(J1,J)
AND J<20,-1,0))+(IF(CROSS(J,J1) AND
J>80,1,0));TYP:=(HIGH+LOW+CLOSE)/3;CCJ:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14))/2;RSI1:=(SMA(MAX(CLOSE-LC,0),6,1))/(SMA(ABS(CLOSE-LC),6,1))*100;VAR222:=LLV(LOW,36);VAR333:=HHV(HIGH,36);K2:=EMA((CLOSE-VAR222)/(VAR333-VAR222)*100,9);XB:=(IF(CCJ>100
AND K2>50 AND CLOSE>OPEN,0.5,0))+(IF(RSI1>80 AND K2>50
AND
CLOSE>OPEN,0.5,0));RSV3:=(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100))*100;K13:=SMA(RSV3,21,1);D13:=SMA(K1,3,1);J13:=3*K13-2*D13;XC:=IF(J13>80
AND RSI1>85,0.5,0);金指
EMA(IF(LOW<=LLV(LOW,30),VARC,0),3))*150,LINETHICK2,colorFF0000;IF(DYNAINFO(7)=CLOSE
AND
DYNAINFO(10)=AMOUNT,VAR1,VAR2),colorFF0000;警戒线:(IF(XA+XB+XC>0,61.8,0))*150;DRAWTEXT(DYNAINFO(7)=CLOSE
AND DYNAINFO(10)=AMOUNT,VOL,'动态行情VOL');
2.飞狐的单峰密集
sx100:=SUMBARS(100*v/CAPITAL,100);
p100:=ma(c,sx100),LINETHICK1,color0000ff;
ba100:=BACKSET(BARSTATUS=2,sx100);
VERTLINE(ref(ba100,1)=0 and ba100=1),POINTDOT,color0000ff;
sx200:=SUMBARS(100*v/CAPITAL,200);
p200:=ma(c,sx200),LINETHICK1,colorff00ff;
ba200:=BACKSET(BARSTATUS=2,sx200);
VERTLINE(ref(ba200,1)=0 and ba200=1),POINTDOT,colorff00ff;
sx300:=SUMBARS(100*v/CAPITAL,300);
p300:=ma(c,sx300),LINETHICK1,colorff6600;
ba300:=BACKSET(BARSTATUS=2,sx300);
VERTLINE(ref(ba300,1)=0 and ba300=1),POINTDOT,colorff6600;
sx400:=SUMBARS(100*v/CAPITAL,400);
p400:=ma(c,sx400),LINETHICK1,color0099ff;
ba400:=BACKSET(BARSTATUS=2,sx400);
VERTLINE(ref(ba400,1)=0 and ba400=1),POINTDOT,color0099ff;
sx500:=SUMBARS(100*v/CAPITAL,500);
p500:=ma(c,sx500),LINETHICK1,colorgray;
ba500:=BACKSET(BARSTATUS=2,sx500);
VERTLINE(ref(ba500,1)=0 and ba500=1),POINTDOT,colorgray;
a1:=p100;b[1]:=a1[SYSPARAM(1)];
a2:=p200;b[2]:=a2[SYSPARAM(1)];
a3:=p300;b[3]:=a3[SYSPARAM(1)];
a4:=p400;b[4]:=a4[SYSPARAM(1)];
a5:=p500;b[5]:=a5[SYSPARAM(1)];
zd:max(max(max(max(a1,a2),a3),a4),a5);
zx:min(min(min(min(a1,a2),a3),a4),a5);
PARTLINE(1,zd),COLORGRAY;
PARTLINE(1,zx)COLORGRAY;
for i=1 to 5 do begin
if zd[SYSPARAM(1)]=b then
最大:if(i=1,100,I*100),LINETHICK0,COLORYELLOW;
if zx[SYSPARAM(1)]=b then
最小:if(i=1,100,I*100),LINETHICK0,COLORGREEN;
end;
3.一个单峰密集度选股
1）A50:=COST(50),COLORRED,LINETHICK2;
WINNER(C)*100>50 AND CROSS(C,A50);
2）xa:=sma(cost(80),2,1);
xb:=sma(cost(4),3,1);
筹码密集:(xa-xb)/xa*100<25 and COUNT(CLOSE,0)>30;
10.
A1:=COST(85);
A2:=COST(15);
A3:=A1-A2;
A4:=(A1+A2)/2;
单峰密集:A3/A4*100<14.45;
参数： n
公式如下：
LCS:=COST((100-n)/2);
LCE:=COST(n+(100-n)/2);
SCROK:((LCE-LCS)/(LCE+LCS)*100/2)<10;
{ 直接粘贴到新建的选股公式中就可以了。其中，参数 n 就是筹码分布成本的百分比, 例 n＝90 时，就是筹码分布 90%成本集中度小于10的选股公式； n＝80时，就是筹码分布 80%成本集中度小于10的选股公式 。}
筹码低位密集
input:M(480,250,999),集中度(12,12,30);
hh:=hhv(h,m);
ll:=llv(l,m);
zh:=hh[DATACOUNT];
zl:=ll[DATACOUNT];
q:=(zh-zl)/5;
c90％:=(cost(95)-cost(5))/(cost(95)+cost(5))*100;
c90％<=集中度 and c
求通达信低位筹码单峰密集选股公式：要求密集强度大，单峰幅度越窄越集中越好，如图：
你的理解和要求有些瑕疵，照你的原意编写过后，我觉得该选股公式有较大的缺陷，如果凭它选股，势必效率效果都不咋地。综其以上缘由，所以我进行了一些改动，大意也稍有改动，但实用性
更好，名称自己按个。
参数：P1{0，100，90}
公式如下：
A:=P1+(100-P1)/2;
B:=(100-P1)/2;
CC:=COST(A);
DD:=COST(B);
↑1:IF((CC-DD)/(CC+DD)*100/2>REF((CC-DD)/(CC+DD)*100/2,BARSCOUNT(C)-1)+10,1,0);
如果你想在选股栏里看到SCR值，可以换用如下公式：
A:=P1+(100-P1)/2;
B:=(100-P1)/2;
CC:=COST(A);
DD:=COST(B);
SCR1:(CC-DD)/(CC+DD)*100/2;
SCR2:REF(SCR,BARSCOUNT(C)-1)+10;
↑1:IF(SCR1>SCR2,1,0);
选股后的↑1股票的投机价值将更大，相反则更小！
希望能对你有所帮助！
A1:=COST(85);
A2:=COST(15);
A3:=A1-A2;
A4:=(A1+A2)/2;
A5:=A3/A4*100<10;
B1:=HHV(h,250);
B2:=LLV(l,250);
B3:=B1-B2;
B4:=(A4-B2)
A5 AND B4;
2.飞狐的单峰密集
sx100:=SUMBARS(100*v/CAPITAL,100);
p100:=ma(c,sx100),LINETHICK1,color0000ff;
ba100:=BACKSET(BARSTATUS=2,sx100);
VERTLINE(ref(ba100,1)=0 and ba100=1),POINTDOT,color0000ff;
sx200:=SUMBARS(100*v/CAPITAL,200);
p200:=ma(c,sx200),LINETHICK1,colorff00ff;
ba200:=BACKSET(BARSTATUS=2,sx200);
VERTLINE(ref(ba200,1)=0 and ba200=1),POINTDOT,colorff00ff;
sx300:=SUMBARS(100*v/CAPITAL,300);
p300:=ma(c,sx300),LINETHICK1,colorff6600;
ba300:=BACKSET(BARSTATUS=2,sx300);
VERTLINE(ref(ba300,1)=0 and ba300=1),POINTDOT,colorff6600;
sx400:=SUMBARS(100*v/CAPITAL,400);
p400:=ma(c,sx400),LINETHICK1,color0099ff;
ba400:=BACKSET(BARSTATUS=2,sx400);
VERTLINE(ref(ba400,1)=0 and ba400=1),POINTDOT,color0099ff;
sx500:=SUMBARS(100*v/CAPITAL,500);
p500:=ma(c,sx500),LINETHICK1,colorgray;
ba500:=BACKSET(BARSTATUS=2,sx500);
VERTLINE(ref(ba500,1)=0 and ba500=1),POINTDOT,colorgray;
a1:=p100;b[1]:=a1[SYSPARAM(1)];
a2:=p200;b[2]:=a2[SYSPARAM(1)];
a3:=p300;b[3]:=a3[SYSPARAM(1)];
a4:=p400;b[4]:=a4[SYSPARAM(1)];
a5:=p500;b[5]:=a5[SYSPARAM(1)];
zd:max(max(max(max(a1,a2),a3),a4),a5);
zx:min(min(min(min(a1,a2),a3),a4),a5);
PARTLINE(1,zd),COLORGRAY;
PARTLINE(1,zx)COLORGRAY;
for i=1 to 5 do begin
if zd[SYSPARAM(1)]=b then
最大:if(i=1,100,I*100),LINETHICK0,COLORYELLOW;
if zx[SYSPARAM(1)]=b then
最小:if(i=1,100,I*100),LINETHICK0,COLORGREEN;
end;
3.一个单峰密集度选股
1）A50:=COST(50),COLORRED,LINETHICK2;
WINNER(C)*100>50 AND CROSS(C,A50);
2）xa:=sma(cost(80),2,1);
xb:=sma(cost(4),3,1);
筹码密集:(xa-xb)/xa*100<25 and COUNT(CLOSE,0)>30;
10.
A1:=COST(85);
A2:=COST(15);
A3:=A1-A2;
A4:=(A1+A2)/2;
单峰密集:A3/A4*100<14.45;
参数： n
公式如下：
LCS:=COST((100-n)/2);
LCE:=COST(n+(100-n)/2);
SCROK:((LCE-LCS)/(LCE+LCS)*100/2)<10;
{ 直接粘贴到新建的选股公式中就可以了。其中，参数 n 就是筹码分布成本的百分比, 例 n＝90 时，就是筹码分布 90%成本集中度小于10的选股公式； n＝80时，就是筹码分布 80%成本集中度小于10的选股公式 。}
筹码低位密集
input:M(480,250,999),集中度(12,12,30);
hh:=hhv(h,m);
ll:=llv(l,m);
zh:=hh[DATACOUNT];
zl:=ll[DATACOUNT];
q:=(zh-zl)/5;
c90％:=(cost(95)-cost(5))/(cost(95)+cost(5))*100;
c90％<=集中度 and c
求通达信低位筹码单峰密集选股公式：要求密集强度大，单峰幅度越窄越集中越好，如图：
你的理解和要求有些瑕疵，照你的原意编写过后，我觉得该选股公式有较大的缺陷，如果凭它选股，势必效率效果都不咋地。综其以上缘由，所以我进行了一些改动，大意也稍有改动，但实用性
更好，名称自己按个。参数：P1{0，100，90}
公式如下：
A:=P1+(100-P1)/2;
B:=(100-P1)/2;
CC:=COST(A);
DD:=COST(B);
↑1:IF((CC-DD)/(CC+DD)*100/2>REF((CC-DD)/(CC+DD)*100/2,BARSCOUNT(C)-1)+10,1,0);
如果你想在选股栏里看到SCR值，可以换用如下公式：
A:=P1+(100-P1)/2;
B:=(100-P1)/2;
CC:=COST(A);
DD:=COST(B);
SCR1:(CC-DD)/(CC+DD)*100/2;
SCR2:REF(SCR,BARSCOUNT(C)-1)+10;
↑1:IF(SCR1>SCR2,1,0);
选股后的↑1股票的投机价值将更大，相反则更小！
希望能对你有所帮助！
A1:=COST(85);
A2:=COST(15);
A3:=A1-A2;
A4:=(A1+A2)/2;
A5:=A3/A4*100<10;
B1:=HHV(h,250);
B2:=LLV(l,250);
B3:=B1-B2;
B4:=(A4-B2)
A5 AND B4;