VAR2:=EMA(C,10);

VAR3:=EMA(C,20);

VAR4:=EMA(C,30);

VAR5:=(VAR1+VAR2+VAR3+VAR4)/4;

VAR6:=(VAR5-REF(VAR5,15))/REF(VAR5,15)*100;

VAR7:=EMA(VAR6,8);

byx:=MA(CLOSE,8);

FILLRGN(byx,REF(byx,1),byx>REF(byx,1),RGB(255,0,0),byx<REF(byx,1),RGB(0,255,0));

MA$1:=MA(CLOSE, 5);

MA$2:=MA(CLOSE, 10);

MA$3:=MA(CLOSE, 20);

MA$4:=MA(CLOSE, 30);

SAT:=IF((AMOUNT/C)/(HHV(AMOUNT,13)/HHV(C,13))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,13)/HHV(C,13))*100);

glba1:=MA$1>REF(MA$1,1);

glba2:=MA$2>REF(MA$2,1);

glba3:=MA$1>REF(MA$3,1);

glba4:=MA$1>REF(MA$4,1);

dtpl:=CLOSE>=MA$1 AND MA$2>=MA$1 AND MA$3>=MA$4;

dtpl0=COUNT(dtpl,20);

gzd:=glba1 AND glba2 AND glba3 AND glba4;

MA0:=(MA$1+MA$2+MA$3+MA$4)/4;

MA1:=MA(MA0,8);

gzdnum:=LONGCROSS(MA0,MA1,1);

satcount:=LONGCROSS(sat,100,21);

glbbif$5:=LONGCROSS(CLOSE,MA$4,5);

Vglbh:=VOL/CAPITAL*100;

Lbglb:=VOL/MA(VOL,5);

TIPTEXT(glbbif$5,LOW,'葛兰碧第一买点'),colorblue;

TIPTEXT(gzdnum AND gzd AND C>MA$4 ,LOW,'多周期向上共振---积极介入点'),colorred;

TIPTEXT(satcount AND Vglbh>2.0 AND Lbglb>1.0,LOW-1.0,'量能饱和点,即将起飞'),coloryellow;

A1:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1);

Hm0:=EMA(A1,5);

A2:=(Hm0-REF(Hm0,1))/REF(Hm0,1)*100;

A3:=EMA(C,5);

A4:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;

qs0:=(MA(3*SMA(A4,6,1)-2*SMA(SMA(A4,5,1),5,1),2));

A5:=(HHV(H,60)-C)/(HHV(H,60)-LLV(L,60))*100;

DRAWTEXT(CROSS(qs0,0)AND Hm0<40,LOW-3,'═╬∝'),colorred;

dy:=SUM((OUTVOL-INVOL)/CAPITAL*100,0),colorwhite;

dy5:=MA(dy,5),Colorffeeaa;

dy10:=MA(dy,10),Color0000ff;

Vdy:=LONGCROSS(dy,dy5,5);

VAR1:=C>O;

TIPTEXT(Vdy AND Lbglb>1.00 AND VAR1 AND Vglbh>2.0,LOW,'介入点,主动性买盘明显增大'),colorwhite;

aaa2:=EMA((H+C+O)/3,18);

STICKLINE(MA(C,13)>O AND C>MA(C,13) AND O<C,O,C,8,0),coloryellow;

STICKLINE(MA(C,13)>O AND C>MA(C,13),H,L,0.8,1),coloryellow;

获利:=WINNER(CLOSE),colorred;

CMJZ:=CLOSE/COST(60)>0.98;

DT1:=(CLOSE>REF(CLOSE,4) OR MA(CLOSE,5)>MA(CLOSE,10)) AND MA(CLOSE,10)>MA(CLOSE,20) AND MA(CLOSE,20)>MA(CLOSE,30);

DT2:=MA(CLOSE,5)>=REF(MA(CLOSE,5),1) AND MA(CLOSE,10)>REF(MA(CLOSE,10),1) AND MA(CLOSE,20)>REF(MA(CLOSE,20),1) AND MA(CLOSE,30)>REF(MA(CLOSE,30),1);

LXSL:=(VOL<REF(VOL,1) AND REF(VOL,1)<REF(VOL,2)) OR VOL<REF(VOL,1)/1.8;

SLSJ:=BARSLAST(LXSL);

GJZX:=(O+C+H+L)/4;

