通达信顶底判断副图 指标 源码

顶底判断副图
公式源码:
 
SHORT:=12;
LONG:=26;
MID:=9;
DIF:EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);
DEA:EMA(DIF,MID);
MACD:(DIF-DEA)*2,COLORSTICK;


右红起N:=BARSLASTCOUNT(MACD>0),NODRAW;
右红股高:=HHV(H,右红起N),NODRAW;
左红股高:=REF(右红股高,BARSLAST(CROSS(0,MACD))+1),NODRAW;
右红柱高:=HHV(MACD,右红起N),NODRAW;
左红柱高:=REF(右红柱高,BARSLAST(CROSS(0,MACD))+1),NODRAW;
HZDB:=MACD>0&&右红股高>左红股高&&右红柱高<左红柱高&&REF(BARSLASTCOUNT(MACD<0),右红起N)>=3,NODRAW;
STICKLINE(REFX(HZDB&&MACD<REF(MACD,1),1)&&MACD>REF(MACD,1),0,MACD,2,0),COLORFF00FF;
STICKLINE(HZDB&&MACD<REF(MACD,1)&&BARSLASTCOUNT(MACD<REF(MACD,1))=1,0,MACD,2,0),COLORFF00FF;
STICKLINE(HZDB&&MACD<REF(MACD,1)&&BARSLASTCOUNT(MACD<REF(MACD,1))=2,0,MACD,2,0),COLORFF00FF;
STICKLINE(HZDB&&MACD<REF(MACD,1)&&BARSLASTCOUNT(MACD<REF(MACD,1))=3,0,MACD,2,0),COLORFF00FF;




DRAWNUMBER(REFX(HZDB&&MACD<REF(MACD,1),1)&&MACD>REF(MACD,1),MACD,0),DRAWABOVE;
DRAWNUMBER(HZDB&&MACD<REF(MACD,1)&&BARSLASTCOUNT(MACD<REF(MACD,1))=1,MACD,1),DRAWABOVE;
DRAWNUMBER(HZDB&&MACD<REF(MACD,1)&&BARSLASTCOUNT(MACD<REF(MACD,1))=2,MACD,2),DRAWABOVE;


DRAWTEXT(HZDB&&MACD<REF(MACD,1)&&BARSLASTCOUNT(MACD<REF(MACD,1))=3&&EVERY(HZDB,3),0,'变'),COLORGREEN;
DRAWTEXT(HZDB&&MACD<REF(MACD,1)&&BARSLASTCOUNT(MACD<REF(MACD,1))=3&&EVERY(HZDB,3),MACD,'③'),DRAWABOVE,COLORGREEN;


VAR1:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
VAR2:=2*ABS(VAR1);
VAR3:=100-(100-3*SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,20,1),15,1));
VAR4:=100-(100-3*SMA((OPEN-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,20,1),15,1));
VAR5:=(HIGH+LOW+CLOSE)/3;
VAR6:=(VAR5-MA(VAR5,10))/(0.015*AVEDEV(VAR5,10));
VAR7:=(VAR5-MA(VAR5,30))/(0.015*AVEDEV(VAR5,30));
VAR8:=IF(VAR6>=150 AND VAR6<200 AND VAR7>=150 AND VAR7<200,10,0);
VAR9:=IF(VAR6<=-150 AND VAR6>-200 AND VAR7<=-150 AND VAR7>-200,-10,VAR8);
VARA:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
VARB:=100-ABS(VARA);




右绿起N:=BARSLASTCOUNT(MACD<0),NODRAW;
右绿股低:=LLV(L,右绿起N),NODRAW;
左绿股低:=REF(右绿股低,BARSLAST(CROSS(MACD,0))+1),NODRAW;
右绿柱低:=LLV(MACD,右绿起N),NODRAW;
左绿柱低:=REF(右绿柱低,BARSLAST(CROSS(MACD,0))+1),NODRAW;
LZDB:=MACD<0&&右绿股低<左绿股低&&右绿柱低>左绿柱低&&REF(BARSLASTCOUNT(MACD>0),右绿起N)>=3;


