通达信智斗庄分时未加密选股指标公式源码

源码正文：

VUR0:=(((((2 * OPEN) + HIGH) + LOW) + (3 * CLOSE)) / 7){XG51};
VUR1:=(CAPITAL * VUR0){XG51};
VUR2:=(SMA(AMOUNT,10,1) / 1000){XG51};
VUR3:=ma((CLOSE * 3),5){XG51};
VUR4:=((((VUR2 * (CLOSE * 3)) / VUR3) * 1) / 10){XG51};
VUR5:=((((VUR2 * (OPEN * 3)) / VUR3) * 1) / 10){XG51};
VUR6:=((((VUR2 * (HIGH * 3)) / VUR3) * 1) / 10){XG51};
VUR7:=((((VUR2 * (LOW * 3)) / VUR3) * 1) / 10){XG51};
VUR8:=(((((2 * VUR5) + VUR6) + VUR7) + (3 * VUR4)) / 7){XG51};
VUR9:=ema(dma(EMA(VUR4,2),(SUM(vol,1) * VUR8)),2){XG51};
VURA:=EMA((VUR1 - VUR9),1){XG51};
VU1:=IF((VURA > REF(VURA,1)),((VURA - REF(VURA,1)) * 15 / 1000),0){XG51};
VU2:=IF((VURA < REF(VURA,1)),((VURA - REF(VURA,1)) * 15 / 1000),0){XG51};
VU3:=SUM(VU1,17){XG51};
VU4:=EMA(VU3,8){XG51};
VU5:=REF(VU4,2){XG51};
VU6:=EMA(CLOSE,13){XG51};
VU7:=(VU6 < REF(VU6,1)){XG51};
VU8:=(VU7 AND (VU4 > VU5)){XG51};
VUC:=EMA(CLOSE,3){XG51};
VUD:=(VUC > REF(VUC,1)){XG51};
VUE:=(VUC < REF(VUC,1)){XG51};
VUF:=((VU4 > VU5) AND VUD){XG51};
VUG:=((VU4 > VU5) AND VUE){XG51};
VUN:=IF(VU8,VUR0,0){XG51};
买线:VU5,,COLORDB70DB{XG51};
进价:VUN,POINTDOT,COLORFE10D2{XG51};
拉抬:stICKLINE(VUF,VU5,(VU4 * 1.1),1,1),,COLOR1010F0{XG51};
变盘:STICKLINE(VUG,VU5,(VU4 * 1.1),1,0),,COLORB4B410{XG51};
吸筹:STICKLINE(VU8,VU5,(VU4 * 1.3),1,1),,COLORFE10D2{X?G*5*1?C?N?{};

源码正文：

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_{};