多空震荡K变色 复制源码直接用!

主图：

VAR1:=HHV(HIGH,9)-LLV(LOW,9);

VAR2:=HHV(HIGH,9)-CLOSE;

VAR3:=CLOSE-LLV(LOW,9);

VAR4:=VAR2/VAR1*100-70;

VAR5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;

VAR6:=(2*CLOSE+HIGH+LOW)/4;

VAR7:=SMA(VAR3/VAR1*100,3,1);

VAR8:=LLV(LOW,34);

VAR9:=SMA(VAR7,3,1)-SMA(VAR4,9,1);

VAR10:=IF(VAR9>100,VAR9-100,0);

VAR11:=HHV(HIGH,34);

VAR12:=EMA((VAR6-VAR8)/(VAR11-VAR8)*100,13);

VAR13:=EMA(0.667*REF(VAR12,1)+0.333*VAR12,2);

N11:=BARSLAST(CROSS(VAR12,VAR13))+1;

N22:=BARSLAST(CROSSDOWN(VAR12,VAR13))+1;

T11:=BACKSET(N11=1&&N22<=4,N22);

T22:=BACKSET(N22=1&&N11<=4,N11);

NN:=1;

MM:=1;

HH1:=IFELSE(H<REF(H,1) && REF(H,1)<REF(H,2),REF(H,2),0);

LL1:=IFELSE(L>REF(L,1) && REF(L,1)>REF(L,2),REF(L,2),0);

HH2:=VALUEWHEN(HH1>0,HH1);

LL2:=VALUEWHEN(LL1>0,LL1);

K1:=IFELSE(CLOSE>HH2,-3,IFELSE(CLOSE<LL2,1,0));

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

G:=IFELSE(K2=1,HH2,LL2);

G1:=VALUEWHEN(ISLASTBAR,G);

W1:=K2;

W2:=OPEN-CLOSE;

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

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

DRAWCOLORKLINE(C< O ,RGB(192,192,192),0);

DRAWCOLORKLINE(C>= O ,RGB(192,192,192),1);

BAA:=1;

MA4:=EMA(CLOSE,10)*BAA;

HH:=HHV(HIGH,5)*BAA;

LL:=LLV(LOW,5)*BAA;

H1:=IFELSE(CLOSE>REF(HH,1),1,0)*BAA;

L1:=IFELSE(CLOSE<REF(LL,1),-1,0)*BAA;

H0:=REF(HIGH,1)*BAA;

L0:=REF(LOW,1)*BAA;

P7:=H1+L1*BAA;

P8:=IFELSE(P7=0,REF(P7,1),P7)*BAA;

P9:=IFELSE(P8=0,REF(P8,1),P8)*BAA;

P10:=IFELSE(P9=0,REF(P9,1),P9)*BAA;

P11:=IFELSE(P10=0,REF(P10,1),P10)*BAA;

P12:=IFELSE(P11=0,REF(P11,1),P11)*BAA;

P13:=IFELSE(P12=0,REF(P12,1),P12)*BAA;

P14:=IFELSE(P13=0,REF(P13,1),P13)*BAA;

P15:=IFELSE(P14=0,REF(P14,1),P14)*BAA;

P16:=IFELSE(P15=0,REF(P15,1),P15)*BAA;

P17:=IFELSE(P16=0,REF(P16,1),P16)*BAA;

P18:=IFELSE(P17=0,REF(P17,1),P17)*BAA;

P19:=IFELSE(P18=0,REF(P18,1),P18)*BAA;

P20:=IFELSE(P19=0,REF(P19,1),P19)*BAA;

P21:=IFELSE(P20=0,REF(P20,1),P20)*BAA;

P22:=IFELSE(P21=0,REF(P21,1),P21)*BAA;

P23:=IFELSE(P22=0,REF(P22,1),P22)*BAA;

P24:=IFELSE(P23=0,REF(P23,1),P23)*BAA;

P25:=IFELSE(P24=0,REF(P24,1),P24)*BAA;

P26:=IFELSE(P25=0,REF(P25,1),P25)*BAA;

