通达信〖强势突破寻龙〗结合支撑阻力与评分高低决定是否介入选股源码

VARAA:=MA(CLOSE,10);
VARAB:=MA(CLOSE,54);
VARAC:=(REF(CLOSE,3)-CLOSE)/REF(CLOSE,3)*100>5;
VARAD:=FILTER(VARAC,10);
VARAE:=BARSLAST(VARAD);
VARAF:=REF(HIGH,VARAE+2);
VARAG:=REF(HIGH,VARAE+1);
VARAH:=REF(HIGH,VARAE);
VARAI:=MAX(VARAF,VARAG);
VARAJ:=MAX(VARAI,VARAH);
VARAK:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>5;
VARAL:=VARAE< 150;
VARAM:=(OPEN-VARAJ)/VARAJ*100< 30;
VARAN:=(CLOSE-LLV(LOW,VARAE))/LLV(LOW,VARAE)*100< 50;
VARAO:=(CLOSE-REF(OPEN,5))/REF(OPEN,5)*100< 30;
VARAP:=vol/MA(VOL,5)< 3.5;
VARAQ:=(CLOSE-REF(CLOSE,89))/REF(CLOSE,89)*100< 80;
VARAR:=VARAK AND VARAL AND VARAM AND VARAN AND VARAO AND VARAP AND VARAQ;
VARAS:=FILTER(VARAR,15);
VARAT:=(CLOSE-VARAB)/VARAB< 0.1;
VARAU:=(CLOSE-VARAA)/VARAA< 0.3;
VARAV:=(VARAT=1 AND VARAU=1)*0.2;
VARAW:=(VARAV=0 AND REF(VARAV,1)=0.2 AND REF(COUNT(VARAV=0.2,10)=10,1)=1)*(-0.1);
VARAX:=VARAW=(-0.1);
VARAY:=VARAS OR VARAX;
VARAZ:=DYNAINFO(7)/REF(CLOSE,1)>1.05 AND DYNAINFO(7)/OPEN>1.05;
VARBA:=VOL/REF(VOL,1)>1.2 AND COUNT(CLOSE>OPEN,1) OR (LOW>REF(HIGH,1) AND COUNT(OPEN>CLOSE,1) AND VOL/REF(VOL,1)>1.2);
VARBB:=VARAY AND CLOSE/REF(CLOSE,1)>1.095 AND VARBA AND VARAZ;
VARBC:=MA(CLOSE,3);
VARBD:=CLOSE>MA(CLOSE,10);
VARBE:=VARBC>REF(VARBC,1) AND VARBC>REF(VARBC,2) AND VOL>0;
VARBF:=VARBC< REF(VARBC,1) AND VARBC< REF(VARBC,2);
VARBG:=REF(VARBF,1) AND VARBC>=REF(VARBC,1) AND VARBC<=REF(VARBC,2);
VARBH:=REF(VARBG,1) AND VARBC<=REF(VARBC,1) AND VARBC>=REF(VARBC,2);
VARBI:=REF(VARBH,1) AND VARBC>=REF(VARBC,1) AND VARBC<=REF(VARBC,2);
VARBJ:=REF(VARBI,1) AND VARBC<=REF(VARBC,1) AND VARBC>=REF(VARBC,2);
VARBK:=REF(VARBJ,1) AND VARBC>=REF(VARBC,1) AND VARBC<=REF(VARBC,2);
VARBL:=REF(VARBK,1) AND VARBC<=REF(VARBC,1) AND VARBC>=REF(VARBC,2);
VARBM:=REF(VARBL,1) AND VARBC>=REF(VARBC,1) AND VARBC<=REF(VARBC,2);
VARBN:=REF(VARBM,1) AND VARBC<=REF(VARBC,1) AND VARBC>=REF(VARBC,2);
VARBO:=REF(VARBN,1) AND VARBC>=REF(VARBC,1) AND VARBC<=REF(VARBC,2);
VARBP:=REF(VARBO,1) AND VARBC<=REF(VARBC,1) AND VARBC>=REF(VARBC,2);
VARBQ:=REF(VARBP,1) AND VARBC>=REF(VARBC,1) AND VARBC<=REF(VARBC,2);
VARBR:=REF(VARBQ,1) AND VARBC<=REF(VARBC,1) AND VARBC>=REF(VARBC,2);
VARbs:=REF(VARBR,1) AND VARBC>=REF(VARBC,1) AND VARBC<=REF(VARBC,2);
VARBT:=REF(VARBF OR VARBG OR VARBH OR VARBI OR VARBJ OR VARBK OR VARBL OR VARBM OR VARBN OR VARBO OR VARBP OR VARBQ OR VARBR OR VARBS,1) AND VARBE;
VARBU:=VARBT AND VARBD;
XG:VARBB AND VARBU;