蔡院士

{均线变色设置}

MA1:MA(CLOSE,M1) COLORRED,LINETHICK1;

MA2:MA(CLOSE,M2) COLORRED,LINETHICK2;

MA3:MA(CLOSE,M3) COLORRED,LINETHICK3;

IF(MA1<REF(MA1,1),MA1,DRAWNULL ),COLORGREEN,LINETHICK1;

IF(MA2<REF(MA2,1),MA2,DRAWNULL),COLORGREEN,LINETHICK2;

IF(MA3<REF(MA3,1),MA3,DRAWNULL ),COLORGREEN,LINETHICK3;

{月线反转}

Z:=EXTDATA_USER(3,0);{50天的}

RPS50:=Z/10;

D:=IF(RPS50<=85,0,1);{RPS50大于85}

A:=C/MA(C,250)>1;{站上年线}

NH:=IF(H<HHV(H,50),0,1);

B:=COUNT(NH,30);{一月内曾创50日新高}

NN:=IF(C>MA(C,250),1,0);

AA:=COUNT(NN,30);

AB:=HIGH/HHV(HIGH,120)>0.9;{最高价距离120日内的最高价不到10%}

DRAWICON(BARSSINCEN((A AND B AND D AND  AA>2  AND AA<30 AND AB),30)=0,LOW,34);

{三线翻红}

K120:=EXTDATA_USER(1,0);{120天的RPS}

RPSK120:=K120/10;

K01:=IF(RPSK120<=90,0,1);{RPS120大于90};

K250:=EXTDATA_USER(2,0);{250天的RPS}

RPSK250:=K250/10;

K02:=IF(RPSK250<=90,0,1);{RPS250大于90};

K50:=EXTDATA_USER(3,0);{50天的RPS}

RPSK50:=K50/10;

K03:=IF(RPSK50<=90,0,1);{RPS50大于90};

DRAWICON(BARSSINCEN((K01 AND K02 AND K03),20)=0,LOW*0.95,15);

{涨停红色}

ZDF:=(C-REF(C,1))/REF(C,1)*100;

STICKLINE(ZDF>9.5,C,O,3.1,0),COLORRED;

STICKLINE(ZDF>9.5,C,O,2.1,0),COLORRED;

STICKLINE(ZDF>9.5,C,O,1.2,0),COLORRED;

STICKLINE(ZDF>9.5,C,O,0.2,0),COLORRED;

STICKLINE(ZDF>9.5,H,L,0,0),COLORRED;

{跌停绿色}

STICKLINE(ZDF<-9.5,O,C,3.1,0),COLORGREEN;

STICKLINE(ZDF<-9.5,O,C,2.1,0),COLORGREEN;

STICKLINE(ZDF<-9.5,O,C,1.2,0),COLORGREEN;

STICKLINE(ZDF<-9.5,O,C,0.2,0),COLORGREEN;

STICKLINE(ZDF<-9.5,H,L,0,0),COLORGREEN;

{口袋支点个股}

GGM1:=MA(C,10);GGM2:=MA(C,50);GGM3:=MA(C,120);GGM4:=REF(GGM3,1);GGM5:=MA(C,20);

GGM6:=REF(GGM5,1);GGM7:=(H+L)/2;GGM8:=MA(C,200);GGM9:=REF(GGM2,1);GGL250:=LLV(LOW,250);

GGH120:=HHV(HIGH,120);GGX11:=IF(C<REF(C,1),V,0);GGX12:=(L-MA(C,10))/MA(C,10)*100;

GGX13:=(L-MA(C,50))/MA(C,50)*100;GGX14:=H>REF(H,1);GGX15:=C>=REF(O,1);

GGX16:=(C-MA(C,50))/MA(C,50);GGX17:=(C-MA(C,20))/MA(C,20)*100;

GGX18:=(C-MA(C,50))/MA(C,50)*100;

GGY:=EXTDATA_USER(3,0)/10;{50天的}GGY1:=EXTDATA_USER(1,0)/10;{120天的}

GGY2:=EXTDATA_USER(2,0)/10;{250天的}GGY3:=EXTDATA_USER(6,0)/10;{20天的}

{标准口袋支点个股}

DRAWICON((C-REF(C,1))/REF(C,1)>=0.02 AND VOL>=REF(HHV(GGX11,10),1) AND

(GGX12<=1.5 OR GGX13<=1.5) AND C>=O

AND GGM5>=GGM6 AND (GGM3>=GGM4 OR GGM2>=GGM9) AND C>GGM5 AND GGX14 AND GGX15

AND C>GGM1 AND C>GGM2 AND C>GGM3 AND C>GGM8 AND C>GGM7 AND C>=GGL250*1.2

AND (GGX17<=50 AND GGX18<=50)

AND H>=(GGH120*0.85) AND (GGY>=85 OR GGY1>=85 OR GGY2>=85 OR

(GGY3>=85 AND C>REF(C,1)*1.07)),L*1.01,5);