P27:=IFELSE(P26=0,REF(P26,1),P26)*BAA;

P28:=IFELSE(P27=0,REF(P27,1),P27)*BAA;

P29:=IFELSE(P28=0,REF(P28,1),P28)*BAA;

P30:=IFELSE(P29=0,REF(P29,1),P29)*BAA;

T:=IFELSE(P30=0,REF(P30,1),P30)*BAA;

DD:=BARSLAST(CROSS(T=1,0.5));

KK:=BARSLAST(CROSS(T=-1,0.5));

N1:=7;

N2:=14;

LC:=REF(CLOSE,1);

RSI1:=SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100;

RSI2:=SMA(MAX(CLOSE-LC,0),N2,1)/SMA(ABS(CLOSE-LC),N2,1)*100;

SHORT:=12;

LONG:=26;

M:=9;

DIFF:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);

DEA:=EMA(DIFF,M);

V1:=LLV(LOW,10);

V2:=HHV(H,25);

价位线:=EMA((C-V1)/(V2-V1)*4,4);

VV1:=(C*2+H+L)/4*10;

VV2:=EMA(VV1,13)-EMA(VV1,34);

VV3:=EMA(VV2,5);

VV4:=2*(VV2-VV3)*5.5;

主力撤:=IF(VV4<=0,VV4,0);

主力进:=IF(VV4>=0,VV4,0);

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

趋势线:=EMA(V11,3);

V12:=(趋势线-REF(趋势线,1))/REF(趋势线,1)*100;

买入:=趋势线<=13 && V12>13;

BB:=(趋势线<=13 && V12>13) && FILTER((趋势线<=13 && V12>13),10);

逃顶:=FILTER(趋势线>90 && 趋势线<REF(趋势线,1) && 主力进<REF(主力进,1),8);

KD1:=CROSS(T=1,0.5) && W1=-3 && DD<KK;

KD2:=(W1=-3 && DD<KK && DIFF>DEA && RSI1>RSI2);

PK1:=CROSS(T=-1,0.5) && W1=1 && KK<DD;

PK2:=W1=1 && KK<DD && DIFF<DEA && RSI1<RSI2;

KDD:=BARSLAST(CROSS(W1=-3 && DD<KK,0.5))+1;

PKK:=BARSLAST(CROSS(W1=1 && KK<DD,0.5))+1;

DD11:=(CROSS(COUNT(KD1 || KD2,KDD)=1,0.5) || KD1);

T1:=CROSS(3.5,价位线) && (DIFF<DEA || RSI1<RSI2);

T2:=逃顶 && (DIFF<DEA || RSI1<RSI2);

T3:=NOT(W1=-3 && DD<KK) && REF(W1=-3 && DD<KK,1);

T31:=CROSS(DIFF<DEA && RSI1<RSI2,0.5);

T4:=CROSS(COUNT(T1 || T2 || T3 || T31,BARSLAST(DD11)+1)=1,0.5);

KK11:=(CROSS(COUNT(PK1 || PK2,PKK)=1,0.5) || PK1);

S1:=CROSS(价位线,0.3) && (DIFF>DEA || RSI1>RSI2);

S2:=BB && (DIFF>DEA || RSI1>RSI2);

S3:=NOT(W1=1 && DD>KK) && REF(W1=1 && DD>KK,1);

S31:=CROSS(DIFF>DEA && RSI1>RSI2,0.5);

S4:=CROSS(COUNT(S1 || S2 || S3 || S31,BARSLAST(KK11)+1)=1,0.5);

MA20:=EMA(CLOSE,20);

M1:=MA(CLOSE,5);

M2:=MA(CLOSE,20),COLORYELLOW;

ZYZS:=IFELSE((M1>M2),M2,M1),COLORGREEN;

D10151:=BARSLAST((CROSS(COUNT(KD1 || KD2,KDD)=1,0.5) || KD2) && C>MA20);

K10152:=BARSLAST((CROSS(COUNT(PK1 || PK2,PKK)=1,0.5) || PK2) && C<MA20);

K10152P:=BARSLAST(NOT(W1=1 && KK<DD));

