折線:ZIG(3,20);
前波峰值:=PEAK(3,20,1);
前波谷值:=TROUGH(3,20,1);
DRAWNUMBER(折線>REF(折線,1) AND REF(折線,1)<REF(折線,2),REF(C,1),-(前波峰值-REF(C,1))/前波峰值*100);
DRAWNUMBER(折線<REF(折線,1) AND REF(折線,1)>REF(折線,2),REF(C,1),(REF(C,1)-前波谷值)/前波谷值*100);
VA1:=ZIG(3,2.88)<REF(ZIG(3,2.88),1) AND REF(ZIG(3,2.88),1)>REF(ZIG(3,2.88),2);
VA2:=ZIG(3,2.88)>REF(ZIG(3,2.88),1) AND REF(ZIG(3,2.88),1)<REF(ZIG(3,2.88),2);
STICKLINE(VA1,C,O,3,0),COLOR00FF00;
STICKLINE(VA1,C,O,2.5,0),COLOR00FF00;
STICKLINE(VA1,H,L,2,0),COLOR00FF00;
STICKLINE(VA2,C,O,3,0),COLOR0000FF;
STICKLINE(VA2,C,O,2.5,0),COLOR0000FF;
STICKLINE(VA2,H,L,2,0),COLOR0000FF;
X1:=(C+L+H)/3;
X2:=EMA(X1,6);
X3:=EMA(X2,5);
STICKLINE(CROSS(X2,X3),OPEN,CLOSE,3,0),COLORYELLOW;
STICKLINE(CROSS(X3,X2),OPEN,CLOSE,3,0),COLORBLUE;
B1:EMA(C,2),POINTDOT,COLOR000000;
W1:ZIG(1,3),COLORYELLOW;
G1:=MA(W1,2),COLORRED;
D1:=EMA(W1,34),COLORGREEN;
F1:=100*(C-REF(C,1))/REF(C,1);
JD1:=IF(C<REF(O,1) AND F1<0,1,0);
S11:=JD1;
MR1:=IF(C<REF(O,2) AND F1<0,1,0),LINETHICK0;
S22:=MR1;
A01:=S11=0 AND REF(S11,1)=1 AND S22=0 AND REF(S22,1)=1 AND CROSS(ZIG(3,3) ,REF(ZIG(3 ,3),1));
A02:=S11=0 AND REF(S11,1)=1 AND S22=0 AND REF(S22,1)=1 AND CROSS(ZIG(3,5) ,REF(ZIG(3 ,5),1));
AA:=(CROSS(W1,G1) AND (A01 AND A02 OR D1<0)) OR CROSS(B1,G1);
A11:LLV(LOW,144),COLORMAGENTA;
STICKLINE(A11<W1 AND W1>REF(W1,1),W1,A11,9,0),COLORBROWN,LINETHICK5;
STICKLINE(A11<B1 AND W1<ref(w1,1),w1,a11,0.8,0),colorgreen;< span="">
A11,COLORGRAY,LINETHICK7;
B:ZIG(3,10),COLORYELLOW;
G:=MA(B,2),COLORRED;
D:=EMA(B,34),COLORGREEN;
J:=EMA(B,144),COLORLIGREEN;
DRAWICON(CROSS(B,G),B-0.1,1);
DRAWICON(CROSS(G,B),G+0.1,2); 
F:=100*(C-REF(C,1))/REF(C,1);
JD:=IF(C<REF(O,1) AND F<0,1,0);
S1:=JD;
MR:=IF(C<REF(O,2) AND F<0,1,0),LINETHICK0;
S2:=MR;
A1:=S1=0 AND REF(S1,1)=1 AND S2=0 AND REF(S2,1)=1 AND CROSS(ZIG(3,3) ,REF(ZIG(3 ,3),1));
A2:=S1=0 AND REF(S1,1)=1 AND S2=0 AND REF(S2,1)=1 AND CROSS(ZIG(3,5) ,REF(ZIG(3 ,5),1));
VA3:=PEAKBARS(3,5,1)<10;
VA5:=IF(VA3=1,2,0);
頂:= IF(VA5=2,2,0);
頂A:=IF(頂>REF(頂,1),1,0),STICK,COLORCYAN, LINETHICK2; 
DRAWICON(頂A=1,B,2);
MID:=MA(CLOSE,26);
UPPER:=MID + 2*STD(CLOSE,26),COLORWHITE;
UPPER1:=MID + 1.618*STD(CLOSE,26),COLORRED;
LOWER:=MID - 2*STD(CLOSE,26),COLORYELLOW;
LOWER1:=MID - 1.618*STD(CLOSE,26),COLORGREEN;
STICKLINE(CROSS(B,G) AND (A1 AND A2 OR D<0),CONST(HHV(H,0)),CONST(LLV(L,0)),0,-1),COLORLIMAGENTA; 
STICKLINE(CROSS(G,B),CONST(HHV(H,0)),CONST(LLV(L,0)),0,-1),COLORCYAN; 
買線:=ZIG(3,10);
賣線:=MA(買線,3);
STICKLINE(CROSS(買線,賣線),O,C,3,0),COLOR00AAFF;
{程序化指標官方網(wǎng)址 WWW.HONGHAIE.COM}
STICKLINE(買線<賣線,H,L,0,0),COLORGREEN;
STICKLINE(買線<賣線,C,O,3,0),COLOR007700;
STICKLINE(買線<賣線,C,O,2.5,0),COLOR008E00;
STICKLINE(買線<賣線,C,O,2,0),COLOR009900;
STICKLINE(買線<賣線,C,O,1.5,0),COLOR00A600;
STICKLINE(買線<賣線,C,O,0.5,0),COLOR00B500;
STICKLINE(買線<賣線,C,O,0.3,0),COLOR00C600;
STICKLINE(買線<賣線,C,O,0.1,0),COLOR00D500;
STICKLINE(買線<賣線,C,O,0.1,0),COLOR00E600;
STICKLINE(買線>=賣線,H,L,0,0),COLOR0000FF;
STICKLINE(買線>=賣線,C,O,3,0),COLOR0000A3;
STICKLINE(買線>=賣線,C,O,2.8,0),COLOR0000B7;
STICKLINE(買線>=賣線,C,O,2.5,0),COLOR0000C8;
STICKLINE(買線>=賣線,C,O,2.2,0),COLOR0000D9;
STICKLINE(買線>=賣線,C,O,2,0),COLOR0000CD;
STICKLINE(買線>=賣線,C,O,1.8,0),COLOR0000E9;
STICKLINE(買線>=賣線,C,O,1.2,0),COLOR0000EA;
STICKLINE(買線>=賣線,C,O,1,0),COLOR0000FF;
VA10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0);
VA11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);
VA12:=ZIG(3,6)=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);
VA13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);
VA14:=ZIG(3,22)=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);
VA15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);
VA16:=ZIG(3,51)=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);
VA17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);
VA18:=ZIG(3,72)=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);
VA19:=EMA(CLOSE,2)-EMA(CLOSE,150);
VA1A:=EMA(VA19,100);
VA1B:=2*(VA19-VA1A);
VA1C:=POW(VA1B,3)*0.1+POW(VA1B,1);
VA1D:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE));
VA1E:=EMA(VA1D*0.97,3);
VA1F:=(HIGH+LOW+CLOSE)/3;
買點1:=VA10;
買點2:=(VA11+VA13+VA15+VA17);
VAR1:=MA(CLOSE,5);
VAR2:=MA(CLOSE,10);
VAR3:=MA(CLOSE,30);
VAR4:=MA(CLOSE,60);
VAR5:=EMA(COST(85),7);
VAR6:=EMA(COST(15),7);
VAR7:=SUM(CLOSE*VOL*100,4)/SUM(VOL*100,4);
VAR8:=INTPART(VAR7*100)/100;
VAR9:=SUM(CLOSE*VOL*100,7)/SUM(VOL*100,7);
VARA:=INTPART(VAR9*100)/100;
VARB:=SUM(CLOSE*VOL*100,28)/SUM(VOL*100,28);
VARC:=INTPART(VARB*100)/100;
VARD:=EMA(CLOSE,5)-EMA(CLOSE,10);
VARE:=EMA(VARD,9);
VAR13:=REF(VARE,1);
VAR14:=VARE;
VAR15:=VAR14-VAR13;
VAR16:=REF(VARD,1);
VAR19:=OPEN;
買點3:=IF(VAR19<=VAR1 AND VAR19<=VAR2 AND VAR19<=VAR3 AND VA1A>=VAR1 AND VA1A>=VARC AND VAR15>0 AND VA18>0,0.5,0);
STICKLINE(買點3>0 OR 買點1>0 OR 買點2>0,CONST(HHV(H,0)),CONST(LLV(L,0)),0,-1),COLOR0000FF;
AB1:=C>=REF(C,4);
AB:=C<REF(C,4);
AAB:=C<REF(C,4) AND REF(AB1,2);
T:=BARSLAST(AAB),NODRAW;
N:=T=1 AND REF(T=0 AND AAB,2) AND AB;
N1:=T=2 AND REF(N,1) AND AB;
N2:=T=3 AND REF(N1,1) AND AB;
N3:=T=4 AND REF(N2,1) AND AB;
N4:=T=5 AND REF(N3,1) AND AB;
N5:=T=6 AND REF(N4,1) AND AB;
N6:=T=7 AND REF(N5,1) AND AB;
N7:=T=8 AND REF(N6,1) AND AB;
DRAWTEXT(N5,H*1.10,'7'),COLORRED;
DRAWTEXT(N6,H*1.10,'8'),COLORRED;
DRAWTEXT(N7,H*1.10,'9'),COLORRED;