 | |  |  |
{副图源码如下}
ZBGS1:=MA(VOL,5);
ZBGS2:=VOL/REF(ZBGS1,1);
ZBGS3:=REF(HHV(C,30),1);
ZBGS4:=EMA(C,20);
ZBGS5:=ZBGS4+2*SQRT(MA(POW(C-ZBGS4,2),20));
ZBGS6:=REF(ZBGS5,1);
ZBGS7:=MA(ZBGS3,2);
ZBGS8:=CLOSE > ZBGS7 AND C > ZBGS6 AND ZBGS2 > 1.8 AND COUNT(CLOSE > ZBGS7 AND CLOSE > ZBGS6 AND ZBGS2 > 1.8,7)=1;
ZBGS9:=REF(CLOSE,1);
ZBGS10:=SMA(MAX(CLOSE-ZBGS9,0),6,1)/SMA(ABS(CLOSE-ZBGS9),6,1)*100;
ZBGS11:=COST(0.7);
ZBGS12:=HIGH > ZBGS11 AND ZBGS10 > 83;
ZBGS13:=ZBGS8 AND ZBGS12;
ZBGS14:=NAMELIKE('ST')=0 AND NAMELIKE('*ST')=0 AND NAMELIKE('SST')=0 AND NAMELIKE('S*ST')=0;
ZBGS15:=DYNAINFO(4)>0;
ZBGS16:=IF(CODELIKE('92'),0,1);
ZBGS17:=IF(CODELIKE('30') OR CODELIKE('688'), C/REF(C,1)>1.195, C/REF(C,1)>1.095);
ZBGS18:=ZBGS14 AND ZBGS15 AND ZBGS16 AND NOT(ZBGS17);
XG:ZBGS13 AND ZBGS18;
买入:=REF(C,BARSLAST(XG)),COLORYELLOW,NODRAW;
最高:=REF(H,BARSLAST(XG)-1),COLORFF00FF,NODRAW;
成绩:=((最高-买入)/买入)*100,COLORRED,NODRAW;
STICKLINE(REF(XG=1,1) ,0,0.50,2,0),COLORGREEN;
STICKLINE(REF(XG=1,1) AND 最高/买入>=1.01,0,0.50,2,0),COLORRED;
DRAWICON(REF(XG=1,1) AND 成绩>=1,0.68,5);
DRAWICON(REF(XG=1,1) AND 成绩<1,0.68,4);
DRAWNUMBER(REF(XG,1),0.85,成绩),COLORYELLOW;
DRAWTEXT(REF(XG,1),0.78,' %'),COLORYELLOW;
{选股源码如下}
ZBGS31:=MA(VOL,5);
ZBGS32:=VOL/REF(ZBGS31,1);
ZBGS33:=REF(HHV(C,30),1);
ZBGS34:=EMA(C,20);
ZBGS35:=ZBGS34+2*SQRT(MA(POW(C-ZBGS34,2),20));
ZBGS36:=REF(ZBGS35,1);
ZBGS37:=MA(ZBGS33,2);
ZBGS38:=CLOSE > ZBGS37 AND C > ZBGS36 AND ZBGS32 > 1.8 AND COUNT(CLOSE > ZBGS37 AND CLOSE > ZBGS36 AND ZBGS32 > 1.8,7)=1;
ZBGS39:=REF(CLOSE,1);
ZBGS310:=SMA(MAX(CLOSE-ZBGS39,0),6,1)/SMA(ABS(CLOSE-ZBGS39),6,1)*100;
ZBGS311:=COST(0.7);
ZBGS312:=HIGH > ZBGS311 AND ZBGS310 > 83;
ZBGS313:=ZBGS38 AND ZBGS312;
ZBGS314:=NAMELIKE('ST')=0 AND NAMELIKE('*ST')=0 AND NAMELIKE('SST')=0 AND NAMELIKE('S*ST')=0;
ZBGS315:=DYNAINFO(4)>0;
ZBGS316:=IF(CODELIKE('92'),0,1);
ZBGS317:=IF(CODELIKE('30') OR CODELIKE('688'), C/REF(C,1)>1.195, C/REF(C,1)>1.095);
ZBGS318:=ZBGS314 AND ZBGS315 AND ZBGS316 AND NOT(ZBGS317);
XG:ZBGS313 AND ZBGS318;
未
| |  | |  |
|
