通达信变色分时主图指标公式源码

M:=8;

获利比例:=WINNER(C)*100,NODRAW;

基点:=获利比例>50 AND 获利比例<59,NODRAW;

选:IF(REF(基点,1)=1,C>REF(H,1),IF(REF(获利比例,1)<=50,C>REF(REF(H,BARSLAST(基点)),1),0))

AND BARSLAST(基点)<M AND REF(BARSLAST(基点),1)<M-1,NODRAW;

筹码参数:=TOTALCAPITAL*100/FINANCE(46) NODRAW;

筹码获利率:=WINNER(C)*100 NODRAW;

TTT:=DRAWSL(基点,H,0,IF(REFX(BARSNEXT(基点),1)=DRAWNULL,CURRBARSCOUNT,REFX(BARSNEXT(基点),1)+1),0)COLORBLUE,LINETHICK2;

A:=WINNER(C)*100;

B:=BETWEEN(A,50,59);

Q1:=BACKSET(BARSTATUS=2,BARSLAST(B)+1);

前期:=Q1>REF(Q1,1);

向右水平线:=REF(H,BARSLAST(前期))COLORBLUE,LINETHICK2;

E:=(HIGH+LOW+OPEN+2*CLOSE)/5;

分时底:LLV(L,380),COLORGREEN,POINTDOT,NODRAW;

最新:C,COLORWHITE,NODRAW;

IF( C>=REF(TTT,1),C,DRAWNULL),LINETHICK2,COLORCYAN;

IF( C>=REF(向右水平线,1) ,C,DRAWNULL),LINETHICK2,COLORRED;

IF( C<=REF(分时底,1),C,DRAWNULL),LINETHICK2,COLORGREEN;

量价:=(vol/CLOSE)/3;

A2:=SUM((IF(((量价>0.20) AND (CLOSE>(REF(CLOSE,1)))),量价,0)),0);

A3:=SUM((IF(((量价>0.20) AND (CLOSE< (REF(CLOSE,1)))),量价,0)),0);

A6:=A2+A3;

DD1:=1;

比:=A2/A3;

AA1:=STRCAT(STRCAT('买= ',CON2STR((100*A2)/A6,0)),'%');

AA2:=STRCAT(STRCAT('卖= ',CON2STR((100*A3)/A6,0)),'%');

AA3:=STRCAT(STRCAT('差= ',CON2STR((100*(A2-A3))/A6,0)),'%');

DRAWTEXT_FIX(DD1=1,0.8,0.87,0,AA1),COLORRED;

DRAWTEXT_FIX(DD1=1,0.8,0.92,0,AA2),COLORGREEN;

DRAWTEXT_FIX(DD1=1,0.8,0.99,0,AA3),COLOR00FFFF;

现价:=C,COLORWHITE,LINETHICK2;

均价11:=SUM(C*V,240)/SUM(V,240),COLORRED,LINETHICK2;

TT:=BARSCOUNT(C);

前高:=REF(HHV(H,TT),1);

突破:=crOSS(C,REF(HHV(H,TT),1)) AND C/均价11<1.09 AND TT>1 AND TT<240;

主力扫盘:=COUNT(突破,13)>=3 AND CROSS(C,REF(HHV(H,TT),1));

已主力扫盘:=BARSLAST(主力扫盘)<13;

HJ_2:=DYNAINFO(4)>0 AND HHV(HIGH,2)/LLV(LOW,2)<1.25 AND REF(CLOSE,1)<LLV(LOW,3)+(HHV(HIGH,3)-LLV(LOW,3))*0.85;

HJ_9:=EMA(CLOSE,2);

HJ_10:=EMA(CLOSE,3);

HJ_11:=MAX(HJ_9,HJ_10);

X2:=CLOSE>HJ_11

AND HJ_2 AND (CLOSE>REF(HHV(HIGH,2),1) AND

(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>0.015) AND (V/CAPITAL<=0.2) AND

C/REF(C,1)<1.07;

NX:=MA(((SLOPE(C,20)*5)+C),10);

{中枢}

B1:=HOUR=09 AND MINUTE=45;

B20:=LLV(L,15);

B30:=BARSLAST(B1);

B4:=REF(B20,B30);

B5:=CONST(B4),COLORFF80FF,CIRCLEDOT,LINETHICK2;

C1:=HOUR=09 AND MINUTE=45;

C2:=HHV(H,15);

C3:=BARSLAST(C1);

C4:=REF(C2,C3);

C5:=CONST(C4),COLORFF80FF,CIRCLEDOT,LINETHICK2;

DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);

DEA:=EMA(DIF,9);

macd10:=(DIF-DEA)*2;

AA0:=MACD10>00 AND DIF>0 AND DEA>0;

A100:=HOUR=10 AND MINUTE=0;

A20:=HHV(H,30);

A30:=BARSLAST(A100);

A40:=REF(A20,A30);

A50:=CONST(A40);

A80:=CLOSE>A50 AND REF(C<=A50,1) AND CLOSE>NX;

AB:=FILTER(A80,100);

A90:=DYNAINFO(3);

