通达信暴利钱庄主图未加密选股指标公式源码

通达信暴利钱庄主图未加密选股指标公式源码

源码正文：

DRAWGBK(C>0, RGB(0,0,00),RGB(0,0,0),0,'11',0){XG51};
ma10:MA(C,10){XG51};
MA60:MA(C,60){XG51};
VAR6:=(( Abs((OPEN-CLOSE))/(HIGH-LOW))*vol){XG51};
VAR7:=(( (HIGH-IF((CLOSE>OPEN),CLOSE,OPEN))/(HIGH-LOW))*VOL){XG51};
VAR8:=(( (IF((CLOSE>OPEN),OPEN,CLOSE)-LOW)/(HIGH-LOW))*VOL){XG51};
VAR9:=IF(((VOL/CAPITAL)>0.001),1,EXP(ABS(LOG(((VOL/CAPITAL)*100))))){XG51};
加仓:VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE>OPEN,NODRAW,COLORWHITE{XG51};
减仓:VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE<OPEN,NODRAW,COLORYELLOW{XG51};
洗盘:VAR8>VAR6 AND VAR8>VAR7,NODRAW,COLORRED{XG51};
高抛:VAR7>VAR6 AND VAR7>VAR8,NODRAW,COLORLIMAGENTA{XG51};
地量:VAR9>2 AND VOL<MA(VOL,5)/2,NODRAW,COLORCYAN{XG51};
DRAWKLINE(H,O,L,C){XG51};
TY:=C{XG51};
A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BacKSET(B1,10+1); HD:=FILTER(C1,10){XG51};
A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1); LD:=FILTER(C2,10){XG51};
前期高位:REF(H,BArslAst(HD)), COLORFF00FF,POINTDOT,LINETHICK3{XG51};
前期低位:REF(L,BARSLAST(LD)), COLORCYAN,POINTDOT,LINETHICK3{XG51};
STICKLINE(加仓,O,C,1,0),COLORWHITE{XG51};
STICKLINE(洗盘,O,C,1,0),COLORRED{XG51};
STICKLINE(减仓,O,C,1,0),COLORYELLOW{XG51};
STICKLINE(高抛,O,C,1,0),COLORLIMAGENTA{XG51};
STICKLINE(地量,O,C,1,0),COLORCYAN{XG51};
JJ:=(3*C+H+L+O)/6{XG51};
VAR1:=(8*JJ+7*REF(JJ,1)+6*REF(JJ,2)+5*REF(JJ,3)+4*REF(JJ,4)+3*REF(JJ,5)+2*REF(JJ,6)+REF(JJ,8))/36{XG51};
TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1 AND C>REF(C,1){XG51};
LJL:=FILTER(TJ1,5){XG51};
STICKLINE(CLOSE,REF(LOW,BARSLAST(LJL)),REF(LOW,BARSLAST(LJL)),1,0),COLORWHITE{XG51};
STICKLINE(CLOSE,REF(CLOSE,BARSLAST(LJL)),REF(CLOSE,BARSLAST(LJL)),1,0),COLORBLUE{XG51};
STICKLINE(LJL,OPEN,CLOSE,1,0),COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.0,0.0,0,'蓝芯-主力低位深度洗盘或高位出货坚决'),COLORYELLOW,LINETHICK1{XG51};
DRAWTEXT_FIX(1,0.00,0.06,0,'白芯-主力轻度洗盘'),COLORRED,LINETHICK1{XG51};
DRAWTEXT_FIX(1,0.00,0.12,0,'棕芯-出现了近期相对地量'),COLORCYAN,LINETHICK1{XG51};
DRAWTEXT_FIX(1,0.00,0.18,0,'粉芯-主力在做高抛低吸或低吸高抛'),COLORFF00FF,LINETHICK1{XG51};
DRAWTEXT_FIX(1,0.00,0.24,0,'红芯-主力吸筹进货积极主动'),COLORWHITE,LINETHICK1{XG51};
DRAWTEXT_FIX(1,0.00,0.3,0,'黄芯-主力吸筹进货强并且成交量出现黄金柱'),COLORBLUE,LINETHICK1{XG51};
DRAWTEXT_FIX(C>0,0.004,1,0,DYBLOCK),COLORBLUE,LINETHICK2{XG51};
DRAWTEXT_FIX(C>0,0.06,1,0,HYBLOCK),COLORWHITE,LINETHICK2{XG51};
DRAWTEXT_FIX(C>0,0.12,1,0,EXTERNSTR(0,1)),COLORRED,LINETHICK2{XG51};
EN1:=zig(3,5)>REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)<=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)<=REF(ZIG(3,5),3){XG51};
PL10:=ZIG(3,10){XG51};
走强2:=BARSLAST(PL10<REF(PL10,1)){XG51};
ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走强2),0){XG51};
追2:=EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2{XG51};
追4:=EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3{XG51};
DRAWTEXT(追2 OR 追4,LOW*0.978,'追'),COLORBLUE{XG51};
PL5:=ZIG(3,5){XG51};
EX1:=ZIG(3,5)<REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)>=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)>=REF(ZIG(3,5),3){XG51};
EN2:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)<=REF(ZIG(3,10),3){XG51};
EX2:=ZIG(3,10)<REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)>=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)>=REF(ZIG(3,10),3){XG51};
PL20:=ZIG(3,20){XG51};
EN3:=ZIG(3,20)>REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)<=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)<=REF(ZIG(3,20),3){XG51};
EX3:=ZIG(3,20)<REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)>=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)>=REF(ZIG(3,20),3){XG51};
PL40:=ZIG(3,40){XG51};
走强1:=BARSLAST(PL5<REF(PL5,1)){XG51};
走弱1:=BARSLAST(PL5>REF(PL5,1)){XG51};
走弱2:=BARSLAST(PL10>REF(PL10,1)){XG51};
走强3:=BARSLAST(PL20<REF(PL20,1)){XG51};
走弱3:=BARSLAST(PL20>REF(PL20,1)){XG51};
ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走强2),0){XG51};
DTJZ5:=IF(PL10<REF(PL10,1),COUNT(EN1,走弱2),0){XG51};
DTJD5:=IF(PL10<REF(PL10,1),COUNT(EX1,走弱2),0){XG51};
ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走强3),0){XG51};
ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走强3),0){XG51};
DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱3),0){XG51};
DTJD10:=IF(PL20<REF(PL20,1),COUNT(EX2,走弱3),0){XG51};
DRAWTEXT(EN1 AND DTJZ5=1,L*0.98,'反弹低点'),COLORLICYAN{XG51};
DRAWTEXT(EX1 AND DTJD5=2,H*1.02,'反弹高点！'),COLORLIGREEN{XG51};
DRAWTEXT(EN2 AND ZTJZ5=1,L*0.98,'底'),COLORBLUE{XG51};
DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJD5=1,H*1.02,'减仓'),COLORFFFF00{XG51};
DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2,L*0.98,'----买'),COLOR0000FF{XG51};
DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJZ5=2,H*1.02,'短卖'),COLORCYAN{XG51};
DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,L*0.98,'----短买'),COLOR0000FF{XG51};
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.02,'短卖'),COLORCYAN{XG51};
DRAWTEXT(EN2 AND DTJZ10=1,L*0.96,'Ⅰ'),COLORFF00FF{XG51};
DRAWTEXT(EX2 AND DTJD10=2,H*1.03,'Ⅱ'),COLORFF6000{XG51};
DRAWTEXT(EN3 AND ZTJZ10=1,L*0.95,'Ⅲ'),COLORBLUE{XG51};
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.06,'①'),LINETHICK3,COLORFFFF00{XG51};
DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2,L*0.96,'②'),LINETHICK3,COLORBLUE{XG51};
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,H*1.02,'清仓!'),LINETHICK3,COLORRED{XG51};
DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=3,L*0.96,'④'),LINETHICK3,COLORBLUE{XG51};
DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,L*0.95,'⑷'),COLORBLUE{XG51};
ema13:=EMA(C,13){XG51};
EMA34:=EMA(C,34){XG51};
EMA55:=EMA(C,55){XG51};
EMA120:=EMA(C,120){XG51};
cr1:=(C-REF(C,1))/REF(C,1)*100>0.5{XG51};
CR2:=V>MA(V,5)*0.6{XG51};
CR3:=COUNT(CROSS(EMA13,EMA55),3)=1{XG51};
CR4:=ABS(EMA34-EMA55)/EMA55<0.03{XG51};
CR5:=EMA55<=EMA120 AND EMA55>=REF(EMA55,1){XG51};
CR6:=FILTER(CR1 AND CR2 AND CR3 AND CR4 AND CR5,2){XG51};
DRAWTEXT(CR6,C*0.98,'风险'),COLORRED{X.G_5!1.C.N.{};

通达信清爽买卖未加密选股指标公式源码

源码正文：

ma1:=MA(CLOSE,5){XG51};
MA2:=MA(CLOSE,10){XG51};
P01:=IF(MA1>MA2,1,IF(MA2>MA1,-1,0)){XG51};
MA3:=MA(CLOSE,3){XG51};
MA4:=MA(CLOSE,5){XG51};
P02:=IF(MA3>MA4,1,IF(MA4>MA3,-1,0)){XG51};
MA5:=MA(CLOSE,12){XG51};
MA6:=MA(CLOSE,50){XG51};
P03:=IF(MA5>MA6,1,IF(MA6>MA5,-1,0)){XG51};
RSV:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100{XG51};
K:=ema(RSV,3){XG51};
D:=EMA(K,3){XG51};
P04:=IF(K>D,1,IF(D>K,-1,0)){XG51};
dif:=EMA(CLOSE,12)-EMA(CLOSE,26){XG51};
DEA:=EMA(DIF,9){XG51};
macd:=(DIF-DEA)*2{XG51};
P05:=IF(DIF>DEA,1,IF(DEA>DIF,-1,0)){XG51};
TR2:=EMA(EMA(EMA(CLOSE,12),12),12){XG51};
trix:=(TR-REF(TR,1))/REF(TR,1)*100{XG51};
MATRIX:=MA(TRIX,9) {XG51};
P06:=IF(TRIX>MATRIX,1,IF(MATRIX>TRIX,-1,0)){XG51};
TR1:=EMA(MAX(MAX(HIGH-LOW,Abs(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),7){XG51};
HD :=HIGH-REF(HIGH,1){XG51};
LD :=REF(LOW,1)-LOW{XG51};
DMP:=EMA(IF(HD>0 AND HD>LD,HD,0),7){XG51};
DMM:=EMA(IF(LD>0 AND LD>HD,LD,0),7){XG51};
pdi:= DMP*100/TR{XG51};
mdi:= DMM*100/TR{XG51};
ADX:= EMA(ABS(MDI-PDI)/(MDI+PDI)*100,7){XG51};
ADXR:=EMA(ADX,7){XG51};
P07:=IF(PDI>MDI AND ADX>PDI AND ADX>50,3,
IF(PDI<MDI AND ADX>MDI AND ADX>50,-3,0)){XG51};
LC:=REF(CLOSE,1){XG51};
rsi1:=EMA(MAX(CLOSE-LC,0),5)/EMA(ABS(CLOSE-LC),5)*100{XG51};
P08:=IF(RSI1>80,1,IF(RSI1<20,-1,0)){XG51};
TYP:=(HIGH+LOW+CLOSE)/3{XG51};
cci:=(TYP-MA(TYP,8))/(0.015*AVEDEV(TYP,8)){XG51};
P09:=IF(CCI>180,2,IF(CCI<-180,-2,0)){XG51};
wr1:=(CLOSE-LLV(LOW,6))/(HHV(HIGH,6)-LLV(LOW,6))*100{XG51};
P10:= IF(WR1>80,1,IF(WR1<20,-1,0)){XG51};
OSC:=100*(CLOSE-MA(CLOSE,20)){XG51};
P11:=IF(OSC>0,1,IF(OSC<0,-1,0)){XG51};
MOM:=CLOSE-REF(CLOSE,7){XG51};
P12:=IF(MOM>0,1,IF(MOM<0,-1,0)){XG51};
dpo:=CLOSE-REF(MA(CLOSE,11),11/2+1){XG51};
P13:=IF(DPO>0,1,IF(DPO<0,-1,0)){XG51};
MB:=MA(CLOSE,12){XG51};
R:=(CLOSE-MB)*(CLOSE-MB){XG51};
X1:=MA(R,12){XG51};
X2:=SQRT(X1){XG51};
D1:=1{XG51};
UPPER:=MB+(D1*X2){XG51};
LOWER:=MB-(D1*X2){XG51};
P14:=IF(CLOSE>UPPER,2,IF(CLOSE<LOWER,-2,0)){XG51};
BR:=SUM(MAX(0,HIGH-REF(CLOSE,1)),14)/SUM(MAX(0,REF(CLOSE,1)-LOW),14)*100{XG51};
AR:=SUM(HIGH-OPEN,14)/SUM(OPEN-LOW,14)*100{XG51};
P15:=IF(BR>350 OR AR>180,3,IF(BR<45 OR AR<45,-3,0)){XG51};
TH:=SUM(IF(CLOSE>REF(CLOSE,1),vol,0),14){XG51};
TL:=SUM(IF(CLOSE<REF(CLOSE,1),VOL,0),14){XG51};
TQ:=SUM(IF(CLOSE=REF(CLOSE,1),VOL,0),14){XG51};
VR:=0100*(TH*2+TQ)/(TL*2+TQ){XG51};
P16:=IF(VR>350,3,IF(VR<45,-3,0)){XG51};
WVAD:=SUM((CLOSE-OPEN)/(HIGH-LOW)*VOL,6)/10000{XG51};
P17:=IF(WVAD>0,1,IF(WVAD<0,-1,0)){XG51};
VOLUME:=MA(VOL,4)/VOL{XG51};
MID:=100*(HIGH+LOW-REF(HIGH+LOW,1))/(HIGH+LOW){XG51};
emv:=MA(MID*VOLUME*(HIGH-LOW)/MA(HIGH-LOW,4),4){XG51};
P18:=IF(EMV>0,1,IF(EMV<0,-1,0)){XG51};
VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL){XG51};
obv:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0){XG51};
MaoBV:=EMA(OBV,24){XG51};
P19:=IF(OBV>MAOBV,1,IF(OBV<MAOBV,-1,0)){XG51};
PVI:= PVI,COLORRED{XG51};
MPVI:=EMA(PVI,24),COLORBLUE{XG51};
P20:=IF(PVI>MPVI,1,IF(PVI<MPVI,-1,0)){XG51};
NVI:=NVI,COLORRED{XG51};
MNVI:=EMA(NVI,24),COLORBLUE{XG51};
P21:=IF(NVI>MNVI,2,IF(NVI<MNVI,-2,0)){XG51};
MASS:=SUM(MA(HIGH-LOW,9)/MA(MA(HIGH-LOW,9),9),25){XG51};
MA7:=MA(CLOSE,9){XG51};
P22:=IF(MA7>REF(MA7,1) AND MASS>26.5,2,IF(MA7<REF(MA7,1)
AND MASS<26.5,-2,0)){XG51};
NUM:=ABS(HHV(HIGH,15)-LLV(LOW,15)){XG51};
DEN:=SUM(ABS(CLOSE-REF(CLOSE,1)),15){XG51};
VHF:=IF(DEN=0,0,NUM/DEN){XG51};
VHF1:=EMA(VHF,240){XG51};
P23:=IF(VHF>VHF1,1,IF(VHF<VHF1,-1,0)){XG51};
PU:=MA(CLOSE,13){XG51};
CU:=MA(VOL,13){XG51};
PU1:=(PU-REF(PU,1))/REF(PU,1)*100{XG51};
CU1:=(CU-REF(CU,1))/REF(CU,1)*100{XG51};
逆时针曲线:=PU1+CU1{XG51};
P24:=IF(逆时针曲线>REF(逆时针曲线,1),1,IF(逆时针曲线<REF(逆时针曲线,1),-1,0)){XG51};
LC2:=REF(CLOSE,1){XG51};
AA:=ABS(HIGH-LC2){XG51};
BB:=ABS(LOW-LC2){XG51};
CC:=ABS(HIGH-REF(LOW,1)){XG51};
DD:=ABS(LC2-REF(OPEN,1)){XG51};
R2:=IF(AA>BB AND AA>CC,AA+BB/2+DD/4,IF(BB>CC AND BB>AA,BB+AA/2+DD/4,CC+DD/4)){XG51};
X01:=(CLOSE-LC2+(CLOSE-OPEN)/2+LC2-REF(OPEN,1)){XG51};
SI:=16*X01/R2*MAX(AA,BB){XG51};
asi:=SUM(SI,0),COLORRED{XG51};
MASI:=MA(ASI,6),COLORBLUE{XG51};
P25:=IF(CLOSE<HHV(CLOSE,13) AND ASI=HHV(ASI,13),1,IF(CLOSE>LLV(CLOSE,13) AND ASI=LLV(ASI,13),-1,0)){XG51};
bias1 :=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100{XG51};
P26:=IF(BIAS1>10,1,IF(BIAS1<-10,-1,0)){XG51};
决策曲线: (36+P01+P02+P03+P04+P05+P06+P07+P08+P09+P10+P11+P12+P13+P14+P15+P16+
P17+P18+P19+P20+P21+P22+P23+P24+P25+P26)*1.36,COLORLIMAGENTA{XG51};
MAJCQX:MA(决策曲线,3),COLORRED{XG51};
DRAWTEXT(crOSS(82.5, 决策曲线),80,'↖清仓'),COLORBLUE{XG51};
DRAWTEXT(CROSS(75, 决策曲线),74,'减点'),COLORCYAN{XG51};
DRAWTEXT(CROSS( 决策曲线,18),16,'↖买点'),COLORWHITE{XG51};
回调持币:IF(决策曲线<=REF(决策曲线,1),决策曲线,DRAWNULL),COLORCYAN,LINETHICK2{XG51};
持股:IF(决策曲线>REF(决策曲线,1),决策曲线,DRAWNULL),COLORWHITE,LINETHICK2{X!G-5^1!C!N!{};