STICKLINE(REFX(LZDB&&MACD>REF(MACD,1),1)&&MACD<REF(MACD,1),0,MACD,2,0),COLORGREEN;
STICKLINE(LZDB&&MACD>REF(MACD,1)&&BARSLASTCOUNT(MACD>REF(MACD,1))=1,0,MACD,2,0),COLORGREEN;
STICKLINE(LZDB&&MACD>REF(MACD,1)&&BARSLASTCOUNT(MACD>REF(MACD,1))=2,0,MACD,2,0),COLORGREEN;
STICKLINE(LZDB&&MACD>REF(MACD,1)&&BARSLASTCOUNT(MACD>REF(MACD,1))=3,0,MACD,2,0),COLORGREEN;


DRAWNUMBER(REFX(LZDB&&MACD>REF(MACD,1),1)&&MACD<REF(MACD,1),MACD,0);
DRAWNUMBER(LZDB&&MACD>REF(MACD,1)&&BARSLASTCOUNT(MACD>REF(MACD,1))=1,MACD,1);
DRAWNUMBER(LZDB&&MACD>REF(MACD,1)&&BARSLASTCOUNT(MACD>REF(MACD,1))=2,MACD,2);


DRAWTEXT(LZDB&&MACD>REF(MACD,1)&&BARSLASTCOUNT(MACD>REF(MACD,1))=3&&EVERY(LZDB,3),0,'变'),COLORRED;
DRAWTEXT(LZDB&&MACD>REF(MACD,1)&&BARSLASTCOUNT(MACD>REF(MACD,1))=3&&EVERY(LZDB,3),MACD,'③'),COLORRED;







来函数检测结果如下
该公式包含未来函数:REFX

解密、定制、编写公式指标请联系QQ或微信同号:88652583
置顶指标

相关指标公式