AC:=CLOSE<=A90*1.04 AND CLOSE>A90;

量比:=V/REF(MA(V,5),1);

XG:=AA0 AND AB AND AC AND A40>A90 AND 量比>=1;

HJ_4:=CLOSE;

HJ_5:=(CLOSE-REF(CLOSE,5))/REF(CLOSE,5);

BAB1:=STICKLINE(HJ_5>0,DYNAINFO(3),DYNAINFO(3)*(1+HJ_5),0.1,0);

BAB2:=STICKLINE(HJ_5<0,DYNAINFO(3),DYNAINFO(3)*(1+HJ_5),0.1,0);

HJ_6:=CLOSE/DYNAINFO(3);

HJ_7:=FILTER(HJ_5>0.015 AND HJ_5>REF(HJ_5,1)*2 AND VOL>REF(VOL,1)*2 AND CLOSE>REF(CLOSE,1) OR HJ_5>0.025,240);

H1:=MAX(DYNAINFO(3),DYNAINFO(5));

L1:=MIN(DYNAINFO(3),DYNAINFO(6));

P1:=H1-L1;

阻力:L1+P1*8/9,COLORLIRED,DOTLINE;

支撑:L1+P1*0.5/9,COLORGREEN,DOTLINE;

DRAWTEXT(FILTER(CROSS(C,支撑),240),L-0.01,'吸筹'),COLOR0000FF;

DRAWTEXT(FILTER(CROSS(阻力,C),240),H-0.01,'压'),COLOR0000FF;

WA1:=V*C/100;

WA2:=SUM((IF(((WA1/8>20) AND (CLOSE>(REF(CLOSE,1)))),WA1,0)),0);

WA3:=SUM((IF(((WA1/8>20) AND (CLOSE<(REF(CLOSE,1)))),WA1,0)),0);

WA4:=SUM((IF(((WA1/8<20) AND (CLOSE>(REF(CLOSE,1)))),WA1,0)),0);

WA5:=SUM((IF(((WA1/8<20) AND (CLOSE<(REF(CLOSE,1)))),WA1,0)),0);

机构买盘:=(WA2);

机构卖盘:=(WA3);

散户买盘:=(WA4);

散户卖盘:=(WA5);

BU:=BARSLAST(CLOSE=HHV(CLOSE,60));

SE:=BARSLAST(CLOSE=LLV(CLOSE,60));

KK1:=SE;

KK2:=BU;

LM1:=SE;

LM2:=BU;

OK:=KK1>KK2 AND LM1>LM2;
源码未复制完,下载附件......

 
 