D10151P:=BARSLAST(NOT(W1=-3 && DD<KK));

PJ:=MA(H-L,20);

DRAWTEXT(REFX(CROSS(D10151<D10151P,0.5),1),L-NN*MINPRICE,'开多'),VALIGN0,COLORRED;

DRAWTEXT(REFX(CROSS(K10152<K10152P,0.5),1),H+MM*MINPRICE,'开空'),VALIGN2,COLORYELLOW;

CROSS(D10151<D10151P,0.5)||CROSS(D10151>D10151P,0.5)||CROSS(K10152>K10152P,0.5)||CROSS(K10152<K10152P,0.5),SOUND('E');

A:=CROSS(D10151<D10151P,0.5)&&COUNT(CROSS(D10151<D10151P,0.5),BARSLAST(CROSS(K10152<K10152P,0.5)))=1;

B:=CROSS(K10152<K10152P,0.5)&&COUNT(CROSS(K10152<K10152P,0.5),BARSLAST(CROSS(D10151<D10151P,0.5)))=1;

////

//DRAWSL1(ISLASTBAR&&BARSLAST(A)<BARSLAST(B),VALUEWHEN(A||B,H),0,BARSLAST(A||B),1),COLORGREEN,DOT;

//DRAWSL1(ISLASTBAR&&BARSLAST(A)<BARSLAST(B),VALUEWHEN(A||B,L),0,BARSLAST(A||B),1),COLORGREEN,DOT;

//DRAWLINE(ISLASTBAR&&BARSLAST(A)<BARSLAST(B),VALUEWHEN(A||B,H),1,VALUEWHEN(A||B,L),COLORWHITE),COLORGREEN;

//DRAWLINE3(ISLASTBAR&&BARSLAST(A)<BARSLAST(B),VALUEWHEN(A||B,H),BARSLAST(A||B),1,VALUEWHEN(A||B,L),BARSLAST(A||B),0),COLORGREEN;

//DRAWNUMBER(ISLASTBAR&&BARSLAST(A)<BARSLAST(B),VALUEWHEN(A||B,H),VALUEWHEN(A||B,H),0,COLORGREEN),FONTSIZE20,ALIGN0;

//DRAWNUMBER(ISLASTBAR&&BARSLAST(A)<BARSLAST(B),VALUEWHEN(A||B,L),VALUEWHEN(A||B,L),0,COLORGREEN),FONTSIZE20,VALIGN0,ALIGN0;

////

//DRAWSL1(ISLASTBAR&&BARSLAST(A)>BARSLAST(B),VALUEWHEN(A||B,H),0,BARSLAST(A||B),1),COLORRED,DOT;

//DRAWSL1(ISLASTBAR&&BARSLAST(A)>BARSLAST(B),VALUEWHEN(A||B,L),0,BARSLAST(A||B),1),COLORRED,DOT;

//DRAWLINE(ISLASTBAR&&BARSLAST(A)>BARSLAST(B),VALUEWHEN(A||B,H),1,VALUEWHEN(A||B,L),COLORWHITE),COLORRED;

//DRAWLINE3(ISLASTBAR&&BARSLAST(A)>BARSLAST(B),VALUEWHEN(A||B,H),BARSLAST(A||B),1,VALUEWHEN(A||B,L),BARSLAST(A||B),0),COLORRED;

//DRAWNUMBER(ISLASTBAR&&BARSLAST(A)>BARSLAST(B),VALUEWHEN(A||B,H),VALUEWHEN(A||B,H),0,COLORRED),FONTSIZE20,ALIGN0;

//DRAWNUMBER(ISLASTBAR&&BARSLAST(A)>BARSLAST(B),VALUEWHEN(A||B,L),VALUEWHEN(A||B,L),0,COLORRED),FONTSIZE20,VALIGN0,ALIGN0;

DRAWCOLORKLINE((N11<N22&&T22=0||T11=1)&&ISUP&&(W1<=0 && DD<KK||W2>0 && W1<=0 && DD<KK),COLORRED,1);

