通达信账户统计主图未加密选股指标公式源码

源码正文：

ma5:MA(C,5);MA10:MA(C,10);MA20:MA(C,20);MA60:MA(C,60){XG51};
DRAwrECTREL(IF(TOTALBARSCOUNT>80,0,455),280,IF(TOTALBARSCOUNT>80,330,790),590,RGB(40,70,50)){XG51};
DRAWRECTREL(IF(TOTALBARSCOUNT>80,0,736),280,IF(TOTALBARSCOUNT>80,278,790),590,RGB(40,70,50)){XG51};
股一成本:=29.19 ; 股一数量:=500; 股一现价:="600516$C"{XG51};
股二成本:=17.25 ; 股二数量:=500; 股二现价:="600903$C"{XG51};
股三成本:=8.750; 股三数量:=1000 ; 股三现价:="000426$C"{XG51};
股四成本:=5.81 ; 股四数量:=1000; 股四现价:="000725$C"{XG51};
股五成本:=00000 ; 股五数量:=0000; 股五现价:="000$C"{XG51};
DRAWTEXT_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.005,0.46),0.34,0,'方大炭素'),COLORGREEN{XG51};
DRAWTEXT_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.005,0.46),0.39,0,'贵州燃气'),COLORBLUE{XG51};
DRAWTEXT_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.005,0.46),0.44,0,'兴业矿业'),COLORGREEN{XG51};
DRAWTEXT_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.005,0.46),0.49,0,'京东方A'),COLORBLUE{XG51};
DRAWTEXT_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.005,0.46),0.54,0,'空余'),COLORGREEN{XG51};
DRAWTEXT_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.015,0.47),0.29,0,'股名'),COLORBLUE{XG51};
DRAWTEXT_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.063,0.518),0.29,0,'持仓'),COLORBLUE{XG51};
DRAWTEXT_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.105,0.56),0.29,0,'成本'),COLORBLUE{XG51};
DRAWTEXT_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.151,0.606),0.29,0,'涨跌'),COLORBLUE{XG51};
DRAWTEXT_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.195,0.65),0.29,0,'盈比'),COLORBLUE{XG51};
DRAWTEXT_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.241,0.696),0.29,0,'盈亏'),COLORBLUE{XG51};
DRAWTEXT_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.284,0.742),0.39,0,'总盈比'),COLORBLUE{XG51};
DRAWTEXT_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.284,0.742),0.49,0,'现总值'),COLORBLUE{XG51};
股一盈亏:=INTPART((股一现价-股一成本)*股一数量){XG51};
股二盈亏:=INTPART((股二现价-股二成本)*股二数量){XG51};
股三盈亏:=INTPART((股三现价-股三成本)*股三数量){XG51};
股四盈亏:=INTPART((股四现价-股四成本)*股四数量){XG51};
股五盈亏:=INTPART((股五现价-股五成本)*股五数量){XG51};
股一盈亏比:=(股一现价-股一成本)/股一成本*100{XG51};
股二盈亏比:=(股二现价-股二成本)/股二成本*100{XG51};
股三盈亏比:=(股三现价-股三成本)/股三成本*100{XG51};
股四盈亏比:=(股四现价-股四成本)/股四成本*100{XG51};
股五盈亏比:=(股五现价-股五成本)/股五成本*100{XG51};
股一涨跌:=CONst(股一现价-股一成本){XG51};
股二涨跌:=CONST(股二现价-股二成本){XG51};
股三涨跌:=CONST(股三现价-股三成本){XG51};
股四涨跌:=CONST(股四现价-股四成本){XG51};
股五涨跌:=CONST(股五现价-股五成本){XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.06,0.515),0.34,0,股一数量),COLORGREEN{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.06,0.515),0.39,0,股二数量),COLORBLUE{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.06,0.515),0.44,0,股三数量),COLORGREEN{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.06,0.515),0.49,0,股四数量),COLORBLUE{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.06,0.515),0.54,0,股五数量),COLORGREEN{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.097,0.553),0.34,0,股一成本),COLORGREEN{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.097,0.553),0.39,0,股二成本),COLORBLUE{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.097,0.553),0.44,0,股三成本),COLORGREEN{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.097,0.553),0.49,0,股四成本),COLORBLUE{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.097,0.553),0.54,0,股五成本),COLORGREEN{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.146,0.601),0.34,0,股一涨跌),COLORGREEN{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.146,0.601),0.39,0,股二涨跌),COLORBLUE{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.146,0.601),0.44,0,股三涨跌),COLORGREEN{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.146,0.601),0.49,0,股四涨跌),COLORBLUE{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.146,0.601),0.54,0,股五涨跌),COLORGREEN{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.188,0.643),0.34,0,CONST(股一盈亏比)),COLORGREEN{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.188,0.643),0.39,0,CONST(股二盈亏比)),COLORBLUE{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.188,0.643),0.44,0,CONST(股三盈亏比)),COLORGREEN{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.188,0.643),0.49,0,CONST(股四盈亏比)),COLORBLUE{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.188,0.643),0.54,0,CONST(股五盈亏比)),COLORGREEN{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.237,0.693),0.34,0,CONST(股一盈亏)),COLORGREEN{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.237,0.693),0.39,0,CONST(股二盈亏)),COLORBLUE{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.237,0.693),0.44,0,CONST(股三盈亏)),COLORGREEN{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.237,0.693),0.49,0,CONST(股四盈亏)),COLORBLUE{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.237,0.693),0.54,0,CONST(股五盈亏)),COLORGREEN{XG51};
总盈:=CONST(股一盈亏)+CONST(股二盈亏)+CONST(股三盈亏)+CONST(股四盈亏)+CONST(股五盈亏){XG51};
DRAWTEXT_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.284,0.742),0.29,0,'总盈值'),COLORBLUE{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.284,0.742),0.34,0,CONST(总盈)),COLORGREEN{XG51};
总成本:=CONST((股一成本*股一数量)+(股二成本*股二数量)+(股三成本*股三数量)+
(股四成本*股四数量)+(股五成本*股五数量)){XG51};
总盈比:=总盈/总成本*100{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.284,0.742),0.44,0,CONST(总盈比)),COLORGREEN{XG51};
股一现值:=股一数量*股一现价{XG51};
股二现值:=股二数量*股二现价{XG51};
股三现值:=股三数量*股三现价{XG51};
股四现值:=股四数量*股四现价{XG51};
股五现值:=股五数量*股五现价{XG51};
总市值:=股一现值+股二现值+股三现值+股四现值+股五现值{XG51};
DRAWNUMBER_FIX(C!=0,IF(TOTALBARSCOUNT>80,0.284,0.742),0.54,0,CONST(总市值)),COLORGREEN{X-G+5?1-C-N-{};

源码正文：

X_1:=6{XG51};
X_2:=80{XG51};
X_3:=REF(CLOSE,1){XG51};
X_4:=SMA(maX(CLOSE-X_3,0),18,1)/SMA(Abs(CLOSE-X_3),13,1)*100{XG51};
X_5:=SMA(MAX(CLOSE-X_3,0),24,1)/SMA(ABS(CLOSE-X_3),20,1)*100{XG51};
X_6:=BArslAst(X_5<48)<=3 AND crOSS(X_4,X_5){XG51};
X_7:=(CLOSE-MA(CLOSE,48))/MA(CLOSE,20)*100<(-12.5){XG51};
X_8:=LLV(LOW,5){XG51};
X_9:=HHV(HIGH,10){XG51};
X_10:=ema((CLOSE-X_8)/(X_9-X_8)*100,4){XG51};
X_11:=EMA(0.667*REF(X_10,1)+0.333*X_10,2){XG51};
X_12:=1011131{XG51};
X_13:=IF(DATE<=X_12,X_7,0) OR IF(DATE<=X_12,X_2,0){XG51};
X_14:=REF(CLOSE,1){XG51};
X_15:=SMA(MAX(CLOSE-X_14,0),7,1)/SMA(ABS(CLOSE-X_14),7,1)*100{XG51};
X_16:=SMA(MAX(CLOSE-X_14,0),13,1)/SMA(ABS(CLOSE-X_14),13,1)*100{XG51};
X_17:=BARSLAST(X_16<43)<=3 AND CROSS(X_15,X_16){XG51};
X_18:=(CLOSE-MA(CLOSE,43))/MA(CLOSE,20)*100<(-12.5){XG51};
X_19:=LLV(LOW,5){XG51};
X_20:=HHV(HIGH,10){XG51};
X_21:=EMA((CLOSE-X_19)/(X_20-X_19)*100,4){XG51};
X_22:=EMA(0.667*REF(X_21,1)+0.333*X_21,2){XG51};
X_23:=1011131{XG51};
X_24:=IF(DATE<=X_23,X_18,0) OR IF(DATE<=X_23,X_2,0){XG51};
X_25:=0-(-1)*X_17 AND X_18 AND CROSS(X_21,X_22) AND X_21<=25{XG51};
X_26:=REF(CLOSE,1){XG51};
X_27:=SMA(MAX(CLOSE-X_26,0),7,1)/SMA(ABS(CLOSE-X_26),7,1)*100{XG51};
X_28:=SMA(MAX(CLOSE-X_26,0),13,1)/SMA(ABS(CLOSE-X_26),13,1)*100{XG51};
X_29:=BARSLAST(X_28<33)<=3 AND CROSS(X_27,X_28){XG51};
X_30:=(CLOSE-MA(CLOSE,33))/MA(CLOSE,20)*100<(-12.5){XG51};
X_31:=LLV(LOW,5){XG51};
X_32:=HHV(HIGH,10){XG51};
X_33:=EMA((CLOSE-X_31)/(X_32-X_31)*100,4){XG51};
X_34:=EMA(0.667*REF(X_33,1)+0.333*X_33,2){XG51};
X_35:=1011131{XG51};
X_36:=IF(DATE<=X_35,X_30,0) OR IF(DATE<=X_35,X_2,0){XG51};
X_37:=0-(-1)*X_29 AND X_30 AND CROSS(X_33,X_34) AND X_33<=25{XG51};
X_38:=REF(CLOSE,1){XG51};
X_39:=SMA(MAX(CLOSE-X_38,0),7,1)/SMA(ABS(CLOSE-X_38),7,1)*100{XG51};
X_40:=SMA(MAX(CLOSE-X_38,0),13,1)/SMA(ABS(CLOSE-X_38),13,1)*100{XG51};
X_41:=BARSLAST(X_40<23)<=3 AND CROSS(X_39,X_40){XG51};
X_42:=(CLOSE-MA(CLOSE,23))/MA(CLOSE,20)*100<(-12.5){XG51};
X_43:=LLV(LOW,5){XG51};
X_44:=HHV(HIGH,10){XG51};
X_45:=EMA((CLOSE-X_43)/(X_44-X_43)*100,4){XG51};
X_46:=EMA(0.667*REF(X_45,1)+0.333*X_45,2){XG51};
X_47:=1011131{XG51};
X_48:=IF(DATE<=X_47,X_42,0) OR IF(DATE<=X_47,X_2,0){XG51};
X_49:=0-(-1)*X_41 AND X_42 AND CROSS(X_45,X_46) AND X_45<=25{XG51};
X_50:=(MA(CLOSE,60)-LOW)/MA(CLOSE,20)*200{XG51};
X_51:=(MA(CLOSE,60)-LOW)/MA(CLOSE,60)*200{XG51};
X_52:=(MA(CLOSE,30)-LOW)/MA(CLOSE,60)*200{XG51};
X_53:=REF(CLOSE,1){XG51};
X_54:=SMA(MAX(CLOSE-X_53,0),7,1)/SMA(ABS(CLOSE-X_53),7,1)*100{XG51};
X_55:=FILTER(REF(X_54,1)<20 AND X_54>REF(X_54,1),5){XG51};
X_56:=CLOSE/MA(CLOSE,40)<0.74{XG51};
X_57:=5{XG51};
X_58:=EMA(CLOSE,X_57){XG51};
X_59:=EMA(X_58,X_57){XG51};
X_60:=X_58-REF(X_58,1){XG51};
X_61:=X_59-REF(X_59,1){XG51};
X_62:=ABS(X_58-X_59){XG51};
X_63:=(HIGH-LOW)/REF(CLOSE,1)>0.05{XG51};
X_64:=(X_60+X_61)/2{XG51};
X_65:=POW(X_62,1)*POW(X_64,3){XG51};
X_66:=X_65/HHV(ABS(X_65),X_57*3){XG51};
X_67:=COUNT(X_63,5)>1{XG51};
X_68:=X_56 AND X_63 AND X_67{XG51};
X_69:=CROSS(X_66,(-0.9)){XG51};
X_70:=FILTER(X_55 AND X_52>20 OR CLOSE>REF(CLOSE,1) AND REF(X_68,1),10){XG51};
X_71:=FILTER(REF(X_68,1) AND (X_69 OR CLOSE>REF(CLOSE,1)) AND macd.MacD>(-1.5),10){XG51};
X_72:=COUNT(X_71,13)>=1 AND X_70{XG51};
X_73:=X_72{XG51};
X_74:=X_37{XG51};
X_75:=X_49{XG51};
XG:IF(X_73 AND X_74,X_73 AND X_74,0) OR IF(X_73 AND X_75,X_73 AND X_75,0){X-G.5.1-C-N-{};