原理解析：
M赋值:8
获利比例赋值:C计算的获利盘比例*100,NODRAW
基点赋值:获利比例>50 AND 获利比例<59,NODRAW
输出选:IF(1日前的基点=1,C>1日前的H,IF(1日前的获利比例<=50,C>REF(REF(H,上次基点距今天数),1),0))
AND 上次基点距今天数 筹码参数赋值:TOTAL487280310656188670APITAL*100/FINANCE(46) NODRAW
筹码获利率赋值:C计算的获利盘比例*100 NODRAW
TTT赋值:DRAWSL(基点,H,0,IF(REFX(BARSNEXT(基点),1)=DRAWNULL,CURRBARSCOUNT,REFX(BARSNEXT(基点),1)+1),0)COLORBLUE,LINETHICK2
A赋值:C计算的获利盘比例*100
B赋值:BETWEEN(A,50,59)
Q1赋值:BACKSET(BARSTATUS=2,上次B距今天数+1)
前期赋值:Q1>1日前的Q1
向右水平线赋值:REF(H,上次前期距今天数)COLORBLUE,LINETHICK2
E赋值:(最高价+最低价+OPEN+2*CLOSE)/5
输出分时底:380日内L最低值,COLORGREEN,POINTDOT,NODRAW
输出最新:C,COLORWHITE,NODRAW
IF( C>=1日前的TTT,C,DRAWNULL),LINETHICK2,COLORCYAN
IF( C>=1日前的向右水平线 ,C,DRAWNULL),LINETHICK2,COLORRED
IF( C<=1日前的分时底,C,DRAWNULL),LINETHICK2,COLORGREEN
量价赋值:(成交量/CLOSE)/3
A2:=SUM((IF(((量价>0.20) AND (CLOSE>(1日前的CLOSE))),量价,0)),0)
A3:=SUM((IF(((量价>0.20) AND (CLOSE< (1日前的CLOSE))),量价,0)),0)
A6:=A2+A3
DD1赋值:1
比赋值:A2/A3
AA1:=STR487280310656188670AT(STR487280310656188670AT('买= ',CON2STR((100*A2)/A6,0)),'%')
AA2:=STR487280310656188670AT(STR487280310656188670AT('卖= ',CON2STR((100*A3)/A6,0)),'%')
AA3:=STR487280310656188670AT(STR487280310656188670AT('差= ',CON2STR((100*(A2-A3))/A6,0)),'%')
当满足条件DD1=1时,在横轴0.8纵轴0.87位置书写文字
当满足条件DD1=1时,在横轴0.8纵轴0.92位置书写文字
当满足条件DD1=1时,在横轴0.8纵轴0.99位置书写文字
现价赋值:C,COLORWHITE,LINETHICK2
均价11赋值:240的C*V日累和/240的V日累和,COLORRED,LINETHICK2
TT赋值:C的有效数据周期数
前高赋值:REF(TT日内H最高值,1)
突破赋值:CROSS(C,REF(TT日内H最高值,1)) AND C/均价11<1.09 AND TT>1 AND TT<240
主力扫盘赋值:统计13日满足突破的天数>=3 AND CROSS(C,REF(TT日内H最高值,1))
已主力扫盘赋值:上次主力扫盘距今天数<13
HJ_2赋值:DYNAINFO(4)>0 AND 2日内最高价最高值/2日内最低价最低值<1.25 AND 1日前的CLOSE<3日内最低价最低值+(3日内最高价最高值-3日内最低价最低值)*0.85
HJ_9赋值:CLOSE的2日指数移动平均
HJ_10赋值:CLOSE的3日指数移动平均
HJ_11赋值:HJ_9和HJ_10较大值
X2赋值:CLOSE>HJ_11
AND HJ_2 AND (CLOSE>REF(2日内最高价最高值,1) AND
(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>0.015) AND (V/487280310656188670APITAL<=0.2) AND C/REF(C,1)<1.07
NX赋值:MA(((SLOPE(C,20)*5)+C),10)
{中枢}
B1:=HOUR=09 AND MINUTE=45
B20:=15日内L最低值
B30:=上次B1距今天数
B4:=B30日前的B20
B5:=CONST(B4),COLORFF80FF,CIRCLEDOT,LINETHICK2
C1赋值:HOUR=09 AND MINUTE=45
C2赋值:15日内H最高值
C3赋值:上次C1距今天数
C4赋值:C3日前的C2
C5赋值:CONST(C4),COLORFF80FF,CIRCLEDOT,LINETHICK2
DIF赋值:CLOSE的12日指数移动平均-CLOSE的26日指数移动平均
DEA赋值:DIF的9日指数移动平均
MACD10:=(DIF-DEA)*2
AA0:=MACD10>00 AND DIF>0 AND DEA>0
A100:=HOUR=10 AND MINUTE=0
A20:=30日内H最高值
A30:=上次A100距今天数
A40:=A30日前的A20
A50:=CONST(A40)
A80:=CLOSE>A50 AND 1日前的C<=A50 AND CLOSE>NX
AB赋值:A80的100过滤
A90:=DYNAINFO(3)
AC:=CLOSE<=A90*1.04 AND CLOSE>A90
量比赋值:V/REF(V的5日简单移动平均,1)
XG赋值:AA0 AND AB AND AC AND A40>A90 AND 量比>=1
HJ_4赋值:CLOSE
HJ_5赋值:(CLOSE-5日前的CLOSE)/5日前的CLOSE
BAB1:=STICKLINE(HJ_5>0,DYNAINFO(3),DYNAINFO(3)*(1+HJ_5),0.1,0)
BAB2:=STICKLINE(HJ_5<0,DYNAINFO(3),DYNAINFO(3)*(1+HJ_5),0.1,0)
HJ_6赋值:CLOSE/DYNAINFO(3)
HJ_7赋值:FILTER(HJ_5>0.015 AND HJ_5>1日前的HJ_5*2 AND 成交量>1日前的成交量*2 AND CLOSE>1日前的CLOSE OR HJ_5>0.025,240)
H1赋值:MAX(DYNAINFO(3),DYNAINFO(5))
L1赋值:MIN(DYNAINFO(3),DYNAINFO(6))
P1赋值:H1-L1
输出阻力:L1+P1*8/9,COLORLIRED,DOTLINE
输出支撑:L1+P1*0.5/9,COLORGREEN,DOTLINE
DRAWTEXT(FILTER(C上穿支撑,240),L-0.01,'吸筹'),COLOR0000FF
DRAWTEXT(FILTER(阻力上穿C,240),H-0.01,'压'),COLOR0000FF
WA1:=V*C/100
WA2:=SUM((IF(((WA1/8>20) AND (CLOSE>(1日前的CLOSE))),WA1,0)),0)
WA3:=SUM((IF(((WA1/8>20) AND (CLOSE<(1日前的CLOSE))),WA1,0)),0)
WA4:=SUM((IF(((WA1/8<20) AND (CLOSE>(1日前的CLOSE))),WA1,0)),0)
WA5:=SUM((IF(((WA1/8<20) AND (CLOSE<(1日前的CLOSE))),WA1,0)),0)
机构买盘赋值:(WA2)
机构卖盘赋值:(WA3)
散户买盘赋值:(WA4)
散户卖盘赋值:(WA5)
BU:=上次CLOSE=60日内CLOSE最高值距今天数
SE赋值:上次CLOSE=60日内CLOSE最低值距今天数
KK1赋值:SE
KK2赋值:BU
LM1:=SE
LM2:=BU
OK赋值:KK1>KK2 AND LM1>LM2