股歌看盘2011版指标详解 通达信看盘

指标公式详细说明

股歌看盘2011通达信版

源码:

n:=if(barscount(c)<270,if(barscount(c)<180,30,60),90);
d1:=ma((c-llv(c,n))/(hhv(c,n)-llv(c,n))*100,2);
q:=if(c>o,v*(100-d1),v*d1);
zf:=(c-o);
zb:=abs((c-ref(c,1)))/ref(c,1);
d2:=zf*q*zb/(hhv(zf*q*zb,n)-llv(zf*q*zb,n))*100;
d3:=(close-llv(low,9))/(hhv(high,9)-llv(low,9))*100;
kk:=(2*d1+2*d2+d3)/5;
dt:=if(date<1101121,1,0);
yyy:=dt*sma(kk/(hhv(kk,n)-llv(kk,n))*100,2,1);
lll:=dt*sma(yyy,3,1);
ddd:=dt*mema(lll,2);
个股短趋:=dt*(ma(yyy,5)*1+ma(yyy,10)*2+ma(yyy,20)*3+ma(yyy,30)*4+ma(yyy,60)*5)/15,nodraw;
{drawband(个股短趋,rgb(255,0,0),ref(个股短趋,1),rgb(0,255,0))};
个股中趋:=dt*(ma(c,5)*1+ma(c,10)*2+ma(c,20)*3+ma(c,30)*4+ma(c,60)*5+ma(c,120)*6)/21;

上轨:=dt*个股中趋*1.08,colorligray,linethick3;
下轨:=dt*个股中趋*0.92,colorligray,linethick3;

获利盘%:=dt*winner(c)*100,nodraw;
全换日数:=dt*sumbars(v,capital);
近期获利%:=dt*lwinner(全换日数,c)*100;
远期获利%:=dt*pwinner(全换日数,c)*100;
获利快线:=dt*mema(mema(mema(近期获利%,2),2),2),colorwhite,linethick3;
获利慢线:=dt*expmema(expmema(mema(近期获利%,3),3),3),colorred,linethick3;
获利中趋:=dt*(ma(近期获利%,5)+ma(近期获利%,10)*2+ma(近期获利%,20)*3+ma(近期获利%,30)*4+ma(近期获利%,60)*5)/15,coloryellow,linethick3;

pd1:=ma((indexc-llv(indexc,n))/(hhv(indexc,n)-llv(indexc,n))*100,2);
pq:=if(indexc>indexo,indexv*(100-pd1),indexv*pd1);
pzf:=(indexc-indexo);
pzb:=abs((indexc-ref(indexc,1)))/ref(indexc,1);
pd2:=pzf*pq*pzb/(hhv(pzf*pq*pzb,n)-llv(pzf*pq*pzb,n))*100;
pd3:=(indexc-llv(indexl,9))/(hhv(indexh,9)-llv(indexl,9))*100;
pkk:=(2*pd1+2*pd2+pd3)/5;
pyyy:=sma(pkk/(hhv(pkk,n)-llv(pkk,n))*100,2,1);
大盘短趋:=dt*(ma(pyyy,5)*1+ma(pyyy,10)*2+ma(pyyy,20)*3+ma(pyyy,30)*4+ma(pyyy,60)*5)/15,nodraw;
{drawband(大盘短趋,rgb(255,0,0),ref(大盘短趋,1),rgb(0,0,255))};
大盘中趋:=dt*(ma(indexc,5)*1+ma(indexc,10)*2+ma(indexc,20)*3+ma(indexc,30)*4+ma(indexc,60)*5+ma(indexc,120)*6)/21;

