通达信自用主图 主图源码 带画线

MA5:=MA(CLOSE,5);
 MA10:=MA(CLOSE,10);
 MA20:=MA(CLOSE,20);
 MA30:=MA(CLOSE,30);
 MA60:=MA(CLOSE,60);
 MA120:=MA(CLOSE,120);
 MA250:=MA(CLOSE,250);
 C2:=REF(C,1);
涨停:=IF((C-C2)*100/C2>=(10-0.01*100/C2),1,0);
 STICKLINE(涨停,OPEN,CLOSE,2.5,0),COLOR00FFFF;
 A1:=C-REF(C,1);
 A2:=100*EMA(EMA(A1,6),6)/EMA(EMA(ABS(A1),6),6);
买股:=LLV(A2,2)=LLV(A2,7) AND COUNT(A2<0,2) AND CROSS(A2,MA(A2,2));
 {DRAWTEXT(FILTER(买股=1,5),LOW-0.05,'↖买进'),COLORYELLOW;}
 STICKLINE(买股,OPEN,CLOSE,1.8,0),COLORFF00FF;

AA1:=AMOUNT/V;
 BB1:=L<AA1*0.9;
 CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
 DD1:=L<MA(C,5)*0.921;
 EE1:=V<MA(V,5)*1.5;
老鼠仓:=BB1 AND CC1 AND DD1 AND EE1,LINETHICK0;
 DRAWTEXT(老鼠仓,(LOW-0.1),'↖加'),COLOR40CCFF;

HH:=REF(H,5)=HHV(H,11);
 LL:=REF(L,5)=LLV(L,11);
 FG01:=BACKSET(HH,6)>BACKSET(HH,5) ;
 FD01:=BACKSET(LL,6)>BACKSET(LL,5) ;
 FG0:=FG01 AND H=HHV(H,BARSLAST(FD01));
 FD0:=FD01 AND L=LLV(L,BARSLAST(FG01));
 J0:=(H+L)/2;
 FGH:=REF(H,BARSLAST(FG0));
 FGH1:=REF(H,BARSLAST(FG0)+1);
 FGL1:=REF(L,BARSLAST(FG0)+1);
 FGH2:=REF(H,BARSLAST(FG0)+2);
 FGL2:=REF(L,BARSLAST(FG0)+2);
 FGJ0:=REF(J0,BARSLAST(FG0));
 FGL:=REF(L,BARSLAST(FG0));
 FDH:=REF(H,BARSLAST(FD0));
 FDL:=REF(L,BARSLAST(FD0));
 FDH1:=REF(H,BARSLAST(FD0)+1);
 FDL1:=REF(L,BARSLAST(FD0)+1);
 FDH2:=REF(H,BARSLAST(FD0)+2);
 FDL2:=REF(L,BARSLAST(FD0)+2);
 FDJ0:=REF(J0,BARSLAST(FD0));
 FGZH:=IF(FGL<FGL1,FGH2,FGH1);
 FGZL:=IF(FGL<FGL1,FGL2,FGL1);
 FDZH:=IF(FDH>FDH1,FDH2,FDH1);
 FDZL:=IF(FDH>FDH1,FDL2,FDL1);
 FG1:=IF(((FGL>FDH AND FGH>FDZH) OR (FGH>FDH1 AND FDH1>FDH AND FDH>FDH2)),FG0
 ,FG0 AND FGJ0>FDH AND FGH>FDZH);
 FD1:=IF(((FDH<FGL AND FDL<FGZL) OR (FDL<FGL1 AND FGL1<FGL AND FDL<FGL2)),FD0
 ,FD0 AND FDJ0<FGL AND FDL<FGZL);
 FG2:=FG1 AND H>=HHV(H,BARSLAST(FD1));
 FD2:=FD1 AND L<=LLV(L,BARSLAST(FG1));
 FG:=FG2 AND KDJ.K>40;FD:=FD2 AND KDJ.K<60;
 BK:=IF((FGL1>=FGL AND FG0) OR (FDH1<=FDH AND FD0),4,3);
 G1:=FG AND BARSLAST(FD)>BK;
 D1:=FD AND BARSLAST(FG)>BK;
 G2:=G1 AND H>=HHV(H,BARSLAST(D1));
 D2:=D1 AND L<=LLV(L,BARSLAST(G1));
 G3:=G2 OR (FG0 AND KDJ.J>100);
 D3:=D2 OR (FD0 AND KDJ.J<0);
 G4:=G3 OR (FG0 AND REF(H,BARSLAST(FG0))>REF(H,BARSLAST(G2)) AND BARSLAST(D2)>BARSLAST(G2));
 D4:=D3 OR (FD0 AND REF(L,BARSLAST(FD0))<REF(L,BARSLAST(D2)) AND BARSLAST(G2)>BARSLAST(D2));
 G5:=G4 AND H=HHV(H,BARSLAST(D4));
 D5:=D4 AND L=LLV(L,BARSLAST(G4));
 GPB:=IF(G4,H,DRAWNULL),CIRCLEDOT,COLORYELLOW;
 DPB:=IF(D4,L,DRAWNULL),CIRCLEDOT,COLORYELLOW;
 NN:=G5;UU:=D5;
 DRAWLINE(UU,L,NN, H,0),COLORRED;
 DRAWLINE(NN,H,UU, L,0),COLORGREEN;

