通达信看长做短主图+未加密选股指标公式源码

通达信看长做短主图+未加密选股指标公式源码

源码正文：

M1:ma(CLOSE,13),COLORBLUE,LINETHICK2{XG51};
M2:MA(CLOSE,34),COLORRED,LINETHICK2{XG51};
生命线:MA(CLOSE,55),COLORCYAN,LINETHICK2{XG51};
A:MA(C,5)COLORYELLOW,LINETHICK3{XG51};
B:=A<REF(A,1){XG51};
IF(B-1,A,DRAWNULL)COLORWHITE,LINETHICK3{XG51};
DRAWTEXT(LAst(MA(C,5)<MA(C,10),5,0) AND "cci.CCI">REF("CCI.CCI",1) AND crOSS("CCI.CCI",-100),L*0.975,'⊕底'){XG51};
DRAWTEXT(CROSS(A,M1),M1,'◣周加'),COLORRED{XG51};
DRAWTEXT(A>=REF(A,1) AND REF(A,1)<REF(A,2),A,'◣周买'),COLORWHITE{XG51};
AR1:=(2*CLOSE+HIGH+LOW+OPEN)/5{XG51};
短趋势:=(ema(AR1,3)+EMA(AR1,6)+EMA(AR1,12)+EMA(AR1,24))/4{XG51};
bs1:=EMA(AR1,1)*1.028{XG51};
BS2:=MA(OPEN,1)*1.028,COLORRED{XG51};
AR2:=(C+H+O+L)/4{XG51};
上轨:EMA(AR2,20)*(1+32/1000),CIRCLEDOT,COLORCYAN{XG51};
下轨:EMA(AR2,80)*(1-100/1000),CIRCLEDOT,COLORMAGENTA{XG51};
DRAWICON((CROSS(BS1,下轨) AND CROSS(BS2,下轨)),下轨,13){XG51};
DRAWICON(A>上轨 AND A<REF(A,1),A,21);

