再次调整 市场情绪-纯代码板 附件里是公式的源码 还有一个文件是: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; 
 | 
- 软件大小:7.00 KB
 - 推荐星级:
 - 更新时间:2024-04-02 07:16:13
 - 软件类别: 国产软件 / 通达信公式
 - 软件语言:简体中文
 - 授权方式: 分享版
 - 联系方式:暂无联系方式
 - 官方主页: Home Page
 - 点击大图: 【一键转帖到论坛】
 - 插件情况:

 - 运行环境:Win10/Win9X/Win8/Win2000/WinXP/Win2003/Win7/
 - 相关Tags:指标公式 股票软件,公式源码
 - 
					
					
					
					(0)0%(0)0%
 
评论内容只代表网友观点,与本站立场无关!
本网提供的公式文件说明:
				       * alg格式飞狐股票公式,可以用飞狐交易师或者交易师软件导入;
				       * fnc格式大智慧新一代公式指标,可以用大智慧股票软件使用,少部分可以用分析家股票软件引入使用;
					   * exp格式大智慧经典版股票公式,仅可以用大智慧经典版股票软件引入使用;
					   * tni和tnc格式通达信股票公式,仅可以用通达信新引入使用,例如可以用通达信股票软件引入使用;
					  *  tne,tn6格式通达信公式,可以用通达信公式编辑器5.0版导入,推荐通达信金融终端版本;
					   * hxf格式同花顺股票公式,仅可以用同花顺股票软件引入使用。
				    以上的各种软件都可以在本网股票软件栏目找到! 
 * 关于股票公式时间限制,如果在引入大智慧公式,交易师公式或者飞狐公式的时候,发现公式名称栏是空白的,这时候调整电脑时间到1997年,又能出现公式名称,并且能正常显示,可能是公式使用期限已过。
					   * 关于还原公式源码如果你忘记了自己编写的大智慧公式,通达信公式,同花顺公式,操盘手公式,飞狐公式,博易大师公式,金字塔公式,文华公式和交易师公式等等公式的密码,本网可帮恢复源码,有.偿.服.务无意勿扰,点击在线咨询联系我。
					  
					  * 关于股票公式源码编辑
					本网提供的源码,一般都可以编辑成公式,如果不明白公式的编辑,在本页右侧教程录像可参考,或者找公式教程资料学习,请搜索:教程
 * 如果您发现软件内容或者链接错误,请点击报告错误谢谢! 
                     * 站内提供的所有软件包含源码均是由网上搜集,若侵犯了你的版权利益,请联系通知我们!
				