{仓位变量}
var1:=if(个股短趋>=ref(个股短趋,1),1,-1);
var2:=if(个股中趋>=ref(个股中趋,1),1,-1);
var3:=if(获利快线>=ref(获利快线,1),1,-1);
var4:=if(获利慢线>=ref(获利慢线,1),1,-1);
var5:=if(获利快线>=ref(获利快线,1) and 获利快线>获利慢线,1,-1);
var6:=if(获利快线>=ref(获利快线,1) and 获利快线>20,1,-1);
var7:=if(获利慢线>=ref(获利慢线,1) and 获利慢线>20,1,-1);
var8:=if(获利中趋>=ref(获利中趋,1),1,-1);
var9:=if(获利中趋>=ref(获利中趋,1) and 获利中趋>20,1,-1);
var10:=if(c>ma(c,5),1,-1);
var11:=if(c>ma(c,10),1,-1);
var12:=if(ma(c,5)>ref(ma(c,5),1),1,-1);
var13:=if(ma(c,5)>ma(c,10),1,-1);
var14:=if(ma(c,10)>ref(ma(c,10),1),1,-1);
var15:=if(ddd>=ref(ddd,1),1,-1);
var16:=if(ddd>=ref(ddd,1) and ddd>25,1,-1);
va:=if(c>o,vol,-vol);
股歌obv:=sum(if(c=o,0,va),0);
var17:=if(ma(股歌obv,5)>ref(ma(股歌obv,5),1),1,-1);
var18:=if("macd.dif">=ref("macd.dif",1),1,-1);
var19:=if("macd.dea">=ref("macd.dea",1),1,-1);
var20:=if("macd.dif">"macd.dea",1,-1);
股歌amov:=vol*(open+close)/2;
股歌amv5:=sum(股歌amov,5)/sum(vol,5);
股歌amv15:=sum(股歌amov,15)/sum(vol,15);
var21:=if(股歌amv5>ref(股歌amv5,1),1,-1);
var22:=if(股歌amv5>股歌amv15,1,-1);
aa:=abs((2*close+high+low)/4-ma(close,30))/ma(close,30);
济安线:=dma((2*close+low+high)/4,aa);
cc:=(close/济安线);
ma1:=ma(cc*(2*close+high+low)/4,3);
maaa:=((ma1-济安线)/济安线)/3;
tmp:=ma1-maaa*ma1;
var23:=if(tmp>=济安线,1,-1);

变量和:=dt*(var1+var2+var3+var4+var5+var6+var7+var8+var9+var10+var11+var12+var13
+var14+var15+var16+var17+var18+var19+var20+var21+var22+var23);
原始仓位%:=dt*if(变量和<0,0,变量和/23*100);