DRAWCOLORKLINE((N11<N22&&T22=0||T11=1)&&ISDOWN&&(W1<=0 && DD<KK||W2>0 && W1<=0 && DD<KK),COLORRED,0);

DRAWCOLORKLINE((N11>N22&&T11=0||T22=1)&&ISUP&&(W1>0 && KK<DD||W2>0 && W1>0 && KK<DD),COLOR00FF0F,1);

DRAWCOLORKLINE((N11>N22&&T11=0||T22=1)&&ISDOWN&&(W1>0 && KK<DD||W2>0 && W1>0 && KK<DD),COLOR00FF0F,0);

P1:=CROSS(D10151<D10151P,0.5);//买

P2:=CROSS(K10152<K10152P,0.5);//卖

DRAWCOLORKLINE(REFX(P1||P2,1),COLORYELLOW,0);

//DRAWNUMBER(P1,L-10*MINPRICE,L,0,COLORRED),FONTSIZE20,VALIGN0;

//DRAWNUMBER(P2,H+10*MINPRICE,H,0,COLORYELLOW),FONTSIZE20;

//DRAWHORIZONTALLINE(REFX(P1||P2,1),L,COLORMAGENTA),DOT;

//DRAWHORIZONTALLINE(REFX(P1||P2,1),C,COLORMAGENTA),DOT;

//DRAWHORIZONTALLINE(REFX(P1||P2,1),H,COLORYELLOW),DOT;

//DRAWHORIZONTALLINE(REFX(P1||P2,1),O,COLORYELLOW),DOT;

//DRAWLINE1(P1,L,P2,H,0);

//DRAWLINE1(P2,H,P1,L,0);

P1||P2,SOUND('E');

//DRAWNUMBER(REFX(P1||P2,1)&&ABS(C-O)>1,H+5*MINPRICE,ABS(C-O),0,COLORBLUE),FONTSIZE20;

//DRAWNUMBER(REFX(P1||P2,1),H,H,0,COLORYELLOW),FONTSIZE20;

//DRAWNUMBER(REFX(P1||P2,1),O,O,0,COLORYELLOW),FONTSIZE20;

//DRAWNUMBER(REFX(P1||P2,1),C,C,0,COLORRED),FONTSIZE20;

//DRAWNUMBER(REFX(P1||P2,1),L,L,0,COLORRED),FONTSIZE20,VALIGN0; 

主趋势线:EMA2(C,20),NODRAW;

N:=02;

Q:=7;

AA:=MA((2*CLOSE+HIGH+LOW)/4,5); 

通道1:=AA*N/100; 

通道2:=AA*(200-N)/100; 

CC:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20); 

DD1:=DMA(CLOSE,CC); 

通道3:=(1+Q/100)*DD1; 

通道4:=(1-Q/100)*DD1;

DIF:=EMA(CLOSE,9)-EMA(CLOSE,17);

DEA1:=EMA(DIF,6);

AAA:=(DIF-DEA1)*2*60;

起爆:=CROSS(AAA-REF(AAA,1),12);

MACD:=(DIF-DEA1)*2,COLORSTICK;

TYP:=(HIGH+LOW+CLOSE)/3;

CCI:=(TYP-MA(TYP,21))/(0.015*AVEDEV(TYP,21));

VAR1P:=ZIGZAG(C,13,1);

STICKLINE((REF(VAR1P,2) < REF(VAR1P,1)) AND (VAR1P < REF(VAR1P,1)),CLOSE,OPEN,3,0),COLORYELLOW;

STICKLINE((REF(VAR1P,2) > REF(VAR1P,1)) AND (VAR1P >REF(VAR1P,1)),CLOSE,OPEN,3,0),COLORYELLOW;

DRAWBMP((ZIGZAG(C,5,1)>REF(ZIGZAG(C,5,1),1)) AND (REF(ZIGZAG(C,5,1),1)<=REF(ZIGZAG(C,5,1),2)) AND (REF(ZIGZAG(C,5,1),2)<=REF(ZIGZAG(C,5,1),3)),LOW*1.02,'BUY1');

