DRAWGBK(1,COLORRGB(44,22,108),COLORRGB(33,0,0),0),color10000;

input:M5(5,1,999);

MA1:=EMA(CLOSE,M5);

多空分界線:"MA.MA1#week",LINETHICK2,colorwhite;

{30分钟MA}

MA4:=MA(C,4),COLORBLUE,LINETHICK4;

A8:=MA(C,8),COLORRED;

A24:=MA(C,24),COLORRED;

A40:=MA(C,40);

A80:=MA(C,80);

A160:=MA(C,160);

DK:=A8;

今日保护价:(REF(C,1)+REF(C,2)+O)/3;

STICKLINE(DK<=C AND CLOSE>=OPEN,HIGH,LOW,0,1),COLORRED;

STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,3.2,0),COLOR6600FF;

STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,2.7,0),COLORDD33FF;

STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,2.1,0),COLORFF55FF;

STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,1.5,0),COLORFF88FF;

STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,0.9,0),COLORFFAAFF;

STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,0.3,0),COLORFFCCFF;

STICKLINE(DK<=C AND CLOSE<OPEN,HIGH,LOW,0,1),COLORRED;

STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,3.2,0),COLOR000033;

STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,2.7,0),COLOR000066;

STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,2.1,0),COLOR000099;

STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,1.5,0),COLOR0000CC;

STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,0.9,0),COLOR0000FF;

STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,0.3,0),COLORCC66FF;

STICKLINE(DK>C AND CLOSE>=OPEN,HIGH,LOW,0,1),COLORGREEN;

STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,3.2,0 ),COLOR990000;

STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,2.7,0 ),COLORCC0000;

STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,2.1,0),COLORFF4400;

STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,1.5,0 ),COLORFF8800;

STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,0.9,0 ),COLORFFCC00;

STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,0.3,0 ),COLORCYAN;

STICKLINE(DK>C AND CLOSE<OPEN,HIGH,LOW,0,1),COLORWHITE;

STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,3.2,0 ),COLOR555555;

STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,2.7,0 ),COLOR777777;

STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,2.1,0 ),COLOR999999;

STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,1.5,0 ),COLOR999999;

STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,0.9,0 ),COLORDDDDDD;

STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,0.3,0 ),COLORFFFFFF;

input:S1(10,1,100),M1(60,3,300),N1(0.09000000029802,0,1);

A1:=(FFT(CLOSE,M1) * (1 + 1.2*N1));

B1:=(FFT(CLOSE,M1) * (1 - 1.2*N1));

PARTLINE((A1 > REF(A1,1)),A1),colorwhite,linethick2;

PARTLINE((B1 > REF(B1,1)),B1),colorwhite,linethick2;

PARTLINE((A1 <= REF(A1,1)),A1),colorFF00,linethick2;

PARTLINE((B1 <= REF(B1,1)),B1),colorFF00,linethick2;

A11:=(FFT(CLOSE,M1) * (1 + 0.7*N1));

B11:=(FFT(CLOSE,M1) * (1 - 0.7*N1));

PARTLINE((A11 > REF(A11,1)),A11),colorwhite,linethick2;

PARTLINE((B11 > REF(B11,1)),B11),colorwhite,linethick2;

PARTLINE((A11 <= REF(A11,1)),A11),colorFF00,linethick2;

PARTLINE((B11 <= REF(B11,1)),B11),colorFF00,linethick2;

AA11:=MA(C,5);

BB11:=MA(C,15);

AF:=CROSS(AA11,BB11);

STICKLINE(AF,LLV(L,4),LLV(L,4),50,1),COLORRED,LINETHICK3;

DRAWTEXT(AF,LLV(L,4),'止损线'),COLORYELLOW,LINETHICK3;

N:=120;

VAR1:=LLV(LOW,N);

VAR2:=HHV(HIGH,N);

VAR3:=VAR2-VAR1;

H191: VAR3*0.191+VAR1;

H382: VAR3*0.382+VAR1;

H050: VAR3*0.5+VAR1;

H618: VAR3*0.618+VAR1;

H809: VAR3*0.809+VAR1;

低点: VAR1;

高点: VAR2;

AA1:=AMOUNT/V;

BB1:=L<AA1*0.9;

CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;

DD1:=L<MA(C,5)*0.921;

EE1:=V<MA(V,5)*1.5;

FF1:=BB1 AND CC1 AND DD1 AND EE1;

