通达信主图指标〖新股龙有心〗源码
【股龙有心】主图指标首次优化，现去除了合成部分的思路，去除了信号提示，在保留原创KDJ决策的基
础上加入重心交易决策，MACD决策，引力理论决策，力求可为长中短线全天候决策的实用主图指标。
QWX1:=HHV(CLOSE,30);
QWX2:=LLV(CLOSE,30);
QWX3:=CONST((QWX1+QWX2)/2);
QWX4:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
QWX5:=CONST((1-7/100)*(DMA(CLOSE,QWX4)));
QWX6:=CONST((1+7/100)*(DMA(CLOSE,QWX4)));
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
KX:=SMA(RSV,3,1);
DX:=SMA(KX,3,1);
JX:=3*KX-2*DX;
DIF:=(EMA(CLOSE,12)-EMA(CLOSE,26))*2+QWX3;
DEA:=EMA(DIF,9);
MCD:=(DIF-DEA)*2+QWX3;
DRAWBAND(MCD,RGB(120,0,100),QWX3,RGB(60,100,50));
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
牛熊线:(EMA(CLOSE,30)+EMA(CLOSE,72))/2,LINETHICK2,COLORGREEN;
N:=5;
M1:=10;
M2:=20;
M5:MA(CLOSE,N),COLORWHITE;
M10:MA(CLOSE,M1),COLORYELLOW;
M20:MA(CLOSE,M2),COLORFF00FF;
VAR1:=IF(CLOSE>OPEN,CLOSE,OPEN);
VAR2:=MEMA(CLOSE,5);
VAR3:=ATAN((VAR2/REF(VAR2,1)-1)*100);
VAR4:=IF(VAR3>0,VAR3,VAR3);
VAR5:=(CLOSE/REF(CLOSE,1)-1)*100;
VAR6:=VAR5<1.5 AND VAR5>-1.5;
今日之升★:LAST(VAR6,4,1) AND VAR5>2 AND VOL>REF(VOL,1),NODRAW,COLORYELLOW;
DRAWTEXT(今日之升★,L/1.01,'★'),COLORYELLOW;
强势:IF(VAR4>=REF(VAR4,1) AND VAR4>=0,M10,DRAWNULL),COLORRED,LINETHICK2;
整理:IF(VAR4<REF(VAR4,1) AND VAR4>0,M10,DRAWNULL),COLORGREEN,LINETHICK2;
支撑:IF(BARSLAST(CURRBARSCOUNT=5),QWX5,DRAWNULL),COLORCYAN;
阻力:IF(BARSLAST(CURRBARSCOUNT=5),QWX6,DRAWNULL),COLORYELLOW;
STICKLINE(CLOSE>REF(CLOSE,1)*1.0985 AND CLOSE=HIGH,CLOSE,OPEN,4,-1),COLOR00FFFF;
STICKLINE(CLOSE<REF(CLOSE,1)*0.9015 AND CLOSE=LOW,CLOSE,OPEN,4,-1),COLORGREEN;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3,0),COLORFF7700;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,2.2,0),COLORFF9900;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1.5,0),COLORFFBB00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,0.5,0),COLORCYAN;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0),COLOR000099;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.2,0),COLOR0000CC;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.5,0),COLOR0000FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0.5,0),COLORCC66FF;
STICKLINE(CROSS(M5,EMA(C,3)),VAR1,(OPEN+CLOSE)/2,3,0),COLOR009900;
STICKLINE(CROSS(M5,EMA(C,3)),VAR1,(OPEN+CLOSE)/2,2.2,0),COLOR00BB00;
STICKLINE(CROSS(M5,EMA(C,3)),VAR1,(OPEN+CLOSE)/2,1.5,0),COLOR00DD00;
STICKLINE(CROSS(M5,EMA(C,3)),VAR1,(OPEN+CLOSE)/2,0.5,0),COLOR00FF00;
STICKLINE(CROSS(EMA(C,3),M5),OPEN,(OPEN+CLOSE)/2,3,0),COLOR999999;
STICKLINE(CROSS(EMA(C,3),M5),OPEN,(OPEN+CLOSE)/2,2.2,0),COLORBBBBBB;
STICKLINE(CROSS(EMA(C,3),M5),OPEN,(OPEN+CLOSE)/2,1.5,0),COLORDDDDDD;
STICKLINE(CROSS(EMA(C,3),M5),OPEN,(OPEN+CLOSE)/2,0.5,0),COLORFFFFFF;
STICKLINE(CROSS(JX,DX),OPEN,CLOSE,0.5,0),COLORYELLOW;
STICKLINE(CROSS(DX,JX),OPEN,CLOSE,0.5,0),COLOR000099;
来函数检测结果如下：
该公式没有未来函数
定制、编写公式指标请联系QQ或微信同号：88652583
输出MA5:收盘价的5日简单移动平均
输出MA10:收盘价的10日简单移动平均
输出MA20:收盘价的20日简单移动平均
输出MA60:收盘价的60日简单移动平均
BB赋值:1日前的大盘的收盘价<2日前的大盘的收盘价 AND 2日前的收盘价*0.95>=1日前的收盘价 AND 1日前的开盘价/1日前的收盘价>=1.05 AND 1日前的收盘价<1日前的开盘价 AND 收阳线AND 收盘价/开盘价>=1.05 AND 收盘价>1日前的开盘价 AND 1日前的成交量(手)<2日前的成交量(手)
当满足条件BB时,在开盘价和收盘价位置之间画柱状线,宽度为4,0不为0则画空心柱.,画红色
当满足条件BB时,在开盘价和最高价位置之间画柱状线,宽度为0,0不为0则画空心柱.,画红色
当满足条件BB时,在最低价和收盘价位置之间画柱状线,宽度为0,0不为0则画空心柱.,画红色
当满足条件BB时,在最低价*0.98位置书写文字,画黄色
VAR1A赋值:4*(收盘价-5日内最低价的最低值)/(5日内最高价的最高值-5日内最低价的最低值)*100的5日[1日权重]移动平均-3*(收盘价-5日内最低价的最低值)/(5日内最高价的最高值-5日内最低价的最低值)*100的5日[1日权重]移动平均的3.2日[1日权重]移动平均
VAR2赋值:8
CC赋值:VAR1A上穿VAR2
当满足条件CC时,在最低价*0.98位置书写文字,COLOR0099FF
TYP赋值:(最高价+最低价+收盘价)/3
TYP1赋值:(TYP-TYP的14日简单移动平均)/(0.015*TYP的14日平均绝对偏差)<=20 AND 1日前的收盘价的21日简单移动平均<收盘价的21日简单移动平均
TJ1赋值:开盘价<1日前的收盘价和1日前的开盘价的较大值
TJ2赋值:1日前的收盘价>=收盘价的21日简单移动平均 AND 最低价/收盘价的21日简单移动平均>=1.015 AND 收盘价的144日简单移动平均>收盘价的250日简单移动平均 AND 成交量(手)<成交量(手)的10日简单移动平均 AND 2日前的成交量(手)和1日前的成交量(手)的较小值>成交量(手)
TJ3赋值:90日前的收盘价的250日简单移动平均<90日前的收盘价的144日简单移动平均 AND 收盘价的144日简单移动平均>收盘价的250日简单移动平均 AND 开盘价>收盘价的250日简单移动平均
TJ4赋值:10日前的最高价ANDREF(最高价,9)ANDREF(最高价,8)ANDREF(最高价,7)和6日前的最高价的较大值
TOUJI赋值:TYP1 AND TJ1 AND TJ2 AND 2日前的收盘价/2日前的开盘价<1.06 AND 收盘价/开盘价<=1.05 AND 5日内最高价的最高值/30日内最低价的最低值>=1.65 AND 5日前的最高价/1日前的最低价>=1.15 AND 1日前的收盘价/1日前的开盘价<=0.995 AND (最低价<2日前的最低价 OR (2日前的最高价-2日前的最低价)/(最高价-最低价)>=2) AND 开盘价/1日前的最低价<=1.04OR TYP1 AND TJ1 AND 开盘价/1日前的最低价<1.05 AND 1日前的最低价/4日前的开盘价<=0.85 AND 1日前的收盘价/1日前的开盘价<=1.03 AND 开盘价<1日前的收盘价 AND 5日内最高价的最高值/35日内最低价的最低值>1.35 AND 成交量(手)<成交量(手)的10日简单移动平均
TOUJI2赋值:TYP1 AND TJ1 AND TJ2 AND 开盘价/1日前的最低价<1.05 AND 开盘价/3日内最低价的最低值<1.1 AND 1日前的收盘价/1日前的开盘价<=1.05 AND 4日内最高价的最高值/16日内最低价的最低值>=1.35 AND 4日前的开盘价/2日前的收盘价>=1.08 AND 2日前的收盘价/2日前的开盘价<=0.995 AND (2日前的最低价<3日前的最低价 OR (3日前的最高价-3日前的最低价)/(1日前的最高价-1日前的最低价)>=2) AND 最低价<1日前的收盘价和1日前的开盘价的较小值OR TYP1 AND TJ1 AND 10日内最高价的最高值/25日内最低价的最低值>=1.3 AND 5日前的收盘价<5日前的最高价 AND 4日前的收盘价<5日前的收盘价 AND 3日前的收盘价<4日前的收盘价 AND 2日前的收盘价<3日前的收盘价 AND 1日前的收盘价<2日前的收盘价 AND 最低价<1日前的最低价 AND MA5/开盘价<1.1
DATOUJI赋值:TYP1 AND TJ3 AND 开盘价<5日前的收盘价 AND 开盘价<=1日前的收盘价 AND 10日前的最高价/开盘价>=1.17 AND 10日内最高价的最高值/30日内最低价的最低值>1.4 AND (成交量(手)的10日简单移动平均/10日内成交量(手)的最高值>0.5 AND 成交量(手)/10日内成交量(手)的最高值>0.2 AND 成交量(手)/10日内成交量(手)的最高值<0.4 OR 3日前的成交量(手)>2日前的成交量(手) AND 2日前的成交量(手)>1日前的成交量(手)) AND 1日前的收盘价/2日前的收盘价<=1.02
DATOUJI1赋值:TYP1 AND TJ3 AND 开盘价<6日前的最低价 AND 开盘价<5日前的收盘价ANDREF(开盘价,5)和5的较小值
当满足条件TOUJIORTOUJI2ORDATOUJIORDATOUJI1时,在最低价*0.98位置书写文字,画黄色
当满足条件成交量(手)的10日简单移动平均上穿成交量(手)的20日简单移动平均ANDMA(成交量(手),5)>成交量(手)的10日简单移动平均ANDL<收盘价的20日简单移动平均ANDC>=收盘价的20日简单移动平均时,在最低价*0.98位置书写文字,画白色
卖出赋值:90上穿收盘价-1日前的收盘价和0的较大值的6日[1日权重]移动平均/收盘价-1日前的收盘价的绝对值的6日[1日权重]移动平均*100
当满足条件卖出时,在最高价*1.05位置书写文字,画绿色
C3赋值:1日前的收盘价
涨停赋值:如果(收盘价-C3)*100/C3>=(10-0.01*100/C3),返回1,否则返回0
当满足条件涨停时,在开盘价和收盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,画红色
跌停赋值:如果(C3-收盘价)*100/C3>=(10-0.01*100/C3),返回1,否则返回0
当满足条件跌停时,在开盘价和收盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,画绿色
W1赋值:收盘价=20日内收盘价的最高值
W2赋值:上次W1距今天数
W3赋值:如果W2>0,返回W2日前的收盘价,否则返回W2日前的收盘价
W4赋值:收盘价上穿1日前的W3
突破盘整赋值:W4 AND 统计5日中满足W4的天数=1
当满足条件突破盘整时,在最低价-0.10位置画1号图标
N1赋值:5
N2赋值:10
LC赋值:1日前的收盘价
A0赋值:(2*收盘价+最高价+最低价)/4
均线赋值:A0的3日简单移动平均>1日前的A0的3日简单移动平均
输出安全线:2,画红色,POINTDOT,线宽为4
A1赋值:(收盘价-7日内最低价的最低值)/(7日内最高价的最高值-7日内最低价的最低值)*10
输出K:3*A1的6日[1日权重]移动平均-2*A1的5日[1日权重]移动平均的5日[1日权重]移动平均的3日简单移动平均,线宽为1,COLORF00FF0
输出D:K的3日简单移动平均,COLORFF0000,线宽为1
输出J:3*K-2*D,线宽为1,COLORF00FF0
画带状线
VAR1B赋值:收盘价-1日前的收盘价
VAR2A赋值:100*VAR1B的6日指数移动平均的6日指数移动平均/VAR1B的绝对值的6日指数移动平均的6日指数移动平均
MA5A赋值:收盘价的5日指数移动平均
MA13赋值:收盘价的13日指数移动平均
UP赋值:当满足条件最低价=上次MA13上穿MA5A距今天数+1日内最低价的最低值时,在上次MA13上穿MA5A距今天数+1日内最低价的最低值位置画直线起点，当满足条件最高价=上次MA5A上穿MA13距今天数+1日内最高价的最高值时,在上次MA5A上穿MA13距今天数+1日内最高价的最高值位置画直线终点,0表示是否延长.,COLOR0000FF
DOWN赋值:当满足条件最高价=上次MA5A上穿MA13距今天数+1日内最高价的最高值时,在上次MA5A上穿MA13距今天数+1日内最高价的最高值位置画直线起点，当满足条件最低价=上次MA13上穿MA5A距今天数+1日内最低价的最低值时,在上次MA13上穿MA5A距今天数+1日内最低价的最低值位置画直线终点,0表示是否延长.,COLOR00FF00
BT赋值:(2日内VAR2A的最低值=7日内VAR2A的最低值 AND 统计2日中满足VAR2A<0的天数 AND VAR2A上穿VAR2A的2日简单移动平均) ANDREF(DOWN,1)<2日前的DOWN AND UP>1日前的DOWN
输出底线:0,COLORFF00FF
输出顶线:10,COLORFF0000
当满足条件UP时,在0和0.2位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR0000FF
当满足条件DOWN时,在0和0.2位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR00FF00
当满足条件BT时,在0和3位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR000088
当满足条件BT时,在0和3位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR0000CC
当满足条件BT时,在0和3位置之间画柱状线,宽度为0.22,0不为0则画空心柱.,COLOR0000FF
当满足条件BT时,在3位置书写文字,COLOR0000FF
TJ1A赋值:1日前的DOWN<2日前的DOWN AND UP>1日前的DOWN AND 收盘价<21日内最高价的最高值*0.82
当满足条件TJ1A时,在0和2位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR880088
当满足条件TJ1A时,在0和2位置之间画柱状线,宽度为1.5,0不为0则画空心柱.,COLORAA00AA
当满足条件TJ1A时,在0和2位置之间画柱状线,宽度为0.8,0不为0则画空心柱.,COLORCC00CC
当满足条件TJ1A时,在0和2位置之间画柱状线,宽度为0.2,0不为0则画空心柱.,COLORFF00FF
当满足条件TJ1A时,在2位置书写文字,COLORFF00FF
HR赋值:55日内最高价的最高值
HRY赋值:55日内最低价的最低值
HRY11赋值:HR*HRY
HRY33赋值:HRY11的开方
TJ2A赋值:1日前的DOWN<2日前的DOWN AND UP>1日前的DOWN AND 收盘价当满足条件TJ2A时,在0和1位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLOR008888
当满足条件TJ2A时,在0和1位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR00AAAA
当满足条件TJ2A时,在0和1位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR00CCCC
当满足条件TJ2A时,在0和1位置之间画柱状线,宽度为0.2,0不为0则画空心柱.,COLOR00FFFF
当满足条件TJ2A时,在1位置书写文字,COLOR00FFFF
ST赋值:1日前的UP>2日前的UP AND DOWN<1日前的UP
当满足条件ST时,在10和9位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLOR008800
当满足条件ST时,在10和9位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR00AA00
当满足条件ST时,在10和9位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR00CC00
当满足条件ST时,在10和9位置之间画柱状线,宽度为0.2,0不为0则画空心柱.,COLOR00FF00
当满足条件ST时,在9位置书写文字,COLOR00FF00
输出DIFF:不定周期收盘价的12日指数移动平均-不定周期收盘价的26日指数移动平均
输出DEA:DIFF的9日指数移动平均,COLORFFFF00
A11赋值:上次1日前的DIFF上穿DEA距今天数
底背离赋值:A11+1日前的收盘价>收盘价 AND DIFF>A11+1日前的DIFF AND DIFF上穿DEA
当满足条件底背离时,在-0.6位置书写文字,画白色
A22赋值:上次1日前的DEA上穿DIFF距今天数
顶背离赋值:A22+1日前的收盘价<收盘价 AND A22+1日前的DIFF>DIFF AND DEA上穿DIFF
当满足条件顶背离时,在11位置书写文字,画白色
