L1:=MIN(DYNAINFO(3),DYNAINFO(6));

P01:=H1-L1;

短压力:L1+P01*7/8,COLORFFFF00,NODRAW;

短支撑:L1+P01*0.5/8,COLOR00FFFF,NODRAW;

现价:CLOSE,COLORWHITE,NODRAW;

 

DRAWKLINE(H,O,L,C); 

上涨值:=MA((H+REF(L,1))/2,3);

买进高点:=MA((H+REF(H,1))/2,3);

VAR01:=((H+L+C)/3)*2-L;

突破买入值:=MA(VAR01,3);{LSS轴点突破买入值}

下跌值:=MA((REF(H,1)+L)/2,3);

卖出低点:=MA((REF(L,1)+L)/2,3);

VAR02:=((H+L+C)/3)*2-H;

突破卖出值:=MA(VAR02,3);

次日卖出点:=(上涨值+买进高点+突破买入值+H)/4;

次日买入点:=(下跌值+卖出低点+突破卖出值+L)/4;

均价:=(2*C+L+H/4);

 

SJTJ:=DATE<1590301;

 MAH:=(H*18+REF(H,1)*17+REF(H,2)*16+REF(H,3)*15+REF(H,4)*14+REF(H,5)*13+REF(H,6)*12+REF(H,7)*11+REF(H,8)*10+REF(H,9)*9+REF(H,10)*8+REF(H,11)*7+REF(H,12)*6+REF(H,13)*5+REF(H,14)*4+REF(H,15)*3+REF(H,16)*2+REF(H,17)*1)/171;

 MAL:=(L*18+REF(L,1)*17+REF(L,2)*16+REF(L,3)*15+REF(L,4)*14+REF(L,5)*13+REF(L,6)*12+REF(L,7)*11+REF(L,8)*10+REF(L,9)*9+REF(L,10)*8+REF(L,11)*7+REF(L,12)*6+REF(L,13)*5+REF(L,14)*4+REF(L,15)*3+REF(L,16)*2+REF(L,17)*1)/171;

 MA5:=MA(CLOSE,5);

 MA10:=MA(CLOSE,10);

 MA20:=MA(CLOSE,20);

 MA60:=MA(CLOSE,60);

 DK:= SJTJ AND( CLOSE>=MAH OR (C>MA5 AND C>MA10 AND C>MA20 AND C>MA60));

 KK:= SJTJ AND( MAL>CLOSE OR (C<MA5 AND C<MA10 AND C<MA20 AND C<MA60));

 DK1:=BARSLAST(DK);

 KK1:=BARSLAST(KK);

 DK2:=BARSLAST(CROSS(KK1,DK1));

 KK2:=BARSLAST(CROSS(DK1,KK1));

HS:=DK2<KK2;

 LS:=KK2<DK2;

 W2:=OPEN-CLOSE;

 HT:=IF(OPEN>CLOSE,OPEN,CLOSE);

 LT:=IF(OPEN<CLOSE,OPEN,CLOSE); 

 STICKLINE(HS,REFDATE(HHV(H,0),DATE),REFDATE(LLV(L,0),DATE),6,0),COLOR000031;

 STICKLINE(LS,REFDATE(HHV(H,0),DATE),REFDATE(LLV(L,0),DATE),6,0),COLOR242400;

 STICKLINE(W2>0 AND HS,OPEN,CLOSE,2,0),COLORRED;

 STICKLINE(W2>0 AND HS,OPEN,H,0.0,0),COLORRED;

 STICKLINE(W2>0 AND HS,C,L,0.0,0),COLORRED;

 STICKLINE(W2<=0 AND HS,OPEN,CLOSE,2,1),COLORRED;

 STICKLINE(W2<=0 AND HS,O,L,0.0,0),COLORRED;

 STICKLINE(W2<=0 AND HS,C,H,0.0,0),COLORRED;

 STICKLINE(W2>0 AND LS,OPEN,CLOSE,2,0),COLORAEAE00;

 STICKLINE(W2>0 AND LS,OPEN,H,0.0,0),COLORAEAE00;

 STICKLINE(W2>0 AND LS,C,L,0.0,0),COLORAEAE00;

 STICKLINE(W2<=0 AND LS,OPEN,CLOSE,2,1),COLORAEAE00;

 STICKLINE(W2<=0 AND LS,C,H,0.0,0),COLORAEAE00;

 STICKLINE(W2<=0 AND LS,O,L,0.0,0),COLORAEAE00;

 DRAWNUMBER(ISLASTBAR AND LS,MAH,MAH),COLORYELLOW;

 DRAWNUMBER(ISLASTBAR AND HS,MAL,MAL),COLORYELLOW;

 

 

