通达信笑纳股票主图未加密选股指标公式源码

源码正文：

difR:=ema(DCLOSE,12)-Ema(DCLOSE,26){XG51};
DEAR:=EMA(DIFR,9){XG51};
AATY:=(DIFR-DEAR)*2*60{XG51};
笑:=AATY-REF(AATY,1){XG51};
VARW1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1){XG51};
VARW2:=SMA(Abs(LOW-VARW1),13,1)/SMA(MAX(LOW-VARW1,0),10,1){XG51};
VARW3:=EMA(VARW2,10){XG51};
VARW4:=LLV(LOW,33){XG51};
VARW5:=EMA(IF(LOW<=VARW4,VARW3,0),3){XG51};
DRAWTEXT(VARW5>REF(VARW5,1) AND crOSS(笑,5),L*0.978,'笑纳'),COLORBLUE{XG51};
{X_G~5~1_C_N_{};

源码正文：

SW:=38;BW:=66{XG51};
CJ:=(H+L+2*O+3*C)/7{XG51};
DN:=INTPART(276/POW(PERIOD+3-1.7,2)-1.1){XG51};
DS:=INTPART(1.8*DN){XG51};
DB:=INTPART(0.5*DN){XG51};
DC:=INTPART(0.67*DN){XG51};
短筹:SMA(FORCAst(PWINNER(SW,BW*CJ/100)*100,DC),DS,DS-1),COLORWHITE;
抢筹:=IF(SLOPE(短筹,DB)>=0,SLOPE(短筹,DB)*POW(DN/2.71,1.5),0){XG51};
活筹:短筹/4.8+1.2*抢筹-2,COLORRED,LINETHICK2{XG51};
XC:=BArslAST(活筹>=短筹/2){XG51};
吸筹:HHV(XC,DB),NODRAW{XG51};
上涨角:HHV(ATAN(SLOPE(活筹,DC)*2.1)*180/3.14159,DC),NODRAW{X-G!5-1-C-N-{};