黄金分割线出线袋子的选股方式

黄金分割线   1. 出线袋子的选股方式  2. K>20 D<>50的选股方式  

 T:=150;TT:=3;N1:=0;
 AMOV:=VOL*(OPEN+CLOSE)/2;
成本价:SUM(AMOV,5)/SUM(VOL,5),LINETHICK1,COLOR209FFF;
 MAA:MA(C,N1),COLOR00FF00;
 DRAWTEXT(ISLASTBAR AND N1>0 AND MAA>REF(MAA,1),MAA,'↑'),COLOR00FF00;
 DRAWTEXT(ISLASTBAR AND N1>0 AND MAA<REF(MAA,1),MAA,'↓'),COLOR00FF00;
高1:=REF(HHV(H,T),TT);
低1:=REF(LLV(L,T),TT);
 H1:=高1-(高1-低1)*0.191;
 H2:=高1-(高1-低1)*0.382;
 H3:=高1-(高1-低1)*0.5;
 H4:=高1-(高1-低1)*0.618;
 H5:=高1-(高1-低1)*0.809;
顶:REFDATE(高1,DATE),COLORFFFF00;
一:REFDATE(H1,DATE),DOTLINE,COLORYELLOW;
二:REFDATE(H2,DATE),DOTLINE,COLORMAGENTA;
三:REFDATE(H3,DATE),COLOR00FFFF;
四:REFDATE(H4,DATE),DOTLINE,COLORMAGENTA;
五:REFDATE(H5,DATE),DOTLINE,COLORYELLOW;
低:REFDATE(低1,DATE),COLOR00FF00;
 TT3:=(CURRBARSCOUNT=5);
 TT4:=(CURRBARSCOUNT=5+3);
 DRAWNUMBER(TT3 AND 顶,顶,顶),COLOR999900;
 DRAWTEXT(TT4 AND 顶,顶,'高:'),COLOR208FFF;
 DRAWNUMBER(TT3 AND 一,一,一),COLOR999999;
 DRAWTEXT(TT4 AND 一,一,'191:'),COLOR208FFF;
 DRAWNUMBER(TT3 AND 二,二,二),COLOR999999;
 DRAWTEXT(TT4 AND 二,二,'382:'),COLOR208FFF;
 DRAWNUMBER(TT3 AND 三,三,三),COLOR999999;
 DRAWTEXT(TT4 AND 三,三,'1/2:'),COLOR208FFF;
 DRAWNUMBER(TT3 AND 四,四,四),COLOR999999;
 DRAWTEXT(TT4 AND 四,四,'618:'),COLOR208FFF;
 DRAWNUMBER(TT3 AND 五,五,五),COLOR999999;
 DRAWTEXT(TT4 AND 五,五,'809:'),COLOR208FFF;
 DRAWNUMBER(TT3 AND 低,低*1.01,低),COLOR999900;
 DRAWTEXT(TT4 AND 低,低*1.009,'低:'),COLOR208FFF;
 AS:=(O+H+L+C)/4;
 BL:EMA(AS,17),LINETHICK2,COLOR0000FF;
 DRAWNUMBER(ISLASTBAR AND BL,BL*1.005,BL);
 XGM:=CROSS(C,BL);
 DRAWICON(XGM,BL,9);
 IF(BL>REF(BL,1),BL,DRAWNULL),LINETHICK2,COLORYELLOW;
 IF(BL<REF(BL,1),BL,DRAWNULL),LINETHICK2,COLOR00FF00;
 DRAWTEXT(ISLASTBAR AND BL>REF(BL,1),BL,'↑'),COLOR00FFFF;
 DRAWTEXT(ISLASTBAR AND BL<REF(BL,1),BL,'↓'),COLOR00FF00;

 DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
 DEA:=EMA(DIFF,9);
 MACD:=2*(DIFF-DEA),;
 GMB:IF(CROSS(DIFF,DEA) AND DIFF>0,L*0.999,DRAWNULL),CROSSDOT,LINETHICK3,COLOR00FFFF;
 GMC:IF(CROSS(DIFF,DEA) AND DIFF<0,L*0.999,DRAWNULL),CROSSDOT,LINETHICK3,COLOR208FFF;
 DRAWTEXT(CROSS(DIFF,DEA) AND DIFF>0,L*0.998,'金叉>0'),COLORYELLOW;
 DRAWTEXT(CROSS(DIFF,DEA) AND DIFF<0,L*0.998,'金叉<0'),COLORYELLOW;
 RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
 K:=SMA(RSV,3,1);
 D:=SMA(K,3,1);
 GJD:IF(CROSS(K,D) AND K>20 AND D<50,L*0.999,DRAWNULL),CROSSDOT,LINETHICK3,COLORFF00FF;
 DRAWTEXT(CROSS(K,D) AND K>20 AND D<50,L*0.998,'K>20 D<50 KD金叉！ '),COLOREEAAEE;