{警示牌设置}

警示牌:=1;

高:=REFDATE(HHV(H,180),DATE)*1.05;

低:=REFDATE(LLV(L,180),DATE)*0.95;

A11:=MA(C,18);

A12:=MA(C,50);

A13:=MA(C,89);

A14:=IF((MA(C,180)<=高 AND MA(C,180)>=低) OR C>=MA(C,180),MA(C,180),DRAWNULL);

{—————股性判断—————}

牛股:=ISLASTBAR AND A11>A12 AND A12>A13 AND A13>IF(A14=DRAWNULL,0,A14) AND C>A11 OR ISLASTBAR AND A11>A12 AND C>=A11;

猴股:=ISLASTBAR AND A11>A12 AND C<A11 ;

熊股:=ISLASTBAR AND IF(A14=DRAWNULL,A12<A13 AND C<A13,A13<A14 AND C<A14) OR ISLASTBAR AND A11<A12;

DRAWGBK(警示牌=1 AND 牛股,0,0,0,'牛股',0);

DRAWGBK(警示牌=1 AND 猴股,0,0,0,'猴股',0);

DRAWGBK(警示牌=1 AND 熊股,0,0,0,'熊股',0);

 

 

趋势5日线:EMA(C,5),COLOR00FF00,LINETHICK1;

红升5:IF(趋势5日线>REF(趋势5日线,1),趋势5日线,DRAWNULL),COLORFFFFFF,LINETHICK2;

绿降5:IF(趋势5日线<REF(趋势5日线,1),趋势5日线,DRAWNULL)DOTLINE,COLOR00FF00,LINETHICK1;

看13日:EMA(C,13),COLOR00FF00,LINETHICK1;

升:IF(看13日>REF(看13日,1),看13日,DRAWNULL),COLOR00E8E8,LINETHICK2;

降:IF(看13日<REF(看13日,1),看13日,DRAWNULL)DOTLINE,COLOR00FF00,LINETHICK1;

生命线21日:EMA(C,21),COLOR00FF00,LINETHICK1;

红升:IF(生命线21日>REF(生命线21日,1),生命线21日,DRAWNULL),COLOR0000FF,LINETHICK2;

绿降:IF(生命线21日<REF(生命线21日,1),生命线21日,DRAWNULL)DOTLINE,COLOR009300,LINETHICK1;

趋势62日线:EMA(C,62),COLORYELLOW,LINETHICK1,NODRAW;

红升4:IF(趋势62日线>REF(趋势62日线,1),趋势62日线,DRAWNULL),COLORFF00FF,LINETHICK2;

绿降4:IF(趋势62日线<REF(趋势62日线,1),趋势62日线,DRAWNULL),COLORFFFF00,DOTLINE,LINETHICK1;

半年线:EMA(C,120),COLORYELLOW,LINETHICK1,NODRAW;

半年红升:IF(半年线>REF(半年线,1),半年线,DRAWNULL),COLOR0080FF,LINETHICK1;

半年绿降:IF(半年线<REF(半年线,1),半年线,DRAWNULL),COLORFFFF00,DOTLINE,LINETHICK1;

年线:EMA(C,250),COLORYELLOW,LINETHICK1,NODRAW;

年红升:IF(年线>REF(年线,1),年线,DRAWNULL),COLORFF0000,LINETHICK1;

年绿降:IF(年线<REF(年线,1),年线,DRAWNULL),COLORFFFF00,DOTLINE,LINETHICK1;

