通达信一壶千金副图源码，无未来
N:=60;
K值:="KDJ.K";
DD:=C=LLV(C,N);{60日最低点}
DDSJ:=BARSLAST(REF(DD,1));{上一低点时间}
DDGJ:=REF(CLOSE,DDSJ+1)>CLOSE;{股价趋势}
KDZB:=REF(K值,DDSJ+1)<K值;{KDJ.K指标趋势}
K底背离:=DDGJ AND KDZB;
GD:=C=HHV(C,N);{60日最高点}
GDSJ:=BARSLAST(REF(GD,1));{上一高点时间}
GDGJ:=REF(CLOSE,GDSJ+1)<CLOSE;{股价趋势}
KGZB:=REF(K值,GDSJ+1)>K值;
K顶背离:=GDGJ AND KGZB;
MACD:="MACD.MACD";
MDZB:=REF(MACD,DDSJ+1)<MACD;{MACD指标趋势}
M底背离:=DDGJ AND MDZB;
MGZB:=REF(MACD,GDSJ+1)>MACD;
M顶背离:=GDGJ AND MGZB;
RSI:="RSI.RSI1";
RDZB:=REF(RSI,DDSJ+1)<RSI;{RSI指标趋势}
R底背离:=DDGJ AND RDZB;
RGZB:=REF(RSI,GDSJ+1)>RSI;
R顶背离:=GDGJ AND RGZB;
TYP:=(HIGH + LOW + CLOSE)/3;
CCI:=(TYP-MA(TYP,N))/(0.015*AVEDEV(TYP,N));
CDZB:=REF(CCI,DDSJ+1)<CCI;{CCI指标趋势}
C底背离:=DDGJ AND CDZB;
CGZB:=REF(CCI,GDSJ+1)>CCI;
C顶背离:=GDGJ AND CGZB;
REFLINE: -5,15,30,COLORBLACK;
DRAWTEXT(K顶背离,IF(ISLASTBAR,27.5,25),'◆'),LINETHICK2 ;
DRAWTEXT(M顶背离,(ISLASTBAR,24.5,20),'◆'),LINETHICK2 ;
DRAWTEXT(R顶背离,(ISLASTBAR,20.5,15.1),'◆'),LINETHICK2 ;
DRAWTEXT(C顶背离,(ISLASTBAR,16.6,10.1),'◆'),LINETHICK2 ;
DRAWTEXT(ISLASTBAR,10.1 ,'CCI '),LINETHICK2,COLORGREEN;
DRAWTEXT(C底背离,IF(ISLASTBAR,12,10.1 ),'◆'),LINETHICK2,COLORRED;
DRAWTEXT(ISLASTBAR,15,'RSI '),LINETHICK2,COLORRED;
DRAWTEXT(R底背离,IF(ISLASTBAR,8.5,15),'◆'),LINETHICK2,COLORRED;
DRAWTEXT(ISLASTBAR,20,'MACD '),LINETHICK2,COLORMAGENTA;
DRAWTEXT(M底背离,IF(ISLASTBAR,4.5,20),'◆'),LINETHICK2,COLORRED;
DRAWTEXT(ISLASTBAR,25,'KDJ '),LINETHICK2,COLORRED;
DRAWTEXT(K底背离,IF(ISLASTBAR,1.5,25),'◆'),LINETHICK2,COLORRED;
XIAO1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);
XIAO2:=SMA(ABS(LOW-XIAO1),13,1)/SMA(MAX(LOW-XIAO1,0),10,1);
XIAO3:=EMA(XIAO2,10);
XIAO4:=LLV(LOW,33);
XIAO5:=EMA(IF(LOW<=XIAO4,XIAO3,0),3);
STICKLINE(XIAO5>REF(XIAO5,1),0,XIAO5,3,0 ),COLOR000055,NODRAW;
STICKLINE(XIAO5>REF(XIAO5,1),0,XIAO5,2.6,0 ),COLOR000077,NODRAW;
STICKLINE(XIAO5>REF(XIAO5,1),0,XIAO5,2.1,0 ),COLOR000099,NODRAW;
STICKLINE(XIAO5>REF(XIAO5,1),0,XIAO5,1.5,0 ),COLOR0000BB,NODRAW;
STICKLINE(XIAO5>REF(XIAO5,1),0,XIAO5,0.9,0 ),COLOR0000DD,NODRAW;
STICKLINE(XIAO5>REF(XIAO5,1),0,XIAO5,0.3,0 ),COLOR0000FF,NODRAW;
{STICKLINE(XIAO5<REF(XIAO5,1),0,XIAO5,3,0),COLOR005500;
STICKLINE(XIAO5<REF(XIAO5,1),0,XIAO5,2.6,0),COLOR007700;
STICKLINE(XIAO5<REF(XIAO5,1),0,XIAO5,2.1,0),COLOR009900;
STICKLINE(XIAO5<REF(XIAO5,1),0,XIAO5,1.5,0),COLOR00BB00;
STICKLINE(XIAO5<REF(XIAO5,1),0,XIAO5,0.9,0),COLOR00DD00;
STICKLINE(XIAO5<REF(XIAO5,1),0,XIAO5,0.3,0),COLOR00FF00; }
IN:IF(XIAO5>REF(XIAO5,1),XIAO5,0),COLORRED,NODRAW;
{私募洗盘:IF(XIAO5<REF(XIAO5,1),XIAO5,0),COLORGREEN,NODRAW; };
私募建仓:IN>=80,COLORRED,NODRAW;
STICKLINE(私募建仓,29,27,1,0),COLORRED;
未来函数检测结果
定制指标公式、软件请联系QQ或微信同号：88652583
VA1赋值:9日内最高价的最高值-9日内最低价的最低值
VA2赋值:9日内最高价的最高值-收盘价
VA3赋值:收盘价-9日内最低价的最低值
VA4赋值:VA2/VA1*100-70
VA5赋值:(收盘价-60日内最低价的最低值)/(60日内最高价的最高值-60日内最低价的最低值)*100
VA6赋值:(收盘价+最高价+最低价)/3
VA7赋值:VA3/VA1*100的3日[1日权重]移动平均
VA8赋值:34日内最低价的最低值
VA9赋值:VA7的3日[1日权重]移动平均-VA4的9日[1日权重]移动平均
VARA赋值:如果VA9>100,返回VA9-100,否则返回0
VARB赋值:34日内最高价的最高值
VARC赋值:(VA6-VA8)/(VARB-VA8)*100的13日指数移动平均
VARD赋值:0.667*1日前的VARC+0.333*VARC的2日指数移动平均
VARE赋值:收盘价-1日前的收盘价和0的较大值/收盘价的8日[1日权重]移动平均/大盘的收盘价-1日前的大盘的收盘价的绝对值/大盘的收盘价的8日[1日权重]移动平均*100-25
VARF赋值:VARE的3日简单移动平均
VAR1赋值:9日内最高价的最高值-9日内最低价的最低值
VAR2赋值:9日内最高价的最高值-收盘价
VAR3赋值:收盘价-9日内最低价的最低值
VAR4赋值:((VAR2)/(VAR1))*(100)-70
VAR5赋值:((收盘价-60日内最低价的最低值)/(60日内最高价的最高值-60日内最低价的最低值))*(100)
VAR6赋值:((2)*(收盘价)+最高价+最低价)/(4)
VAR7赋值:((VAR3)/(VAR1))*(100)的3日[1日权重]移动平均
VAR8赋值:34日内最低价的最低值
VAR9赋值:VAR7的3日[1日权重]移动平均-VAR4的9日[1日权重]移动平均
VAR10赋值:如果(VAR9>100),返回VAR9-100,否则返回0
VAR11赋值:34日内最高价的最高值
B1赋值:((VAR6-VAR8)/(VAR11-VAR8))*(100)的8日指数移动平均
K线
输出领先:B1的5日指数移动平均,画青色
输出生命线:VARD的1日指数移动平均,画黄色
V1赋值:收盘价的5日简单移动平均=20日内收盘价的5日简单移动平均的最高值
V2赋值:收盘价的5日简单移动平均>收盘价的10日简单移动平均
V3赋值:成交量(手)的5日简单移动平均>成交量(手)的40日简单移动平均*1.01
V4赋值:统计2日中满足收盘价的1日简单移动平均>1日前的收盘价的天数=2
VV赋值:V1 AND V2 AND V3 AND V4
A1赋值:收盘价的8日指数移动平均
A2赋值:A1的20日指数移动平均
A3赋值:A1上穿A2
A4赋值:A1<收盘价的120日指数移动平均
当满足条件(A3ANDA4)OR(V1ANDV2ANDV3ANDV4)时,在B1*1.03和B1*1.120位置之间画柱状线,宽度为1,0不为0则画空心柱.,画黄色
A5赋值:3*(收盘价-18日内最低价的最低值)/(18日内最高价的最高值-18日内最低价的最低值)*100的21日[1日权重]移动平均-2*(收盘价-18日内最低价的最低值)/(18日内最高价的最高值-18日内最低价的最低值)*100的20日[1日权重]移动平均的8日[1日权重]移动平均,CIRCLEDOT ,COLORFF9900
安全位赋值:20
输出低位转强:如果A5上穿安全位,返回50,否则返回0,STICK,画洋红色,线宽为2
输出开始拉升:如果VARC上穿生命线ANDVARC>VARDANDVARC<55ANDC>开盘价,返回50,否则返回0,画淡红色,POINTDOT
A6赋值:500日内收盘价的最低值=5日内收盘价的最低值 AND 收盘价/1日前的收盘价>(1+9.8/100)
输出极地上涨:如果A6,返回领先,否则返回0,画绿色,线宽为2
当满足条件开始拉升>0时,在15和开始拉升*1.01位置之间画柱状线,宽度为1,0不为0则画空心柱.,画蓝色
当满足条件(开始拉升>0AND开始拉升<400)OR(极地上涨>0AND极地上涨<400)OR(低位转强>0AND低位转强<400)OR(低位转强>0)时,在30和开始拉升位置之间画柱状线,宽度为1,0不为0则画空心柱.,画红色
当满足条件开始拉升>0时,在15和开始拉升*0.6位置之间画柱状线,宽度为3,0不为0则画空心柱.,画蓝色
当满足条件开始拉升>0时,在15和开始拉升*0.4位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR00FF00
当满足条件开始拉升>0时,在15和开始拉升*0.2位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR0099CC
当满足条件低位转强>0时,在15和低位转强*1.01位置之间画柱状线,宽度为1,0不为0则画空心柱.,画洋红色
当满足条件(低位转强>0)OR(极地上涨>0)时,在15和低位转强*0.4位置之间画柱状线,宽度为3,0不为0则画空心柱.,画黄色
当满足条件低位转强>0时,在15和低位转强*0.2位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLORFFCC66
当满足条件极地上涨>0时,在15和极地上涨*1.01位置之间画柱状线,宽度为1,0不为0则画空心柱.,画黄色