DRAWTEXT(FF1,(LOW* 0.96),'短进'),COLORYELLOW;

DRAWTEXT(CROSS(ZIG(3,8),REF(ZIG(3,8),1)),LOW*0.978,'★买') ,LINETHICK2,COLORYELLOW;

DRAWTEXT(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),HIGH*1.02,'★卖'),COLORYELLOW;

DRAWTEXT(CROSS(ZIG(3,14),REF(ZIG(3,14),1)),LOW*1.006,'底   '),COLORWHITE;

DRAWTEXT(CROSS(REF(ZIG(3,13),1),ZIG(3,13)),HIGH*1.04,'顶   '),COLORWHITE;

VAR01:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),25);

VAR02:=HIGH-REF(HIGH,1);

VAR03:=REF(LOW,1)-LOW;

VAR04:=SUM(IF(VAR02>0 AND VAR02>VAR03,VAR02,0),25);

VAR05:=SUM(IF(VAR03>0 AND VAR03>VAR02,VAR03,0),25);

VAR06:=VAR04*100/VAR01;

VAR07:=VAR05*100/VAR01;

VAR08:=MA(ABS(VAR07-VAR06)/(VAR07+VAR06)*100,15);

VAR09:=(VAR08+REF(VAR08,15))/2;

A:=(VAR07>VAR06 AND VAR07>25 AND VAR06<25);

B:=ZIG(3,50/5)*100,COLORRED,LINETHICK2;

G:=MA(B,2),COLORGREEN,LINETHICK2;

D:=CROSS(B,G)*1000,COLORRED;

W:=CROSS(G,B)*1000,COLORBLUE;

E:=REF(INDEXC,1);

F:=SMA(MAX(INDEXC-E,0),3,1)/SMA(ABS(INDEXC-E),3,1);

VAR10:=F AND F<8;

VAR11:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;

VAR12:=SMA(VAR11,3,1);

VAR13:=SMA(VAR12,3,1);

VAR14:=VAR13 AND VAR13<20;

MM:=A AND D AND VAR10 AND VAR14 ;

DRAWTEXT(W=1000,H*1.05,'S' ),COLOR00FF00;

DRAWTEXT(D=1000,L*0.95,'B'),COLORWHITE;

OO:=if(DATATYPE=6,ma(O,22),if(DATATYPE=7,ma(O,10),ma(O,6)));j:=STKINDI('','kdj.j',0,6);

CC:=if(DATATYPE=6,ma(c,22),if(DATATYPE=7,ma(c,10),ma(c,6)));hs:=vol/CAPITAL*100;

jj:=(H+L+C)/3;j0:=STKINDI('','kdj.j',0,4);qj0:=vol/IF(H=L,4,H-L);

qj1:=IF(CAPITAL=0,qj0*(jj-MIN(C,O)),qj0*(MIN(O,C)-L));

qj2:=IF(CAPITAL=0,qj0*(MIN(O,C)-L),qj0*(jj-MIN(C,O)));

qj3:=qj0*(H-MAX(O,C));qj4:=qj0*(MAX(C,O)-jj);

qj5:=qj1+qj2;qj6:=qj3+qj4;DD:=(qj5-qj6)/(qj5+qj6)*100;

DDX:=((qj1+qj2)-(qj3+qj4))/sum(vol,10)*100;DDZ:=DD*17;

DDY:=((qj2+qj4)-(qj1+qj3))/sum(vol,10)*100;

bb:=((cross(j,0) or cross(j0,0))and ((ddx>0 and ddy>0) or DDZ>400));

主:=qj1+qj2;散:=qj3+qj4;T0:=VOL>REF(VOL,1) and MA(VOL,5)>REF(MA(VOL,5),1);

bbd:=EMA(STKINDI('','千钧引用.总0',0,7),2)/sum(IF(CAPITAL=0,ref(INDEXA,1),ref(vol,1)),5)*100;

XH1:=ref(bbd,1)<-15 and bbd>ref(bbd,1) and bbd>-10;

XH2:=ref(bbd,1)>=15 and bbd<ref(bbd,1) and bbd<10;P:=SYSPARAM(1);

Q6:=atan((MA(C,5)/ref(MA(C,5),1)-1)*100)*57.3;Q2:=atan((MA(C,13)/ref(MA(C,13),1)-1)*100)*57.3;

Q1:=atan((MA(C,23)/ref(MA(C,23),1)-1)*100)*57.3;Q:=atan((MA(C,34)/ref(MA(C,34),1)-1)*100)*57.3;

