通达信上证底部未加密选股指标公式源码

源码正文：

SD1:=100*(INDEXC-LLV(INDEXL,34))/(HHV(INDEXH,34)-LLV(INDEXL,34)){XG51};
ma1:SMA(SD1,3,1){XG51};
SD2:=100*(INDEXC-LLV(INDEXL,64))/(HHV(INDEXH,64)-LLV(INDEXL,64)){XG51};
MA2:SMA(SD2,3,1){XG51};
VAR1:=(2*INDEXC+INDEXH+INDEXL+INDEXO)/5{XG51};
VAR2:=ema(EMA(EMA(VAR1,4),4),4){XG51};
SJ:=(VAR2-REF(VAR2,1))/REF(VAR2,1)*100{XG51};
SD:=MA(SJ,2){XG51};
SK:=MA(SJ,1){XG51};
卖出:IF(crOSS(90,MA1) OR CROSS(90,MA2) AND CROSS(EMA(CLOSE,3),C),50,90){XG51};
买进:IF(CROSS(MA2,19) AND SK>SD AND CROSS(EMA(C,3),EMA(C,8)),50,10){X^G!5-1^C^N^{};

源码正文：

时间:=99{XG51};
DRAwrECTREL(990,2,1000,982,RGB(0,0,0)){XG51};
DRAWRECTREL(990,189,1000,796,RGB(0,0,0)){XG51};
DRAWRECTREL(990,374,1000,608,RGB(0,0,0)){XG51};
DRAWRECTREL(990,492,1000,492,RGB(0,0,0)){XG51};

CURR:=CURRBARSCOUNT{XG51};
BCL:=CONst(FINDLOW(L,0,时间*10,1)){XG51};
DTT:=CONST(BArslAST(BCL=L))+1{XG51};
SXL:=CONST(IF(DTT=1,L,REF(L,DTT-1))){XG51};
GTHT:=IF(DTT,DTT,DRAWNULL);
涨幅%:(C-SXL)/SXL*100,NODRAW,COLORBLACK{XG51};
STICKLINE(CURR=GTHT,SXL,SXL*3*3,0,1),COLORDD00DD{XG51};
DRAWTEXT(CURR=GTHT,SXL*1.191,STRCAT('一　 ',CON2STR(SXL*1.191,2))){XG51};
DRAWTEXT(CURR=GTHT,SXL*1.382,STRCAT('一　 ',CON2STR(SXL*1.382,2))){XG51};
DRAWTEXT(CURR=GTHT,SXL*1.5,STRCAT('一　 ',CON2STR(SXL*1.5,2))){XG51};
DRAWTEXT(CURR=GTHT,SXL*1.618,STRCAT('一　 ',CON2STR(SXL*1.618,2))){XG51};
DRAWTEXT(CURR=GTHT,SXL*1.809,STRCAT('一　 ',CON2STR(SXL*1.809,2))){XG51};
DRAWTEXT(CURR=GTHT,SXL*2,STRCAT('一　 ',CON2STR(SXL*2,2))){XG51};
DRAWTEXT(CURR=GTHT,SXL*2*1.191,STRCAT('一　 ',CON2STR(SXL*2*1.191,2))),COLORWHITE{XG51};
DRAWTEXT(CURR=GTHT,SXL*2*1.382,STRCAT('一　 ',CON2STR(SXL*2*1.382,2))),COLORWHITE{XG51};
DRAWTEXT(CURR=GTHT,SXL*2*1.5,STRCAT('一　 ',CON2STR(SXL*2*1.5,2))),COLORWHITE{XG51};
DRAWTEXT(CURR=GTHT,SXL*2*1.618,STRCAT('一　 ',CON2STR(SXL*2*1.618,2))),COLORWHITE{XG51};
DRAWTEXT(CURR=GTHT,SXL*2*1.809,STRCAT('一　 ',CON2STR(SXL*2*1.809,2))),COLORWHITE{XG51};
DRAWTEXT(CURR=GTHT,SXL*2*2,STRCAT('一　 ',CON2STR(SXL*2*2,2))),COLORWHITE{XG51};
DRAWTEXT(CURR=GTHT,SXL*2*2.191,STRCAT('一　 ',CON2STR(SXL*2*2.191,2))),COLORBLUE{XG51};
DRAWTEXT(CURR=GTHT,SXL*2*2.382,STRCAT('一　 ',CON2STR(SXL*2*2.382,2))),COLORBLUE{XG51};
DRAWTEXT(CURR=GTHT,SXL*2*2.5,STRCAT('一　 ',CON2STR(SXL*2*2.5,2))),COLORBLUE{XG51};
DRAWTEXT(CURR=GTHT,SXL*2*2.618,STRCAT('一　 ',CON2STR(SXL*2*2.618,2))),COLORBLUE{XG51};
DRAWTEXT(CURR=GTHT,SXL*2*2.809,STRCAT('一　 ',CON2STR(SXL*2*2.809,2))),COLORBLUE{XG51};
DRAWTEXT(CURR=GTHT,SXL*2*3,STRCAT('一　 ',CON2STR(SXL*2*3,2))),COLORBLUE{XG51};
DRAWTEXT(CURR=GTHT,SXL*3*2.191,STRCAT('一　 ',CON2STR(SXL*3*2.191,2))),COLORCYAN{XG51};
DRAWTEXT(CURR=GTHT,SXL*3*2.382,STRCAT('一　 ',CON2STR(SXL*3*2.382,2))),COLORCYAN{XG51};
DRAWTEXT(CURR=GTHT,SXL*3*2.5,STRCAT('一　 ',CON2STR(SXL*3*2.5,2))),COLORCYAN{XG51};
DRAWTEXT(CURR=GTHT,SXL*3*2.618,STRCAT('一　 ',CON2STR(SXL*3*2.618,2))),COLORCYAN{XG51};
DRAWTEXT(CURR=GTHT,SXL*3*2.809,STRCAT('一　 ',CON2STR(SXL*3*2.809,2))),COLORCYAN{XG51};
DRAWTEXT(CURR=GTHT,SXL*3*3,STRCAT('一　 ',CON2STR(SXL*3*3,2))),COLORCYAN{X?G*5_1?C?N?{};