比系数:=1.3;
金线:=1;
临界点:=0;

均线:=MA5>REF(MA5,1) AND MA10<REF(MA10,1) AND MA20<REF(MA20,1);
 RV1:=REF(V,1);
 RV2:=REF(V,2);
 RV3:=REF(V,3);
 RC1:=REF(C,1);
 RC2:=REF(C,2);
 RC3:=REF(C,3);
 RC4:=REF(C,4);
 RO1:=REF(O,1);
 RO2:=REF(O,2);
 RO3:=REF(O,3);
 RO4:=REF(O,4);
不破价顶:=C>=RC3 AND RC1>=RC3 AND RC2>=RC3;
不破价底:=L>RO3 AND REF(L,1)>RO3 AND REF(L,2)>RO3;
均价:=AMOUNT/VOL/100;
 RJ1:=REF(均价,1);
 RJ2:=REF(均价,2);
阳柱:=C>=O OR (C<O AND 均价>RC1);
三日二阳:=COUNT(阳柱,3)>=2;
基价柱阳:=RC3>RO3;
价渐升:=(均价>=RJ1 OR C>RC1) AND (RJ1>=RJ2 OR RC1>=RC2);
均价升:=(C+RC1+RC2)/3>RC3;
量渐升:=V>RV1 AND RV1>RV2 ;
量渐减:=V<=RV1 AND RV1<=RV2 ;
均量减:=(V+RV1+RV2)/3<=RV3 AND NOT(量渐升);
日价量比:=C/V;
日价量比升:=日价量比>=REF(日价量比,1) AND REF(日价量比,1)>=REF(日价量比,2);
均价升幅:=(C+RC1+RC2)/3/RC3;
均量升幅:=(V+RV1+RV2)/3/RV3;
价量比:=比系数*均价升幅/均量升幅>1;
基前跳空:=RO3>RC4 AND RC4>RO4;
黄金柱1T:=基价柱阳 AND 价渐升 AND 量渐减 AND 不破价顶 AND 不破价底 AND 基前跳空;
BACKSET101T:=BACKSET(黄金柱1T,5);
 FILTER101T:=FILTER(BACKSET101T,4);
黄金柱1:=基价柱阳 AND 价渐升 AND 量渐减 AND 不破价顶 AND 不破价底 ;
BACKSET101:=BACKSET(黄金柱1,4);
 FILTER101:=FILTER(BACKSET101,3);
