江恩黄金线
C/C++ Code复制内容到剪贴板
- k:= hhv(c,n),coloryellow;
- d:= llv(c,n),coloryellow;
- hp:=k-d;
- z1:d+hp*0.236,POINTDOT,colorred, LINETHICK2;
- z2:d+hp*0.382,POINTDOT,colorblue, LINETHICK2;
- z3:d+hp*0.5,POINTDOT,colorwhite, LINETHICK2;
- z4:d+hp*0.618,POINTDOT,colorblue, LINETHICK2;
- z5:d+hp*0.764,POINTDOT,colorred, LINETHICK2;
- s:=llv(c,500);
- AA:=YEAR*100+MONTH>199901; BB:=(AA=0)+1;
- p1:=(c-ref(c,1))/ref(c,1)*1000; p2:=sum(abs(p1),0); p3:=count(c>0,0); k1:=p2/p3;
- a1:=ZIG(3 , 17); aa1:=a1>ref(a1,1); a2:=ZIG(2,17); aa2:=a2<ref(a2,1); K2:=K1*0.8;
- b1:=HHVBARS( a1, 30); b2:=LLVBARS(a2 ,30);
- X1:DRAWLINE(c=A1*BB and aa1>0,c,B1=10 ,REF(c,B1)-s*K1/1400,1),COLOR33FFCC;
- X2:DRAWLINE(c=A1*BB and aa1>0,c,B1=10 ,REF(c,B1)-s*2*K1/1400,1),COLOR6666FF,LINETHICK2;
- X3:DRAWLINE(c=A1*BB and aa1>0,c,B1=10 ,REF(c,B1)-s*4*K1/1400,1),COLORFFFFCC;
- X4:DRAWLINE(c=A1*BB and aa1>0,c,B1=10 ,REF(c,B1)-s*8*K1/1400,1),COLOR00CCFF;
- X5:DRAWLINE(c=A1*BB and aa1>0,c,B1=10 ,REF(c,B1)-s*0.4*K1/1400,1),COLORgreen;
- Y1:DRAWLINE(l=A2*AA and aa2>0,L,B2=10 ,REF(l,B2)+s*8*K1/1700*2,1),COLOR33FFCC;
- Y2:DRAWLINE(l=A2*AA and aa2>0,L,B2=10 ,REF(l,B2)+s*K1/1700*2,1),COLOR00CCFF;
- Y3:DRAWLINE(l=A2*AA and aa2>0,L,B2=10 ,REF(l,B2)+s*2*K1/1700*2,1),COLOR6666FF,LINETHICK2;
- Y4:DRAWLINE(l=A2*AA and aa2>0,l,B2=10 ,REF(l,b2)+s*4*K1/1700*2,1),COLORFFFFCC;
- Y5:DRAWLINE(l=A2*AA and aa2>0,l,B2=10 ,REF(l,b2)+s*0.5*K1/1700*2,1),COLORgreen;