选股公式:
M1:=MA(CLOSE,13){XG51};
M2:=MA(CLOSE,34){XG51};
生命线:=MA(CLOSE,55){XG51};
A:=MA(C,5){XG51};
B:=A<REF(A,1){XG51};
Q1:=IF(B-1,A,DRAWNULL){XG51};
AR1:=(2*CLOSE+HIGH+LOW+OPEN)/5{XG51};
短趋势:=(EMA(AR1,3)+EMA(AR1,6)+EMA(AR1,12)+EMA(AR1,24))/4{XG51};
BS1:=EMA(AR1,1)*1.028{XG51};
BS2:=MA(OPEN,1)*1.028{XG51};
AR2:=(C+H+O+L)/4{XG51};
上轨:=EMA(AR2,20)*(1+32/1000){XG51};
下轨:=EMA(AR2,80)*(1-100/1000){XG51};
DRAWTEXT(A>=REF(A,1) AND REF(A,1)<REF(A,2),A,''){X~G^5^1~C~N~{};

通达信信天翁动态量未加密选股指标公式源码

源码正文：

A股:CAPITAL/1000000,COLORRED{XG51};
换手:vol/CAPITAL*100,POINTDOT{XG51};
外内比:DYNAINFO(51){XG51};
五换:SUM(换手,5){XG51};
十换:SUM(换手,10){XG51};
二十换:SUM(换手,20){XG51};
持仓:ema(100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3){XG51};
获利比:WINNER(CLOSE)*100{XG51};
A:=PERIOD{XG51};
N:=IF(A=0,1,IF(A=1,5,IF(A=2,15,IF(A=3,30,IF(A=4,60,IF(A=5,240,DRAWNULL)))))){XG51};
M:=IF(N=1,IF(MOD(FROMOPEN,1)=0,1,
MOD(FROMOPEN,1)),IF(N=5,IF(MOD(FROMOPEN,5)=0,5,
MOD(FROMOPEN,5)),IF(N=15,IF(MOD(FROMOPEN,15)=0,15,
MOD(FROMOPEN,15)),IF(N=30,IF(MOD(FROMOPEN,30)=0,30,
MOD(FROMOPEN,30)),IF(N=60,IF(MOD(FROMOPEN,60)=0,60,
MOD(FROMOPEN,60)),IF(N=240,FROMOPEN,DRAWNULL)))))){XG51};
虚拟:IF(CURRBARSCOUNT=0,V*N/M,DRAWNULL),NODRAW,COLORRED{XG51};
stICKLINE(CURRBARSCOUNT=0 AND N,虚拟,0,6,-1),COLORFFFFFF{XG51};
现量:VOL,NODRAW{XG51};
放量:(VOL/REF(VOL,1)>=1.5 AND COUNT(CLOSE>OPEN,1)) OR (LOW>REF(HIGH,1)
AND COUNT(OPEN>CLOSE,1) AND VOL/REF(VOL,1)>1.5){XG51};
DRAWTEXT(放量,VOL*1.05,'放'),COLORRED{XG51};
倍量:=(VOL/REF(VOL,1)>=2.5 AND COUNT(CLOSE>OPEN,1)) OR (LOW>REF(HIGH,1)
AND COUNT(OPEN>CLOSE,1) AND VOL/REF(VOL,1)>2.5){XG51};
DRAWTEXT(倍量,VOL*1.15,'倍'),COLORCYAN{XG51};
AA:=VOL/((HIGH-LOW)*2-Abs(CLOSE-OPEN)){XG51};
主买:IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),POINTDOT,COLORWHITE{XG51};
主卖:=IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL/2)){XG51};
STICKLINE(CLOSE<REF(CLOSE,1),0,VOL,6,0),COLORGREEN{XG51};
STICKLINE(CLOSE>=REF(CLOSE,1) ,0,VOL,6,0),COLORWHITE{XG51};
STICKLINE(主买>0,0,主买,6,0),COLORWHITE{XG51};
STICKLINE(主卖<0 ,主买,主买,6,0),COLORCYAN;ma5:EMA(VOL,5),COLORRED,LINETHICK1{XG51};
MA10:EMA(VOL,10),COLORBLUE,LINETHICK1{XG51};
MA20:EMA(VOL,20),COLORBROWN,LINETHICK2{XG51};
MA90:EMA(VOL,90),COLORYELLOW,LINETHICK2{XG51};
MA3买:EMA(主买,3),COLORWHITE,LINETHICK1{XG51};
MA5买:EMA(主买,5),COLORLIMAGENTA,LINETHICK1{XG51};
MA10买:EMA(主买,10),COLORWHITE,LINETHICK1{XG51};
MA20买:EMA(主买,20),COLORBLUE,LINETHICK2{XG51};
MA20买均:EMA(MA20买,2),COLORBLUE,LINETHICK1{XG51};
MA5卖:EMA(ABS(主卖),5),COLORCYAN,LINETHICK1{XG51};
MA10卖:EMA(ABS(主卖),10),COLORGREEN,LINETHICK1{XG51};
MA20卖:EMA(ABS(主卖),20),COLORYELLOW,LINETHICK3{XG51};
资金异动:VOL/EMA(VOL,60)*100,COLORBLUE{XG51};
STICKLINE(资金异动>=227,0,VOL,2,0),COLORBLUE{XG51};
DRAWTEXT(资金异动 AND (crOSS(VOL,MA90)) AND (MA5>MA10) AND (MA10>MA20) AND (MA20>MA90) AND (MA5买>MA5卖) AND (MA5买>MA10买)AND (MA10买>MA10卖) AND (MA20买>MA20卖),(VOL *1.3),'缩卖'),COLORBLUE{XG51};
DRAWTEXT(倍量 AND (CROSS(VOL,MA90)) AND (MA5>MA10) AND (MA10>MA20) AND (MA10>MA90) AND (MA5买>MA5卖) AND (MA5买>MA10买) AND (MA10买>MA10卖) AND (MA20买>MA20卖),(VOL *1.3),'缩卖'),COLORCYAN{XG51};
DRAWTEXT(CROSS(MA5买,MA10买) AND (VOL>MA90) AND (CROSS(MA5买,MA20买)) AND (CROSS(MA10买,MA10卖)) AND (CROSS(MA10买,MA20卖)) AND (CROSS(MA20买,MA20卖)),(VOL *0.15),'买'),COLORRED{XG51};
DRAWTEXT(CROSS(MA3买,MA5买) AND (VOL>MA90) AND (CROSS(MA5买,MA20买)) AND (CROSS(MA10买,MA10卖)) AND (CROSS(MA10买,MA20卖)) AND (CROSS(MA20买,MA20卖)),(VOL *0.1),' 买'),COLORCYAN{XG51};
DRAWTEXT(CROSS(MA3买,MA10买) AND (VOL>MA90) AND (CROSS(MA5买,MA20买)) AND (CROSS(MA10买,MA10卖)) AND (CROSS(MA10买,MA20卖)) AND (CROSS(MA20买,MA20卖)),(VOL *0.05),'买'),COLORBLUE{X.G*5~1.C.N.{};