以下是通达信简睿角力主图源码（无源码的请下载附件导入）

天YA)=-1 OR 判断YXA=-1),-1,0);
低保留YX:=IF((低保留YXA=-1 OR 低保留YXB=-1) AND L<REF(H,距前高天YA+1),-1,0);
AAAD:=IF(高保留YX=1 AND 低保留YX=-1 AND H>REF(H,REF(距前高天YA,1)+2),1,IF(高保留YX=1 AND 低保留YX=-1 AND L<REF(L,REF(距前低天YA,1)+2),-1,0));
极点保留:=IF(AAAD=0,高保留YX+低保留YX,AAAD);
XA:=DRAWLINE(极点保留=-1,L,REF(极点保留,1)=-1,REF(L,1),1);
XB:=DRAWLINE(极点保留=1,H,REF(极点保留,1)=1,REF(H,1),1);
XAS:=DRAWLINE(极点保留=-1,XB,REF(极点保留,1)=-1,REF(XB,1),1);
XBS:=DRAWLINE(极点保留=1,XA,REF(极点保留,1)=1,REF(XA,1),1);
XA45:=(XA+XAS)/2;           XB45:=(XB+XBS)/2;
XA63:=(XAS-XA)*3/4+XA;      XB63:=XB-(XB-XBS)*3/4;

DRAWBAND(XA45,RGB(0,150,100),XA63,RGB(0,150,100));
DRAWBAND(XB45,RGB(185,96,9),XB63,RGB(185,96,9));
局部极点:IF(极点保留=-1,L,IF(极点保留=1,H,DRAWNULL)),CIRCLEDOT,COLORYELLOW,LINETHICK5;
压1:IF(BETWEEN(XA45,XB45,XB63),XA45,DRAWNULL),COLOR008800;
压2:IF(BETWEEN(XA63,XB45,XB63),XA63,DRAWNULL),COLOR008800;
过压底:REF(C,1)<XA45 AND C>XA45 AND C<35 AND CAPITAL<6000000,COLORYELLOW,NODRAW;
过压顶:REF(C,1)<XA63 AND C>XA63  AND C<35 AND CAPITAL<6000000,NODRAW;
支撑底:REF(C,1)<XB63 AND C>XB63  AND C<35 AND CAPITAL<6000000,NODRAW;
支撑顶:REF(C,1)<XB45 AND C>XB45  AND C<35 AND CAPITAL<6000000,NODRAW;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);

量5:=EMA(EMA(VOL,5),5);
量35:=EMA(EMA(VOL,35),35);
VAR11:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
成交:=VOL;
主买:=IF(CLOSE>OPEN,VAR11*(HIGH-LOW),IF(CLOSE<OPEN,VAR11*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),COLOR00E521;
主卖:=IF(CLOSE>OPEN,VAR11*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,VAR11*(HIGH-LOW),VOL/2));
主买力度:=VOL/(主买-主卖);
买卖比:=主买/主卖;
昨日比:=买卖比/REF(买卖比,1);
净买:(主买-主卖)/100,NODRAW;
抢筹:=买卖比>4,NODRAW;
BB:=净买<0;
净买天数:BARSLAST(BB),COLORMAGENTA,NODRAW;

STICKLINE(净买>0,C,O,3,0),COLORRED;
STICKLINE(净买<0,C,O,1.8,0),COLORGREEN;
STICKLINE(抢筹,C,O,2,0),COLORYELLOW;
STICKLINE(主买力度>9,H,O,3,0),COLORWHITE;