R1:=(C+L+H)/3;

R2:=EMA(R1,6);

R3:=EMA(R2,5);

N:=5;

M1:=6;

M2:=6;

M3:=8;

R:=IF(DATE<1910612,1,0);

EE:=(H+MAX(C,O))/2;

EE1:=MA(EE,3);

EE2:=(L+MIN(C,O))/2;

EE3:=MA(EE2,3);

超短生命线:MA(EE,3),COLOR00FF00;

红升1:IF(超短生命线>REF(超短生命线,1),超短生命线,DRAWNULL),COLOR8EB3FF,LINETHICK2;

绿降1:IF(超短生命线<REF(超短生命线,1),超短生命线,DRAWNULL),COLOR00FF00,LINETHICK1,DOTLINE;

FF:=(H+L+C+O)/4,COLORWHITE;

FF1:=MA(FF,3),COLORGREEN;

FF3:=REF((C+O)/2,1)>REF((C+O)/2,2) AND REF(MIN(C,O),1)>REF(MAX(C,O),2);

实际乖离:=(MAX(FF,FF1)-MIN(FF,FF1))/MIN(FF,FF1)*100,LINETHICK;

FF4:=(((FF1-(REF(FF1,1)-FF1))-L)/L)*100;

FF5:=(((EE1+(EE1-REF(EE1,1)))-L)/L)*100;

FF6:=FF1-(REF(FF1,1)-FF1);

FF7:=EE1+(EE1-REF(EE1,1));

期望获利率:=IF(FF3,FF5,FF4),LINETHICK;

YY1:=REF(EVERY(C>=O,4),1) AND REF(EVERY((C+O)/2>FF1,4),1) AND (C+O)/2<FF1;

YY2:=NOT(YY1) AND (FF1-O)/O*1000>5 AND O<REF(MIN(C,O),1);

A:=SMA(L,4,3);

B:=SMA(H,4,3);

BB:=SMA(MIN(C,O),4,3);

BB1:=REF(L,1)-HHV((MAX(REF(L,2),REF(L,1))-MIN(REF(L,2),REF(L,1))),2);

BB2:=REF((C+O)/2,1)>REF((C+O)/2,2);

BB3:=L<=BB1+BB1*0.01 AND O>REF(O,2) AND O>=REF(L,3) AND COUNT(C>O,7)>3;

BB6:=(BB1-L)/L*100;

BB7:=(REF(L,1)-BB1)/BB1*100;

A1:=(A-L)/L>N/1000 ;

A8:=A1;

A9:=(REF(H,1)-O)/O*100-(REF(MAX(C,O),2)-REF(MAX(C,O),1))/REF(MAX(C,O),1)*100;

A10:=IF(BB2,BB6,A9);

BB4:=BB6+A10>2;

BB5:=IF(BB2,BB3,BB4) AND 期望获利率>2;

D5:=R AND A8 AND BB5;

STICKLINE(D5,A*0.995,A*0.992,3,0)COLOR8080FF;

DRAWICON(R AND (REF((D5),1)) AND (L<REF((L/0.995),1)),L*0.97,34);

STICKLINE(C>=O,C,O,3.4,0),COLOR0000AA;

STICKLINE(C>=O,C,O,3.0,0),COLOR0000BB ;

STICKLINE(C>=O,C,O,2.4,0),COLOR0000CC;

STICKLINE(C>=O,C,O,2.0,0),COLOR0000DD ;

STICKLINE(C>=O,C,O,1.6,0),COLOR0000EE;

STICKLINE(C>=O,C,O,1.2,0),COLOR0000FF;

STICKLINE(C>=O,C,O,0.6,0),COLOR0000FF;

STICKLINE(C>=O,H,L,0,0),COLORRED;

STICKLINE(C<=O,C,O,3.4,0),COLORAAAA00;

STICKLINE(C<=O,C,O,3.0,0),COLORBBBB00;

STICKLINE(C<=O,C,O,2.4,0),COLORCCCC00;

STICKLINE(C<=O,C,O,2.0,0),COLORDDDD00;

