通达信捉妖降魔主图选股指标公式源码

通达信捉妖降魔主图选股指标公式源码

源码正文：

所属地区:DRAWTEXT_FIX(1,0.00,0.05,0,'地区：'),COLORFFFF00{XG51};
DRAWTEXT_FIX(1,0.05,0.05,0,DYBLOCK),COLORFFFF00{XG51};
所属行业:DRAWTEXT_FIX(1,0,0.10,0,'行业：'),COLORFFFF00{XG51};
DRAWTEXT_FIX(1,0.05,0.10,0,HYBLOCK),COLORFFFF00{XG51};
所属概念:DRAWTEXT_FIX(1,0,0.15,0,'概念：'),COLORFFFF00{XG51};
DRAWTEXT_FIX(1,0.05,0.15,0,GNBLOCK),COLORFFFF00{XG51};
所属风格:DRAWTEXT_FIX(1,0,0.20,0,'风格：'),COLORFFFF00{XG51};
DRAWTEXT_FIX(1,0.05,0.20,0,FGBLOCK),COLORFFFF00{XG51};
上市日期:=CONst(DAYTODATE((DATETODAY(DATE)-FINANCE(42))))+19000000,NODRAW{XG51};
DRAWTEXT_FIX(1,0,0.25,0,'上市日期:'),COLORFFFF00{XG51};
DRAWNUMBER_FIX(1,0.05,0.25,0,上市日期),COLORFFFF00{XG51};
ma5:=MA(C,5){XG51};
MA20:=MA(C,20){XG51};
A51:= REF(MA5,1)*0.98{XG51};
A52:= REF(MA5,2)*0.98{XG51};
B52:= BArslAST(REF(C,2)>=REF(MA5,2) AND REF(C,1)<REF(MA5,1))+2{XG51};
B51:= BARSLAST(REF(C,2)>=REF(MA5,2) AND REF(C,1)<REF(MA5,1))+1{XG51};
DZ:=IF((REF(C,2)>=REF(MA5,2)) AND (REF(C,1)<REF(MA5,1)),IF(REF(MA5,2)<REF(MA5,1),A51,A52),IF(BARSSINCE(REF(C,2)>=REF(MA5,2) AND REF(C,1)<REF(MA5,1))>0,IF(REF(MA5, B52)< REF(MA5, B51),REF(MA5,B51)*0.98, REF(MA5,B52)*0.98), REF(MA5,1))){XG51};
A201:= REF(MA20,1)*0.98{XG51};
A202:= REF(MA20,2)*0.98{XG51};
B202:= BARSLAST(REF(C,2)>=REF(MA20,2) AND REF(C,1)<REF(MA20,1))+2{XG51};
B201:= BARSLAST(REF(C,2)>=REF(MA20,2) AND REF(C,1)<REF(MA20,1))+1{XG51};
ZZ:=IF((REF(C,2)>=REF(MA20,2)) AND (REF(C,1)<REF(MA20,1)),IF(REF(MA20,2)<REF(MA20,1),A201,A202),IF(BARSSINCE(REF(C,2)>=REF(MA20,2) AND REF(C,1)<REF(MA20,1))>0,IF(REF(MA20, B202)< REF(MA20, B201),REF(MA20,B201)*0.98, REF(MA20,B202)*0.98), REF(MA20,1))){XG51};
短止:DZ,COLORRED,LINETHICK2{XG51};
紫线:ZZ,COLORLIMAGENTA{XG51};
绿线:LLV(REF(LOW,1),2)+(HHV(REF(HIGH,1),2)-LLV(REF(LOW,1),2))/2,COLORCYAN{XG51};
黄线:MA(CLOSE,25)+MA(CLOSE,25)*6/100,COLORBLUE,LINETHICK2{XG51};
白轨:MA(CLOSE,25)+MA(CLOSE,25)*20/100,COLORRED{XG51};
影子线:MA(CLOSE,25)+MA(CLOSE,25)*13/100,COLORBROWN{XG51};
STICKLINE(C/REF(C,1)>1.095,C,O,2,0),COLORBLUE{XG51};
AZZ:=LLV(REF(LOW,1),2)+(HHV(REF(HIGH,1),2)-LLV(REF(LOW,1),2))/2,COLORCYAN{XG51};
DRAWICON(REF(C,1)<REF(DZ,1) AND C>=DZ AND C>AZZ ,LOW*0.99,1){XG51};
DRAWICON(REF(C,1)<REF(AZZ,1) AND C>=AZZ,LOW*0.99,1){XG51};
AXX:=((((MA(C,10) > MA(C,25)) && crOSS(C,MA(C,5))) && (V > MA(V,10))) && (MA(C,10) > REF(MA(C,10),1))){XG51};
ASS:=C>=黄线 AND AXX {XG51};
DRAWTEXT(ASS,L*0.99,'☆'), COLORCYAN{XG51};
DRAWTEXT_FIX(ISLASTBAR,0,0.00,0,'说明: ☆为稳买'),COLORLIBLUE{XG51};
涨停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0){XG51};
STICKLINE(涨停,O,C,1,0),COLORBLUE{XG51};
XA:=(ATAN((MA(C,3)/REF(MA(C,3),1)-1)*100)*180/3.14115926)>60{XG51};
XB:=C/REF(C,2)>1.08 AND C=HHV(C,40){XG51};
妖股:XA AND XB AND BARSCOUNT(C)>19,NODRAW,COLORBLUE{XG51};
DRAWICON(妖股,L,13){XG51};
DRAWTEXT(妖股,L*0.92,'妖股'),COLORBLUE{XG51};
XC:=C=ZTPRICE(REF(C,1),0.1){XG51};
STICKLINE(XC,C,O,0.5,0)COLORBLUE{XG51};
STICKLINE(XC,H,L,0.5,0),COLORBLUE{XG51};
倍量:=V>REF(MA(V,5),1)*1.8 AND C>REF(C,1) AND BARSCOUNT(C)>15{XG51};
DRAWTEXT(倍量,L*0.97,'倍'),COLORLIMAGENTA,LINETHICK2{XG51};
DRAWTEXT(CROSS((REF(HIGH,1)+REF(LOW,1))/2,MA(CLOSE,20)+2*STD(CLOSE,20)),
HIGH*1.02,'●警'),COLORCYAN{XG51};
A3:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100{XG51};
A4:=SMA(A3,3,1){XG51};
A5:=SMA(A4,3,1){XG51};
A6:=3*A4-2*A5{XG51};
A7:=C-REF(C,1){XG51};
A8:=100*ema(EMA(A7,6),6)/EMA(EMA(Abs(A7),6),6){XG51};
买:=LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2)){XG51};
DRAWTEXT(FILTER(买=1,5),LOW-0.05,'买进'),COLORBLUE{XG51};
STICKLINE(买,OPEN,CLOSE,2,0),COLORBLUE{XG51};
STICKLINE(C/REF(C,1)>1.095,C,O,2,0),COLORLIMAGENTA{XG51};
N:=12{XG51};
DG:=1.2{XG51};
YLX:=0{XG51};
ZCX:=0{XG51};
A1:=REF(C,N)=HHV(C,2*N+1); B1:=FILTER(A1,N); C1:=BacKSET(B1,N+1); HD:=FILTER(C1,N){XG51};
A2:=REF(C,N)=LLV(C,2*N+1); B2:=FILTER(A2,N); C2:=BACKSET(B2,N+1); LD:=FILTER(C2,N){XG51};
UU:=BACKSET(BARSTATUS=2,BARSLAST(HD)+1);VV:=UU>REF(UU,1){XG51};
前高:REF(C,BARSLAST(VV)),COLORWHITE,LINETHICK2{XG51};
顶高:=REF(C,BARSLAST(VV))*DG,COLORBROWN,LINETHICK2{XG51};
PTZQ:=BARSLAST(VV){XG51};
PTZF:=(HHV(H,PTZQ)-LLV(L,PTZQ))/LLV(L,PTZQ)*100{XG51};
DRAWTEXT_FIX(1,0.5,0.04,0,STRCAT(STRCAT('平台周期 ',CON2STR(PTZQ,0)),' 天')),COLORWHITE{XG51};
DRAWTEXT_FIX(1,0.5,0.08,0,STRCAT(STRCAT('平台振幅 ',CON2STR(PTZF,0)),' %')),COLORBLUE{X=G^5-1=C=N={};