通达信文字主图未加密选股指标公式源码

通达信文字主图未加密选股指标公式源码

源码正文：

DRAWTEXT_FIX(1,0.7,0,0,'所属板块:'),COLORFF6000{XG51};
DRAWTEXT_FIX(1,0.77,0,0,HYBLOCK),COLORWHITE{XG51};
DRAWTEXT_FIX(1,0.835,0,0,DYBLOCK),COLORBLUE{XG51};
总股本:=stRCAT(STRCAT('总股本: ',CON2STR(TOTALCAPITAL/1000000,2)),'亿'){XG51};
流通盘:=STRCAT(STRCAT(' 流通盘: ',CON2STR(CAPITAL/1000000,2)),'亿'){XG51};
全流通:=STRCAT(' 全流通: ',CON2STR((CAPITAL/1000000)/(TOTALCAPITAL/1000000),2)){XG51};
市值:=STRCAT(STRCAT(' 流通市值: ',CON2STR((CAPITAL/1000000)*C,2)),'亿'){XG51};
上市日期:=STRCAT(' 上市日期: ',CON2STR(FINANCE(42),0)){XG51};
股本市值:=STRCAT('股本市值: ',STRCAT(STRCAT(STRCAT(STRCAT(总股本,流通盘),全流通),市值),上市日期)){XG51};
市盈率:=STRCAT('市盈率: ',CON2STR(C/FINANCE(33),2)){XG51};
市销率:=STRCAT(' 市销率: ',CON2STR(C/(FINANCE(20)/FINANCE(1)),2)){XG51};
市净率:=STRCAT(' 市净率: ',CON2STR(C/FINANCE(34),2)){XG51};
净资收益率:=STRCAT(' 净资收益率: ',CON2STR(FINANCE(33)/FINANCE(34)*100,2)){XG51};
毛利率:=STRCAT(' 毛利率: ',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2)){XG51};
净利润率:=STRCAT(' 净利润率 ',CON2STR(FINANCE(30)/FINANCE(20)*100,2)){XG51};
主营利润率:=STRCAT(' 主营利润率 ',CON2STR(FINANCE(23)/FINANCE(20)*100,2)){XG51};
当前业绩:=STRCAT('当前业绩: ',STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(市盈率,市销率),市净率),净资收益率),毛利率),净利润率),主营利润率)){XG51};
X1:=(FINANCE(11)-FINANCE(15))/FINANCE(10)*1.2{XG51};
X2:=(FINANCE(31)+FINANCE(17))/FINANCE(10)*1.4;{XG51};
X3:=FINANCE(23)/FINANCE(10)*3.3{XG51};
X4:=FINANCE(19)/FINANCE(15)*0.6{XG51};
X5:=FINANCE(20)/FINANCE(15)*0.999{XG51};
Z值:=X1+X2+X3+X4+X5{XG51};
预警:=IF(Z值<1.2,'重警',IF(Z值>=1.2 AND Z值<2.6,'轻警','无警')){XG51};
财务预警:=STRCAT('财务预警: ',STRCAT(预警,STRCAT('-Z值: ',CON2STR(Z值,3)))){XG51};
优质资产率:=STRCAT(' 优质资产率: ',CON2STR((FINANCE(19)-FINANCE(22)-FINANCE(27))/FINANCE(19),2));{XG51};
现金负债比:=STRCAT(' 现金负债比: ',CON2STR(FINANCE(25)/FINANCE(15),3));{XG51};
财务系数:=STRCAT('风险系数: ',STRCAT(STRCAT(财务预警,优质资产率),现金负债比)){XG51};
DRAWTEXT_FIX(ISLASTBAR,0.005,0.01,0,财务系数),COLOR888888{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.005,0.06,0,当前业绩),COLOR888888{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.005,0.115,0,股本市值),COLOR888888{X_G_5~1_C_N_{};

通达信决战庄家未加密选股指标公式源码

源码正文：

庄筹线:ema(WINNER(C)*70,5) COLORWHITE LINETHICK2{XG51};
散筹线:Ema((WINNER(C*1.1)-WINNER(C*0.9))*80,5)COLORCYAN LINETHICK2{XG51};
捞活鱼:FILTER( (crOSS(5,庄筹线) AND 散筹线< 20 )*40,10 ),COLORBLUE{XG51};
DRAWTEXT(捞活鱼 ,30 ,'捞活鱼(抄底)' ),COLORBLUE{XG51};
AA:= REF(庄筹线,30)> 40 OR REF(庄筹线,20)> 40{XG51};
BB:=CROSS(28,庄筹线) AND 散筹线> 40 AND AA=1{XG51};
DRAWTEXT(BB ,60 ,'(洗盘)' ),COLORRED{XG51};
决战诱空:IF(BB ,50 ,80 ),COLORRED{XG51};
CC:=REF(散筹线,1)> 散筹线 AND REF(庄筹线,1)< 庄筹线 AND 庄筹线> 30 AND 散筹线> 30 AND REF(庄筹线,1)-REF(庄筹线,2)> 3.535{XG51};
DD:=COUNT(REF(散筹线,1)> REF(庄筹线,1),5){XG51};
鸡雀升天:IF(CROSS(庄筹线,散筹线) AND CC=1 AND DD>=5 ,10,30),COLORLIMAGENTA{XG51};
DRAWTEXT(鸡雀升天=10 ,13 ,'追随庄'),COLORLIMAGENTA{X_G+5!1_C_N_{};