STICKLINE(C<=O,C,O,1.6,0),COLOREEEE00;

STICKLINE(C<=O,C,O,1.2,0),COLORFFFF00;

STICKLINE(C<=O,C,O,0.6,0),COLORFFFF00;

STICKLINE(C<=O,H,L,0,0),COLORFFFF00;

 

引差:=REF(C,1)-LOW,LINETHICK1,NODRAW;

引跌幅:IF((REF(C,1)-LOW)/REF(C,1)*100>0,(REF(C,1)-LOW)/REF(C,1)*100,0),LINETHICK1,NODRAW;

三日均跌:MA(引跌幅,3),COLORWHITE,NODRAW;

今最高:HIGH,LINETHICK1,COLORRED,NODRAW;

今最低:LOW,LINETHICK1,COLORGREEN,NODRAW;

Z0T:=C/REF(C,1)>1.097;

XH:=FILTER(Z0T,13);

BH:=BARSLAST(Z0T);

CZ:=REF(H,BH)-REF(L,BH);

STICKLINE(Z0T,REF(O,BH),REF(C,BH),5,0),COLORYELLOW;

DRAWTEXT(Z0T,L*0.98,'★涨停'),COLORFFFFFF;

 AAA:=CONST(HHV(H,50));PL5:=HHV(H,45); 

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

博尔:=IF(C<REF(O,1) AND F<0,1,0);

P1:=博尔;

量化:=IF(C<REF(O,2) AND F<0,1,0);

P2:=量化;

STICKLINE(P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1,OPEN,CLOSE,3,0),COLORFF09FF;

ME2:=EMA(CLOSE,6);

五天:=EXPMA(CLOSE,5),COLORRED;

超短线:=EMA(ME2,11),COLORGREEN; LJL07:=(3*C+L+O+H)/6;

牛线:=(20*LJL07+19*REF(LJL07,1)+18*REF(LJL07,2)+17*REF(LJL07,3)+16*REF(LJL07,4)+15*REF(LJL07,5)+14*REF(LJL07,6)+13*REF(LJL07,7)+12*REF(LJL07,8)+11*REF(LJL07,9)+10*REF(LJL07,10)+9*REF(LJL07,11)+8*REF(LJL07,12)+7*REF(LJL07,13)+6*REF(LJL07,14)+5*REF(LJL07,15)+4*REF(LJL07,16)+3*REF(LJL07,17)+2*REF(LJL07,18)+REF(LJL07,20))/210,COLORRED;

熊线:=MA(牛线,5),COLORYELLOW,LINETHICK4,POINTDOT;

持股:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4,COLORWHITE;

{趋势}

赚了:=IF(EMA(CLOSE,3)>超短线,超短线,DRAWNULL),COLORRED;

持股角度:=ATAN((持股/REF(持股,1)-1)*100)*180/3.1416,COLORRED,NODRAW;

月线:=EMA(持股,30),COLORYELLOW,DOTLINE; 

双月线:=EMA(持股,60),COLORCYAN,DOTLINE;

 

 

 

 

 

 

 

 

 

 

DRAWTEXT_FIX(CURRBARSCOUNT=1 AND ("DMI.PDI">"DMI.MDI") AND UPNDAY("DMI.ADXR",1) AND ("DMI.ADX">"DMI.ADXR"),0.460,0.26,0,'DMI 火箭升空'),COLOR8080FF;

DRAWTEXT_FIX(CURRBARSCOUNT=1 AND ("DMI.PDI"<"DMI.MDI") AND UPNDAY("DMI.ADXR",1) AND ("DMI.ADX">"DMI.ADXR"),0.460,0.26,0,'DMI 空中炸弹'),COLORGREEN;

DRAWTEXT_FIX(CURRBARSCOUNT=1 AND ("DMI.PDI">"DMI.MDI"),0.460,0.21,0,'DMI 多头趋势'),COLOR8080FF;

DRAWTEXT_FIX(CURRBARSCOUNT=1 AND ("DMI.PDI"<"DMI.MDI"),0.460,0.21,0,'DMI 空头趋势'),COLORGREEN;