LXXD:=(C<REF(C,1) AND REF(C,1)<REF(C,2)) OR (GJZX<REF(GJZX,1) AND REF(GJZX,1)<REF(GJZX,2)) OR (H<REF(H,1) AND REF(H,1)<REF(H,2)) OR (L<REF(L,1) AND REF(L,1)<REF(L,2) AND GJZX<REF(GJZX,1));

XDSJ:=BARSLAST(LXXD);

QRSP:=REF(CLOSE,1)<REF(CLOSE,2) OR REF(CLOSE,1)/REF(CLOSE,2)<=1.035;

LXSY:=(H/REF(CLOSE,1)>=1.05 AND REF(CLOSE,1)>REF(CLOSE,2)*1.02 AND REF(CLOSE,2)>=REF(CLOSE,3)*1.02) OR H/REF(CLOSE,3)>=1.15,colorred;

FLSZ:=VOL>REF(VOL,1)*1.5 AND VOL>MA(VOL,5) AND CLOSE/REF(CLOSE,1)>=1.02;

短:=(FLSZ AND SLSJ<=3 AND XDSJ<=3)*0.5,COLORFF6600,STICK,LINETHICK1;

马:=(CMJZ AND DT1 AND DT2 AND QRSP AND SLSJ<=6 AND XDSJ<=6 AND FLSZ AND LXSY=0)*1.5,coloryellow,STICK,LINETHICK2;

DRAWICON((获利>0.6 AND 马>0),L-0.02,1);

DRAWTEXT(马>0 ,L*0.99, '═╬∝'),coloryellow,LINETHICK1;

;N4:=BARSLAST(短 OR 马);

HT1:=N4<=2 AND L>REF(L,N4) AND C/REF(C,N4)<1.015 AND V<REF(V,1);

HT2:=REF(HT1,1) AND (C<=REF(C,1) OR C<=REF(C,N4)) AND C>REF(O,N4) AND V<REF(V,1);

回:=HT2*0.8,colorwhite,STICK,LINETHICK2;

DRAWTEXT(回>0 ,L*0.95 , '↖↖∏'),colorgreen,LINETHICK1;

MA1000:=MA(C,1000),color556699;

MA500:=MA(C,500),colorwhite;

MA250:=MA(C,250),coloryellow,DOTLINE;

MA120:=MA(C,120),colorgreen,DOTLINE;

生命线:=MA(CLOSE,30),colorliblue,linethick3;

MA55:=MA(CLOSE,55),colorblue;

大30度且34日线:=ATAN((MA(C,34)/REF(MA(C,34),1)-1)*100)*180/3.14159>=30;

大45度且34日线:=ATAN((MA(C,34)/REF(MA(C,34),1)-1)*100)*180/3.14159>=45;

大20度且13日线:=ATAN((MA(C,13)/REF(MA(C,13),1)-1)*100)*180/3.14159>=30;

m34:IF(大45度且34日线,生命线,DRAWNULL),;

大牛熊分界线:IF(C<=MA1000,MA1000,DRAWNULL),color0099ff,linethick2;

小牛熊分界线:IF(C<=MA500,MA500,DRAWNULL),color0099ff,linethick2;

m250:IF(C<=MA250,MA250,DRAWNULL),colorffcc66,linethick2;

m120:IF(C<=MA120,MA120,DRAWNULL),colorffcc66,linethick2;

m55:IF(C<=MA55,MA55,DRAWNULL),colorffcc66,linethick2;

MA5:=MA(CLOSE,5),ColorFFFFFF;

MA10:=MA(CLOSE,10),coloryellow;

MA20:=MA(CLOSE,20),colorred;

MA40:=MA(CLOSE,40);

ma60:=MA(C,60),color00ff00;

月价托:=ma5>ma20 AND ma5>ma10 AND CROSS(ma10,ma20) ;

季价托:=ma20>ma60 AND ma20>ma40 AND CROSS(ma40,ma60);

短、长价托:=ma5>ma60 AND ma5>ma10 AND CROSS(ma10,ma60);

DRAWTEXT(月价托,L,'③③'),colorff6600;

DRAWTEXT(季价托,L,'④④'),colorff6600;

DRAWTEXT(短、长价托,L,'②②'),colorff6600;

vol1:=MA(VOL,5);

vol2:=MA(VOL,10);

vol3:=MA(VOL,20);

量托:=vol1>=vol3 AND CROSS(vol2,vol3) AND REF(vol2,1)<REF(vol3,1);

DRAWTEXT(量托,L*0.97,'①①'),colorff6600;