首页 > > 详细

调试大智慧选股公式、股票选股公式代写、把CCI,KDJ,RSI叠加到主图K线的公式指标源码-

 
把CCI,KDJ,RSI三个经典叠加到主图上没什么特别你看好就下载.下面是叠加KDJ的源码,请你参考.你会编辑可以自己来做的.其他都放在压缩软件里了.都是源码---------还得加一句:祝你端午节 阖家欢乐.节后发财;你下载的【REFX.DLL】文件就放在大智慧的文件夹里就可以了.没有这个DLL文件就不会显示那个【买卖的粗线】也就少了个你买卖的参考.源码
 
DRAWGBKlast(c>0,strip(RGB(0,0,80),RGB(0,20,20),0));
X:=BARSLAST(DISPSTATUS=1)+1;
DRAWTEXTABS(600,10,'■叠加KDJ现在可见K线:【'+NUMTOSTRN(X,0)+'天】'),Color00FFFF,LINETHICK3;
流通盘大小:=FINANCE2(37)/1000000*100;
DRAWTEXTABS(30,15,'▓流通盘:---◆'+NUMTOSTRN(流通盘大小,2)+'亿◆---'+''),LINETHICK3,COLOR00ffff;
每股收益:=FINANCE2(3);
每股市盈率:=DYNAINFO(39);
每股净资产:=FINANCE2(4);
销售毛利率:=FINANCE2(12);
主营收入同比:=FINANCE2(11);
净利润同比增长:=FINANCE2(10);
DRAWTEXTABS(160,35,'每股收益:'+NUMTOSTRN(每股收益,2)+'元'),COLOR00FF00;
DRAWTEXTABS(160,50,'每股市盈率:'+NUMTOSTRN(每股市盈率,1)+'倍'),COLORRED;
DRAWTEXTABS(160,65,'每股净资产:'+NUMTOSTRN(每股净资产,2)+'元'),COLOR0099FF;
DRAWTEXTABS(2,35,'销售毛利率:'+NUMTOSTRN(销售毛利率,1)+'%'),LINETHICK1,COLOR0099FF;
DRAWTEXTABS(2,50,'主营收入同比增长:'+NUMTOSTRN(主营收入同比,1)+'%'),LINETHICK1,ColorYELLOW;
DRAWTEXTABS(2,65,'净利润同比增长:'+NUMTOSTRN(净利润同比增长,1)+'%'),LINETHICK1,COLOR00FF00;
{-------K线变色-------}
{K线变色}
STICKLINE(CLOSE>=OPEN,OPEN,LOW,0.5,0 ),COLOR0000ff,LAYER0;
STICKLINE(CLOSE>=OPEN,CLOSE,HIGH,0.5,0 ),COLOR0000ff,LAYER0;
STICKLINE(CLOSE=CLOSE ,CLOSE ,OPEN,8,0 ),COLOR002200;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLOR004400;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLOR006600;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLOR008800;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLOR00AA00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLOR00BB00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLOR00CC00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLOR00DD00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,0,0 ),COLOR00DD00;STICKLINE(close>open,close,open,8,0) ,COLORFF00FF;
STICKLINE(close>open,close,open,7,0) ,COLORFF22FF;
STICKLINE(close>open,close,open,6,0) ,COLORFF44FF;
STICKLINE(close>open,close,open,5,0) ,COLORFF66FF;
STICKLINE(close>open,close,open,4,0) ,COLORFF88FF;
STICKLINE(close>open,close,open,3,0) ,COLORFF99FF;
STICKLINE(close>open,close,open,2,0) ,COLORFFAAFF;
STICKLINE(close>open,close,open,1,0) ,COLORFFBBFF;
STICKLINE(close>open,close,open,0,0) ,COLORFFBBFF;{【卖买】------卖买轨道------}
PC:=FORCAST((2*C+H+L)/4,5);
P:=HHVALL(BARPOS)-BARPOS+1;
KN:=7; {----------099引 KN:=7;-----------}
S卖:IF(P=1,"REFX@REFX"(MA(PC,KN/2+1),KN/2),
IF(P=2 AND KN>1,"REFX@REFX"(MA(PC,KN/2+2),KN/2),
IF(P=3 AND KN>4,"REFX@REFX"(MA(PC,KN/2+3),KN/2),
IF(P=4 AND KN>6,"REFX@REFX"(MA(PC,KN/2+4),KN/2),
IF(P=5 AND KN>8,"REFX@REFX"(MA(PC,KN/2+5),KN/2),
IF(P=6 AND KN>10,"REFX@REFX"(MA(PC,KN/2+6),KN/2),
IF(P=7 AND KN>12,"REFX@REFX"(MA(PC,KN/2+7),KN/2),
IF(P=8 AND KN>14,"REFX@REFX"(MA(PC,KN/2+8),KN/2),"REFX@REFX"(MA(PC,KN),(KN+1)/2-1))))))))),COLORff9900,LINETHICK2,LAYER6;
PARTLINE(S卖 ,S卖>REF(S卖,1),RGB(255,0,0)),LINETHICK4,LAYER0;{【A】以下计算叠加比和叠加平移量}
{1、叠加区域高度}
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;
kh:=hhv(h,X);
kL:=LLv(L,X);
rh:=hhv(J,X);
rL:=LLv(J,X);
{2、叠加比}
br:=(kh-kL)/(rh-rL);
{3、叠加平移量}
wk:=(kh-kL);
wr:=(kh+kL-(rh+rL)*br)/2;
{【B】叠加KDJ线}
K线:=K*br+wr;
D线:=D*br+wr;
J线:J*br+wr,Color0044FF;
PARTLINE(K线,(K线>REF(K线,1))-1,rgb(0,255,100),1,rgb(255,0,0)),LINETHICK2,LAYER0;
PARTLINE(D线,(D线>REF(D线,1))-1,rgb(0,255,100),1,rgb(255,0,0)),LINETHICK2,LAYER0;
FILLRGN(D线,K线,D线>K线,RGB(0,100,50),D线180000 and (CXH=1 OR CXH=6));
DRAWTEXTREL(10 ,10 ,'指标公式');
 
 

 



 

联系我们 - QQ: 88652583
© 2014 www.93stock.com
代写选股公式网!
声明:警惕假冒分子冒充本站提供证券咨询服务,选股公式网为非证券咨询机构,本站不提供有关股评、投资分析报告、股市预测,证券咨询等服务。本站仅提供股票、期货、黄金、外汇的软件技术交流与分享。本站文章为互联网文章,其仅供参考,并不构成投资建议。