超短压力线（加入主图即可）

超短压力线（加入主图即可）STICKLINE(CLOSEref(OPEN,1),ref(close,1),ref(close,1),20,0),COLORFFFFFF;平常常用的压力支持线RSV:=(CLOSE-LLV(LOW,13)/(HHV(HIGH,13)-LLV(LOW,13)*100;K:=SMA(RSV,3,1);D:=SMA(K,3,1);J:=3*K-2*D;RSV12:=(CLOSE-LLV(LOW,34)/(HHV(HIGH,34)-LLV(LOW,34)*100;K12:=SMA(RSV12,3,1);D12:=SMA(K12,3,1);J12:=3*K12-2*D12;RSV24:=(CLOSE-LLV(LOW,55)/(HHV(HIGH,55)-LLV(LOW,55)*100;K24:=SMA(RSV24,3,1);D24:=SMA(K24,3,1);J24:=3*K24-2*D24;压力位:IF(CROSS(j24,j),H,REF(H,BARSLAST(CROSS(j24,j),COLORred,LINETHICK2;支撑位:IF(CROSS(j,j24),L,REF(L,BARSLAST(CROSS(j,j24),COLOR77AAFF,LINETHICK2;上升通道强势股（楼梯股）（源码，加入主图）AA10:=MA(C,10);BB10:=atan(aa10-ref(aa10,1)*180/3.1416;STICKLINE(BB101 and AA10ref(AA10,1), AA10,REF(AA10,1),8,0),colorred;STICKLINE(BB101 and AA101,AA20,REF(AA20,1),8,0),COLORYELLOW;STICKLINE(BB20=生命线,生命线,10);DRAWICON(Cref(ly,1), l*0.98,8)ALIGN5;input:N(3);A1:=REF(H,N)=HHV(H,2*N+1); B1:=FILTER(A1,N); C1:=BACKSET(B1,N+1); D1:=FILTER(C1,N);高点A2:=REF(L,N)=LLV(L,2*N+1); B2:=FILTER(A2,N); C2:=BACKSET(B2,N+1); D2:=FILTER(C2,N);低点E1:=(REF(LLV(L,2*N),1)+REF(HHV(H,2*N),1)/2; E2:=(H+L)/2;高低点出现在同一K线上时可作取舍H1:=(D1 AND NOT(D2 AND E1=E2) OR ISLASTBAR OR BARSCOUNT(C)=1;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,L,10000),X1);G1:=F1REF(F1,1); I1:=BACKSET(G1,2); LD:=I1REF(I1,1),LINETHICK0;过滤后低点L2:=LD OR ISLASTBAR OR BARSCOUNT(C)=1;X2:=REF(BARSLAST(L2),1)+1; F2:=BACKSET(L2 AND COUNT(H2,X2)0,HHVBARS(IF(H2,H,0),X2);G2:=F2REF(F2,1); I2:=BACKSET(G2,2); HD:=I2REF(I2,1),LINETHICK0;过滤后高点/HD:=jgb.HD(N);LD:=jgb.LD(N);R1:=BACKSET(ISLASTBAR,BARSLAST(HD)+1); S1:=R1REF(R1,1); 前一高T1:=BACKSET(ISLASTBAR,BARSLAST(LD)+1); U1:=T1REF(T1,1); 前一低R2:=BACKSET(S1,REF(BARSLAST(HD),1)+2); S2:=R2REF(R2,1); 前二高T2:=BACKSET(U1,REF(BARSLAST(LD),1)+2); U2:=T2REF(T2,1); 前二低T3:=BACKSET(U2,REF(BARSLAST(LD),1)+2); U3:=T3REF(T3,1); 前三低T4:=BACKSET(U3,REF(BARSLAST(LD),1)+2); U4:=T4REF(T4,1); 前四低R3:=BACKSET(S2,REF(BARSLAST(HD),1)+2); S3:=R3REF(R3,1); 前三高R4:=BACKSET(S3,REF(BARSLAST(HD),1)+2); S4:=R4REF(R4,1); 前四高压力1:DRAWLINE(S2,H,S1,H,1),Color80FFFF; 支撑1:DRAWLINE(U2,L,U1,L,1),POINTDOT,Color00FFFF,linethick2;压力2:DRAWLINE(S3,H,S2,H,1),ColorFF8000;支撑2:DRAWLINE(U3,L,U2,L,1),POINTDOT,ColorFF8000; 压力3:DRAWLINE(S4,H,S3,H,1),Color0000FF;支撑3:DRAWLINE(U4,L,U3,L,1)POINTDOT,Color0000FF;DRAWICON(S2,H*1.01,10); DRAWICON(S3,H*1.01,10);DRAWNUMBER(S2,H*1.02,H,2),COLORMAGENTA;DRAWNUMBER(S1,H*1.02,H,2),COLORMAGENTA;DRAWNUMBER(S3,H*1.02,H,2),COLORMAGENTA;DRAWICON(U1,L*0.99,11); DRAWICON(U2,L*0.99,11);DRAWICON(U3,L*0.99,11);DRAWICON(U4,L*0.99,11);DRAWNUMBER(U1,L*0.98,L,2),COLORCYAN;DRAWNUMBER(U2,L*0.98,L,2),COLORCYAN;DRAWNUMBER(U3,L*0.98,L,2),COLORCYAN;DRAWNUMBER(U4,L*0.98,L,2),COLORCYAN;STICKLINE(open=close ,close ,open,0,0 ),COLOR00FF00;STICKLINE(open=close ,close ,open,8,0 ),COLOR008800;STICKLINE(open=close ,close ,open,7,0 ),COLOR009900;STICKLINE(open=close ,close ,open,6,0 ),COLOR00AA00;STICKLINE(open=close ,close ,open,5,0 ),COLOR00BB00;STICKLINE(open=close ,close ,open,4,0 ),COLOR00CC00;STICKLINE(open=close ,close ,open,3,0 ),COLOR00DD00;STICKLINE(open=close ,close ,open,2,0 ),COLOR00EE00;STICKLINE(open=close ,close ,open,1,0 ),COLOR00FF00;STICKLINE(closeopen,close,open,0,0) ,COLORFFBBFF;STICKLINE(closeopen,close,open,8,0) ,COLORFF00FF;STICKLINE(closeopen,close,open,7,0) ,COLORFF22FF;STICKLINE(closeopen,close,open,6,0) ,COLORFF44FF;STICKLINE(closeopen,close,open,5,0) ,COLORFF66FF;STICKLINE(closeopen,close,open,4,0) ,COLORFF88FF;STICKLINE(closeopen,close,open,3,0) ,COLORFF99FF;STICKLINE(closeopen,close,open,2,0) ,COLORFFAAFF;STICKLINE(closeopen,close,open,1,0) ,COLORFFBBFF;input:n(9),m(3);RSV:=(CLOSE-LLV(LOW,N)/(HHV(HIGH,N)-LLV(LOW,N)*100;K:=SMA(RSV,M,1);D:=BARSLAST(CROSS(K,80);KH:=REF(H,D);PARTLINE(C5,M/6,IF(DATATYPE3,M/8,M/10),LINETHICK0;确定ZIG转向参数M1:IF(M11,FLOOR(M1),CEILING(M1),LINETHICK0;z:=zig(4,M1); f:=z-ref(z,1);d:=FILTER(refx(f0 and ref(f,1)0,1)or BARPOS=1,2);低点 wd:=barslast(d);低点位置 g:=FILTER(refx(f0,1)or BARPOS=1,2);高点 wg:=barslast(g);高点位置xwd:=if(sum(wd=0,2)1,1,wd)linethick0;/低点位置确认xwg:=if(sum(wg=0,2)1,1,wg)linethick0;/高点位置确认fd:=hhv(h,xwd)/ref(L,xwd)-1M1/100;/低点巩固系数fg:=1-LLv(L,xwg)/ref(h,xwg)M1/100;/高点巩固系数dqz:=BACKSET(ISLASTBAR and wdwg and fd=0,xwd+1)=0;/低点过滤系数gqz:=BACKSET(ISLASTBAR and wgwd and fg=0,xwd+1)=0;/高点过滤系数以下输出信号dd:dqz*d or BARPOS=1;输出低点gg:gqz*g or BARPOS=1;输出高点画圆弧ngnd均为16drawtext(sysparam(2)=barpos,c,板块:+blkname),colorccffff,align4;gg:=xh-z.gg;/(ng);dd:=xh-z.dd;/(nd);p:=SYSPARAM(1);z:=gg*h+dd*L;sd:=sum(dd,0);sdd:=sdp-sd+1;wx1:=barssince(sdd=3);wx2:=barssince(sdd=2);wx3:=barssince(sdd=1);ry1:=hhv(wx1=0)*z,0);ry2:=hhv(wx2=0)*z,0);ry3:=hhv(wx3=0)*z,0);rx2:=hhv(wx2=0)*wx1,wx1+1);rx3:=hhv(wx3=0)*wx1,wx1+1);x2:=rx2p;x3:=rx3p;y1:=ry1p;y2:=(ry2p-ry1p);y3:=(ry3p-ry1p);xy:=POW(x2,2)+POW(y2,2);e:=(x3*xy/x2-(x3*x3+y3*y3)/(y3-x3*y2/x2);d:=-(y2*e+xy)/x2;y1:=POW(d*d+e*e)/4-POW(wx1+d/2),2),0.5);y2:=-POW(d*d+e*e)/4-POW(wx1+d/2),2),0.5);c1:=ref(L,wx1)-ref(y1,wx1);yy:=(y1+c1);c2:=ref(L,wx1)+ref(y1,wx1);ye:=(y2+c2);wyy:=abs(ref(yy,wx3)-ref(z,wx3)0.01;wye:=abs(ref(ye,wx3)-ref(z,wx3)0.01;if wyydatacount thenyy,LINETHICK2,COLORMAGENTA;ELSEye,LINETHICK2,COLORMAGENTA;sg:=sum(gg,0);sgg:=sgp-sg+1;wxg1:=barssince(sgg=3);wxg2:=barssince(sgg=2);wxg3:=barssince(sgg=1);ryg1:=hhv(wxg1=0)*z,0);ryg2:=hhv(wxg2=0)*z,0);ryg3:=hhv(wxg3=0)*z,0);rxg2:=hhv(wxg2=0)*wxg1,wxg1+1);rxg3:=hhv(wxg3=0)*wxg1,wxg1+1);xg2:=rxg2p;xg3:=rxg3p;yg1:=ryg1p;yg2:=(ryg2p-ryg1p);yg3:=(ryg3p-ryg1p);xyg:=POW(xg2,2)+POW(yg2,2);eg:=(xg3*xyg/xg2-(xg3*xg3+yg3*yg3)/(yg3-xg3*yg2/xg2);g:=-(yg2*eg+xyg)/xg2;yg1:=POW(g*g+eg*eg)/4-POW(wxg1+g/2),2),0.5);yg2:=-POW(g*g+eg*eg)/4-POW(wxg1+g/2),2),0.5);cg1:=ref(z,wxg1)-ref(yg1,wxg1);yyg:=(yg1+cg1);cg2:=ref(z,wxg1)+ref(yg1,wxg1);yeg:=(yg2+cg2);wyyg:=abs(ref(yyg,wxg3)-ref(z,wxg3)0.01;wyeg:=abs(ref(yeg,wxg3)-ref(z,wxg3)0.01;if wyygdatacount thenyyg,LINETHICK2,COLORGREEN;ELSEyeg,LINETHICK2,COLORGREEN;DRAWICON(dd,z,11);DRAWICON(gg,z,10);波段画线input:n(5,5,30);fh:=high; fl:=low;/以下找历史最高点，hh1表示最高价，phh1表示最高点位置/hh1:=fh1; phh1:=1;for i=1 to datacount do /从第1条K线开始，循环执行下面3条复合语句，直到K线结束if hh1fh then begin /判断hh1:=fh; phh1:=i; /用hh1单值变量记录历史最高价,phh1记录位置end;/以下找phh1之后的最低点，ll表示最低价，pll最低点位置if phh1fl then beginll:=fl; pll:=i;end;end;/以下用zig转折模拟波段，通过参数n来调整波的分布/找历史最高后的波峰最高点，hh2次高价，phh2位置/tj:=peakbars(high,n,1)=0;nstart:=max(lbound(tj),phh1+1);if nstart=datacount then beginhh2:=0;for i=nstart to datacount doif tj then beginif hh2=E2) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;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,10000),X1);G1:=F1REF(F1,1); I1:=BACKSET(G1,2); LD:=I1REF(I1,1);过滤后低点L2:=LD OR ISLASTBAR 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(ISLASTBAR,MIN(BARSLAST(HD),BARSLAST(LD)+1); J2:=J1REF(J1,1);DRAWLINE(J2,IF(HD,H,L),ISLASTBAR,IF(BARSLAST(HD)BARSLAST(LD),H,L),0),COLORWHITE,LINETHICK1,POINTDOT;以上语句为新结构波浪A3:=HREF(H,REF(BARSLAST(HD),1)+2+REF(BARSLAST(HD),REF(BARSLAST(HD),1)+2);D3:=A3 AND B3 AND HD; E3:=BACKSET(D3,REF(BARSLAST(HD),1)+2); HH:=E3REF(E3,1);找出全部长期高点A4:=LREF(L,REF(BARSLAST(LD),1)+1);B4:=REF(L,REF(BARSLAST(LD),1)+1)REF(E4,1);找出全部长期低点DRAWICON(HH,H,10),ALIGN2; DRAWICON(LL,L,12),ALIGN1;H3:=HH OR ISLASTBAR OR BARSCOUNT(C)=1; 后面进行过滤，方法同前。只是不用考虑高低点出现在同一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),LINETHICK0; 长期低点，也可供引用L4:=LZ OR ISLASTBAR 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),X4);G4:=F4REF(F4,1); I4:=BACKSET(G4,2); HZ:=I4REF(I4,1),LINETHICK0;长期高点，也可供引用DRAWLINE(HZ,H,LZ,L,0),COLORGREEN,LINETHICK1;DRAWLINE(LZ,L,HZ,H,0),COLORGREEN,LINETHICK1;长期连线K1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HZ),BARSLAST(LZ)+1); K2:=K1REF(K1,1);DRAWLINE(K2,IF(HZ,H,L),ISLASTBAR,C,0),COLORGREEN,LINETHICK1; 最后的长期连线，连在收盘价上以下是两条趋势线原码UU:=BACKSET(ISLASTBAR,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(ISLASTBAR,BARSLAST(HD)+1);VV2:=UU2REF(UU2,1);WW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2);XX2:=WW2REF(WW2,1);DRAWLINE(XX2,H,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),LINETHICK0;短低:=REF(L,BARSLAST(VV),LINETHICK0;短比: (C-短低)/(短高-短低),LINETHICK0;以下语句是大盘趋势叠加常数:=REF(INDEXC,BARSLAST(VV)/REF(C,BARSLAST(VV);叠1:INDEXC/常数,COLORGRAY,LINETHICK0;PARTLINE(1,叠1),COLORGRAY;常数2:=REF(INDEXC,BARSLAST(XX)/REF(C,BARSLAST(XX);叠2:INDEXC/常数2,COLORGRAY,LINETHICK0;PARTLINE(1,叠2),COLORGRAY;DRAWNUMBER(HD,1.02*H,DATEDIFF(REF(DATE,BARSLAST(LD),DATE),0),COLORCYAN;DRAWNUMBER(LD,0.98*L,DATEDIFF(REF(DATE,BARSLAST(HD),DATE),0),COLORCYAN;DRAWNUMBER(HD,H*(1+0.002),H,2),COLORBLUE,ALIGN0;DRAWNUMBER(LD,L*(1.001-0.002),L,2),COLORBLUE,ALIGN0;波浪结构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;高低点出现在同一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 BARSTATUS=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=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,REF(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; 后面进行过滤，方法同前。只是不用考虑高低点出现在同一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),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; 最后的长期连线，连在收盘价上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,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);短比: (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) ) ),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),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,linethick2;?上涨三角形：红色三角形画完出局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: 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,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,HIGH*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(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 CLOSE MA(CLOSE,13)*1.3,1,0),LOW,抄底), COLORRED;大鲨鱼形态-画线预警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,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;最低:lln1,POINTDOT;drawicon(barpos=n1-tshn1,l,5);drawicon(barpos=n1-tsln1,l,4);drawtext(barpos=n1-tshn1,h*1.02,大顶)colorred;drawtext(barpos=n1-tsln1,l*0.99,大底)colorgreen;dx:=ma(indexc,5);dn1:=sysparam(3);dn:=dn1-sysparam(2)+1;dhh:=hhv(dx,dn);dll:=llv(dx,dn);dtsh:=hhvbars(dx,dn);dtsl:=llvbars(dx,dn);d最高:=dhhdn1;d最低:=dlldn1;drawicon(barpos=dn1-dtshdn1,l,11);drawicon(barpos=dn1-dtsldn1,l,10);drawtext(barpos=dn1-dtshdn1,h*1.02,顶)colorblue;drawtext(barpos=dn1-dtsldn1,l,底)coloryellow;K线stickline(c=o and cref(c,1),c,o,8,0),Colorred;stickline(c=o and cref(c,1),h,l,0,0),Colorred;stickline(c=o and c=ref(c,1),h,l,0,0)Colorcyan;stickline(c=o and co,h,l,0,0),Colorred;stickline(co,c,o,8,0),Colorred;stickline(cref(ZIG(C,n),1) and ZIG(C,n)refx(ZIG(C,n),1),ZIG(C,n),0);/序列变量赋值KS:=DATACOUNT-BARSSINCE(DATE开始时);/设定参数选择开始时间n1:=SORT(FC,0,KSDATACOUNT,DATACOUNT); /排序高:FCdatacount,LINETHICK0;GS:=DATACOUNT-BARSLAST(高=C)+30;/限制波段次高点（峰）在高点之后（右边）n2:=SORT(FZ,0,GSDATACOUNT,DATACOUNT);/排序中:FZdatacount+1-峰,COLORMAGENTA,LINETHICK0;/设定参数选择第几个次高点（峰）低:FCksDATACOUNT,COLORYELLOW,LINETHICK0;/这个低点可能在高点之前/画线drawline(高=C AND DATE开始时,C,低=C,C,1),COLORYELLOW;drawline(低=C AND DATE开始时,C,高=C,C,0),COLORGREEN;drawline(高=C AND DATE开始时,C,中=C,C,1),COLORMAGENTA,LINEDOT;1、高点高点之后的波峰 画红线；2、高点最低点 画黄线或绿线；红蓝三角A1:=REF(HIGH,3)=HHV(H