自己组合的主图买卖指标[通达信公式]

相关标签: 最神奇的主图买卖指标 、 巴菲特主图指标公式 、 通达信主图买卖点指标 、 手机版通达信主图指标 、 通达信最神奇手机指标 、 通达信九龙神奇指标 、

 

财务资料、资金流向主图

 

 

源码：
ZKA:=H<REF(L,1) AND (REF(L,1)-H)*100/H>0.3; ZKB:=IF(L>REF(H,1), (L-REF(H,1))*100/REF(H,1),0); DS:=IF(BARSLASTCOUNT(BARSLAST(ZKA)>1 AND BARSLAST(ZKA)<34 AND L>REF(H,1))=1,1,0); STICKLINE(DS=1 AND C>=O,L*0.99,H*1.01,8,0),COLOR00FFFF; DRAWKLINE(H,O,L,C);MA7:MA(C,7),COLORYELLOW; M7斜度:ATAN((MA(C,7)/REF(MA(C,7),1)-1)*100)*57.3,NODRAW; MA10:=MA(C,10); MA30:MA(C,30),COLOR00FF00; M30斜度:ATAN((MA(C,30)/REF(MA(C,30),1)-1)*100)*57.3,NODRAW; MA120:MA(C,120),DOTLINE,COLORFF8000; IF(MA10>MA30,MA10,MA30),COLORRED; ZDF:=(C-REF(C,1))/REF(C,1)*100; {STICKLINE(ZDF>9.8,O,C,3,0),COLORRED;} STICKLINE(ZDF<-9.8,O,C,3,0),COLOR00FF00; 涨停:=(C-REF(C,1))/REF(C,1)*100>9.5; STICKLINE(涨停,CLOSE,O,3,0),COLOR0000FF; {顶底信号} 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,'底');DRAWTEXT_FIX(1,0.7,0,0,'所属板块:'),COLOR00FF00; DRAWTEXT_FIX(1,0.77,0,0,HYBLOCK),COLORRED; DRAWTEXT_FIX(1,0.835,0,0,DYBLOCK),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.005,0.05,0,当前业绩),COLORFFFFFF; DRAWTEXT_FIX(ISLASTBAR,0.005,0.09,0,每股指标),COLORFFFF80; DRAWTEXT_FIX(ISLASTBAR,0.005,0.01,0,股本市值),COLOR00FF80; DRAWTEXT_FIX(1,0.00,0.13,0,'主题投资：')COLOR0000FF; DRAWTEXT_FIX(1,0.07,0.13,0,EXTERNSTR(0,6))COLOR0000FF; DRAWTEXT_FIX(1,0.00,0.17,0,'主营业务：')COLORFF00FF; DRAWTEXT_FIX(1,0.07,0.17,0,EXTERNSTR(0,2))COLORFF00FF; DRAWTEXT_FIX(1,0.00,0.21,0,'出千概念：')COLORFF88FF; DRAWTEXT_FIX(1,0.07,0.21,0,EXTERNSTR(0,3))COLORFF88FF; DRAWTEXT_FIX(1,0,0.25,0,'愚民主题概念：'),COLOR00FFFF; DRAWTEXT_FIX(1,0.09,0.25,0,EXTERNSTR(0,5)),COLOR00FFFF; DRAWTEXT_FIX(1,0,0.29,0,'星 级：'),COLOR4080FF; DRAWTEXT_FIX(1,0.04,0.29,0,EXTERNSTR(0,4)),COLOR4080FF; DRAWTEXT_FIX(1,0.01,0.68,0,'千股千论：')COLOR0000FF; DRAWTEXT_FIX(1,0.07,0.89,0,EXTERNSTR(0,1))COLOR0000FF; X17:=EMA(C,20); X27:=REF(X17,1); 廿日均线斜率:=(X17-X27)/X27*100,NODRAW; DRAWTEXT_FIX(1,0.01,0.77,0,'MA20斜率:'),COLOR80FF80; DRAWNUMBER_FIX(1,0.08,0.77,0,CONST(廿日均线斜率)),COLORFFFFFF; DRAWTEXT_FIX(1,0.13,0.77,0,'莸利比例:'),COLORYELLOW; DRAWNUMBER_FIX(1,0.19,0.77,0,CONST(WINNER(C )*100)),COLORFFFFFF; VAR1:=(VOL / (((HIGH - LOW) * 2) - ABS((CLOSE - OPEN)))); 买盘:=IF((CLOSE > OPEN),(VAR1 * (HIGH - LOW)),IF((CLOSE < OPEN),(VAR1 * ((HIGH - OPEN) + (CLOSE - LOW))),(VOL / 2))); 卖盘:=IF((CLOSE > OPEN),(0 - (VAR1 * ((HIGH - CLOSE) + (OPEN - LOW)))),IF((CLOSE < OPEN),(0 - (VAR1 * (HIGH - LOW))),(0 - (VOL / 2)))); 买卖差:=(买盘+卖盘)/1000; DDX:=-(卖盘-买盘)/(买盘+卖盘)*100; D19:=EMA(ABS(DDX),60); B77:=MIN(DDX/D19,10)*5; DRAWTEXT_FIX(1,0.25,0.77,0,'超级量能:'),COLORYELLOW; DRAWNUMBER_FIX(1,0.31,0.77,0,CONST(B77)),COLORFFFFFF; SAT:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100); DRAWTEXT_FIX(1,0.01,0.72,0,'量能饱和度：')COLOR00FFFF; DRAWNUMBER_FIX(1,0.08,0.72,0,CONST(SAT)),COLORFFFFFF; 换:=VOL/CAPITAL*100,POINTDOT; 廿换:=SUM(换,20); DRAWTEXT_FIX(1,0.13,0.72,0,'月换手：')COLOR00FFFF; DRAWNUMBER_FIX(1,0.18,0.72,0,CONST(廿换)),COLORFFFFFF; B7:=EMA(100+WINNER(C)*100-HHV(WINNER(C)*100,20),3); DRAWTEXT_FIX(1,0.25,0.72,0,'筹码分布：')COLOR00FFFF; DRAWNUMBER_FIX(1,0.31,0.72,0,CONST(B7)),COLORFFFFFF; DFG:(FINANCE(20)-FINANCE(21))/FINANCE(20)*100,NODRAW,COLOR00FFFF;活跃度:=IF(DATE>1000101,(MA(VOL,11)+MA(VOL,11*2)+MA(VOL,11*3)+MA(VOL,11*4))/4/CAPITAL*1000,1),NODRAW; DRAWTEXT_FIX(1,0.01,0.82,0,'活跃度：'),COLORFFFF00; DRAWNUMBER_FIX(1,0.08,0.82,0,CONST(活跃度)),COLORFFFFFF; DRAWTEXT_FIX(1,0.01,0.86,0,'(热门股>41 活跃股>20 冷门股<20)'),COLORFFFF00; DRAWTEXT_FIX(1,0.01,0.90,0,'MA20斜率大胜率越大，>1.5胜率超7成,'),COLOR80FF80; DRAWTEXT_FIX(1,0.01,0.94,0,' <0.3可买跌,斜率0.5-1要选热门，'),COLOR80FF80; DRAWTEXT_FIX(1,0.01,0.98,0,'1-1.5选活跃股胜率较大'),COLOR80FF80; 副图预测量:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,VOL),NODRAW; STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,预测量,0,-1,-1),COLOR00C0C0; 量:VOL,VOLSTICK; 量差:IF(CURRBARSCOUNT=1,VOL*240/FROMOPEN/REF(VOL,1)-1,VOL/REF(VOL,1)-1),NODRAW, COLORLIMAGENTA; STICKLINE(量差>=1,0,VOL,2,0),COLORMAGENTA; VOL5:MA(量,5),COLORWHITE; VOL10:MA(量,10),COLORYELLOW; 五换:SUM(100*V/CAPITAL,5),COLORRED,NODRAW; 二十换:SUM(100*V/CAPITAL,20),COLORRED,NODRAW; SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20)); 量能饱和:IF(SAT>1,1,SAT)*100,COLORYELLOW,NODRAW; 总额:=AMOUNT; 买:=IF(O=C AND (C-REF(C,1))/REF(C,1)*100>9.8,AMOUNT,AMOUNT/((H-L)*2-ABS(O-C))*(C-L)); 买%:=买/AMOUNT*100; 流入:=AMOUNT*买%/10000000000; 流出:=AMOUNT/100000000-流入; 净流:=流入-流出; 总额3:=SUM(AMOUNT,3); 流入3:=SUM(流入,3); 流出3:=SUM(流出,3); 净流3:=SUM(流入-流出,3); 总额5:=SUM(AMOUNT,5); 流入5:=SUM(流入,5); 流出5:=SUM(流出,5); 净流5:=SUM(流入-流出,5); 总额10:=SUM(AMOUNT,10); 流入10:=SUM(流入,10); 流出10:=SUM(流出,10); 净流10:=SUM(流入-流出,10); 画:=CONST(FINDHIGH(VOL,0,190,1));DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,118,88),ABS(画),DRAWNULL),RGB(0,30,50),0,DRAWNULL); DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,115,114),CONST(总额/10000),DRAWNULL),RGB(150,10,0),0,DRAWNULL); DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,114,113),CONST(流入*10000),DRAWNULL),RGB(250,0,250),0,DRAWNULL); DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,113,112),CONST(流出*10000),DRAWNULL),RGB(0,255,255),0,DRAWNULL); DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,108,107),CONST(总额3/10000),DRAWNULL),RGB(150,10,0),0,DRAWNULL); DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,107,106),CONST(流入3*10000),DRAWNULL),RGB(250,0,250),0,DRAWNULL); DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,106,105),CONST(流出3*10000),DRAWNULL),RGB(0,255,255),0,DRAWNULL); DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,101,100),CONST(总额5/10000),DRAWNULL),RGB(150,10,0),0,DRAWNULL); DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,100,99),CONST(流入5*10000),DRAWNULL),RGB(250,0,250),0,DRAWNULL); DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,99,98),CONST(流出5*10000),DRAWNULL),RGB(0,255,255),0,DRAWNULL); DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,94,93),CONST(总额10/10000),DRAWNULL),RGB(150,10,0),0,DRAWNULL); DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,93,92),CONST(流入10*10000),DRAWNULL),RGB(250,0,250),0,DRAWNULL); DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,92,91),CONST(流出10*10000),DRAWNULL),RGB(0,255,255),0,DRAWNULL); DRAWTEXT(CURRBARSCOUNT=118,画*0.86,'总额亿'),COLORRED; DRAWTEXT(CURRBARSCOUNT=118,画*0.74,'流入亿'),COLORMAGENTA; DRAWTEXT(CURRBARSCOUNT=118,画*0.62,'流出亿'),COLORCYAN; DRAWTEXT(CURRBARSCOUNT=118,画*0.50,'净流亿'),COLOR0099FF; DRAWTEXT(CURRBARSCOUNT=112,画*0.95,'1日'),COLORMAGENTA; DRAWTEXT(CURRBARSCOUNT=106,画*0.95,'3日'),COLORMAGENTA; DRAWTEXT(CURRBARSCOUNT=100,画*0.95,'5日'),COLORMAGENTA; DRAWTEXT(CURRBARSCOUNT=94,画*0.95,'10日'),COLORMAGENTA;DRAWNUMBER(CURRBARSCOUNT=113,画*0.89,CONST(总额/100000000)),COLORYELLOW; DRAWNUMBER(CURRBARSCOUNT=113,画*0.77,CONST(流入)),COLORYELLOW; DRAWNUMBER(CURRBARSCOUNT=113,画*0.65,CONST(流出)),COLORYELLOW; DRAWNUMBER(CURRBARSCOUNT=113,画*0.53,CONST(净流)),COLORYELLOW; DRAWNUMBER(CURRBARSCOUNT=107,画*0.89,CONST(总额3/100000000)),COLORYELLOW; DRAWNUMBER(CURRBARSCOUNT=107,画*0.77,CONST(流入3)),COLORYELLOW; DRAWNUMBER(CURRBARSCOUNT=107,画*0.65,CONST(流出3)),COLORYELLOW; DRAWNUMBER(CURRBARSCOUNT=107,画*0.53,CONST(净流3)),COLORYELLOW; DRAWNUMBER(CURRBARSCOUNT=101,画*0.89,CONST(总额5/100000000)), COLORDDFFFF; DRAWNUMBER(CURRBARSCOUNT=101,画*0.77,CONST(流入5)), COLORDDFFFF; DRAWNUMBER(CURRBARSCOUNT=101,画*0.65,CONST(流出5)), COLORDDFFFF; DRAWNUMBER(CURRBARSCOUNT=101,画*0.53,CONST(净流5)), COLORDDFFFF; DRAWNUMBER(CURRBARSCOUNT=95,画*0.89,CONST(总额10/100000000)),COLORYELLOW; DRAWNUMBER(CURRBARSCOUNT=95,画*0.77,CONST(流入10)),COLORYELLOW; DRAWNUMBER(CURRBARSCOUNT=95,画*0.65,CONST(流出10)),COLORYELLOW; DRAWNUMBER(CURRBARSCOUNT=95,画*0.53,CONST(净流10)),COLORYELLOW; STICKLINE(CURRBARSCOUNT=103,画*0.38,画*0.41,100,1),COLOR00DDDD; STICKLINE(CURRBARSCOUNT=103,画*0.385,画*0.405,量能饱和,0),COLOR0033FF;

 

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

原理解析：

 

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

 

 

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

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

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

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