DRAWBMP((ZIGZAG(C,5,1)<REF(ZIGZAG(C,5,1),1)) AND (REF(ZIGZAG(C,5,1),1)>=REF(ZIGZAG(C,5,1),2)) AND (REF(ZIGZAG(C,5,1),2)>=REF(ZIGZAG(C,5,1),3)),HIGH*1.03,'SELL1');

LC1 := REF(CLOSE,1);

RSI:=SMA(MAX(CLOSE-LC1,0),7,1)/SMA(ABS(CLOSE-LC1),7,1)*100;

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

CURRBARSCOUNT:=REFX1(BARPOS,9999)-BARPOS+1;

顶点:IF(CURRBARSCOUNT<=60, REFX1(IF(ISLASTBAR=1,HHV(H, BARSLAST(CURRBARSCOUNT=60)),1),10000),NULL),COLORRED,DOT;

低点:IF(CURRBARSCOUNT<=60, REFX1(IF(ISLASTBAR=1,LLV(L, BARSLAST(CURRBARSCOUNT=60)),1),10000),NULL),COLORMAGENTA,DOT;

STICKLINE(CCI>=200 AND H>=顶点,O,C,3,0),COLORWHITE;

STICKLINE(CCI<=100 AND L<=低点,O,C,3,0),COLORMAGENTA;

DRAWTEXT(CCI<=100 AND L<=低点,L-5*MINPRICE,'买'),VALIGN0,COLORYELLOW;////////////////////////////

DRAWTEXT(ISLASTBAR,顶点,'顶点'),COLORMAGENTA;

DRAWTEXT(ISLASTBAR,低点,'低点'),COLORRED;

VAR5A:=EMA(CLOSE,12)-EMA(CLOSE,26);

VAR6A:=EMA(VAR5A,9);

VAR7A:=(VAR5A-VAR6A)*2*60;

VAR8A:=CROSS(VAR7A-REF(VAR7A,1),15);

空:=EMA(CLOSE,5);

均衡:=EMA(空,0),COLORFFFFFF;

下趋势双线持币:=HHV(MA(HIGH,3),2),LINETHICK1,COLORGREEN;

上趋势单线持股:=LLV(MA(HIGH,3),1),LINETHICK1,COLORRED;

VAR5B:=FILTER(均衡>REF(均衡,1) AND 下趋势双线持币<REF(下趋势双线持币,1) AND CLOSE>REF(CLOSE,1),11);

IF(VAR5B>=1,L*0.996,NULL),COLORMAGENTA,CIRCLEDOT;

B11:=REF(C,1);

B2:=REF(C,2);

SS:=IF(C>REF(C,1) AND REF(C,1)>=REF(C,2),1,IF(C<REF(C,1) AND REF(C,1)<=REF(C,2),-1,IF(C>REF(C,2) AND REF(C,2)>REF(C,1),2,IF(C<REF(C,2) AND REF(C,2)<REF(C,1),-2,0)))); 

VAR3B:=LLV(HIGH,240);

VAR4B:=100*(CLOSE-VAR3B)/VAR3B;

VAR6B:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100;

VAR7B:=0;

VAR8B:=MA(HHV(CLOSE-REF(CLOSE,1),0),34)/MA(ABS(CLOSE-REF(CLOSE,1)),7)*100;

VAR9B:=MA(HHV(CLOSE-REF(CLOSE,1),0),13)/MA(ABS(CLOSE-REF(CLOSE,1)),13)*100;

VARA:=BARSCOUNT(CLOSE);

VARB:=VAR8B<20 AND VAR9B<23 AND VARA>35;

VARC:=VARB AND COUNT(VARB,1)=1;

VARD:=EMA(CLOSE,21)-EMA(CLOSE,8);

VARE:=EMA(VARD,5);

VARF:=TROUGH(C,6,1,1)<4 AND CROSS(VARD,VARE);

VAR10B:=IF(TROUGH(C,16,1,1)=0 AND HIGH>LOW+0.04,4,0);