SHORT赋值:12
LONG赋值:26
MID赋值:9
输出DIF:收盘价的SHORT日指数移动平均-收盘价的LONG日指数移动平均
输出DEA:DIF的MID日指数移动平均
输出平滑异同平均线:(DIF-DEA)*2,COLORSTICK
右红起N赋值:条件连续成立次数,NODRAW
右红股高赋值:右红起N日内最高价的最高值,NODRAW
左红股高赋值:上次0上穿MACD距今天数+1日前的右红股高,NODRAW
右红柱高赋值:右红起N日内MACD的最高值,NODRAW
左红柱高赋值:上次0上穿MACD距今天数+1日前的右红柱高,NODRAW
HZDB赋值:MACD>0并且右红股高>左红股高并且右红柱高<左红柱高并且右红起N日前的条件连续成立次数>=3,NODRAW
当满足条件1日后的HZDB并且MACD<1日前的MACD并且MACD>1日前的MACD时,在0和MACD位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLORFF00FF
当满足条件HZDB并且MACD<1日前的MACD并且条件连续成立次数=1时,在0和MACD位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLORFF00FF
当满足条件HZDB并且MACD<1日前的MACD并且条件连续成立次数=2时,在0和MACD位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLORFF00FF
当满足条件HZDB并且MACD<1日前的MACD并且条件连续成立次数=3时,在0和MACD位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLORFF00FF
当满足条件1日后的HZDB并且MACD<1日前的MACD并且MACD>1日前的MACD时,在MACD位置书写数字,显示在位置之上
当满足条件HZDB并且MACD<1日前的MACD并且条件连续成立次数=1时,在MACD位置书写数字,显示在位置之上
当满足条件HZDB并且MACD<1日前的MACD并且条件连续成立次数=2时,在MACD位置书写数字,显示在位置之上
当满足条件HZDB并且MACD<1日前的MACD并且条件连续成立次数=3并且最近3日一直存在HZDB时,在0位置书写文字,画绿色
当满足条件HZDB并且MACD<1日前的MACD并且条件连续成立次数=3并且最近3日一直存在HZDB时,在MACD位置书写文字,显示在位置之上,画绿色
VAR1赋值:100*(收盘价-34日内收盘价的最低值)/(34日内最高价的最高值-34日内最低价的最低值)的5日简单移动平均-20
VAR2赋值:2*VAR1的绝对值
VAR3赋值:100-(100-3*(收盘价-55日内最低价的最低值)/(55日内最高价的最高值-55日内最低价的最低值)*100的20日[1日权重]移动平均+2*(收盘价-55日内最低价的最低值)/(55日内最高价的最高值-55日内最低价的最低值)*100的20日[1日权重]移动平均的15日[1日权重]移动平均)
VAR4赋值:100-(100-3*(开盘价-55日内最低价的最低值)/(55日内最高价的最高值-55日内最低价的最低值)*100的20日[1日权重]移动平均+2*(开盘价-55日内最低价的最低值)/(55日内最高价的最高值-55日内最低价的最低值)*100的20日[1日权重]移动平均的15日[1日权重]移动平均)
VAR5赋值:(最高价+最低价+收盘价)/3
VAR6赋值:(VAR5-VAR5的10日简单移动平均)/(0.015*VAR5的10日平均绝对偏差)
VAR7赋值:(VAR5-VAR5的30日简单移动平均)/(0.015*VAR5的30日平均绝对偏差)
VAR8赋值:如果VAR6>=150ANDVAR6<200ANDVAR7>=150ANDVAR7<200,返回10,否则返回0
VAR9赋值:如果VAR6<=-150ANDVAR6>-200ANDVAR7<=-150ANDVAR7>-200,返回-10,否则返回VAR8
VARA赋值:(收盘价-收盘价的13日简单移动平均)/收盘价的13日简单移动平均*100
VARB赋值:100-VARA的绝对值
右绿起N赋值:条件连续成立次数,NODRAW
右绿股低赋值:右绿起N日内最低价的最低值,NODRAW
左绿股低赋值:上次MACD上穿0距今天数+1日前的右绿股低,NODRAW
右绿柱低赋值:右绿起N日内MACD的最低值,NODRAW
左绿柱低赋值:上次MACD上穿0距今天数+1日前的右绿柱低,NODRAW
LZDB赋值:MACD<0并且右绿股低<左绿股低并且右绿柱低>左绿柱低并且右绿起N日前的条件连续成立次数>=3
当满足条件1日后的LZDB并且MACD>1日前的MACD并且MACD<1日前的MACD时,在0和MACD位置之间画柱状线,宽度为2,0不为0则画空心柱.,画绿色
当满足条件LZDB并且MACD>1日前的MACD并且条件连续成立次数=1时,在0和MACD位置之间画柱状线,宽度为2,0不为0则画空心柱.,画绿色
当满足条件LZDB并且MACD>1日前的MACD并且条件连续成立次数=2时,在0和MACD位置之间画柱状线,宽度为2,0不为0则画空心柱.,画绿色
当满足条件LZDB并且MACD>1日前的MACD并且条件连续成立次数=3时,在0和MACD位置之间画柱状线,宽度为2,0不为0则画空心柱.,画绿色
当满足条件1日后的LZDB并且MACD>1日前的MACD并且MACD<1日前的MACD时,在MACD位置书写数字
当满足条件LZDB并且MACD>1日前的MACD并且条件连续成立次数=1时,在MACD位置书写数字
当满足条件LZDB并且MACD>1日前的MACD并且条件连续成立次数=2时,在MACD位置书写数字
当满足条件LZDB并且MACD>1日前的MACD并且条件连续成立次数=3并且最近3日一直存在LZDB时,在0位置书写文字,画红色
当满足条件LZDB并且MACD>1日前的MACD并且条件连续成立次数=3并且最近3日一直存在LZDB时,在MACD位置书写文字,画红色

指标安装下载帮助  |   联系我们  |  股朋指标网  |  指标网   |  指标公式  |   加入收藏   |  设为主页

@2005-2023 粤ICP备2023063687号-2 股朋指标网别名指标网均来源互联网收集整理,如不慎侵犯了你的权益,请联系我们告知,我们将做删除处理
免责声明:股朋指标网所有指标公式及文章由网络收集,不保障实时性和真实性, 仅供学习研究并不构成投资建议,请勿以此为依据进行股票交易,由此引起的投资亏损与本站无关。
QQ:88652583 微信 88652583
sitemap站点地图