{仓位限制系数}
cwk1:=if(大盘中趋>=ref(大盘中趋,1),1,0.5);
cwk2:=if(大盘短趋>=ref(大盘短趋,1),1,0.5);
cwk3:=if(个股中趋>=ref(个股中趋,1),1,0.5);
cwk4:=if(个股短趋>=ref(个股短趋,1),1,0);
cwk5:=if(获利中趋>=ref(获利中趋,1),1,0.5);
cwk6:=if(ma(c,3)>下轨,1,0.5);
cwk7:=if("macd.dif"<"macd.dea" and "macd.dif"<ref("macd.dif",1),0,1);
cwk8:=if("macd.dif"<"macd.dea",0.5,1);
cwk9:=if("macd.dea"<ref("macd.dea",1),0.5,1);
cwk10:=if(股歌amv5<股歌amv15 and 股歌amv5<ref(股歌amv5,1),0,1);
cwk11:=if(股歌amv5<股歌amv15,0.5,1);
cwk12:=if(tmp<济安线 and tmp<ref(tmp,1),0,1);
cwk13:=if(tmp<济安线,0.5,1);
cwk14:=if(c<ref(c,1)*1.005*(1-hhv((abs(c/ref(c,1)-1)),
if(barscount(c)>100,100,barscount(c)))),0,1);{跌停清0}
cwk15:=if(c<=0.95*hhv(c,4),0,1);{顶部下跌超5%清0}
cwk16:=if(c<=o and v=hhv(v,60) and h=hhv(h,60) and c<ma(c,5),0.5,1);{收阴 量价60日新高}
调整仓位%:=dt*原始仓位%*cwk1*cwk2*cwk3*cwk4*cwk5*cwk6*cwk7*cwk8*cwk9*cwk10
*cwk11*cwk12*cwk13*cwk14;
初始仓位%:=dt*if(c>=ma(c,10) and ma(c,5)>=ref(ma(c,5),1)
and ma(c,20)>=ref(ma(c,20),1)
and ma(c,30)>=ref(ma(c,30),1) and ma(c,10)>=ma(c,20)
and ma(c,20)>=ma(c,30)
and (ref(ma(c,10),1)>=ref(ma(c,10),2)
and ma(c,10)<ref(ma(c,10),1)
or ma(c,10)>ref(ma(c,10),1)),100,调整仓位%)*cwk15*cwk16;
cs:=初始仓位%;
{仓位取整}
r001a:=if(cs<10,0,初始仓位%);
r001b:=if(cs>=10 and cs<15,10,r001a);
r001c:=if(cs>=15 and cs<25,20,r001b);
r001d:=if(cs>=25 and cs<35,30,r001c);
r001e:=if(cs>=35 and cs<45,40,r001d);
r001f:=if(cs>=45 and cs<55,50,r001e);
r001g:=if(cs>=55 and cs<65,60,r001f);
r001h:=if(cs>=65 and cs<75,70,r001g);
r001i:=if(cs>=75 and cs<85,80,r001h);
r001j:=if(cs>=85 and cs<95,90,r001i);
r001k:=if(cs>=95,100,r001j);
{调整因子}
t1:=c<o or c<=ref(c,1);{阴、跌不加仓}
t2:=(h-c)/(o-l)>2 and (h-c)>(c-o) or (h-c)/(c-o)>2
and (h-c)>(o-l);{上影过长不加仓}
t3:=v<0.5*ref(v,1);{缩量过半不加仓}
t4:=ref(c,1)<=ref(o,1) and (v<ref(v,1) or c<ref(o,1));
{昨日收阴或平盘：缩量或未突破昨日阴线不加仓}
t5:=c>=o;{收阳不减仓}
t6:=r001k>ref(r001k,1);{取整后原本增仓不减仓}
{调整1组}
r100:=if(t1 and r001k>ref(r001k,1),ref(r001k,1),r001k);
r101:=if(t1 and r100>ref(r100,1),ref(r100,1),r100);
r102:=if(t2 and r101>ref(r101,1),ref(r101,1),r101);
r103:=if(t3 and r102>ref(r102,1),ref(r102,1),r102);
r104:=if(t4 and r103>ref(r103,1),ref(r103,1),r103);
r105:=if(t5 and ref(r104,1)>r104,ref(r104,1),r104);
r106:=if(t6 and ref(r105,1)>r105,ref(r105,1),r105);
r107:=if(ref(r106,2)<50 and ref(r106,1)>=50 and r106<50
and c>0.95*hhv(c,4),50,r106);{仓位强振下跌不超5%半仓a}
r108:=if(ref(r106,2)>50 and ref(r106,1)<=50
and r106>50,50,r107);{仓位强振半仓b}
r109:=if(ref(r108,2)=r108 and ref(r108,1)>r108
and ref(r108,1)<50,ref(r108,1),r108);{仓位弱振锁仓}
r199:=dt*r109;
{调整2组}
r200:=if(t1 and r199>ref(r199,1),ref(r199,1),r199);
r201:=if(t1 and r200>ref(r200,1),ref(r200,1),r200);
r202:=if(t2 and r201>ref(r201,1),ref(r201,1),r201);
r203:=if(t3 and r202>ref(r202,1),ref(r202,1),r202);
r204:=if(t4 and r203>ref(r203,1),ref(r203,1),r203);
r205:=if(t5 and ref(r204,1)>r204,ref(r204,1),r204);
r206:=if(t6 and ref(r205,1)>r205,ref(r205,1),r205);
r207:=if(ref(r206,2)<50 and ref(r206,1)>=50
and r206<50 and c>0.95*hhv(c,4),50,r206);
r208:=if(ref(r206,2)>50 and ref(r206,1)<=50
and r206>50,50,r207);
r209:=if(ref(r208,2)=r208
and ref(r208,1)>r208 and ref(r208,1)<50,ref(r208,1),r208);
r299:=dt*r209;
{调整3组}
r300:=if(t1 and r299>ref(r299,1),ref(r299,1),r299);
r301:=if(t1 and r300>ref(r300,1),ref(r300,1),r300);
r302:=if(t2 and r301>ref(r301,1),ref(r301,1),r301);
r303:=if(t3 and r302>ref(r302,1),ref(r302,1),r302);
r304:=if(t4 and r303>ref(r303,1),ref(r303,1),r303);
r305:=if(t5 and ref(r304,1)>r304,ref(r304,1),r304);
r306:=if(t6 and ref(r305,1)>r305,ref(r305,1),r305);
r307:=if(ref(r306,2)<50 and ref(r306,1)>=50
and r306<50 and c>0.95*hhv(c,4),50,r306);
r308:=if(ref(r306,2)>50 and ref(r306,1)<=50
and r306>50,50,r307);
r309:=if(ref(r308,2)=r308
and ref(r308,1)>r308 and ref(r308,1)<50,ref(r308,1),r308);
r399:=dt*r309;
{调整4组}
r400:=if(t1 and r399>ref(r399,1),ref(r399,1),r399);
r401:=if(t1 and r400>ref(r400,1),ref(r400,1),r400);
r402:=if(t2 and r401>ref(r401,1),ref(r401,1),r401);
r403:=if(t3 and r402>ref(r402,1),ref(r402,1),r402);
r404:=if(t4 and r403>ref(r403,1),ref(r403,1),r403);
r405:=if(t5 and ref(r404,1)>r404,ref(r404,1),r404);
r406:=if(t6 and ref(r405,1)>r405,ref(r405,1),r405);
r407:=if(ref(r406,2)<50 and ref(r406,1)>=50
and r406<50 and c>0.95*hhv(c,4),50,r406);
r408:=if(ref(r406,2)>50 and ref(r406,1)<=50
and r406>50,50,r407);
r409:=if(ref(r408,2)=r408
and ref(r408,1)>r408 and ref(r408,1)<50,ref(r408,1),r408);
r499:=dt*r409;
{调整5组}
r500:=if(t1 and r499>ref(r499,1),ref(r499,1),r499);
r501:=if(t1 and r500>ref(r500,1),ref(r500,1),r500);
r502:=if(t2 and r501>ref(r501,1),ref(r501,1),r501);
r503:=if(t3 and r502>ref(r502,1),ref(r502,1),r502);
r504:=if(t4 and r503>ref(r503,1),ref(r503,1),r503);
r505:=if(t5 and ref(r504,1)>r504,ref(r504,1),r504);
r506:=if(t6 and ref(r505,1)>r505,ref(r505,1),r505);
r507:=if(ref(r506,2)<50 and ref(r506,1)>=50
and r506<50 and c>0.95*hhv(c,4),50,r506);
r508:=if(ref(r506,2)>50 and ref(r506,1)<=50
and r506>50,50,r507);
r509:=if(ref(r508,2)=r508
and ref(r508,1)>r508 and ref(r508,1)<50,ref(r508,1),r508);
r599:=dt*r509;
{调整6组}
r600:=if(t1 and r599>ref(r599,1),ref(r599,1),r599);
r601:=if(t1 and r600>ref(r600,1),ref(r600,1),r600);
r602:=if(t2 and r601>ref(r601,1),ref(r601,1),r601);
r603:=if(t3 and r602>ref(r602,1),ref(r602,1),r602);
r604:=if(t4 and r603>ref(r603,1),ref(r603,1),r603);
r605:=if(t5 and ref(r604,1)>r604,ref(r604,1),r604);
r606:=if(t6 and ref(r605,1)>r605,ref(r605,1),r605);
r607:=if(ref(r606,2)<50 and ref(r606,1)>=50
and r606<50 and c>0.95*hhv(c,4),50,r606);
r608:=if(ref(r606,2)>50 and ref(r606,1)<=50
and r606>50,50,r607);
r609:=if(ref(r608,2)=r608
and ref(r608,1)>r608 and ref(r608,1)<50,ref(r608,1),r608);
r699:=r609;