黄金柱11:=黄金柱1 AND REF(黄金柱1,1);
 BACKSET1011:=BACKSET(黄金柱11,4);
 FILTER1011:=FILTER(BACKSET1011,3);
黄金柱12:=黄金柱1 AND REF(黄金柱1,2);
 BACKSET1012:=BACKSET(黄金柱12,4);
 FILTER1012:=FILTER(BACKSET1012,3);
黄金柱13:=黄金柱1 AND REF(黄金柱1,3);
 BACKSET1013:=BACKSET(黄金柱13,4);
 FILTER1013:=FILTER(BACKSET1013,3);
黄金柱2T:=基价柱阳 AND 价渐升 AND 均量减 AND NOT(量渐升) AND 不破价顶 AND 不破价底 AND 基前跳空 AND NOT(黄金柱1) AND NOT(黄金柱1T);
 BACKSET201T:=BACKSET(黄金柱2T,5);
 FILTER201T:=FILTER(BACKSET201T,4);
黄金柱2:=基价柱阳 AND 价渐升 AND 均量减 AND NOT(量渐升) AND 不破价顶 AND 不破价底 AND NOT(黄金柱1) AND NOT(黄金柱1T);
 BACKSET201:=BACKSET(黄金柱2,4);
 FILTER201:=FILTER(BACKSET201,3);
黄金柱21:=黄金柱2 AND REF(黄金柱2,1);
 BACKSET2011:=BACKSET(黄金柱21,4);
 FILTER2011:=FILTER(BACKSET2011,3);
黄金柱22:=黄金柱2 AND REF(黄金柱2,2);
 BACKSET2012:=BACKSET(黄金柱22,4);
 FILTER2012:=FILTER(BACKSET2012,3);
黄金柱23:=黄金柱2 AND REF(黄金柱2,3);
 BACKSET2013:=BACKSET(黄金柱23,4);
 FILTER2013:=FILTER(BACKSET2013,3);
黄金柱3T:=基价柱阳 AND 均价升 AND 量渐减 AND 不破价顶 AND 不破价底 AND 基前跳空 AND NOT(黄金柱1) AND NOT(黄金柱2) AND NOT(黄金柱1T) AND NOT(黄金柱2T);
 BACKSET301T:=BACKSET(黄金柱3T,5);
 FILTER301T:=FILTER(BACKSET301T,4);
黄金柱3:=基价柱阳 AND 均价升 AND 量渐减 AND 不破价顶 AND 不破价底 AND NOT(黄金柱1) AND NOT(黄金柱2) AND NOT(黄金柱1T) AND NOT(黄金柱2T);
 BACKSET301:=BACKSET(黄金柱3,4);
 FILTER301:=FILTER(BACKSET301,3);
黄金柱31:=黄金柱3 AND REF(黄金柱3,1);
 BACKSET3011:=BACKSET(黄金柱31,4);
 FILTER3011:=FILTER(BACKSET3011,3);
黄金柱32:=黄金柱3 AND REF(黄金柱3,2);
 BACKSET3012:=BACKSET(黄金柱32,4);
 FILTER3012:=FILTER(BACKSET3012,3);
黄金柱33:=黄金柱3 AND REF(黄金柱3,3);
 BACKSET3013:=BACKSET(黄金柱33,4);
 FILTER3013:=FILTER(BACKSET3013,3);
黄金柱4T:=基价柱阳 AND 均价升 AND 均量减 AND 不破价顶 AND 不破价底 AND 基前跳空 AND NOT(黄金柱1) AND NOT(黄金柱1T) AND NOT(黄金柱2) AND NOT(黄金柱2T) AND NOT(黄金柱3) AND NOT(黄金柱3T);
 BACKSET401T:=BACKSET(黄金柱4T,5);
 FILTER401T:=FILTER(BACKSET401T,4);
