当前位置:分析家公式网 → 股票公式 → 通达信公式 → 一键转帖:市场情绪-纯代码板+通达信情绪模板(再调整)
软件名称:[B]市场情绪-纯代码板+通达信情绪模板(再调整)[/B]
软件类型:国产软件
运行环境:Win10/Win9X/Win8/Win2000/WinXP/Win2003/Win7/
软件语言:简体中文
授权方式:分享版
软件大小:7.00 KB
官方主页:Home Page
更新时间:2024-04-02 07:16:13
软件简介:
再次调整
======= 2024/3/27 =======
市场情绪-纯代码板
附件里是公式的源码
还有一个文件是:SCQX.sp 这是通达信版面文件,会按照的就安装试一试。
六脉神剑
X_1:=1990303;
X_2:=IF(DATE<X_1,1,0);
X_3:=EMA(CLOSE,8)-EMA(CLOSE,13);
X_4:=EMA(X_3,5);
X_5:=(X_3>X_4)*X_2;
X_6:=IF(X_5,1,0)*X_2;
DRAWTEXT(ISLASTBAR=1,0.8,'.MACD'),COLORWHITE;
DRAWICON((X_3>X_4)*X_2,1,1);
DRAWICON((X_3<X_4)*X_2,1,2);
X_7:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;
X_8:=SMA(X_7,3,1);
X_9:=SMA(X_8,3,1);
DRAWICON((X_8>X_9)*X_2,2,1);
DRAWICON((X_8<X_9)*X_2,2,2);
DRAWTEXT(ISLASTBAR=1,1.8,'.KDJ'),COLORWHITE;
X_10:=(X_8>X_9)*X_2;
X_11:=IF(X_10,2,0)*X_2;
X_12:=REF(CLOSE,1);
X_13:=SMA(MAX(CLOSE-X_12,0),5,1)/SMA(ABS(CLOSE-X_12),5,1)*100;
X_14:=SMA(MAX(CLOSE-X_12,0),13,1)/SMA(ABS(CLOSE-X_12),13,1)*100;
DRAWICON((X_13>X_14)*X_2,3,1);
DRAWICON((X_13<X_14)*X_2,3,2);
DRAWTEXT(ISLASTBAR=1,2.8,'.RSI'),COLORWHITE;
X_15:=(X_13>X_14)*X_2;
X_16:=IF(X_15,3,0);
X_17:=(-(HHV(HIGH,13)-CLOSE))/(HHV(HIGH,13)-LLV(LOW,13))*100;
X_18:=SMA(X_17,3,1);
X_19:=SMA(X_18,3,1);
DRAWICON((X_18>X_19)*X_2,4,1);
DRAWICON((X_18<X_19)*X_2,4,2);
DRAWTEXT(ISLASTBAR=1,3.8,'.LWR'),COLORWHITE;
X_20:=X_18>X_19;
X_21:=IF(X_20,4,0);
X_22:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
DRAWICON(CLOSE>X_22,5,1);
DRAWICON(CLOSE<X_22,5,2);
DRAWTEXT(ISLASTBAR=1,4.8,'.BBI'),COLORWHITE;
X_23:=CLOSE>X_22;
X_24:=IF(X_23,5,0);
X_25:=IF(YEAR>2023,1,0);
{STICKLINE(X_25=1,1,6,20,0),COLORBLACK;}
X_26:=CLOSE-REF(CLOSE,1);
X_27:=100*EMA(EMA(X_26,5),3)/EMA(EMA(ABS(X_26),5),3);
X_28:=100*EMA(EMA(X_26,13),8)/EMA(EMA(ABS(X_26),13),8);
DRAWICON(X_27>X_28,6,1);
DRAWICON(X_27<X_28,6,2);
DRAWTEXT(ISLASTBAR=1,5.8,'.MTM'),COLORWHITE;
X_29:=X_27>X_28;
X_30:=IF(X_29,7,0);
涨买入:IF(X_5 AND X_10 AND X_15 AND X_20 AND X_23 AND X_29 AND REF(X_5 AND X_10 AND X_15 AND X_20 AND X_23 AND X_29,1)=0,6,0),COLORYELLOW,LINETHICK2;
上涨:IF(X_5 AND X_10 AND X_15 AND X_20 AND X_23 AND X_29,6,0),COLORYELLOW,LINETHICK2;
X_31:=BARSLASTCOUNT(X_5 AND X_10 AND X_15 AND X_20 AND X_23 AND X_29);
X_32:=BARSLASTCOUNT(X_6+X_11+X_16+X_21+X_24+X_30>0 AND X_6+X_11+X_16+X_21+X_24+X_30<21);
X_33:=BARSLASTCOUNT(X_6+X_11+X_16+X_21+X_24+X_30=0);
MACD
红柱:IF("MACD.MACD">REF("MACD.MACD",1),"MACD.MACD",DRAWNULL),
STICK,COLORRED,LINETHICK1;
绿柱:IF("MACD.MACD"<REF("MACD.MACD",1),"MACD.MACD",DRAWNULL),
STICK,COLOR00FF00,LINETHICK1;
抄底:ABS((CROSS("MACD.DIF","MACD.DEA")
&&"MACD.DEA"<=-0.07)*"MACD.DIF")*1.20,COLORLIMAGENTA;
DIF:"MACD.DIF",COLORWHITE;
DEA:"MACD.DEA",COLORYELLOW;
强度A:=IF(DIF>DEA,DIF,DRAWNULL),COLORRED;
强度B:=IF(DEA<DIF,DEA,DRAWNULL),COLORMAGENTA;
DRAWICON(CROSS(DIF,DEA),DEA,1);
DRAWICON(CROSS(DEA,DIF),DEA,2);
基本面分析
DRAWTEXT_FIX(1,0.1,0.01,1,'股票名称:'),COLORRED;
DRAWTEXT_FIX(1,0.155,0.01,1,STKNAME),COLORYELLOW;
品种类型:=FINANCE(3);
所属板块:=HYBLOCK;
上市天数:=FINANCE(42);
{股总市值:=ROUND(FINANCE(41)/100000000);}
流通盘:=(CAPITAL/1000000);
流通市值:=ROUND(FINANCE(40)/100000000);
股东人数:=FINANCE(8);
人均持股:=ROUND(FINANCE(7)/FINANCE(8));
DRAWTEXT_FIX(1,0.08,0.15,1,'品种类型:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.08,0.25,1,'所属板块:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.08,0.35,1,'上市天数:'),COLORYELLOW;
{DRAWTEXT_FIX(1,0.1,0.45,1,'股总市值:'),COLORYELLOW;}
DRAWTEXT_FIX(1,0.08,0.45,1,'流通盘:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.08,0.55,1,'流通市值:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.08,0.65,1,'股东人数:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.08,0.75,1,'人均持股:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.15,0.25,1,HYBLOCK),COLORLIGREEN;
DRAWNUMBER_FIX(1,0.15,0.35,1,上市天数),COLORWHITE;
DRAWNUMBER_FIX(1,0.15,0.45,1,流通盘),COLORWHITE;
DRAWNUMBER_FIX(1,0.15,0.55,1,流通市值),COLORWHITE;
DRAWNUMBER_FIX(1,0.15,0.65,1,股东人数),COLORWHITE;
DRAWNUMBER_FIX(1,0.15,0.75,1,人均持股),COLORWHITE;
DRAWTEXT_FIX(品种类型=1,0.15,0.15,1,'沪深A股'),COLORMAGENTA;
{DRAWTEXT_FIX(品种类型=2,0.15,0.15,1,' 中 小 板'),COLORMAGENTA;}
DRAWTEXT_FIX(品种类型=3,0.15,0.15,1,' 创 业 板'),COLORMAGENTA;
DRAWTEXT_FIX(1,0.18,0.35,1,'天'),COLORCYAN;
DRAWTEXT_FIX(1,0.185,0.45,1,' 亿股'),COLORCYAN;
DRAWTEXT_FIX(1,0.185,0.55,1,' 亿元'),COLORCYAN;
DRAWTEXT_FIX(1,0.18,0.65,1,'人'),COLORCYAN;
DRAWTEXT_FIX(1,0.18,0.75,1,'股'),COLORCYAN;
{一以上是:文字数字分开写法}
DRAWTEXT_FIX(1,0.326,0.01,1,'业绩指标(如下):'),COLORRED;
净资收益率:=(FINANCE(33)/FINANCE(34)*100);
销售毛利率:=CONST(((FINANCE(20)-FINANCE(21))/FINANCE(20)*100));
净利润比率:=(FINANCE(30)/FINANCE(20)*100);
主营利润率:=(FINANCE(23)/FINANCE(20)*100);
优质资产率:=((FINANCE(19)-FINANCE(22)-FINANCE(27))/FINANCE(19));{理论上越大越好但不同行业有不同标准};
现金负债比:=(FINANCE(25)/FINANCE(15));{缺长期负债或负债总额,理论上越大越好但不同行业有不同标准};
净利同增率:=FINANCE(43);
总市值(亿):FINANCE(41)/100000000,NODRAW; 净资产:FINANCE(34),NODRAW;
销净利率:FINVALUE(199),NODRAW; 净利润(万):FINANCE(30)/10000,NODRAW; 净利增长率:=FINVALUE(184),NODRAW;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.15,0,STRCAT('净资收益率:',CON2STR(净资收益率,2)))COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.25,0,STRCAT('营业毛利率:',CON2STR(销售毛利率,2)))COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.35,0,STRCAT('营业净利率:',CON2STR(净利润比率,2)))COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.45,0,STRCAT('营业利润率:',CON2STR(主营利润率,2)))COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.55,0,STRCAT('优质资产率:',CON2STR(优质资产率,2)))COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.65,0,STRCAT('现金负债比:',CON2STR(现金负债比,2)))COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.75,0,STRCAT('净利同增率:',CON2STR(净利同增率,2)))COLORWHITE;
DRAWTEXT_FIX(1,0.49,0.01,1,'财务指标(如下):'),COLORRED;
PB:=CONST(DYNAINFO(7) / FINANCE(34));
市销率:=CONST(FINANCE(1)*DYNAINFO(7)/FINANCE(20));
{每股收益季:=CONST(FINANCE(33)/(5-FINANCE(37)));}
每股收益:=CONST(FINANCE(38));{最近一期}
每股现金流:=CONST((FINANCE(25)/FINANCE(1)));
每股未分配:=CONST(FINANCE(32));
每股公积金:=CONST(FINANCE(18));
PE:=CONST(C/FINANCE(33));
DRAWTEXT_FIX(ISLASTBAR,0.37,0.15,0,STRCAT('市净率:',CON2STR(PB,2)))COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.37,0.25,0,STRCAT('市销率:',CON2STR(市销率,2)))COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.37,0.35,0,STRCAT('市盈率:',CON2STR(PE,2)))COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.37,0.45,0,STRCAT('每股收益:',CON2STR(每股收益,2)))COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.37,0.55,0,STRCAT('每股现金流:',CON2STR(每股现金流,2)))COLORYELLOW;
{DRAWTEXT_FIX(ISLASTBAR,0.37,0.65,0,STRCAT('每股未分配:',CON2STR(每股未分配,2)))COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.37,0.75,0,STRCAT('每股公积金:',CON2STR(每股公积金,2)))COLORYELLOW;
{DRAWTEXT_FIX(1,0.37,0.15,0,STRCAT(STRCAT('市净率:',CON2STR(PB,2)),' ')),COLORYELLOW;
DRAWTEXT_FIX(1,0.37,0.25,0,STRCAT(STRCAT('市销率:',CON2STR(市销率,2)),' ')),COLORYELLOW;
DRAWTEXT_FIX(1,0.37,0.35,0,STRCAT(STRCAT('市盈率:',CON2STR(PE,2)),' ')),COLORYELLOW;
DRAWTEXT_FIX(1,0.37,0.45,0,STRCAT(STRCAT('每股收益:',CON2STR(每股收益,2)),' ')),COLORYELLOW;
DRAWTEXT_FIX(1,0.37,0.55,0,STRCAT(STRCAT('每股现金流:',CON2STR(每股现金流,2)),' ')),COLORYELLOW;}
DRAWTEXT_FIX(1,0.37,0.65,0,STRCAT(STRCAT('每股未分配:',CON2STR(每股未分配,2)),' ')),COLORYELLOW;
DRAWTEXT_FIX(1,0.37,0.75,0,STRCAT(STRCAT('每股公积金:',CON2STR(每股公积金,2)),' ')),COLORYELLOW;
{二以上是文字数字一起写,用或不用ISLASTBAR函数}
主力筹码估算:=EMA(WINNER(CLOSE)*70,3),NODRAW,LINETHICK0;
散户筹码估算:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3),NODRAW;
散户套牢比率:=散户筹码估算/(主力筹码估算+散户筹码估算)*100,NODRAW;
主力控盘比率:=主力筹码估算/(主力筹码估算+散户筹码估算)*100,NODRAW;
DRAWTEXT_FIX(1,0.0,0.93,0,STRCAT(STRCAT('■主力筹码估算: ',CON2STR(主力筹码估算,2)),'%')),COLORLIRED;
DRAWTEXT_FIX(1,0.205,0.93,0,STRCAT(STRCAT('主力控盘比率: ',CON2STR(主力控盘比率,2)),'%')),COLORLIRED;
{三以上是文字数字一起写,不用ISLASTBAR函数}
{风险系数}
X1:=(FINANCE(11)-FINANCE(15))/FINANCE(10)*1.2;
X2:=(FINANCE(31)+FINANCE(17))/FINANCE(10)*1.4;{盈余公积用资本公积金代替}
X3:=FINANCE(23)/FINANCE(10)*3.3;
X4:=FINANCE(19)/FINANCE(15)*0.6;{缺长期负债或负债总额}
X5:=FINANCE(20)/FINANCE(15)*0.999;
LC:=REF(CLOSE,1);
WRSI:=SMA(MAX(CLOSE-LC,0),5,1)/SMA(ABS(CLOSE-LC),5,1)*100;
获利筹码:=CONST(WINNER(C)*100);
SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));
量能饱和:=(IF(SAT>1,1,SAT)*100);
WR10:=(HHV(HIGH,3)-CLOSE)/(HHV(HIGH,3)-LLV(LOW,3))*100;
活跃:=(WRSI-WR10);
活跃度比:=IF(活跃>=0,(活跃+100)/2,100-ABS((活跃-100)/2));
DRAWTEXT_FIX(1,0.97,0.16,1,STRCAT(STRCAT('量能饱和: ',CON2STR(量能饱和,2)),'%')),COLORYELLOW;
DRAWTEXT_FIX(1,0.97,0.26,1,STRCAT(STRCAT('活跃度比: ',CON2STR(活跃度比,2)),'%')),COLORYELLOW;
DRAWTEXT_FIX(1,0.962,0.36,1,STRCAT(STRCAT('获利筹码: ',CON2STR(获利筹码,2)),'%')),COLORYELLOW;
{DRAWTEXT_FIX(1,0.96,0.01,1,'大盘趋势:'),COLORRED;
DRAWTEXT_FIX( CONST(INDEXC) >SAR(4,2,20),0.95,0.16,1,'∧向上∧'),COLORRED;
{DRAWTEXT_FIX( CONST(INDEXC) >SAR(4,2,20),0.95,0.11,1,'∧∧∧∧'),COLORRED;}
{DRAWTEXT_FIX( CONST(INDEXC) <SAR(4,2,20),0.95,0.16,1,'∨向下∨'),COLORGREEN;
{DRAWTEXT_FIX( CONST(INDEXC) <SAR(4,2,20),0.95,0.11,1,'∨∨∨∨'),COLORGREEN;}
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.53,0.93,0,'数据日期: '),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.83,0.93,0,' 财报更新第:'),COLORYELLOW;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.925,0.93,0,FINANCE(37)),,COLORMAGENTA;
DRAWTEXT_FIX(1,0.97,0.93,1,'季度'),COLORCYAN;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.63,0.93,0,MACHINEDATE+19000000),COLORMAGENTA;
{-----优秀-------}
ER1:=净资收益率>=13.58;
ER2:=主营利润率>=22.4;
ER5:=净利润比率>=19.42;
SAX1:=每股收益>=0.175;
SAX4:=每股未分配>=2.57;
SAX5:=每股公积金>=3.53;
DP3:=销售毛利率>=49.13;
ZL:=IF((EMA(WINNER(CLOSE)*70,3))>41 AND ISLASTBAR,1,0);
优秀:=ER1 AND ER2 AND ER5 AND SAX1
AND SAX4 AND SAX5 AND DP3 AND ZL ;
DRAWTEXT_FIX(1,0.70,0.01,1,'基本面评估:'),COLORRED;
DRAWTEXT_FIX(优秀 AND ISLASTBAR,0.75,0.01,1,'[优秀]'),COLORYELLOW;
{较好}
ER12:=净资收益率<13.59 AND 净资收益率>6.23;
ER22:=主营利润率>=8.34;
ER52:=净利润比率>=7.31;
SAX12:= 每股收益>=0.061;
SAX42:=每股未分配>=1.185;
SAX52:=每股公积金>1.62;
DP32:=销售毛利率>=28.68;
ZL1:=IF((EMA(WINNER(CLOSE)*70,3))>=11.26 AND ISLASTBAR,1,0);
{ER42:=主营业增长率>1; SAX22:=每股净资产>0.2; DP42:=换手率>0.5; WMF12:=量比>0.5;}
较好:=ER12 AND ER22 AND ER52 AND SAX12
AND SAX42 AND SAX52 AND DP32 AND ZL1;
DRAWTEXT_FIX(较好 AND ISLASTBAR,0.75,0.01,1,'[良好]'),COLORYELLOW;
{指标偏低}
ER偏低:=净资收益率<=0.27;
ER2偏低:=主营利润率<=-1.27;
ER3偏低:=净利润比率<=0.34;
SAX偏低:=每股收益<=0.002;
SAX2偏低:=每股未分配<=0.26;
SAX3偏低:=每股公积金<=0.39;
DP偏低:=销售毛利率<=4.2;{排名后100}
ZL偏低:=IF(((EMA(WINNER(CLOSE)*70,3))<2.81 AND ISLASTBAR),1,0);
偏低:=IF((ER偏低 OR ER2偏低 OR ER3偏低 OR SAX偏低
OR SAX2偏低 OR SAX3偏低 OR DP偏低 OR ZL偏低) AND ISLASTBAR=1,1,0) ;
{一般};
一般:=IF((较好!=1 AND 优秀!=1 AND ZL偏低!=1 AND ISLASTBAR=1),1,0);
DRAWTEXT_FIX(一般 AND ISLASTBAR=1,0.75,0.01,1,'[一般]'),COLORYELLOW;
坏账:=FINVALUE(11)/(FINANCE(19));
投资:=FINVALUE(35)/(FINANCE(19));
负债:=FINVALUE(210)/100;
存货:=FINVALUE(17)/(FINANCE(19));
合计:=(坏账+投资+负债+存货)/4,COLORBROWN,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR,0.70,0.168,0,STRCAT('综合评估:',CON2STR(合计,2)))COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.70,0.26,0,STRCAT('坏账评估:',CON2STR(坏账,2))),COLORLIGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.70,0.36,0,STRCAT('投资评估:',CON2STR(投资,2))),COLORLIGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.70,0.46,0,STRCAT('负债评估:',CON2STR(负债,2))),COLORLIGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.70,0.56,0,STRCAT('存货评估:',CON2STR(存货,2))),COLORLIGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.832,0.46,0,STRCAT('坏账等级:',IF(坏账<0.15 AND 坏账>=0 ,'低',IF(坏账<0.35 AND 坏账>=0.15 ,'正常',IF(坏账<0.45 AND 坏账>=0.35 ,'中',IF(坏账>=0.45 OR 坏账<0 ,'高','__')))))),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.832,0.56,0,STRCAT('负债等级:',IF(负债<0.25 AND 负债>=0 ,'低',IF(负债<0.45 AND 负债>=0.25,'正常',IF(负债<0.65 AND 负债>=0.45 ,'中',IF(负债>=0.65 OR 负债<0 ,'高','__')))))),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.832,0.66,0,STRCAT('财务风险等级:',IF(合计<0.3 AND 合计>=0 ,'低风险',IF(合计<0.5 AND 合计>=0.3 ,'中风险',IF(合计>=0.5 OR 合计<0 ,'高风险','__'))))),,COLORGREEN;
市盈率:=DYNAINFO(39);
市净率:=FINANCE(34)/C;
每股收益1:=FINANCE(33);
资产报酬率:=FINANCE(29)/FINANCE(10)*100;
股本报酬率:=FINANCE(29)/FINANCE(1)*100;
净值报酬率:=FINANCE(29)/FINANCE(19)*100;
营业纯益率:=FINANCE(29)/FINANCE(20)*100;
主营业务利润率:=FINANCE(21)/FINANCE(20)*100;
负债比率:=(FINANCE(15)+FINANCE(16))/FINANCE(10)*100;
存货周转率:=(FINANCE(20)-FINANCE(23))/FINANCE(27);
固定资产周转率:=FINANCE(20)/FINANCE(12);
市盈率评分:=IF(市盈率<=20 AND 市盈率>0,10,IF(市盈率<=40 AND 市盈率>20,9,
IF(市盈率<=60 AND 市盈率>40,8,IF(市盈率<=80 AND 市盈率>60,7,
IF(市盈率<=100 AND 市盈率>80,6,IF(市盈率<=130 AND 市盈率>100,5,
IF(市盈率<=160 AND 市盈率>130,4,IF(市盈率<=190 AND 市盈率>160,3,
IF(市盈率<=220 AND 市盈率>190,2,IF(市盈率<=250 AND 市盈率>220,1,0))))))))));
市净率评分:=IF(市净率>=1,10,IF(市净率<=1 AND 市净率>=0.9,9,
IF(市净率<=0.9 AND 市净率>0.8,8,IF(市净率<=0.8 AND 市净率>0.7,7,
IF(市净率<=0.7 AND 市净率>0.6,6,IF(市净率<=0.6 AND 市净率>0.5,5,
IF(市净率<=0.5 AND 市净率>0.4,4,IF(市净率<=0.4 AND 市净率>0.3,3,
IF(市净率<=0.3 AND 市净率>0.2,2,IF(市净率<=0.2 AND 市净率>0,1,0))))))))));
每股收益评分:=IF(每股收益>=2.7,10,IF(每股收益<2.7 AND 每股收益>=2.4,9,
IF(每股收益1<2.4 AND 每股收益1>=2.1,8,IF(每股收益1<2.1 AND 每股收益1>=1.8,7,
IF(每股收益1<1.8 AND 每股收益1>=1.5,6,IF(每股收益1<1.5 AND 每股收益1>=1.2,5,
IF(每股收益1<1.2 AND 每股收益1>=0.9,4,IF(每股收益1<0.9 AND 每股收益1>=0.6,3,
IF(每股收益1<0.6 AND 每股收益1>=0.3,2,IF(每股收益1<0.3 AND 每股收益1>=0,1,0))))))))));
资产报酬率评分:=IF(资产报酬率>=27,10,IF(资产报酬率<27 AND 资产报酬率>=24,9,
IF(资产报酬率<24 AND 资产报酬率>=21,8,IF(资产报酬率<21 AND 资产报酬率>=18,7,
IF(资产报酬率<18 AND 资产报酬率>=15,6,IF(资产报酬率<15 AND 资产报酬率>=12,5,
IF(资产报酬率<12 AND 资产报酬率>9,4,IF(资产报酬率<9 AND 资产报酬率>6,3,
IF(资产报酬率<6 AND 资产报酬率>=3,2,IF(资产报酬率<3 AND 资产报酬率>0,1,0))))))))));
股本报酬率评分:=IF(股本报酬率>=135,10,IF(股本报酬率<135 AND 股本报酬率>120,9,
IF(股本报酬率<120 AND 股本报酬率>=105,8,IF(股本报酬率<105 AND 股本报酬率>90,7,
IF(股本报酬率<90 AND 股本报酬率>=75,6,IF(股本报酬率<75 AND 股本报酬率>60,5,
IF(股本报酬率<60 AND 股本报酬率>=45,4,IF(股本报酬率<45 AND 股本报酬率>30,3,
IF(股本报酬率<30 AND 股本报酬率>=15,2,IF(股本报酬率<15 AND 股本报酬率>0,1,0))))))))));
净值报酬率评分:=IF(净值报酬率>=100,10,IF(净值报酬率<100 AND 净值报酬率>80,9,
IF(净值报酬率<80 AND 净值报酬率>=70,8,IF(净值报酬率<70 AND 净值报酬率>60,7,
IF(净值报酬率<60 AND 净值报酬率>=50,6,IF(净值报酬率<50 AND 净值报酬率>40,5,
IF(净值报酬率<40 AND 净值报酬率>=30,4,IF(净值报酬率<30 AND 净值报酬率>20,3,
IF(净值报酬率<20 AND 净值报酬率>=10,2,IF(净值报酬率<10 AND 净值报酬率>=0,1,0))))))))));
营业纯益率评分:=IF(营业纯益率>=60,10,IF(营业纯益率<60 AND 营业纯益率>=50,9,
IF(营业纯益率<50 AND 营业纯益率>=40,8,IF(营业纯益率<40 AND 营业纯益率>=30,7,
IF(营业纯益率<30 AND 营业纯益率>=20,6,IF(营业纯益率<20 AND 营业纯益率>15,5,
IF(营业纯益率<15 AND 营业纯益率>=10,4,IF(营业纯益率<10 AND 营业纯益率>5,3,
IF(营业纯益率<5 AND 营业纯益率>=3,2,IF(营业纯益率<3 AND 营业纯益率>=0,1,0))))))))));
主营利润率评分:=IF(主营业务利润率>=60,10,IF(主营业务利润率<60 AND 主营业务利润率>50,9,
IF(主营业务利润率<50 AND 主营业务利润率>=45,8,IF(主营业务利润率<45 AND 主营业务利润率>=40,7,
IF(主营业务利润率<40 AND 主营业务利润率>=35,6,IF(主营业务利润率<35 AND 主营业务利润率>=30,5,
IF(主营业务利润率<30 AND 主营业务利润率>=25,4,IF(主营业务利润率<25 AND 主营业务利润率>=20,3,
IF(主营业务利润率<20 AND 主营业务利润率>=10,2,IF(主营业务利润率<10 AND 主营业务利润率>=0,1,0))))))))));
负债比率评分:=IF(负债比率<=0,10,IF(负债比率>0 AND 负债比率<10,9,
IF(负债比率>10 AND 负债比率<=20,8,IF(负债比率>20 AND 负债比率<=30,7,
IF(负债比率>30 AND 负债比率<=40,6,IF(负债比率>40 AND 负债比率<=50,5,
IF(负债比率>50 AND 负债比率<=60,4,IF(负债比率>60 AND 负债比率<=70,3,
IF(负债比率>70 AND 负债比率<=80,2,IF(负债比率>80 AND 负债比率<=100,1,0))))))))));
存货周转率评分:=IF(存货周转率>=80,5,IF(存货周转率<80 AND 存货周转率>=60,4,
IF(存货周转率<60 AND 存货周转率>=40,3,IF(存货周转率<40 AND 存货周转率>=20,2,
IF(存货周转率<20 AND 存货周转率>=0,1,0)))));
资产周转率评分:=IF(固定资产周转率>=20,5,IF(固定资产周转率<20 AND 固定资产周转率>=15,4,
IF(固定资产周转率<15 AND 固定资产周转率>=10,3,IF(固定资产周转率<10 AND 固定资产周转率>=5,2,
IF(固定资产周转率<5 AND 固定资产周转率>=0,1,0)))));
估值评分:=市盈率评分+市净率评分+每股收益评分,COLORRED,NODRAW;
收益评分:=资产报酬率评分+股本报酬率评分+净值报酬率评分+营业纯益率评分+主营利润率评分,NODRAW;
资产评分:=负债比率评分+存货周转率评分+资产周转率评分,COLORYELLOW,NODRAW;
DRAWTEXT_FIX(ISLASTBAR,0.53,0.26,0,STRCAT('估值评分:',CON2STR(估值评分,2))),COLORLIRED;
DRAWTEXT_FIX(ISLASTBAR,0.53,0.36,0,STRCAT('收益评分:',CON2STR(收益评分,2))),COLORLIRED;
DRAWTEXT_FIX(ISLASTBAR,0.53,0.46,0,STRCAT('资产评分:',CON2STR(资产评分,2))),COLORLIRED;
评分:=估值评分+收益评分+资产评分;
DRAWTEXT_FIX(ISLASTBAR,0.53,0.56,0,STRCAT('总评分:',CON2STR(评分,2))),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.53,0.66,0,STRCAT('经营状况等级:',IF(评分<40 AND 评分>=30 ,'(合格)',IF(评分<50 AND 评分>=40 ,'(良好)',IF(评分<30 AND 评分>=0 ,'(不合格)',IF(评分>=50,'(优秀)','__')))))),COLORRED;
DRAWTEXT_FIX(1,0.775,0.66,1,'说明:估值评分没显示表示业绩亏损'),COLORRED;
DRAWTEXT_FIX(1,0.805,0.76,1,'说明:资产评分没显示表示为金融类行业'),COLORRED;
DRAWTEXT_FIX(1,0.753,0.095,1,'备注:需下载专业财务数据(盘后)'),COLORRED;
主力净买卖
主力净买量:(LARGEINTRDVOL-LARGEOUTTRDVOL);
主力买量:LARGEINTRDVOL,COLORRED,NODRAW;
主力卖量:LARGEOUTTRDVOL,COLORGREEN,NODRAW;
STICKLINE(1,0,IF(主力买量>0,VOL,0),2,0),COLORBROWN;
STICKLINE(1,0,IF(主力卖量>0,-VOL,0),2,0),COLORBROWN;
STICKLINE(1,0,主力买量,2,0),COLORRED;
STICKLINE(1,0,(-1*主力卖量),2,0),COLORGREEN;
涨跌停情绪
涨停家数:SCJYVALUE(3,1,0),COLORRED,LINETHICK2;
曾涨停:SCJYVALUE(3,2,0),COLORRED,NODRAW;
连板家数:SCJYVALUE(23,1,0),COLORLIMAGENTA;
跌停家数:SCJYVALUE(4,1,0),COLORGREEN,LINETHICK2;
曾跌停:SCJYVALUE(4,2,0),COLORGREEN,NODRAW;
炸板率
炸板率:SCJYVALUE(3,2,0)/(SCJYVALUE(3,1,0)+SCJYVALUE(3,2,0))*100,COLORGREEN,LINETHICK2;
连板率:SCJYVALUE(23,1,0)/SCJYVALUE(3,1,0)*100,COLORRED,LINETHICK2;
沪深资金
总规模:SCJYVALUE(8,1,1),LINETHICK2;
净申赎:SCJYVALUE(8,2,1),NODRAW;
NOTEXT1:IF(净申赎>0,总规模,DRAWNULL),LINETHICK2,COLORRED;
NOTEXT2:IF(净申赎<0,总规模,DRAWNULL),LINETHICK2,COLORGREEN;
指标共振
DIFF:=EMA(CLOSE,8)-EMA(CLOSE,13);
DEA:=EMA(DIFF,5);
B1:=DIFF>DEA;
MACD金叉:IF(B1,1,0),COLORRED;
RSV1:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;
DRAWTEXT(ISLASTBAR=1,1,'.MACD'),COLORFFFFFF;
K:=SMA(RSV1,3,1);
D:=SMA(K,3,1);
DRAWICON(K>D,2,1);
DRAWICON(K<D,2,2);
DRAWTEXT(ISLASTBAR=1,2,'.KDJ'),COLORFFFFFF;
B2:=K>D;
KDJ金叉:IF(B2,2,0),COLORRED;
LC:=REF(CLOSE,1);
RSI1:=(SMA(MAX(CLOSE-LC,0),5,1))/(SMA(ABS(CLOSE-LC),5,1))*100;
RSI2:=(SMA(MAX(CLOSE-LC,0),13,1))/(SMA(ABS(CLOSE-LC),13,1))*100;
DRAWICON(RSI1>RSI2,3,1);
DRAWICON(RSI1<RSI2,3,2);
DRAWTEXT(ISLASTBAR=1,3,'.RSI'),COLORFFFFFF;
B3:=RSI1>RSI2;
RSI金叉:IF(B3,3,0),COLORRED;
RSV:=-(HHV(HIGH,13)-CLOSE)/(HHV(HIGH,13)-LLV(LOW,13))*100;
LWR1:=SMA(RSV,3,1);
LWR2:=SMA(LWR1,3,1);
DRAWICON(LWR1>LWR2,4,1);
DRAWICON(LWR1<LWR2,4,2);
DRAWTEXT(ISLASTBAR=1,4,'.LWR'),COLORFFFFFF;
B4:=LWR1>LWR2;
LWR金叉:IF(B4,4,0),COLORRED;
BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
DRAWICON(CLOSE>BBI,5,1);
DRAWICON(CLOSE<BBI,5,2);
DRAWTEXT(ISLASTBAR=1,5,'.BBI'),COLORFFFFFF;
B5:=CLOSE>BBI;
BBI金叉:IF(B5,5,0),COLORRED;
MTM:=CLOSE-REF(CLOSE,1);
MMS:=100*EMA(EMA(MTM,5),3)/EMA(EMA(ABS(MTM),5),3);
MMM:=100*EMA(EMA(MTM,13),8)/EMA(EMA(ABS(MTM),13),8);
DRAWICON(MMS>MMM,6,1);
DRAWICON(MMS<MMM,6,2);
DRAWTEXT(ISLASTBAR=1,6,'.MTM'),COLORFFFFFF;
B6:=MMS>MMM;
MTM金叉:IF(B6,6,0),COLORRED;
涨买入:IF((B1 AND B2 AND B3 AND B4 AND B5 AND B6) AND REF(B1 AND B2 AND B3 AND B4 AND B5 AND B6,1)=0,7,0),COLORYELLOW,LINETHICK2;
上涨:IF(B1 AND B2 AND B3 AND B4 AND B5 AND B6,7,0),COLORYELLOW,LINETHICK2;
晴天:BARSLASTCOUNT(B1 AND B2 AND B3 AND B4 AND B5 AND B6),LINETHICK0;
雨天:BARSLASTCOUNT(MACD金叉+KDJ金叉+RSI金叉+LWR金叉+BBI金叉+MTM金叉>0 AND MACD金叉+KDJ金叉+RSI金叉+LWR金叉+BBI金叉+MTM金叉<21 ),LINETHICK0;
雪天:BARSLASTCOUNT(MACD金叉+KDJ金叉+RSI金叉+LWR金叉+BBI金叉+MTM金叉=0),LINETHICK0;
[url=http://www.70822.com/soft/sort013/sort05/down-171894.html]市场情绪-纯代码板+通达信情绪模板(再调整)[/url]