通达信主图操盘手（附源码）

MA5:MA(C,5),COLORYELLOW;

MA10:MA(CLOSE,10),COLORFF00FF;

MA30:MA(C,30),COLORRED,LINETHICK2;

跌:IF(MA(CLOSE,30)<=REF(MA(CLOSE,30),1),MA(CLOSE,30),DRAWNULL),COLORGREEN,LINETHICK2;

MA60:MA(CLOSE,60),COLORFFCC66;

GJTJ1:=100*(C-LLV(L,5))/(HHV(C,5)-LLV(L,5));

GJTJ2:=100*(C-LLV(L,10))/(HHV(C,10)-LLV(L,10));

GJTJ3:=100*(C-LLV(L,20))/(HHV(C,20)-LLV(L,20));

GJTJ4:=100*(C-LLV(L,30))/(HHV(C,30)-LLV(L,30));

BAIJIN1:=BARSLAST(CROSS(30,GJTJ1))<2 AND

BARSLAST(CROSS(GJTJ1,50))<2;

BAIJIN2:=BARSLAST(CROSS(GJTJ4,GJTJ1))<2 AND GJTJ1>GJTJ4;

BAIJIN3:=GJTJ1>60 AND GJTJ4>70;

DRAWTEXT(BAIJIN1 AND BAIJIN2 AND BAIJIN3,L-0.02,'白金'),COLORWHITE;

HUANGJIN1:=BARSLAST(CROSS(50,GJTJ1))<3 AND

BARSLAST(CROSS(GJTJ1,50))<3;

HUANGJIN2:=BARSLAST(CROSS(GJTJ4,GJTJ1))<2 AND GJTJ1>GJTJ4;

DRAWTEXT(HUANGJIN1 AND HUANGJIN2,L-0.03,'黄金'),COLORYELLOW;

XG:=BARSLAST(CROSS(GJTJ4,GJTJ1))<5 AND GJTJ1>GJTJ4;

DRAWTEXT(COUNT(XG,3)=1 AND XG AND

C>MA(C,20),L-0.02,'启动金三角'),COLORRED;

ZHENCANG1:=BARSLAST(CROSS(GJTJ4,GJTJ1))>3 AND

BARSLAST(CROSS(GJTJ1,GJTJ4))<3;

ZHENCANG2:=BARSLAST(CROSS(GJTJ4,GJTJ2));

ZHENCANG3:=GJTJ3

ZHENCANG4:=BARSLAST(CROSS(GJTJ4,GJTJ3))>3 AND

BARSLAST(CROSS(GJTJ1,GJTJ4))<3;

ZHENCANG5:=GJTJ2

GJTJ1=100;

ZCB1:=ZHENCANG1>0 AND REF(ZHENCANG1,1)=0 AND REF(ZHENCANG1,2)>0;

DRAWTEXT(ZHENCANG1 AND ZHENCANG2 AND ZHENCANG3 AND ZHENCANG4 AND

ZHENCANG5,L-0.05,'震仓启点');

AA:=BARSLAST(CROSS(97,GJTJ1))<=1 AND BARSLAST(CROSS(GJTJ1,85))<=1;

BB:=BARSLAST(CROSS(97,GJTJ2))<=1 AND BARSLAST(CROSS(GJTJ2,85))<=1;

AA1:=AA AND BB;

AAA:=BARSLAST(CROSS(97,GJTJ1))<=2 AND BARSLAST(CROSS(GJTJ1,85))<=1;

BAA:=BARSLAST(CROSS(97,GJTJ2))<=2 AND BARSLAST(CROSS(GJTJ2,85))<=1;

AA2:=AA AND BB ;

AAAA:=BARSLAST(CROSS(97,GJTJ1))<=3 AND BARSLAST(CROSS(GJTJ1,85))<=1;

BAAA:=BARSLAST(CROSS(97,GJTJ2))<=3 AND BARSLAST(CROSS(GJTJ2,85))<=1;

AA3:=AAAA AND BAAA ;

BB1:=REF(AA1,1);

BB2:=REF(AA2,1);

BB3:=REF(AA3,1);

DD1:=GJTJ1=100 AND GJTJ2=100 AND AA1 ;

DD2:=GJTJ1=100 AND GJTJ2=100 AND AA2 ;

DD3:=GJTJ1=100 AND GJTJ2=100 AND AA3 ;