仓位%:dt*r699,coloryellow,linethick3;


复价:=dt*40*(ma(c,10)-ma(c,60))/ma(c,30);
复量:=dt*10*(ma(v,5)-ma(v,60))/ma(v,30);
下限:=-6*dt,colorgreen;
drawband(下限,rgb(0,255,0),ref(下限,1),rgb(255,0,0));
{粉红色}
stickline(复量<下限,复量,下限,4.00,0),color9900ff;
stickline(复量<下限,复量,下限,3.11,0),colorff00ff;
stickline(复量<下限,复量,下限,2.22,0),colorff33ff;
stickline(复量<下限,复量,下限,1.33,0),colorff66ff;
stickline(复量<下限,复量,下限,0.44,0),colorff99ff;
{红色}
偏移:=if(复量<下限,复量,下限);
stickline(复价<下限,复价+偏移,偏移,4.00,0),color000099;
stickline(复价<下限,复价+偏移,偏移,3.11,0),color0000aa;
stickline(复价<下限,复价+偏移,偏移,2.22,0),color0000cc;
stickline(复价<下限,复价+偏移,偏移,1.33,0),color0000ee;
stickline(复价<下限,复价+偏移,偏移,0.44,0),color0000ff;
drawicon(cross(复价,下限),-10,1);
drawtext(cross(复价,下限),-10,' 绝无未来,交流q:292995363'),colorwhite;

指标公式下载地址

上一指标公式：短线快枪副图导入说明指标详解 通达信导入源码

下一指标公式：机构量能－副图指标详解 通达信帖图源码

相关通达信公式推荐

指标公式下载注意

☉ 好公式网发布的指标公式主要用于软件技术面分析，仅供参考，勿用于实际操作，据此操作风险自负！

☉ 解压密码：www.goodgongshi.com 就是好公式网域名，希望大家看清楚，切勿输错。

☉ tnc和tni格式指标公式，仅可以用通达信软件引入使用，例如可以用通达信软件引入使用指标公式；

☉ tne格式指标公式，仅可以用通达信软件公式编辑器5.0版导入，高版本兼容低版本；

☉ fnc格式指标公式，可以用大智慧软件新一代高速行情分析系统股票软件使用，少部分可以用分析家软件引入使用；

☉ alg格式指标公式，仅仅可以用飞狐交易师软件引入使用；exp格式指标公式，仅可以用大智慧经典版软件引入使用；

☉ hxf格式指标公式，仅可以用同花顺软件引入使用。

☉ 如果您发现下载软件链接错误，请联系管理员报告错误。

☉ 好公式网欢迎各位网友帮忙宣传转发本站网址，有您的支持，我们会做得更好！

☉ 本文股歌看盘2011版指标详解 通达信看盘仅供学习研究。