黄金柱4:=基价柱阳 AND 均价升 AND 均量减 AND 不破价顶 AND 不破价底 AND NOT(黄金柱1) AND NOT(黄金柱2) AND NOT(黄金柱3) AND NOT(黄金柱1T) AND NOT(黄金柱2T) AND NOT(黄金柱3T);
 BACKSET401:=BACKSET(黄金柱4,4);
 FILTER401:=FILTER(BACKSET401,3);
黄金柱41:=黄金柱4 AND REF(黄金柱4,1);
 BACKSET4011:=BACKSET(黄金柱41,4);
 FILTER4011:=FILTER(BACKSET4011,3);
黄金柱42:=黄金柱4 AND REF(黄金柱4,2);
 BACKSET4012:=BACKSET(黄金柱42,4);
 FILTER4012:=FILTER(BACKSET4012,3);
黄金柱43:=黄金柱4 AND REF(黄金柱4,3);
 BACKSET4013:=BACKSET(黄金柱43,4);
 FILTER4013:=FILTER(BACKSET4013,3);
黄金柱5T:=基价柱阳 AND 均价升 AND 价量比 AND 不破价顶 AND 不破价底 AND 基前跳空 AND NOT(黄金柱1) AND NOT(黄金柱2) AND NOT(黄金柱3) AND NOT(黄金柱4) AND NOT(黄金柱1T) AND NOT(黄金柱2T) AND NOT(黄金柱3T) AND NOT(黄金柱4T);
 BACKSET501T:=BACKSET(黄金柱5T,5);
 FILTER501T:=FILTER(BACKSET501T,4);
黄金柱5:=基价柱阳 AND 均价升 AND 价量比 AND 不破价顶 AND 不破价底 AND NOT(黄金柱1) AND NOT(黄金柱2) AND NOT(黄金柱3) AND NOT(黄金柱4) AND NOT(黄金柱1T) AND NOT(黄金柱2T) AND NOT(黄金柱3T) AND NOT(黄金柱4T);
 BACKSET501:=BACKSET(黄金柱5,4);
 FILTER501:=FILTER(BACKSET501,3);
黄金柱51:=黄金柱5 AND REF(黄金柱5,1);
 BACKSET5011:=BACKSET(黄金柱51,4);
 FILTER5011:=FILTER(BACKSET5011,3);
黄金柱52:=黄金柱5 AND REF(黄金柱5,2);
 BACKSET5012:=BACKSET(黄金柱52,4);
 FILTER5012:=FILTER(BACKSET5012,3);
黄金柱53:=黄金柱5 AND REF(黄金柱5,3);
 BACKSET5013:=BACKSET(黄金柱53,4);
 FILTER5013:=FILTER(BACKSET5013,3);
黄金柱6T:=基价柱阳 AND 均价升 AND 日价量比升 AND 不破价顶 AND 不破价底 AND 基前跳空 AND NOT(黄金柱1) AND NOT(黄金柱2) AND NOT(黄金柱3) AND NOT(黄金柱4) AND NOT(黄金柱5) AND NOT(黄金柱1T) AND NOT(黄金柱2T) AND NOT(黄金柱3T) AND NOT(黄金柱4T) AND NOT(黄金柱5T);
 BACKSET601T:=BACKSET(黄金柱6T,5);
 FILTER601T:=FILTER(BACKSET601T,4);
黄金柱6:=基价柱阳 AND 均价升 AND 日价量比升 AND 不破价顶 AND 不破价底 AND NOT(黄金柱1) AND NOT(黄金柱2) AND NOT(黄金柱3) AND NOT(黄金柱4) AND NOT(黄金柱5) AND NOT(黄金柱1T) AND NOT(黄金柱2T) AND NOT(黄金柱3T) AND NOT(黄金柱4T) AND NOT(黄金柱5T);
 BACKSET601:=BACKSET(黄金柱6,4);
 FILTER601:=FILTER(BACKSET601,3);
