|
DRAWGBK(C>0,RGB(20,10,80),RGB(10,1,5),1,0,1);
DRAWBAND(MA(CLOSE,250),RGB(0,50,0),MA(CLOSE,120),RGB(50,0,0));
DRAWKLINE(H,O,L,C);
{均线}
MA5:MA(CLOSE,5),COLORWHITE;
MA10:MA(CLOSE,10),COLORYELLOW;
MA20:MA(CLOSE,20),COLORMAGENTA;
MA30:=MA(CLOSE,30),COLORGREEN;
MA60:MA(CLOSE,60),COLORBLUE;
MA120:MA(CLOSE,120),COLORGRAY;
MA250:MA(CLOSE,250),COLORRED;
牛熊线:MA(COST(90),10),DOTLINE,COLORBROWN;
{涨停}
STICKLINE(C>REF(C,1)*1.098,O,C,3,0),COLORRED;
{准备买入}
LC:=REF(CLOSE,1);
RSI5:=((SMA(MAX((CLOSE - LC),0),5,1) / SMA(ABS((CLOSE - LC)),5,1)) * 100);
TR1:=SUM(MAX(MAX((HIGH - LOW),ABS((HIGH - REF(CLOSE,1)))),ABS((LOW - REF(CLOSE,1)))),10);
HD:=(HIGH - REF(HIGH,1));
LD:=(REF(LOW,1) - LOW);
DMP:=SUM(IF(((HD > 0) AND (HD > LD)),HD,0),10);
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),10);
PDI:=((DMP * 100) / TR1);
MDI:=((DMM * 100) / TR1);
ADX:=MA(((ABS((MDI - PDI)) / (MDI + PDI)) * 100),5);
AV:=(RSI5 + ADX);
WR10:=((100 * (HHV(HIGH,10) - CLOSE)) / (HHV(HIGH,10) - LLV(LOW,10)));
NEWVOL:=(RSI5 - WR10);
赚钱:=(AV + NEWVOL);
STICKLINE(赚钱<5,H,L,0,0),COLOR008000;{买点预警}
STICKLINE(赚钱<5,O,C,3,0),COLOR008000;
STICKLINE(CROSS("MACD脉冲.脉冲",0.4),H,L,0,0),COLORBLUE;
STICKLINE(CROSS("MACD脉冲.脉冲",0.4),O,C,3,0),COLORBLUE;
趋界:=100*(LOW/MA(C,10))-100 ;
L抄底:=(LOW-DMA((3*HIGH+LOW+OPEN+2*LOW)/7,VOL/(SUM(AMOUNT,10)/(AMOUNT/VOL/7)/7)))/DMA((3*HIGH+LOW+OPEN+2*LOW)/7,VOL/(SUM(AMOUNT,10)/(AMOUNT/VOL/7)/7))*100;
H抄底:=(H-DMA(((3*HIGH+LOW+OPEN+2*H)/7),VOL/(SUM(AMOUNT,10)/(AMOUNT/VOL/7)/7)))/DMA(((3*HIGH+LOW+OPEN+2*H)/7),VOL/(SUM(AMOUNT,10)/(AMOUNT/VOL/7)/7))*100;
C抄底:=(CLOSE-DMA(((3*HIGH+LOW+OPEN+2*CLOSE)/7),VOL/(SUM(AMOUNT,10)/(AMOUNT/VOL/7)/7)))/DMA(((3*HIGH+LOW+OPEN+2*CLOSE)/7),VOL/(SUM(AMOUNT,10)/(AMOUNT/VOL/7)/7))*100;
抄底:=(L抄底+H抄底+C抄底)/3;
L短线:=IF(((MA(((SMA(MAX(L-REF(L,1),0),5,1)/SMA(ABS(L-REF(L,1)),5,1)*100)-LLV((SMA(MAX(L-REF(L,1),0),5,1)/SMA(ABS(L-REF(L,1)),5,1)*100),10)),2)*3+((SMA(MAX(L-REF(L,1),0),5,1)/SMA(ABS(L-REF(L,1)),5,1)*100)-LLV((SMA(MAX(L-REF(L,1),0),5,1)/SMA(ABS(L-REF(L,1)),5,1)*100),10))*13)/16)>13,MA(((MA(((SMA(MAX(L-REF(L,1),0),5,1)/SMA(ABS(L-REF(L,1)),5,1)*100)-LLV((SMA(MAX(L-REF(L,1),0),5,1)/SMA(ABS(L-REF(L,1)),5,1)*100),10)),2)*3+((SMA(MAX(L-REF(L,1),0),5,1)/SMA(ABS(L-REF(L,1)),5,1)*100)-LLV((SMA(MAX(L-REF(L,1),0),5,1)/SMA(ABS(L-REF(L,1)),5,1)*100),10))*13)/16),2),((MA(((SMA(MAX(L-REF(L,1),0),5,1)/SMA(ABS(L-REF(L,1)),5,1)*100)-LLV((SMA(MAX(L-REF(L,1),0),5,1)/SMA(ABS(L-REF(L,1)),5,1)*100),10)),2)*3+((SMA(MAX(L-REF(L,1),0),5,1)/SMA(ABS(L-REF(L,1)),5,1)*100)-LLV((SMA(MAX(L-REF(L,1),0),5,1)/SMA(ABS(L-REF(L,1)),5,1)*100),10))*13)/16));
H短线:=IF(((MA(((SMA(MAX(H-REF(H,1),0),5,1)/SMA(ABS(H-REF(H,1)),5,1)*100)-LLV((SMA(MAX(H-REF(H,1),0),5,1)/SMA(ABS(H-REF(H,1)),5,1)*100),10)),2)*3+((SMA(MAX(H-REF(H,1),0),5,1)/SMA(ABS(H-REF(H,1)),5,1)*100)-LLV((SMA(MAX(H-REF(H,1),0),5,1)/SMA(ABS(H-REF(H,1)),5,1)*100),10))*13)/16)>13,MA(((MA(((SMA(MAX(H-REF(H,1),0),5,1)/SMA(ABS(H-REF(H,1)),5,1)*100)-LLV((SMA(MAX(H-REF(H,1),0),5,1)/SMA(ABS(H-REF(H,1)),5,1)*100),10)),2)*3+((SMA(MAX(H-REF(H,1),0),5,1)/SMA(ABS(H-REF(H,1)),5,1)*100)-LLV((SMA(MAX(H-REF(H,1),0),5,1)/SMA(ABS(H-REF(H,1)),5,1)*100),10))*13)/16),2),((MA(((SMA(MAX(H-REF(H,1),0),5,1)/SMA(ABS(H-REF(H,1)),5,1)*100)-LLV((SMA(MAX(H-REF(H,1),0),5,1)/SMA(ABS(H-REF(H,1)),5,1)*100),10)),2)*3+((SMA(MAX(H-REF(H,1),0),5,1)/SMA(ABS(H-REF(H,1)),5,1)*100)-LLV((SMA(MAX(H-REF(H,1),0),5,1)/SMA(ABS(H-REF(H,1)),5,1)*100),10))*13)/16));
C短线:=IF(((MA(((SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100)-LLV((SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100),10)),2)*3+((SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100)-LLV((SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100),10))*13)/16)>13,MA(((MA(((SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100)-LLV((SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100),10)),2)*3+((SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100)-LLV((SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100),10))*13)/16),2),((MA(((SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100)-LLV((SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100),10)),2)*3+((SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100)-LLV((SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100),10))*13)/16));
短线:=(L短线+H短线+C短线)/3 ;
短买:=(L-REF(C,10))-MA((L-REF(C,10)),5) ;
J:= 3*SMA(((C-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100),3,1)-2*SMA(SMA(((C-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100),3,1),3,1) ;
LJ:=3*SMA(((L-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100),3,1)-2*SMA(SMA(((L-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100),3,1),3,1) ;
CD:=短买<0 AND 抄底<=-2 AND LJ<2 AND ((L短线=0 AND L抄底<=-2 ) AND (H短线<0.5 AND H抄底<=-1)) AND (100*(L-LLV(L,3))/(HHV(L,3)-LLV(L,3))=0 AND 100*(L-LLV(L,5))/(HHV(L,5)-LLV(L,5))=0 );
DD:=短线<4.2 AND (L短线<1 OR H短线<1 OR C短线<1) AND L短线<2 AND 抄底<-0.9 AND L抄底<-1.99 AND H抄底<7.2 AND 趋界<-1.5 AND J<45;
可以抄底:=DD AND CD;
STICKLINE(可以抄底,H,L,0,0),COLORYELLOW;
STICKLINE(可以抄底,O,C,2,0),COLORYELLOW;
VAR1T:=4*SMA((CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100,5,1)-3*SMA(SMA((CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100,5,1),3.2,1);
VAR1F:=SMA(CROSS(赚钱,0),3,1);
VAR2F:=SMA(VAR1F,3,1);
VAR3F:=SMA(VAR2F,3,1);
DRAWICON(CROSS(赚钱,0) OR CROSS(VAR1T,8),L,1);
DRAWICON(CROSS(VAR2F,VAR3F) AND (VAR2F<40),L,41);
{角买}
MTM:=C-REF(C,1);
DXD:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
买:=LLV(DXD,2)=LLV(DXD,7) AND COUNT(DXD<0,2) AND CROSS(DXD,MA(DXD,2));
STICKLINE(FILTER(买=1,5),H,L,0,0),COLORMAGENTA;
STICKLINE(FILTER(买=1,5),C,O,3,0),COLORMAGENTA;
{白柱子买点}
HLCO:=(C+H+L+O)/4;
MAHC:=MA((CLOSE*2+H)/3,5),COLOR0000FF;
MAHO:=MA((O*2+H)/3,5),COLOR00FF00;
MALO:=MA((O+L*2)/3,5),COLOR00FFFF;
CO1:=O+(C-O)/2;
STICKLINE(MAHC<MAHO AND (CROSS(C,MALO) OR CROSS(HLCO,MALO)),CO1,MIN(C,O),1.5,0),COLORWHITE;
{暴涨}
ZF:=(C/REF(C,1)-1)*100;
AAAB:=SUM(ZF,3);
DRAWICON(COUNT(AAAB<-6,3)=2 AND CROSS(AAAB,-6),L-0.1,11);
{涨10%}
VAR01:=((((OPEN + LOW) + HIGH) + CLOSE) / 4);
短底:=EMA(VAR01,5);
上1:=(HHV(短底,60) * 0.92);
阻挡线:=(SMA(LOW,21,2) * 0.96);
DRAWTEXT(FILTER((((((LOW <= 阻挡线) AND ((MA(C,20) - REF(MA(C,20),1)) > 0)) AND (OPEN <= 上1)) AND (HIGH > 上1))
AND (CLOSE > 阻挡线)),5),LOW,'涨10%'),COLORRED;
20211213221536145.png
|