Q3:=atan((MA(C,68)/ref(MA(C,68),1)-1)*100)*57.3;Q5:=atan((MA(C,250)/ref(MA(C,250),1)-1)*100)*57.3;

T1:=VOL<REF(VOL,1) and MA(VOL,5)>REF(MA(VOL,5),1);T2:=VOL>REF(VOL,1) and MA(VOL,5)<REF(MA(VOL,5),1);

T3:=VOL<REF(VOL,1) and MA(VOL,5)<REF(MA(VOL,5),1);T4:=主>REF(主,1) and 主>散 and if(CAPITAL=0,hs>1.3,hs>5);

T5:=主<REF(主,1) and 主>散 and if(CAPITAL=0,hs>0.5 and hs<1.3,hs>3 and hs<=5);

T6:=主>REF(主,1) and 主<散 and if(CAPITAL=0,hs<1.3 and hs>0.5,hs<5 and hs>3);

T7:=主<REF(主,1) and 主<散 and if(CAPITAL=0,hs<1.3,hs<3 and hs>=1);

STICKLINE(C>=REF(c,1),H,L,0,0),COLOR0000FF;

STICKLINE(C>=REF(c,1),C,O,8,0),COLOR0000bb;

STICKLINE(C>=REF(c,1),C,O,5,0),COLOR0000dd;

STICKLINE(C>=REF(c,1),C,O,3,0),COLOR0000ee;

STICKLINE(C>=REF(c,1),C,O,1,0),COLOR0000ff;

STICKLINE(C<REF(c,1),H,L,0,0),COLORFFFF00;

STICKLINE(C<REF(c,1),C,O,8,0),COLOR999900;

STICKLINE(C<REF(c,1),C,O,5,0),COLORbbbb00;

STICKLINE(C<REF(c,1),C,O,3,0),COLORdddd00;

STICKLINE(C<REF(c,1),C,O,1,0),COLORFFFF00;

STICKLINE(bbd>0,CC,OO,8,0),COLORFF00FF;

STICKLINE(bbd<0,CC,OO,8,0),COLOR00FF00;

RSV:=(C-LLV(L,4))/(HHV(H,4)-LLV(L,4))*100;

K:=LLV(L,4)+SMA(RSV,4,1)/100*(HHV(H,4)-LLV(L,4));

D:=SMA(K,3,1);

H2:=VALUEWHEN(C>=d and d>ref(D,1),D);

L2:=VALUEWHEN(C<=d and d<ref(D,1),K);

K1:=IF(C>H2,-3,IF(C<L2,1,0));

K2:=VALUEWHEN(K1<>0,K1);

G:=IF(K2>0,H2,L2);

压撑线:G,LINETHICK2,PRECISION2,COLORRED;

aa1:=wma(c,2);//短加权均线

bb1:=ema(aa1,2);//平滑

aa0:=ma(bb1,3);//平均

aa2:=wma((h+c+o)/3,18);//长加权均线

dd3:=aa0>=aa2 and c>aa2;//短>长,且收>长

dd4:=aa0<aa2 ;//短<长

dd5:=aa0>aa2 ;//短>长

cc1:=((c-ref(ma(c,6),1))/6+ma(c,6))*1.004;//买进价

cc2:=cross(c,cc1) and cc1>ref(cc1,1);//买进条件

STICKLINE((dd4 or dd5) and o<=c ,h,l,0.5,0),Color00cc99;//跌势阳线

STICKLINE((dd4 or dd5) and o<=c ,c,o,7,0),Color00cc99;//跌势阳线

STICKLINE((dd4 or dd5) and o>=c ,h,l,0.5,0),Color3F8C3A;//跌势阴线

STICKLINE((dd4 or dd5) and o>=c ,c,o,7,0),Color3F8C3A;//跌势阴线

STICKLINE((dd3 or c>aa2) and o<=c,c,o,7,0),Colorred;//涨势阳线

STICKLINE((dd3 or c>aa2) and o<=c,h,l,0.5,0),Colorred;//涨势阳线

STICKLINE((dd3 or c>aa2) and o>=c,c,o,7,0),Colorff33ff;//涨势阴线

STICKLINE((dd3 or c>aa2) and o>=c,h,l,0.5,0),Colorff33ff;//涨势阴线

STICKLINE(cc2,h,l,0.5,0),colorwhite;//白

STICKLINE(cc2,o,c,7,0),colorwhite;//白

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.5,0),coloryellow;//黄