黄金柱61:=黄金柱6 AND REF(黄金柱6,1);
 BACKSET6011:=BACKSET(黄金柱61,4);
 FILTER6011:=FILTER(BACKSET6011,3);
黄金柱62:=黄金柱6 AND REF(黄金柱6,2);
 BACKSET6012:=BACKSET(黄金柱62,4);
 FILTER6012:=FILTER(BACKSET6012,3);
黄金柱63:=黄金柱6 AND REF(黄金柱6,3);
 BACKSET6013:=BACKSET(黄金柱63,4);
 FILTER6013:=FILTER(BACKSET6013,3);
 FIL1:=(FILTER101 AND NOT(REF(FILTER101,4))) OR (FILTER1011 AND NOT(REF(FILTER1011,4))) OR (FILTER1012 AND NOT(REF(FILTER1012,4))) OR (FILTER1013 AND NOT(REF(FILTER1013,4)));
 FIL2:=(FILTER201 AND NOT(REF(FILTER201,4))) OR (FILTER2011 AND NOT(REF(FILTER2011,4))) OR (FILTER2012 AND NOT(REF(FILTER2012,4))) OR (FILTER2013 AND NOT(REF(FILTER2013,4)));
 FIL3:=(FILTER301 AND NOT(REF(FILTER301,4))) OR (FILTER3011 AND NOT(REF(FILTER3011,4))) OR (FILTER3012 AND NOT(REF(FILTER3012,4))) OR (FILTER3013 AND NOT(REF(FILTER3013,4)));
 FIL4:=(FILTER401 AND NOT(REF(FILTER401,4))) OR (FILTER4011 AND NOT(REF(FILTER4011,4))) OR (FILTER4012 AND NOT(REF(FILTER4012,4))) OR (FILTER4013 AND NOT(REF(FILTER4013,4)));
 FIL5:=(FILTER501 AND NOT(REF(FILTER501,4))) OR (FILTER5011 AND NOT(REF(FILTER5011,4))) OR (FILTER5012 AND NOT(REF(FILTER5012,4))) OR (FILTER5013 AND NOT(REF(FILTER5013,4)));
 FIL6:=(FILTER601 AND NOT(REF(FILTER601,4))) OR (FILTER6011 AND NOT(REF(FILTER6011,4))) OR (FILTER6012 AND NOT(REF(FILTER6012,4))) OR (FILTER6013 AND NOT(REF(FILTER6013,4)));
 FIL:=FIL1 OR FIL2 OR FIL3 OR FIL4 OR FIL5 OR FIL6;
 STICKLINE(FIL AND NOT(REF(FIL,4)),OPEN,CLOSE,0.5,0),COLOR00FF00;
 {DRAWTEXT (FIL AND NOT(REF(FIL,4)),LOW*0.986,'↖黄金柱'),COLOR0099FF;}
 K1:=SUMBARS(FIL,1);
 STICKLINE(K1 AND 金线=1,REF(C,K1-1),REF(C,K1-1),10,0),COLOR8822FF;
 FIL1T:=(FILTER101T AND NOT(REF(FILTER101T,5)));
 FIL2T:=(FILTER201T AND NOT(REF(FILTER201T,5)));
 FIL3T:=(FILTER301T AND NOT(REF(FILTER301T,5)));
 FIL4T:=(FILTER401T AND NOT(REF(FILTER401T,5)));
 FIL5T:=(FILTER501T AND NOT(REF(FILTER501T,5)));
 FIL6T:=(FILTER601T AND NOT(REF(FILTER601T,5)));
 FILT:=FIL1T OR FIL2T OR FIL3T OR FIL4T OR FIL5T OR FIL6T;
 STICKLINE(FILT AND NOT(REF(FILT,5)),OPEN,CLOSE,1,0),COLOR0000FF;
 DRAWTEXT (FILT AND NOT(REF(FILT,5)),LOW*0.978,'↖元帅柱'),COLOR0000FF;
 K2:=SUMBARS(FILT,1);
 STICKLINE(K2 AND 金线=1,REF(C,K2-1),REF(C,K2-1),10,0),COLOR8822FF;