DRAWTEXT_FIX(CURRBARSCOUNT=1 AND CROSS("KDJ.J","KDJ.K"),0.460,0.31,0,'K D J 金 叉'),COLOR8080FF;

DRAWTEXT_FIX(CURRBARSCOUNT=1 AND CROSS("KDJ.K","KDJ.J"),0.460,0.31,0,'K D J 死 叉'),COLORGREEN;

DRAWTEXT_FIX(CURRBARSCOUNT=1 AND ("KDJ.J">"KDJ.K"),0.460,0.36,0,'K D J 多头趋势'),COLOR8080FF;

DRAWTEXT_FIX(CURRBARSCOUNT=1 AND ("KDJ.J"<"KDJ.K"),0.460,0.36,0,'K D J 空头趋势'),COLORGREEN;

DRAWTEXT_FIX(CURRBARSCOUNT=1 AND ("MACD.DIF">"MACD.DEA") AND "MACD.MACD">0,0.460,0.41,0,'MACD 中线看多'),COLOR8080FF;

DRAWTEXT_FIX(CURRBARSCOUNT=1 AND ("MACD.DIF"<"MACD.DEA") AND "MACD.MACD"<0,0.460,0.41,0,'MACD 中线看空'),COLORGREEN;

DRAWTEXT_FIX(CURRBARSCOUNT=1 AND ("MACD.DIF">"MACD.DEA"),0.460,0.46,0,'MACD 多头趋势'),COLOR8080FF;

DRAWTEXT_FIX(CURRBARSCOUNT=1 AND ("MACD.DIF"<"MACD.DEA"),0.460,0.46,0,'MACD 空头趋势'),COLORGREEN;

DRAWTEXT_FIX(CURRBARSCOUNT=1 AND CROSS("MACD.DIF","MACD.DEA"),0.460,0.51,0,'MACD 金 叉'),COLOR8080FF;

DRAWTEXT_FIX(CURRBARSCOUNT=1 AND CROSS("MACD.DEA","MACD.DIF"),0.460,0.51,0,'MACD 死 叉'),COLORGREEN;

{仓位管控}

M10:MA(C,10)NODRAW,COLORGREEN;

M30:MA(C,30)NODRAW,COLORYELLOW;

X:=CURRBARSCOUNT=14;

X1:DRAWTEXT(C>M10 AND C>M30 AND M10>M30 AND X,M30*0.6,'今日仓位：80%'),COLORWHITE;

X2:DRAWTEXT(C<M10 AND C>M30 AND M10>M30 AND X,M30*0.8,'今日仓位：50%'),COLORWHITE;

X3:DRAWTEXT(C<M10 AND C<M30 AND M10>M30 AND X,M30*0.8,'今日仓位：20%'),COLORWHITE;

X4:DRAWTEXT(C>M10 AND C>M30 AND M10<M30 AND X,M10*0.8,'今日仓位：50%'),COLORWHITE;

X5:DRAWTEXT(C>M10 AND C<M30 AND M10<M30 AND X,M10*0.8,'今日仓位：20%'),COLORWHITE;

X6:DRAWTEXT(C<M10 AND C<M30 AND M10<M30 AND X,M10*0.8,'今日仓位：空仓'),COLORWHITE;

{ WWW.88GS.COM}

N10:=10;

T1:=CONST(HHVBARS(V,10)),COLOR0000FF,LINETHICK1;

量能平台:IF(CURRBARSCOUNT<=N10+15,CONST(IF(T1=0,C,REF(C,T1))),DRAWNULL),DOTLINE,COLORFF379B,LINETHICK1;

新量能点:IF(CURRBARSCOUNT=T1+1,量能平台,DRAWNULL),DOTLINE,COLORFFFFFF,LINETHICK1;

DRAWTEXT(ISLASTBAR,量能平台,' 量能台')COLORFFFFFF;

 

DRAWICON(CROSS(C,MA(C,3)),L,23);

DRAWICON(CROSS(MA(C,3),C),H,15);