带详细财务指标公式，标注涨停，涨停天数主图指标公式源码[通达信公式]

相关标签:

 

 

源码：
MA5:MA(CLOSE,5),COLORWHITE; MA10:MA(CLOSE,10),COLORYELLOW; MA20:MA(CLOSE,20),COLORFF00FF; MA30:MA(CLOSE,30), COLORGREEN; MA46:=MA(CLOSE,46),COLORBLUE; MA60:MA(CLOSE,60),COLORRED; MA120:=MA(CLOSE,120),COLOR2F4F2F; MA250:=MA(CLOSE,250),COLOR871F78; {顶底信号} {LC:=REF(C,1); RSI5:=SMA(MAX(CLOSE-LC,0),5,1)/SMA(ABS(CLOSE-LC),5,1)*100; 逃命:=CROSS(80,RSI5); DRAWICON(逃命,H*1.005,15); TJ1:=REF("CCI.CCI",1)>90 AND "CCI.CCI"<REF("CCI.CCI",1); TJ2:=REF("KDJ.J"(9,3,3),1)>90 AND "KDJ.J"(9,3,3)<REF( "KDJ.J"(9,3,3),1); TJ3:=REF("RSI.RSI1",1)>70 AND "RSI.RSI1"<REF("RSI.RSI1",1); TJ4:=COUNT(TJ1,5) AND COUNT(TJ2,5) AND COUNT(TJ3,5); 大顶:=CROSS(TJ4,0.5); DRAWTEXT(大顶,H*1.01,'顶'); TJ5:=REF("CCI.CCI",1)<-100 AND "CCI.CCI">REF("CCI.CCI",1); TJ6:=REF("KDJ.J"(9,3,3),1)<20 AND "KDJ.J"(9,3,3)>REF( "KDJ.J"(9,3,3),1); TJ7:=REF("RSI.RSI1",1)<20 AND "RSI.RSI1">REF("RSI.RSI1",1); TJ8:=COUNT(TJ5,5) AND COUNT(TJ6,5) AND COUNT(TJ7,5); 大底:=CROSS(TJ8,0.5); DRAWTEXT(大底,L*0.991,'底');}{涨停标注} STICKLINE(C/REF(C,1)>1.095,C,O,2,0),COLORYELLOW; {涨停天数} VARZT:=BARSLAST(C/REF(C,1)>1.094); DRAWTEXT(VARZT=2,L*0.95,'3T'),COLORYELLOW; DRAWTEXT(VARZT=4,H*1.06,'5T'),COLORYELLOW; DRAWTEXT(VARZT=7,L*0.95,'8T'),COLORYELLOW; DRAWTEXT(VARZT=12,H*1.06,'13T'),COLORYELLOW; DRAWTEXT(VARZT=20,L*0.95,'21T'),COLORYELLOW; DRAWTEXT(VARZT=33,H*1.03,'34T'),COLORYELLOW; DRAWTEXT(VARZT=54,L*0.95,'55T'),COLORYELLOW; DRAWTEXT(VARZT=88,H*1.06,'89T'),COLORYELLOW; DRAWTEXT(VARZT=143,L*0.95,'144T'),COLORYELLOW; DRAWTEXT(VARZT=232,H*1.06,'233T'),COLORYELLOW; DRAWTEXT(VARZT=376,L*0.95,'377T'),COLORYELLOW; {财务指标} 总股本:=STRCAT(STRCAT('总股本: ',CON2STR(TOTALCAPITAL/1000000,2)),'亿'); 流通盘:=STRCAT(STRCAT(' 流通盘: ',CON2STR(CAPITAL/1000000,2)),'亿'); 全流通:=STRCAT(' 全流通: ',CON2STR((CAPITAL/1000000)/(TOTALCAPITAL/1000000),2)); 市值:=STRCAT(STRCAT(' 流通市值: ',CON2STR((CAPITAL/1000000)*C,2)),'亿'); 上市日期:=STRCAT(' 上市日期: ',CON2STR(HHV((BARSCOUNT(C)=0)*(DATE+19000000),0),0)); 股本市值:=STRCAT('股本市值: ',STRCAT(STRCAT(STRCAT(STRCAT(总股本,流通盘),全流通),市值),上市日期)); {} 市盈率:=STRCAT('市盈率: ',CON2STR(C/FINANCE(33),2)); 市销率:=STRCAT(' 市销率: ',CON2STR(C/(FINANCE(20)/FINANCE(1)),2)); 市净率:=STRCAT(' 市净率: ',CON2STR(C/FINANCE(34),2)); 净资收益率:=STRCAT(' 净资收益率: ',CON2STR(FINANCE(33)/FINANCE(34)*100,2)); 毛利率:=STRCAT(' 毛利率: ',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2)); 净利润率:=STRCAT(' 净利润率 ',CON2STR(FINANCE(30)/FINANCE(20)*100,2)); 主营利润率:=STRCAT(' 主营利润率 ',CON2STR(FINANCE(23)/FINANCE(20)*100,2)); 当前业绩:=STRCAT('当前业绩: ',STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(市盈率,市销率),市净率),净资收益率),毛利率),净利润率),主营利润率)); 每股收益:=STRCAT('每股收益: ',CON2STR(FINANCE(33),2)); 每股净资:=STRCAT('每股净资: ',CON2STR(FINANCE(34),2)); 每股未分:=STRCAT('每股未分: ',CON2STR(FINANCE(32),2)); 每股公积:=STRCAT('每股公积: ',CON2STR(FINANCE(18),2)); 每股现金:=STRCAT('每股现金: ',CON2STR(FINANCE(25)/FINANCE(1),2)); 每股指标:=STRCAT('每股指标: ',STRCAT(STRCAT(STRCAT(STRCAT(每股收益,每股净资),每股未分),每股公积),每股现金)); DRAWTEXT_FIX(ISLASTBAR,0.46,0.99,0,当前业绩),COLORFFFFFF; DRAWTEXT_FIX(ISLASTBAR,0.01,0.99,0,每股指标),COLORFFFF80; DRAWTEXT_FIX(ISLASTBAR,0.12,0.01,0,股本市值),COLOR00FF80; DRAWTEXT_FIX(1,0.01,0.13,0,EXTERNSTR(0,1)),COLORRED; DRAWTEXT_FIX(1,0.38,0.066,0,EXTERNSTR(0,2)),COLORDD00DD; DRAWTEXT_FIX(1,0.01,0.066,0,EXTERNSTR(0,3)),COLOR00DD00; DRAWTEXT_FIX(ISLASTBAR ,0.06,0.01,1,DYBLOCK),COLORYELLOW; DRAWTEXT_FIX(ISLASTBAR ,0.065,0.01,0,HYBLOCK),COLORYELLOW; DRAWTEXT_FIX(1,0.63,0.01,0,'愚民概念：'),COLOR00FFFF; DRAWTEXT_FIX(1,0.69,0.01,0,EXTERNSTR(0,4)),COLOR00FFFF;

 

 来源:程序化99（ WWW.CXH99.COM ）

原理解析：

 

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】

 

 

有思路，想编写各种指标公式，交易模型，选股公式，还原公式的朋友

可联系技术人员 QQ: 262069696  或微信：cxhjy888 进行 有偿收费 编写！(注：由于人数限制，QQ或微信请选择方便的一个联系我们就行，加好友时请简单备注下您的需求，否则无法通过。谢谢您！)

（怎么收费，代编流程等详情请点击查阅！）

(注：由于人数限制，QQ或微信请选择方便的一个联系我们就行，加好友时请简单备注下您的需求，否则无法通过。谢谢您！)