通达信熊市未加密选股指标公式源码

源码正文：

熊市选股:IF(REF(C,3)/REF(C,4)<1 AND REF(C,2)/REF(C,3)<0.97 AND REF(C,1)/REF(C,2)<0.96 AND C/REF(C,1)>1 AND O>REF(C,1) AND INDEXC/REF(INDEXC,1)<0.975,1,0){X.G!5-1.C.N.{};

源码正文：

dif:=ema(CLOSE,9)-Ema(CLOSE,26){XG51};
DEA:=EMA(DIF,12){XG51};
macd:=(DIF-DEA)*2,COLORstICK{XG51};
T1:=BArslAST(crOSS(DIF,0)=1){XG51};
T2:=BARSLAST(CROSS(0,DIF)=1){XG51};
LLV1:=LLV(L,T2){XG51};
HHV1:=HHV(H,T1){XG51};
UP:=IF(DATE<=1160601,DRAWLINE(L=LLV1,LLV1,H=HHV1,HHV1,0),DRAWNULL),COLORLICYAN{XG51};
DN:=IF(DATE<=1160601,DRAWLINE(H=HHV1,HHV1,L=LLV1,LLV1,0),DRAWNULL),COLORCYAN{XG51};
低点:=REF(L,BARSLAST(L=DN)){XG51};
高点:=REF(H,BARSLAST(H=UP)){XG51};
本低:=IF(DATE<=1160601,低点,DRAWNULL),LINETHICK0{XG51};
本高:=IF(DATE<=1160601,高点,DRAWNULL),LINETHICK0{XG51};
低点位置:=本低>0&&REF(本高,1)>0&&DN=本低{XG51};
高点位置:=本高>0&&REF(本低,1)>0&&本高=UP{XG51};
上低:=IF(DATE<=1160601,REF(低点,T2+1),DRAWNULL),LINETHICK0{XG51};
上高:=IF(DATE<=1160601,REF(高点,T1+1),DRAWNULL),LINETHICK0{XG51};
SZ:=上低<本低{XG51};
XD:=上高>本高&&上低>本低{XG51};
PZ:=(SZ!=1&&XD!=1){XG51};
VAR1:=LLV(LOW,21);
VAR2:=HHV(HIGH,21);
AK1:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 100),5),NODRAW;
AK:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 50),13);
DD:=EMA(((0.667*REF(AK1,1))+(0.333*AK1)),2);
CC:=AK1>=DD{XG51};
KC:=AK1<DD{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1&&XD=1,0.55,0.1,0,'趋势下跌'){XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1&&SZ=1,0.55,0.1,0,'趋势上涨'){XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1&&PZ=1,0.55,0.1,0,'趋势盘整'){XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1&&KC=1,0.8,0.1,0,' 策略：减仓50%'){XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1&&CC=1&&SZ=1,0.8,0.1,0,' 策略：满仓轮动'){XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1&&CC=1&&PZ=1,0.8,0.1,0,' 策略：半仓轮动'){XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1&&CC=1&&XD=1,0.8,0.1,0,' 策略：二成轮动'){XG51};
MC:=IF(CC=1&&SZ=1,1,0){XG51};
BC:=IF(CC=1&&PZ=1,0.5,0){XG51};
ER:=IF(CC=1&&XD=1,0.2,0){XG51};
持仓仓位:MC+BC+ER,NODRAW{XG51};
STICKLINE(C>0,0,(MC+BC+ER),1,1){XG51};
T低:=BARSLAST(AK1<20),NODRAW{XG51};
T高:=BARSLAST(AK1>80),NODRAW{XG51};
超跌:=IF(T低<T高&&LLV(AK1,T高)<20,1,0),NODRAW{XG51};
超买:=IF(T低>T高&&HHV(AK1,T低)>80,1,0),NODRAW{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1&&AK1<80&&AK1>20&&超跌=1,0.65,0.1,0,' 机会：待涨'){XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1&&AK1>20&&AK1<80&&超跌=0,0.65,0.1,0,' 机会：超短'){XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1&&AK1<20,0.65,0.1,0,' 机会：波段建仓'){XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1&& AK1>80,0.65,0.1,0,' 机会：短线'){XG51};
风险估值:INTPART(AK1)/100,COLORWHITE{X~G_5-1~C~N~{};