通达信心爱画线主图指标公式源码

M1:=7;M2:=21;

获利%:WINNER(CLOSE)*100,NODRAW,COLORRED;

参考:MA(CLOSE,M1),COLORYELLOW;

趋势:MA(CLOSE,M2),COLORMAGENTA;

JRH:=HHV(C,2);

JRL:=LLV(C,2);

MA3:=MA(CLOSE,3);

YTSL:=(3*CLOSE+LOW+OPEN+HIGH)/6;

VAR1O:=(CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2));

VAR2O:=(REF(VAR1O,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));

VAR3O:=(REF(VAR2O,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));

VAR4O:=(REF(VAR3O,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));

VAR5O:=(REF(VAR4O,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));

VAR6O:=(REF(VAR5O,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));

VAR7O:=(REF(VAR6O,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));

VAR8O:=(REF(VAR7O,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));

VAR9O:=(REF(VAR8O,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));

VARAO:=(REF(VAR9O,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));

VARBO:=(REF(VARAO,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));

VARCO:=(REF(VARBO,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));

VARDO:=(CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2));

VAREO:=(REF(VARDO,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));

VARFO:=(REF(VAREO,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));

VAR10:=(REF(VARFO,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));

VAR11:=(REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));

VAR12:=(REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));

VAR13:=(REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));

VAR14:=(REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));

VAR15:=(REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));

VAR16:=(REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));

VAR17:=(REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));

VAR18:=(REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));

VAR19:=((REF(VARDO OR VAREO OR VARFO OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1)) AND VAR1O);

VAR1AO:=((REF(VAR1O OR VAR2O OR VAR3O OR VAR4O OR VAR5O OR VAR6O OR VAR7O OR VAR8O OR VAR9O OR VARAO OR VARBO OR VARCO,1)) AND VARDO);

红色持股:=VAR1O OR VAR2O OR VAR3O OR VAR4O OR VAR5O OR VAR6O OR VAR7O OR VAR8O OR VAR9O OR VARAO OR VARBO OR VARCO,COLOR0000FF,NODRAW;

离场A:=IF(红色持股,JRL,DRAWNULL);

明离场价:=离场A,COLORFF99FF,NODRAW;

今离场价:REF(离场A,1)COLOR0000FF,NODRAW;

青色观望:=VARDO OR VAREO OR VARFO OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,COLORFFFF00,NODRAW;

进:=IF(青色观望,JRH,DRAWNULL);

明进场价:=进,COLOR33AACC,NODRAW;

今进场价:REF(明进场价,1),COLORGREEN,NODRAW;

短买:VAR19,COLOR33AACC,NODRAW;

离场:VAR1AO,COLORFF99FF,NODRAW;

IF(MA(CLOSE,7)>=REF(MA(CLOSE,7),1),MA(CLOSE,7),DRAWNULL),COLORRED;

IF(MA(CLOSE,21)>=REF(MA(CLOSE,21),1),MA(CLOSE,21),DRAWNULL),COLORRED;

STICKLINE(ISLASTBAR AND (红色持股 OR REF(红色持股,1)=1),今离场价,今离场价,30,1),COLOR0000FF;

STICKLINE(ISLASTBAR AND (青色观望 OR REF(青色观望,1)=1),今进场价,今进场价,30,1),COLOR00FF00;

A7:=C-REF(C,1);

A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(Abs(A7),6),6);

SHORT:=7; LONG:=19;

RMA:=EMA(CLOSE,SHORT);

NMA:=EMA(CLOSE,LONG);

上升:DRAWLINE(L=LLV(L,BARSLAST(crOSS(NMA,RMA))+1)

,LLV(L,BARSLAST(CROSS(NMA,RMA))+1),

H=HHV(H,BARSLAST(CROSS(RMA,NMA))+1),HHV(H,BARSLAST(CROSS(RMA,NMA))+1),0),COLORLIRED;

下降:DRAWLINE(H=HHV(H,BARSLAST(CROSS(RMA,NMA))+1),

HHV(H,BARSLAST(CROSS(RMA,NMA))+1),L=LLV(L,BARSLAST(CROSS(NMA,RMA))+1)

,LLV(L,BARSLAST(CROSS(NMA,RMA))+1),0),COLOR555555;

买进:=(LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND

CROSS(A8,MA(A8,2))) AND REF(下降,1)<REF(下降,2) AND 上升>REF(下降,1);

趋势区:=IF((EVERY(下降>=REF(下降,1),1)),4,2);

低买:=IF(((CROSS(趋势区,2.1))),1,0);

高卖:=IF(((CROSS(3.9,趋势区))),1,0);