黄金柱LJ:=(黄金柱1 OR 黄金柱2 OR 黄金柱3 OR 黄金柱4 OR 黄金柱5 OR 黄金柱6 ) AND 均线 AND 临界点;
BACKSET10LJ:=BACKSET(黄金柱LJ ,4);
 FILTER10LJ:=FILTER(BACKSET10LJ,3);
 STICKLINE(FILTER10LJ AND NOT(REF(FILTER10LJ,4)),OPEN,CLOSE,3,0),COLOR0099FF;
 DRAWTEXT(FILTER10LJ AND NOT(REF(FILTER10LJ,4)) ,LOW*0.958,'↖临界点'),COLOR0099FF;
黄金柱LJT:=(黄金柱1T OR 黄金柱2T OR 黄金柱3T OR 黄金柱4T OR 黄金柱5T OR 黄金柱6T) AND 均线 AND 临界点 ;
BACKSET10LJT:=BACKSET(黄金柱LJT ,5);
 FILTER10LJT:=FILTER(BACKSET10LJT,5);
 STICKLINE(FILTER10LJT AND NOT(REF(FILTER10LJT,4)),OPEN,CLOSE,3,0),COLOR0099FF;
 DRAWTEXT(FILTER10LJT AND NOT(REF(FILTER10LJT,4)) ,LOW*0.958,'↖临界点'),COLOR0099FF;

PL10:=ZIG(3,10);
 EN2:=PL10>REF(PL10,1) AND REF(PL10,1)<=REF(PL10,2) AND REF(PL10,2)<=REF(PL10,3);
 EX2:=PL10<REF(PL10,1) AND REF(PL10,1)>=REF(PL10,2) AND REF(PL10,2)>=REF(PL10,3);
 PL20:=ZIG(3,20);
 EN3:=PL20>REF(PL20,1) AND REF(PL20,1)<=REF(PL20,2) AND REF(PL20,2)<=REF(PL20,3);
 EX3:=PL20<REF(PL20,1) AND REF(PL20,1)>=REF(PL20,2) AND REF(PL20,2)>=REF(PL20,3);
走强3:=BARSLAST(PL20<REF(PL20,1));
走弱3:=BARSLAST(PL20>REF(PL20,1));

ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走强3),0);

DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱3),0);

DRAWTEXT(EN2 AND DTJZ10=1,L*0.95,'↖买(2)'),COLORFFFFFF;
 DRAWTEXT(EN3 AND ZTJZ10=1,L*0.95,'↖买1'),COLORYELLOW;

DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2,L*0.95,'↖买2'),COLORFF00FF;

{整理三角形主图}
T:=BARSLAST(CROSS((H>REF(H,1) AND H>REFX(H,1)),0.5));
 A:=IF(T=0,H,DRAWNULL);
 HHH:=ALIGNRIGHT(A);
 H1:=CONST(HHH);
 GD:=BARSLAST(CROSS(A>H1,0.5));
 DT:=BARSLAST(A=H1);
 T1:=BARSLAST(CROSS((L<REF(L,1) AND L<REFX(L,1)),0.5));
 LT:=BARSLAST(L=LLV(L,GD+1) AND T1=0);
 LLL:=CONST(REF(L,T1));
 LT1:=BARSLAST(L=LLL);
 DRAWLINE(CURRBARSCOUNT=CONST(GD)+1,A,CURRBARSCOUNT=CONST(DT)+1,H1,1),COLORYELLOW;
 DRAWLINE(CURRBARSCOUNT=CONST(LT)+1,L,CURRBARSCOUNT=CONST(LT1)+1,L,1),COLORYELLOW;