求把源码改写成通达信公式

bb1230

求把源码改写成通达信公式

来自：MACD论坛(bbs.macd.cn) 作者：bb1230 浏览：2154 回复：1

INPUT:N(2010,1993,2034);
INPUT:M(120,1,1000);
INPUT:T(10,1,1000);
INPUT:P(60,1,1000);
INPUT:Q(20,1,1000);
年报: PFFININ(1001,N,1231 ),linethick0;
增长率: PFFININ(1604,N,1231 ),linethick0;
三季报: PFFININ(1001,N,0930 ),linethick0;
二季报: PFFININ(1001,N,0630 ),linethick0;
一季报: PFFININ(1001,N,0331 ),linethick0;
去年年报: PFFININ(1001,N-1,1231 ),linethick0;
去年增长率: PFFININ(1604,N-1,1231 ),linethick0;
去年三季报: PFFININ(1001,N-1,0930 ),linethick0;
去年二季报: PFFININ(1001,N-1,0630 ),linethick0;
去年一季报: PFFININ(1001,N-1,0331 ),linethick0;
前年年报: PFFININ(1001,N-2,1231 ),linethick0;
前年增长率: PFFININ(1604,N-2,1231 ),linethick0;
前年三季报: PFFININ(1001,N-2,0930 ),linethick0;
前年二季报: PFFININ(1001,N-2,0630 ),linethick0;
前年一季报: PFFININ(1001,N-2,0331 ),linethick0;
大前年年报: PFFININ(1001,N-3,1231 ),linethick0;
大前年增长率: PFFININ(1604,N-3,1231 ),linethick0;
大前年三季报: PFFININ(1001,N-3,0930 ),linethick0;
大前年二季报: PFFININ(1001,N-3,0630 ),linethick0;
大前年一季报: PFFININ(1001,N-3,0331 ),linethick0;
年报增长率排名:(去年年报/前年年报*100+前年年报/大前年年报*100)/2;
季报增长率排名:(三季报/二季报*100+二季报/一季报*100+一季报/去年一季报*100)/3;
年季报排名:年报增长率排名*0.3+季报增长率排名*0.5;
年户数: PFFININ(4253,N,1231),linethick0;
三季户数: PFFININ(4253,N,0930),linethick0;
二季户数: PFFININ(4253,N,0630),linethick0;
一季户数: PFFININ(4253,N,0331),linethick0;
去年年户数: PFFININ(4253,N-1,1231),linethick0;
去年三季户数: PFFININ(4253,N-1,0930),linethick0;
去年二季户数: PFFININ(4253,N-1,0630),linethick0;
去年一季户数: PFFININ(4253,N-1,0331),linethick0;
每股收益:PFFININ(1001 ,N ,1231 ),linethick0;
净资产收益率:PFFININ(1002 ,N ,1231 ),linethick0;
每股公积:PFFININ(1005 ,N ,1231 ),linethick0;
每股未分配利润:PFFININ(1006 ,N ,1231 ),linethick0;
高比例分红可能:=每股未分配利润+每股公积;
利润总额:PFFININ(1269 ,N ,1231 )/100000000,linethick0;
销售额:PFFININ(1251 ,N ,1231 )/100000000;
每股现金净流量:PFFININ(1003 ,N ,1231 );
销售毛利率:FINANCE2(12);
主营收入同比:FINANCE2(11);  
净利润同比增长:FINANCE2(10);
销售毛利权益名:主营收入同比*0.4+销售毛利率+净资产收益率;
大买:=SELFDATA('20w大单买入量');
大卖:=SELFDATA('20w大单卖出量');
当天增减:(大买-大卖),LINETHICK0,COLORyellow;
主力仓量:sum(大买-大卖,0),LINETHICK4,COLORgreen;
三天前仓:=ref(主力仓量,3);
五天前仓:=ref(主力仓量,5);
十天前仓:=ref(主力仓量,10);
廿天前仓:=ref(主力仓量,20);
三天增减:主力仓量-三天前仓,LINETHICK0,color003399;
五天增减:主力仓量-五天前仓,LINETHICK0,color0055ff;
十天增减:主力仓量-十天前仓,LINETHICK0,color00aaff;
廿天增减:主力仓量-廿天前仓,LINETHICK0,colorblue;