DRAWICON(低买,上升-0.2,1);

DRAWICON(高卖,下降+0.2,2);

A1:=REF(H,8)=HHV(H,2*8+1);

B1:=FILTER(A1,8);

C1:=BACKSET(B1,8+1);

D1:=FILTER(C1,8);{高点}

R11:=BACKSET(ISLASTBAR,BARSLAST(D1)+1);S11:=R11>REF(R11,1);

DRAWLINE(D1,H,S11,H,1),COLORBLUE,LINETHICK1;

A2:=REF(L,8)=LLV(L,2*8+1);

B2:=FILTER(A2,8);

C2:=BACKSET(B2,8+1);

D2:=FILTER(C2,8);{低点}

T11:=BACKSET(ISLASTBAR,BARSLAST(D2)+1);U11:=T11>REF(T11,1);

DRAWLINE(D2,L,U11,L,1),COLORBLUE,LINETHICK1;

M:=INTPART(3*8/5);

A12:=REF(H,M)=HHV(H,2*M+1);

B12:=FILTER(A12,M);

C12:=BACKSET(B12,M+1);

D12:=FILTER(C12,M);{高点}

R112:=BACKSET(ISLASTBAR,BARSLAST(D12)+1);S112:=R112>REF(R112,1);

DRAWLINE(D12,H,S112,H,1),COLORFFFF00,LINETHICK1;

A22:=REF(L,M)=LLV(L,2*M+1);

B22:=FILTER(A22,M);

C22:=BACKSET(B22,M+1);

D22:=FILTER(C22,M);{低点}

T112:=BACKSET(ISLASTBAR,BARSLAST(D22)+1);U112:=T112>REF(T112,1);

DRAWLINE(D22,L,U112,L,1),COLORFFFF00,LINETHICK1;

ZT:=C/REF(C,1)>1.096;

ZTBPJ:=REF(C,BARSLAST(ZT)+1)*0.98;{涨停不破价}

ZTBP:=BARSLAST(ZT)<30 AND (LLV(C,BARSLAST(ZT))>=ZTBPJ OR

LLV(C,BARSLAST(ZT))=ZTBPJ);{涨停不破}

 
 
上面源码未完......
下载附件里的源码.......

