通达信圣手抓妖主图选股指标公式源码

通达信圣手抓妖主图选股指标公式源码

源码正文：

AS:=(C*3+O+H+L)/6{XG51};
XJ:=(AS+0.618*REF(AS,1)+0.382*REF(AS,2)+0.236*REF(AS,3)+0.146*REF(AS,4))/2.382{XG51};
HLX:=ema(HHV(XJ,3),15){XG51};
LLX:=Ema(LLV(XJ,3),15){XG51};
CH:=crOSS(XJ,HLX);CL:=CROSS(LLX,XJ){XG51};
CHH:=BArslAst(CH);CLL:=BARSLAST(CL){XG51};
YF1:=(CHH<CLL OR CH) AND NOT(CL){XG51};
YF2:=(CHH>CLL OR CL) AND NOT(CH){XG51};
TF:=IF(YF1,LLX,HLX){XG51};
TFB:=(HLX+LLX)/2{XG51};
XJK:=SMA(EMA(XJ,3),3,1){XG51};
ZWSH:=(HHV(XJ,2)+HHV(XJ,3)+HHV(XJ,4)+HHV(XJ,5))/4{XG51};
SH:=EMA(ZWSH,21){XG51};
ZWSL:=(LLV(XJ,2)+LLV(XJ,3)+LLV(XJ,4)+LLV(XJ,5))/4{XG51};
SL:=EMA(ZWSL,21){XG51};
SCH:=CROSS(XJ,SH);SCL:=CROSS(SL,XJ){XG51};
SHH:=BARSLAST(SCH);SLL:=BARSLAST(SCL){XG51};
SF1:=(SHH<SLL OR SCH) AND NOT(SCL){XG51};
SF2:=(SHH>SLL OR SCL) AND NOT(SCH){XG51};
TFS:=IF(SF1,SL,SH){XG51};
TFbs:=(SL+SH)/2{XG51};
KX1:=(CLOSE>=OPEN) AND XJ>=TFS{XG51};
KX2:=(CLOSE<OPEN) AND XJ>=TFS{XG51};
KX3:=(CLOSE>=OPEN) AND XJ<TFS{XG51};
KX4:=(CLOSE<OPEN) AND XJ<TFS{XG51};
KX5:=((XJ>=TFS AND XJ<TF)OR (XJ<TFS AND XJ>=TF)) AND CLOSE>=OPEN{XG51};
KX6:=((XJ>=TFS AND XJ<TF)OR (XJ<TFS AND XJ>=TF)) AND CLOSE<OPEN{XG51};

DRAWBAND(TFB,RGB(125,50,50),TFS,RGB(169,169,169)){XG51};
DRAWBAND(TFB,RGB(185,50,50),TF,RGB(00,100,50)){XG51};
均价:=(HIGH+LOW+OPEN+CLOSE)/4{XG51};
分水岭: MA(3*均价-2*SMA(均价,2,1),12),COLORWHITE,LINETHICK1{XG51};
P:=1{XG51};
A01:=(C-LLV(LOW,3))/(HHV(HIGH,3)-LLV(LOW,3)){XG51};
A11:=SMA(A01,2,1){XG51};
A21:=SMA(A11,2,1){XG51};
A31:=3*A11-2*A21 {XG51};
A41:=2*A31-0.5{XG51};
乾坤线:C*(1-(A41-A21)/15),,COLORFF00FF,LINETHICK2{XG51};
A:=(L+H)/2{XG51};
股价重心:MA(A,5),COLORFFFFFF,NODRAW{XG51};
VAR2:=(H+L+O+2*C)/5{XG51};
CHH低吸线:=EMA(SLOPE(VAR2,21)*20+VAR2,55){XG51};
BB:=LLV(H,1){XG51};
逃顶线:FORCAST(FORCAST(BB,15),15), ,COLOR00FF00,LINETHICK2{XG51};
抄底线:=FORCAST(FORCAST(BB,25),25), COLORWHITE,LINETHICK2{XG51};
CHH低吸线2:=IF(SLOPE(逃顶线,2)>0,CHH低吸线,C),COLORRED{XG51};
做多趋势:=IF(均价>分水岭,均价,分水岭),COLORBLUE{XG51};
支撑: REVERSE(做多趋势)+2*分水岭,COLORBLUE,LINETHICK2{XG51};
空仓:IF(CLOSE<SAR(4,2,10),SAR(4,2,10),DRAWNULL),CIRCLEDOT,COLOR889999 {XG51};
多仓:IF(CLOSE>SAR(4,2,10),SAR(4,2,10),DRAWNULL),CIRCLEDOT,COLORWHITE {XG51};
VARR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2){XG51};
VARR2:=REF(VARR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VARR3:=REF(VARR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR4:=REF(VARR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2){XG51};
VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR
VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VARR1{XG51};
STICKLINE(VAR19,L*0.989,L*0.98,2,0),COLORWHITE{XG51};
VAR1A:=REF(VARR1 OR VARR2 OR VARR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR
VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD{XG51};
STICKLINE(VAR1A,H*1.01,H,2,0),,COLORFFFFFF{XG51};
VAQR1:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));VAQR2:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));VAQR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34)){XG51};
DRAWICON(CROSS(VAQR2,MA(VAQR3,6)),(LOW * 0.998),1){XG51};
DRAWICON(CROSS(MA(VAQR3,6),VAQR1),(HIGH * 1.013),2){XG51};
DRAWTEXT(CROSS(VAQR2,MA(VAQR3,6)),(LOW * 0.984),'↖买 '),COLOR4440FF{XG51};
DRAWTEXT(CROSS(MA(VAQR3,6),VAQR1),(HIGH * 1.02),'卖 '),COLORFFFF34{XG51};
DRAWKLINE(H,O,L,C){XG51};
FF:=EMA(CLOSE,3){XG51};
MA15:=EMA(CLOSE,21){XG51};
DRAWTEXT(CROSS(FF,MA15),(LOW * 0.99),'建仓'),COLORBLUE{XG51};
IF(分水岭<REF(分水岭,1), 分水岭,DRAWNULL),LINETHICK2,,COLOR00FF00{X~G!5?1~C~N~{};