VAR11B:=ZIGZAG(C,6,1)>REF(ZIGZAG(C,6,1),1) AND REF(ZIGZAG(C,6,1),1)<=REF(ZIGZAG(C,6,1),2) AND REF(ZIGZAG(C,6,1),2)<=REF(ZIGZAG(C,6,1),3);

VAR12B:=ZIGZAG(C,6,1)<REF(ZIGZAG(C,6,1),1) AND REF(ZIGZAG(C,6,1),1)>=REF(ZIGZAG(C,6,1),2) AND REF(ZIGZAG(C,6,1),2)>=REF(ZIGZAG(C,6,1),3);

VAR13B:=ZIGZAG(C,22,1)>REF(ZIGZAG(C,22,1),1) AND REF(ZIGZAG(C,22,1),1)<=REF(ZIGZAG(C,22,1),2) AND REF(ZIGZAG(C,22,1),2)<=REF(ZIGZAG(C,22,1),3);

VAR14B:=ZIGZAG(C,22,1)<REF(ZIGZAG(C,22,1),1) AND REF(ZIGZAG(C,22,1),1)>=REF(ZIGZAG(C,22,1),2) AND REF(ZIGZAG(C,22,1),2)>=REF(ZIGZAG(C,22,1),3);

VAR15:=ZIGZAG(C,51,1)>REF(ZIGZAG(C,51,1),1) AND REF(ZIGZAG(C,51,1),1)<=REF(ZIGZAG(C,51,1),2) AND REF(ZIGZAG(C,51,1),2)<=REF(ZIGZAG(C,51,1),3);

VAR16:=ZIGZAG(C,51,1)<REF(ZIGZAG(C,51,1),1) AND REF(ZIGZAG(C,51,1),1)>=REF(ZIGZAG(C,51,1),2) AND REF(ZIGZAG(C,51,1),2)>=REF(ZIGZAG(C,51,1),3);

VAR17:=ZIGZAG(C,72,1)>REF(ZIGZAG(C,72,1),1) AND REF(ZIGZAG(C,72,1),1)<=REF(ZIGZAG(C,72,1),2) AND REF(ZIGZAG(C,72,1),2)<=REF(ZIGZAG(C,72,1),3);

VAR18:=ZIGZAG(C,72,1)<REF(ZIGZAG(C,72,1),1) AND REF(ZIGZAG(C,72,1),1)>=REF(ZIGZAG(C,72,1),2) AND REF(ZIGZAG(C,72,1),2)>=REF(ZIGZAG(C,72,1),3);

VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150);

VAR1A:=EMA(VAR19,100);

VAR1B:=2*(VAR19-VAR1A);

VAR1C:=POW(VAR1B,3)*0.1+POW(VAR1B,1);

VAR1D:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE));

VAR1E:=EMA(VAR1D*0.97,3);

VAR1F:=(HIGH+LOW+CLOSE)/3;

VAR20:=(VAR1F-MA(VAR1F,14))/(0.015*AVEDEV(VAR1F,14));

VAR21:=CROSS(VAR1E,LOW);

买点1:=VAR10B;

买点2:=(VAR11B+VAR13B+VAR15+VAR17);

卖点1:=(VAR12B+VAR14B+VAR16+VAR18),LINETHICK2;

VAR22:=买点1 AND VARF AND VARC AND VAR21 AND VAR4B<0 AND VAR5B=0 AND VAR6B=0 AND VAR20<(-110);

DRAWTEXT(买点1>0,LOW-5*MINPRICE,'买'),COLORYELLOW,VALIGN0;

DRAWTEXT(买点2>0,LOW-5*MINPRICE,'买'),COLORYELLOW,VALIGN0;

DRAWTEXT(卖点1>0,HIGH+5*MINPRICE,'逃'), COLORYELLOW;

DRAWCOLORKLINE(卖点1>0,COLORYELLOW,0); 

DRAWTEXT(CCI>=200 AND H>=顶点,H+5*MINPRICE,'卖'),COLORYELLOW;

STICKLINE(CCI>=200 AND H>=顶点,(O+C)/2,MAX(O,C),COLORYELLOW,0);

给我个在看再走好吗？