原理解析：
M1赋值:7
M2赋值:21
输出获利%:收盘价计算的获利盘比例*100,NODRAW,画红色
输出参考:收盘价的M1日简单移动平均,画黄色
输出趋势:收盘价的M2日简单移动平均,COLORMAGENTA
JRH赋值:2日内C最高值
JRL赋值:2日内C最低值
MA3赋值:收盘价的3日简单移动平均
YTSL赋值:(3*收盘价+最低价+开盘价+最高价)/6
VAR1O赋值:(收盘价>1日前的收盘价 AND 收盘价>2日前的收盘价)
VAR2O赋值:(1日前的VAR1O AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR3O赋值:(1日前的VAR2O AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VAR4O赋值:(1日前的VAR3O AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR5O赋值:(1日前的VAR4O AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VAR6O赋值:(1日前的VAR5O AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR7O赋值:(1日前的VAR6O AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VAR8O赋值:(1日前的VAR7O AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR9O赋值:(1日前的VAR8O AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VARAO赋值:(1日前的VAR9O AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VARBO赋值:(1日前的VARAO AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VARCO赋值:(1日前的VARBO AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VARDO赋值:(收盘价<1日前的收盘价 AND 收盘价<2日前的收盘价)
VAREO赋值:(1日前的VARDO AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VARFO赋值:(1日前的VAREO AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR10赋值:(1日前的VARFO AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VAR11赋值:(1日前的VAR10 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR12赋值:(1日前的VAR11 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VAR13赋值:(1日前的VAR12 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR14赋值:(1日前的VAR13 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VAR15赋值:(1日前的VAR14 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR16赋值:(1日前的VAR15 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VAR17赋值:(1日前的VAR16 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价)
VAR18赋值:(1日前的VAR17 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价)
VAR19赋值:((1日前的VARDO OR VAREO OR VARFO OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18) AND VAR1O)
VAR1AO赋值:((1日前的VAR1O OR VAR2O OR VAR3O OR VAR4O OR VAR5O OR VAR6O OR VAR7O OR VAR8O OR VAR9O OR VARAO OR VARBO OR VARCO) AND VARDO)
红色持股赋值:VAR1O OR VAR2O OR VAR3O OR VAR4O OR VAR5O OR VAR6O OR VAR7O OR VAR8O OR VAR9O OR VARAO OR VARBO OR VARCO,COLOR0000FF,NODRAW
如果红色持股返回JRL否则返回DRAWNULL
明离场价赋值:离场A,COLORFF99FF,NODRAW
输出今离场价:1日前的离场ACOLOR0000FF,NODRAW
青色观望赋值:VARDO OR VAREO OR VARFO OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,COLORFFFF00,NODRAW
如果青色观望返回JRH否则返回DRAWNULL
明进场价:=进,COLOR33AACC,NODRAW
今进场价:1日前的明进场价,画绿色,NODRAW
输出短买:VAR19,COLOR33AACC,NODRAW
输出离场:VAR1AO,COLORFF99FF,NODRAW
IF(收盘价的7日简单移动平均>=REF(收盘价的7日简单移动平均,1),收盘价的7日简单移动平均,DRAWNULL),画红色
IF(收盘价的21日简单移动平均>=REF(收盘价的21日简单移动平均,1),收盘价的21日简单移动平均,DRAWNULL),画红色
STICKLINE(ISLASTBAR AND (红色持股 OR 1日前的红色持股=1),今离场价,今离场价,30,1),COLOR0000FF
STICKLINE(ISLASTBAR AND (青色观望 OR 1日前的青色观望=1),今进场价,今进场价,30,1),COLOR00FF00
A7赋值:C-1日前的C
A8赋值:100*A7的6日指数移动平均,6)/EMA(EMA(A7的绝对值,6),6)
SHORT赋值:7
LONG赋值:19
RMA赋值:收盘价的SHORT日指数移动平均
NMA赋值:收盘价的LONG日指数移动平均
输出上升:DRAWLINE(L=LLV(L,上次NMA上穿RMA距今天数+1)
,LLV(L,上次NMA上穿RMA距今天数+1),
H=HHV(H,BARSLAST(RMA上穿NMA)+1),HHV(H,BARSLAST(RMA上穿NMA)+1),0),COLORLIRED
输出下降:DRAWLINE(H=HHV(H,上次RMA上穿NMA距今天数+1),
HHV(H,上次RMA上穿NMA距今天数+1),L=LLV(L,BARSLAST(NMA上穿RMA)+1)
,LLV(L,BARSLAST(NMA上穿RMA)+1),0),COLOR555555
买进赋值:(2日内A8最低值=7日内A8最低值 AND 统计2日满足A8<0的天数 AND CROSS(A8,A8的2日简单移动平均)) AND 1日前的下降<2日前的下降 AND 上升>1日前的下降
趋势区:=IF((EVERY(下降>=1日前的下降,1)),4,2)
低买赋值:IF(((趋势区上穿2.1)),1,0)
高卖赋值:IF(((3.9上穿趋势区)),1,0)
当满足条件低买时,在上升-0.2和1之间画图标
当满足条件高卖时,在下降+0.2和2之间画图标
A1赋值:8日前的H=2*8+1日内H最高值
B1赋值:A1的8过滤
C1赋值:BACKSET(B1,8+1)
D1赋值:C1的8过滤
{高点}
R11赋值:BACKSET(ISLASTBAR,上次D1距今天数+1)
S11赋值:R11>1日前的R11
DRAWLINE(D1,H,S11,H,1), 画蓝色,LINETHICK1
A2赋值:8日前的L=2*8+1日内L最低值
B2赋值:A2的8过滤
C2赋值:BACKSET(B2,8+1)
D2赋值:C2的8过滤
{低点}
T11赋值:BACKSET(ISLASTBAR,上次D2距今天数+1)
U11赋值:T11>1日前的T11
DRAWLINE(D2,L,U11,L,1), 画蓝色,LINETHICK1
M赋值:INTPART(3*8/5)
A12:=M日前的H=2*M+1日内H最高值
B12:=A12的M过滤
C12:=BACKSET(B12,M+1)
D12:=C12的M过滤
{高点}
R112:=BACKSET(ISLASTBAR,上次D12距今天数+1)
S112:=R112>1日前的R112
DRAWLINE(D12,H,S112,H,1),COLORFFFF00,LINETHICK1
A22:=M日前的L=2*M+1日内L最低值
B22:=A22的M过滤
C22:=BACKSET(B22,M+1)
D22:=C22的M过滤
{低点}
T112:=BACKSET(ISLASTBAR,上次D22距今天数+1)
U112:=T112>1日前的T112
DRAWLINE(D22,L,U112,L,1),COLORFFFF00,LINETHICK1
ZT赋值:C/1日前的C>1.096
ZTBPJ:=REF(C,上次ZT距今天数+1)*0.98
{涨停不破价}
ZTBP:=上次ZT距今天数<30 AND (LLV(C,上次ZT距今天数)>=ZTBPJ OR
LLV(C,上次ZT距今天数)=ZTBPJ)
{涨停不破}