STICKLINE(当天增减>0,当天增减,0,6,0),COLOR0000ff;
STICKLINE(当天增减<0,当天增减,0,6,0),color00ff00;
ma5:MA(主力仓量,5),colorred;
ma10:MA(主力仓量,10),COLORGRAY;
ma20:MA(主力仓量,20),COLORBLUE,linethick4;
ma30:MA(主力仓量,30),colorgreen;
ma50:MA(主力仓量,50),CIRCLEDOT,COLORMAGENTA;
主力增减:当天增减/CAPITAL;
drawtext(ma(主力仓量,50)>ref(ma(主力仓量,50),1),ma(主力仓量,50),'o'),COLORBLACK;
PARTLINE(ma50,ma50<ma30 and ma50>ref(ma50,1) and ma30>ref(ma30,1),rgb(255,0,0),
   ma50<ma30,rgb(255,255,0),
   ma50>ma30 and ma50>ref(ma50,1) and ma30>ref(ma30,1),rgb(255,0,255),
   1,rgb(0,0,255)),CIRCLEDOT;
当天增减比率:当天增减/CAPITAL*100;
三天增减比率:三天增减/CAPITAL*100;
五天增减比率:五天增减/CAPITAL*100;
十天增减比率:十天增减/CAPITAL*100;
廿天增减比率:廿天增减/CAPITAL*100;
仓量斜率3:ma(主力仓量-ref(主力仓量,1),3)/CAPITAL*100,linethick0;
仓量斜率5:ma(主力仓量-ref(主力仓量,1),5)/CAPITAL*100*100,linethick0;
仓量斜率10:ma(主力仓量-ref(主力仓量,1),10)/CAPITAL,linethick0;
仓量斜率20:ma(主力仓量-ref(主力仓量,1),20)/CAPITAL*100,linethick0;
飘红:LAST(当天增减>0),PRECIS0,color0000FF,linethick0;
十日飘红:COUNT(当天增减>0,10),PRECIS0,colorgray,linethick0;
五日飘红:COUNT(当天增减>0,5),PRECIS0,colorgray,linethick0;
三日飘红:COUNT(当天增减>0,3),PRECIS0,colorgray,linethick0;
主力持仓率:主力仓量/CAPITAL*100;
AA:=(CLOSE-LLV(LOW,Q))*100/(HHV(HIGH,Q)-LLV(LOW,Q));
BB:=(CLOSE-LLV(LOW,BARSCOUNT(CLOSE)))*100/(HHV(HIGH,BARSCOUNT(CLOSE))-LLV(LOW,BARSCOUNT(CLOSE)));
CC:=BARSCOUNT(CLOSE);
二十天相对价位:IF(CC<=Q,BB,AA),colorblack;
GG:=(CLOSE-LLV(LOW,T))*100/(HHV(HIGH,T)-LLV(LOW,T));
HH:=(CLOSE-LLV(LOW,BARSCOUNT(CLOSE)))*100/(HHV(HIGH,BARSCOUNT(CLOSE))-LLV(LOW,BARSCOUNT(CLOSE)));
II:=BARSCOUNT(CLOSE);
十天相对价位:IF(II<=T,HH,GG);
FF:=(CLOSE-LLV(LOW,M))*100/(HHV(HIGH,M)-LLV(LOW,M));
DD:=(CLOSE-LLV(LOW,BARSCOUNT(CLOSE)))*100/(HHV(HIGH,BARSCOUNT(CLOSE))-LLV(LOW,BARSCOUNT(CLOSE)));
EE:=BARSCOUNT(CLOSE);
半年相对价位:IF(EE<=M,DD,FF),colorred;
JJ:=(CLOSE-LLV(LOW,P))*100/(HHV(HIGH,P)-LLV(LOW,P));
KK:=(CLOSE-LLV(LOW,BARSCOUNT(CLOSE)))*100/(HHV(HIGH,BARSCOUNT(CLOSE))-LLV(LOW,BARSCOUNT(CLOSE)));
MM:=BARSCOUNT(CLOSE);
六十天相对价位:IF(MM<=P,KK,JJ),colorblue;
Var1:=(CLOSE-REF(CLOSE,M))/REF(CLOSE,M)*100;
Var2:=(INDEXC-REF(INDEXC,M))/REF(INDEXC,M)*100;
个股强弱: EMA(Var1-Var2,M), colorred,linethick2 ;
大盘强弱: EMA(Var2-Var1,M),  colorgreen,linethick2;
个股对大盘强弱:个股强弱-大盘强弱,colorblue,linethick2;

一零中期持股率:SELFDATA('2010中期机构持股率' );
综合排名:年季报排名*0.2+销售毛利权益名*3+五天增减比率*9+一零中期持股率*4+半年相对价位*4;

骆老师

不知道你的源码 是什么软件里的