江恩实战画线原代码.docx

1、江恩实战画线原代码江恩画线法原代码画线法11波浪结构input:n(20),n1(7),n2(69);A1:=REF(HIGH,3)=HHV(HIGH,2*3+1); B1:=FILTER(A1,3); C1:=BACKSET(B1,3+1); D1:=FILTER(C1,3);高点A2:=REF(LOW,3)=LLV(LOW,2*3+1); B2:=FILTER(A2,3); C2:=BACKSET(B2,3+1); D2:=FILTER(C2,3);低点E1:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1)/2; E2:=(HIGH+LOW)/2;高低点

2、出现在同一K线上时可作取舍H1:=(D1 AND NOT(D2 AND E1=E2) OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;H2:=D1 AND NOT(D2 AND E1=E2);L1:=D2 AND NOT(D1 AND E1=E2);X1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)0,LLVBARS(IF(L1,LOW,1000000),X1);G1:=F1REF(F1,1); I1:=BACKSET(G1,2); LD:=I1REF(I1,1);过滤后低点L2:=LD OR BARS

3、TATUS=2 OR BARSCOUNT(CLOSE)=1;X2:=REF(BARSLAST(L2),1)+1; F2:=BACKSET(L2 AND COUNT(H2,X2)0,HHVBARS(IF(H2,HIGH,0),X2);G2:=F2REF(F2,1); I2:=BACKSET(G2,2); HD:=I2REF(I2,1);过滤后高点DRAWLINE(LD,L,HD,H,0),COLORWHITE,LINETHICK1,POINTDOT;DRAWLINE(HD,H,LD,L,0),COLORWHITE,LINETHICK1,POINTDOT;J1:=BACKSET(BARSTATUS

4、=2,MIN(BARSLAST(HD),BARSLAST(LD)+1); J2:=J1REF(J1,1);DRAWLINE(J2,IF(HD,H,L),BARSTATUS=2,IF(BARSLAST(HD)BARSLAST(LD),H,L),0),COLORWHITE,LINETHICK1,POINTDOT;A3:=H; B3:=REF(H,REF(BARSLAST(HD),1)+1)REF(H,REF(BARSLAST(HD),1)+2+REF(BARSLAST(HD),REF(BARSLAST(HD),1)+2);D3:=A3 AND B3 AND HD; E3:=BACKSET(D3,R

5、EF(BARSLAST(HD),1)+2); HH:=E3REF(E3,1);找出全部长期高点A4:=LREF(L,REF(BARSLAST(LD),1)+1);B4:=REF(L,REF(BARSLAST(LD),1)+1); D4:=A4 AND B4 AND LD; E4:=BACKSET(D4,REF(BARSLAST(LD),1)+2); LL:=E4REF(E4,1);找出全部长期低点DRAWICON(HH,H,5),ALIGN1; DRAWICON(LL,L,4),ALIGN1;H3:=HH OR BARSTATUS=2 OR BARSCOUNT(C)=1; 后面进行过滤，方法同

6、前。只是不用考虑高低点出现在同一K线X3:=REF(BARSLAST(H3),1)+1; F3:=BACKSET(H3 AND COUNT(LL,X3)0,LLVBARS(IF(LL,L,POW(10,20),X3);G3:=F3REF(F3,1); I3:=BACKSET(G3,2); LZ:=I3REF(I3,1); 长期低点，也可供引用L4:=LZ OR BARSTATUS=2 OR BARSCOUNT(C)=1;X4:=REF(BARSLAST(L4),1)+1; F4:=BACKSET(L4 AND COUNT(HH,X4)0,HHVBARS(IF(HH,H,-POW(10,20),

7、X4);G4:=F4REF(F4,1); I4:=BACKSET(G4,2); HZ:=I4REF(I4,1);长期高点，也可供引用DRAWLINE(HZ,H,LZ,L,0),COLORGREEN,LINETHICK1; DRAWLINE(LZ,L,HZ,H,0),COLORGREEN,LINETHICK1;长期连线K1:=BACKSET(BARSTATUS=2,MIN(BARSLAST(HZ),BARSLAST(LZ)+1); K2:=K1REF(K1,1);DRAWLINE(K2,IF(HZ,H,L),BARSTATUS=2,C,0),COLORGREEN,LINETHICK1; 最后的长

8、期连线，连在收盘价上UU:=BACKSET(BARSTATUS=2,BARSLAST(LD)+1);VV:=UUREF(UU,1);WW:=BACKSET(VV,REF(BARSLAST(LD),1)+2);XX:=WWREF(WW,1);DRAWLINE(XX,L,VV,L,1),COLORMAGENTA,LINETHICK1;UU2:=BACKSET(BARSTATUS=2,BARSLAST(HD)+1);VV2:=UU2REF(UU2,1);WW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2);XX2:=WW2REF(WW2,1);DRAWLINE(XX2,H,

9、VV2,H,1),COLORMAGENTA,LINETHICK1;前一低:REF(L,BARSLAST(VV),COLOR99FF66,POINTDOT,LINETHICK3;前二低:REF(L,BARSLAST(XX),COLORFF66FF,POINTDOT,LINETHICK3;前一高:REF(H,BARSLAST(VV2),COLOR99FF66,POINTDOT,LINETHICK3;前二高:REF(H,BARSLAST(XX2),COLORFF66FF,POINTDOT,LINETHICK3;短高:=REF(H,BARSLAST(VV2);短低:=REF(L,BARSLAST(VV

10、);短比: (C-短低)/(短高-短低),LINETHICK0;常数:=REF(INDEXC,BARSLAST(VV)/REF(C,BARSLAST(VV);叠:INDEXC/常数,COLORGRAY,LINETHICK0;PARTLINE(叠,1),COLORGRAY;常数:=REF(INDEXC,BARSLAST(XX)/REF(C,BARSLAST(XX);叠:INDEXC/常数,COLORGRAY,LINETHICK0;PARTLINE(叠,1),COLORGRAY;s:=NUMTOSTRN(DAYS1970-DATETOD1970(REF( DATE,BARSLAST(LD) ) )

11、,0 );s1:=NUMTOSTRN(DAYS1970-DATETOD1970(REF( DATE,BARSLAST(HD) ) ),0 );s2:=NUMTOSTRN(H,2 );s3:=NUMTOSTRN(L,2 );DRAWTEXT(HD,1.02*H,s),COLORCYAN;DRAWTEXT(LD,0.98*L,s1),COLORCYAN;DRAWTEXT(HD,H*(1+0.002),s2),COLORBLUE,ALIGN0;DRAWTEXT(LD,L*(1.001-0.002),s3),COLORBLUE,ALIGN0;以下语句为三角形部分底:REF(L,BARSLAST(VV)

12、,COLORred,LINETHICK2; 頂:REF(H,BARSLAST(VV2),COLORGreen,LINETHICK2;下迭三角形：藍色三角形畫完介入StickLine(VV,頂,底,0,0),Colorff6633,linethick3;DRAWLINE(VV2,H,VV,L,0),Colorff6633,linethick3;斜DRAWLINE(VV2,H,VV,頂,0),Colorff6633,linethick3;?DRAWLINE(c0,H,VV,L,0),Colorcyan,linethick2;斜DRAWLINE(c1,H,VV,頂,0),Colorcyan,line

13、thick2;?上漲三角形：紅色三角形畫完出局StickLine(VV2 ,頂,底,0,0),Colorred,linethick3;DRAWLINE(VV,L,VV2,H,0),Colorred,linethick3;斜DRAWLINE(VV,L,VV2,底,0),Colorred,linethick3;?;SYSPARAM(6),colorwhite;M3: EMA(CLOSE,3);M8: EMA(CLOSE,8), COLORGREEN;M13: EMA(M8,13), COLORRED;M62: EMA(M8,62), COLORCYAN;Var1:=EMA(M13,62);M81:

14、 EMA(M62,81), COLORYELLOW;M144: EMA(Var1,144),LINETHICK2 , COLORRED;M250: EMA(Var1,250),LINETHICK2 , COLORMAGENTA;Var2:=(CLOSE+HIGH+LOW)/3;Var3:=EMA(Var2,10);Var4:=REF(Var3,1);STICKLINE(Var3Var4,Var3,Var4,15,0), COLORYELLOW;STICKLINE(Var3 Var4,Var3,Var4,20,0), COLOR00ff00;Var5:=(REF(HIGH,1)+REF(LOW,

15、1)/2;Var6:=MA(CLOSE,N)+2*STD(CLOSE,N);DRAWICON(CROSS(Var5,Var6),HIGH*1.035,1);DRAWTEXT(CROSS(Var5,Var6),HIGH*1.04,卖出), COLORGREEN;Var7:=REF(CLOSE,1);Var8:=SMA(MAX(CLOSE-Var7,0),N1,1)/SMA(ABS(CLOSE-Var7),N1,1)*100;Var9:=CROSS(N2,Var8);VarA:=FILTER(Var9,4);DRAWICON(VarA,HIGH*1.035,1);DRAWTEXT(VarA,HIG

16、H*1.04,卖出), COLORWHITE;VarB:=(2*CLOSE+HIGH+LOW)/4;VarC:=LLV(LOW,34);VarD:=HHV(HIGH,34);VarE:=EMA(VarB-Var1)/(Var5-Var1)*100,7);VarF:=EMA(0.667*REF(VarE,1)+0.333*VarE,5);DRAWTEXT(IF(COUNT(CLOSE0.6 AND VOL=1.5*MA(VOL,5) AND COUNT(VarE=VarF,3) AND REF(LOW,1)=LLV(LOW,120),1,0),LOW,买进), colorred;DRAWTEXT

17、(IF(COUNT(CLOSE0.6 AND COUNT(VarEVarF,6) AND REF(LOW,5)=LLV(LOW,120) AND REF(CLOSE=OPEN,4) AND REF(CLOSEOPEN,3) AND REF(CLOSEOPEN,2) AND REF(OPENCLOSE,1) AND OPENREF(CLOSE,1),1,0),LOW,买进), COLORYELLOW;Var10:=MA(CLOSE,80)-MA(CLOSE,10)/3;DRAWTEXT(IF(CLOSEMA(VOL,5)/240 AND CLOSEREF(CLOSE,1)*1.08 AND CL

18、OSE MA(CLOSE,13)*1.3,1,0),LOW,抄底), COLORRED;画线法12大鲨鱼形态-画线预警SFF:=H/REF(H,1)1 AND REF(h,1)/REF(h,2)1 and REF(L,1)/REF(L,2)1 ;STICKLINE(BACKSET(SFF,3),C,O,7,1),COLORYELLOW;DRAWTEXT(SFF,L*0.97,大鲨鱼),COLORYELLOW;w:=barslast(FILTER(BACKSET(SFF,3),3);预警:cross(c,ref(h,w)LINETHICK0;DRAWLINE(FILTER(BACKSET(SFF

19、,3),3),h,cross(c,ref(h,w),ref(h,w),0);/顶底画线DRAWLINE(l=sysparam(5),l,barpos=SYSPARAM(3)-1,l,1),Colorgreen;DRAWLINE(h=sysparam(4),h,barpos=SYSPARAM(3)-1,h,1),Coloryellow;x:=ma(c,5);n1:=sysparam(3);n:=n1-sysparam(2)+1;hh:=hhv(x,n);ll:=llv(x,n);tsh:=hhvbars(x,n);tsl:=llvbars(x,n);最高:hhn1,POINTDOT;最低:lln

20、1,POINTDOT;drawicon(barpos=n1-tshn1,l,5);drawicon(barpos=n1-tsln1,l,4);drawtext(barpos=n1-tshn1,h*1.02,大顶)colorred;drawtext(barpos=n1画线法4奇妙撑压INPUT:N(13,1,100),P(3,1,10),Q(3,1,35);X1:=REF(C,1);X2:=SMA(MAX(C-X1,0),N,1)/SMA(ABS(C-X1),N,1)*100;X3:=(3*SMA(C-LLV(L,27)/(HHV(H,27)-LLV(L,27)*100,5,1)-2*SMA(S

21、MA(C-LLV(L,27)/(HHV(H,27)-LLV(L,27)*100,5,1),3,1)-50)*1.032+50);X4:=(X2+X3)/2;奇妙线:C+(X4/50-1)*(MA(C,30)/20)*P,COLORFFEEBB;AA1:=EMA(C,2); 短指数平滑移动平均线 BB1:=EMA(AA1,2); 平滑 A:=MA(BB1,3); 平均 AA2:=EMA(H+C+O)/3,18); 长指数平滑移动平均线 DD3:=A=AA2 AND CAA2; 短长,且收长 DD4:=AAA2 ; 短AA2 ; 短长 STICKLINE(DD4 OR DD5)AND O=C,C,

22、O,6,0),COLORFF88CC; 跌势阳线STICKLINE(DD4 OR DD5)AND O=C,C,O,6,0),COLORCYAN; 跌势阴线STICKLINE(DD4 OR DD5)AND O=C,H,L,0.5,0),COLORCYAN; 跌势阴线STICKLINE(DD3 OR CAA2)AND OAA2)AND OAA2)AND O=C,C,O,6,0),COLOR00CC99; 涨势阴线STICKLINE(DD3 OR CAA2)AND O=C,H,L,0.5,0),COLOR00CC99; 涨势阴线;RSV1:=(C-LLV(L,9)/(HHV(H,9)-LLV(L,9

23、)*100;KK:=SMA(RSV1,3,1);DD:=SMA(KK,3,1);JJ:=3*KK-2*DD;M:=BARSLAST(CROSS(DD,JJ);警示线:REF(H,M),POINTDOT,COLORYELLOW;进场; 止赢; 止损; 黄STICKLINE(警示线,警示线,警示线,3.8,1),COLORYELLOW;A1:=BACKSET(REF(H,2)=HHV(H,5),3);A2:=BACKSET(REF(L,2)=LLV(L,5),3);A3:=CROSS(A1,0.9);A4:=CROSS(A2,0.9);上沿:REF(H,BARSLAST(A3),POINTDOT,

24、COLORFF8918;STICKLINE(C,REF(H,BARSLAST(A3),REF(H,BARSLAST(A3),5,1),COLORFF8918;下沿:REF(L,BARSLAST(A4),POINTDOT,COLORMAGENTA;STICKLINE(C,REF(L,BARSLAST(A4),REF(L,BARSLAST(A4),5,1),COLORMAGENTA画线法45画线趋势-画线趋势-N:=p1;原码 N:=3;A1:=向前引用(最高价,N)=最高值(最高价,2*N+1); B1:=信号过滤(A1,N); C1:=向前赋值(B1,N+1); D1:=信号过滤(C1,N);

25、高点A2:=向前引用(最低价,N)=最低值(最低价,2*N+1); B2:=信号过滤(A2,N); C2:=向前赋值(B2,N+1); D2:=信号过滤(C2,N);低点E1:=(向前引用(最低值(最低价,2*N),1)+向前引用(最高值(最高价,2*N),1)/2; E2:=(最高价+最低价)/2;高低点出现在同一K线上时可作取舍H1:=(D1 AND 求逻辑非(D2 AND E1=E2) OR 是否最后周期 OR 有效值周期数(收盘价)=1;L1:=(D2 AND 求逻辑非(D1 AND E1=E2);X1:=向前引用(上一次条件成立位置(H1),1)+1; F1:=向前赋值(H1 AND

26、 统计总数(L1,X1)0,上一低点位置(条件函数(L1,最低价,10000),X1);G1:=F1向前引用(F1,1); I1:=向前赋值(G1,2); LD:=I1向前引用(I1,1),LINETHICK0;过滤后低点L2:=LD OR 是否最后周期 OR 有效值周期数(收盘价)=1;X2:=向前引用(上一次条件成立位置(L2),1)+1; F2:=向前赋值(L2 AND 统计总数(H2,X2)0,上一高点位置(条件函数(H2,最高价,0),X2);G2:=F2向前引用(F2,1); I2:=向前赋值(G2,2); HD:=I2向前引用(I2,1),LINETHICK0;过滤后高点/HD:

27、=jgb.HD(N);LD:=jgb.LD(N);R1:=向前赋值(是否最后周期,上一次条件成立位置(HD)+1); S1:=R1向前引用(R1,1); 前一高T1:=向前赋值(是否最后周期,上一次条件成立位置(LD)+1); U1:=T1向前引用(T1,1); 前一低R2:=向前赋值(S1,向前引用(上一次条件成立位置(HD),1)+2); S2:=R2向前引用(R2,1); 前二高T2:=向前赋值(U1,向前引用(上一次条件成立位置(LD),1)+2); U2:=T2向前引用(T2,1); 前二低T3:=向前赋值(U2,向前引用(上一次条件成立位置(LD),1)+2); U3:=T3向前引

28、用(T3,1); 前三低T4:=向前赋值(U3,向前引用(上一次条件成立位置(LD),1)+2); U4:=T4向前引用(T4,1); 前四低R3:=向前赋值(S2,向前引用(上一次条件成立位置(HD),1)+2); S3:=R3向前引用(R3,1); 前三高R4:=向前赋值(S3,向前引用(上一次条件成立位置(HD),1)+2); S4:=R4向前引用(R4,1); 前四高压力1:画直线(S2,最高价,S1,最高价,1),Color80FFFF,linethick2; 支撑1:画直线(U2,最低价,U1,最低价,1),点状线,Color00FFFF,linethick2;压力2:画直线(S3

29、,最高价,S2,最高价,1),ColorFF8000,linethick2; 支撑2:画直线(U3,最低价,U2,最低价,1),点状线,ColorFF8000,linethick2; 压力3:画直线(S4,最高价,S3,最高价,1),Color0000FF,linethick2;支撑3:画直线(U4,最低价,U3,最低价,1)点状线,Color0000FF,linethick2;画图标(S2,最高价*1.01,10); 画图标(S3,最高价*1.01,10);显示数字(S2,最高价*1.02,最高价,2),COLORMAGENTA;显示数字(S1,最高价*1.02,最高价,2),COLORMAGENTA;显示数字(S3,最高价*1.02,最高价,2),COLORMAGENTA;画图标(U1,最低价*0.99,11); 画图标(U2,最低价*0.99,11);画图标(U3,最低价*0.99,11);画图标(U4,最低价*0.99,11);显示数字(U1,最低价*0.98,最低价,2),COLORCYAN;显示数字(U2,最低价*0.98,最低价,2),COLORCYAN;显示数字