DRAWICON((C-REF(C,1))/REF(C,1)>=0.095  AND (GGX12<=1.5 OR GGX13<=1.5) AND GGX16<=0.6

AND GGM5>=GGM6  AND (GGM3>=GGM4 OR GGM2>=GGM9) AND C>GGM5 AND GGX14 AND GGX15

AND GGX17<=45 AND C>GGM1 AND C>GGM2 AND C>GGM3 AND C>GGM8 AND C>GGM7 AND

C>=GGL250*1.18 AND  H>=(GGH120*0.85) AND (GGY>=85 OR GGY1>=85 OR GGY2>=85 OR GGY3>=85)

,L*1.01,5);

BBKD:=((C-REF(C,1))/REF(C,1)>=0.095 OR (VOL>=REF(HHV(GGX11,10),1) AND C>REF(C,1)*1.07))

AND (GGX12<=1.5 OR GGX13<=1.5) AND GGX16<=0.6

AND GGM5>=GGM6  AND (GGM3>=GGM4 OR GGM2>=GGM9) AND C>GGM5 AND GGX14 AND GGX15

AND GGX17<=45 AND C>GGM1 AND C>GGM2 AND C>GGM3 AND C>GGM8 AND C>GGM7 AND

C>=GGL250*1.18 AND  H>=(GGH120*0.92) AND (GGY>=85 OR GGY1>=85 OR GGY2>=85 OR GGY3>=85);

BBKD1:=(C-REF(C,1))/REF(C,1)>=0.02 AND VOL>=REF(HHV(GGX11,10),1) AND

(GGX12<=1.5 OR GGX13<=1.5) AND C>=O

AND GGM5>=GGM6  AND (GGM3>=GGM4 OR GGM2>=GGM9) AND C>GGM5 AND GGX14 AND GGX15

AND C>GGM1 AND C>GGM2 AND C>GGM3 AND C>GGM8 AND C>GGM7 AND C>=GGL250*1.2

AND (GGX17<=25 AND GGX18<=25)

AND HHV(C,1)=HHV(C,120) AND (GGY>=85 OR GGY1>=85 OR GGY2>=85 OR

(GGY3>=85 AND C>REF(C,1)*1.07));

{延伸口袋支点个股}

DRAWICON((C-REF(C,1))/REF(C,1)>=0.02 AND GGX12>1.5 AND VOL>=REF(HHV(GGX11,10),1)

AND C>=O AND GGM5>=GGM6  AND (GGM3>=GGM4 OR GGM2>=GGM9) AND C>GGM5 AND GGX14 AND GGX15

AND C>GGM1 AND C>GGM2 AND C>GGM3 AND C>GGM8 AND C>GGM7 AND C>=GGL250*1.2 AND GGX17<=100

AND C>=(GGH120*0.85) AND (GGY>=85 OR GGY1>=85 OR GGY2>=85 OR (GGY3>=85

AND C>=REF(C,1)*1.07)),H*1.05,37);

DRAWICON((C-REF(C,1))/REF(C,1)>=0.095 AND GGX12>1.5 AND GGX16<=0.6 AND GGX17<=100

AND GGM5>=GGM6  AND (GGM3>=GGM4 OR GGM2>=GGM9) AND C>GGM5 AND GGX14 AND GGX15

AND C>GGM1 AND C>GGM2 AND C>GGM3 AND C>GGM8 AND C>GGM7 AND C>=GGL250*1.2

AND C>=(GGH120*0.85) AND (GGY>=85 OR GGY1>=85 OR GGY2>=85 OR GGY3>=85)

,H*1.05,37);

YYKD:=(C-REF(C,1))/REF(C,1)>=0.02 AND GGX12>1.5 AND VOL>=REF(HHV(GGX11,10),1)

AND C>=O AND GGM5>=GGM6  AND (GGM3>=GGM4 OR GGM2>=GGM9) AND C>GGM5 AND GGX14 AND GGX15

AND C>GGM1 AND C>GGM2 AND C>GGM3 AND C>GGM8 AND C>GGM7 AND C>=GGL250*1.2

AND (GGX17<=30 AND GGX18<=30)

AND HHV(C,1)=HHV(C,120) AND (GGY>=85 OR GGY1>=85 OR GGY2>=85 OR (GGY3>=85

AND C>=REF(C,1)*1.07));

YYKD1:=(C-REF(C,1))/REF(C,1)>=0.095 AND GGX12>1.5 AND GGX16<=0.6 AND GGX17<=100

AND  GGM5>=GGM6  AND (GGM3>=GGM4 OR GGM2>=GGM9) AND C>GGM5 AND GGX14 AND GGX15

AND C>GGM1 AND C>GGM2 AND C>GGM3 AND C>GGM8 AND C>GGM7 AND C>=GGL250*1.2

AND (GGX17<=30 AND GGX18<=30)

AND C>=(GGH120*0.92) AND (GGY>=85 OR GGY1>=85 OR GGY2>=85 OR GGY3>=85);

DRAWICON(BARSSINCEN(YYKD OR YYKD1 OR BBKD OR BBKD1,20)=0,H*1.05,36);