DRAWTEXT(DD1 OR DD2 OR DD3,L-0.02,'短线追涨'),COLORFF00FF;

AW:=BARSLAST(CROSS(95,GJTJ1))<=2;

BW:=BARSLAST(CROSS(95,GJTJ2))<=2;

EW:= GJTJ4

FW:=GJTJ2>50 AND GJTJ3>50;

GW:=GJTJ1=100 AND GJTJ2=100;

TXW:=COUNT(GW,2)=1;

DRAWTEXT(AW AND BW AND EW AND FW AND TXW,L-0.03,'起涨首日');

AQ:=GJTJ3=100;

BQ:=GJTJ4<90;

DRAWTEXT(COUNT(AQ,2) = 2 AND BQ,L-0.02,'波启前兆');

DSJ:=1;

GET:ZIG(3,N),COLORYELLOW;

PL5:=ZIG(3,5)*DSJ;

EN1:=ZIG(3,5)>REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)

AND REF(ZIG(3,5),2)<=REF(ZIG(3,5),3)*DSJ;

EX1:=ZIG(3,5)=REF(ZIG(3,5),2)

AND REF(ZIG(3,5),2)>=REF(ZIG(3,5),3)*DSJ;

PL10:=ZIG(3,10)*DSJ;

EN2:=ZIG(3,10)>REF(ZIG(3,10),1) AND

REF(ZIG(3,10),1)<=REF(ZIG(3,10),2) AND

REF(ZIG(3,10),2)<=REF(ZIG(3,10),3)*DSJ;

EX2:=ZIG(3,10)

REF(ZIG(3,10),1)>=REF(ZIG(3,10),2) AND

REF(ZIG(3,10),2)>=REF(ZIG(3,10),3)*DSJ;

PL20:=ZIG(3,20)*DSJ;

EN3:=ZIG(3,20)>REF(ZIG(3,20),1) AND

REF(ZIG(3,20),1)<=REF(ZIG(3,20),2) AND

REF(ZIG(3,20),2)<=REF(ZIG(3,20),3)*DSJ;

EX3:=ZIG(3,20)

REF(ZIG(3,20),1)>=REF(ZIG(3,20),2) AND

REF(ZIG(3,20),2)>=REF(ZIG(3,20),3)*DSJ;

PL40:=ZIG(3,40)*DSJ;

走强1:=BARSLAST(PL5

走弱1:=BARSLAST(PL5>REF(PL5,1));

走强2:=BARSLAST(PL10

走弱2:=BARSLAST(PL10>REF(PL10,1));

走强3:=BARSLAST(PL20

走弱3:=BARSLAST(PL20>REF(PL20,1));

ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走强2),0);

ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走强2),0);

DTJZ5:=IF(PL10

DTJD5:=IF(PL10

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

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

DTJZ10:=IF(PL20

DTJD10:=IF(PL20

DRAWTEXT(EN1 AND DTJZ5=1,L*0.98,'㈠'),COLORFFFF00;

DRAWTEXT(EX1 AND DTJD5=2,H*1.02,'㈡'),COLORFFFF00;

DRAWTEXT(EN2 AND ZTJZ5=1,L*0.98,'㈢'),COLORFFFF00;

DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJD5=1,H*1.02,'⑴'),COLORFF0000;

DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2,L*0.98,'⑵'),COLORFF0000;

DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJZ5=2,H*1.02,'⑶'),COLORF000F0;

DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,L*0.98,'⑷'),COLORFF0000;

DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.02,'⑸'),COLORFF0000;

DRAWTEXT(EN2 AND DTJZ10=1,L*0.94,'Ⅰ'),COLORFF0000;

DRAWTEXT(EX2 AND DTJD10=2,H*1.06,'Ⅱ'),COLORFF0000;

DRAWTEXT(EN3 AND ZTJZ10=1,L*0.94,'Ⅲ'),COLORFF0000;

DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND

ZTJD10=1,H*1.06,'①'),COLORFFFF00;

DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND

ZTJZ10=2,L*0.94,'②'),COLORFFFF00;

DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR

ZTJD10=2) AND EX2,H*1.06*DSJ,'③'),COLORFFFF00;

DRAWTEXT(EN2 AND PL20>REF(PL0,1) AND

ZTJZ10=3,L*0.94,'④'),COLORFFFF00;