通达信公式源码 通达信MACD与斐波那契周期公式源码

　　南方财富网带来通达信公式源码 通达信MACD与斐波那契周期公式源码：

　　DRAWGBK（C》O，RGB（20，10，90），RGB（0，0，0），0，1，0）;

　　DIFF1：=EMA（CLOSE，12）-EMA（CLOSE，26），COLORFFFFFF;

　　DEA1：=EMA（DIFF1，9），COLORYELLOW;

　　MACD1：=2*（DIFF1-DEA1）;

　　MACD2：=EMA（MACD1，5）;

　　STICKLINE（MACD1》MACD2 AND MACD1》0，0，MACD1，3，0），COLOR000055;

　　STICKLINE（MACD1》MACD2 AND MACD1》0，0，MACD1，2.5，0），COLOR000077;

　　STICKLINE（MACD1》MACD2 AND MACD1》0，0，MACD1，1.5，0），COLOR000099;

　　STICKLINE（MACD1》MACD2 AND MACD1》0，0，MACD1，1，0），COLOR0000FF;

　　STICKLINE（MACD1》MACD2 AND MACD1《0，0，MACD1，3，0），COLOR222222;

　　STICKLINE（MACD1》MACD2 AND MACD1《0，0，MACD1，2.5，0），COLOR444444;

　　STICKLINE（MACD1》MACD2 AND MACD1《0，0，MACD1，1.5，0），COLOR666666;

　　STICKLINE（MACD1》MACD2 AND MACD1《0，0，MACD1，0，0），COLOR999999;

　　STICKLINE（MACD1《MACD2，0，MACD1，3，0），COLORA80000;

　　STICKLINE（MACD1《MACD2，0，MACD1，2.5，0），COLORB80000;

　　STICKLINE（MACD1《MACD2，0，MACD1，1.5，0），COLOREC1000;

　　STICKLINE（MACD1《MACD2，0，MACD1，1，0），COLORFF4600;

　　STICKLINE（MACD1《MACD2，0，MACD1，0，0），COLORFFAA00;

　　低位金叉：=CROSS（DIFF1，DEA1） AND DIFF1《-0.1;

　　STICKLINE（低位金叉，0，DIFF1，3，0），COLOR002222;

　　STICKLINE（低位金叉，0，DIFF1，2.5，0），COLOR006666;

　　STICKLINE（低位金叉，0，DIFF1，1.5，0），COLOR009999;

　　STICKLINE（低位金叉，0，DIFF1，1，0），COLOR00FFFF;

　　DRAWTEXT（低位金叉，0.2， ‘低位金叉’），COLOR00FF88;

　　JCCOUNT：=COUNT（CROSS（DIFF1，DEA1），BARSLAST（DEA1》=0））;

　　二次金叉：=CROSS（DIFF1，DEA1） AND DEA1《0 AND COUNT（JCCOUNT=2，21）=1;

　　STICKLINE（二次金叉，MACD1，-0.01，3，0），COLOR440044;

　　STICKLINE（二次金叉，MACD1，-0.01，2.5，0），COLOR660066;

　　STICKLINE（二次金叉，MACD1，-0.01，1.5，0），COLOR990099;

　　STICKLINE（二次金叉，MACD1，-0.01，1，0），COLORFF00FF;

　　DRAWTEXT（二次金叉，DEA1*1.3， 二次金叉），COLORYELLOW;

　　A1：=BARSLAST（REF（CROSS（DIFF1，DEA1），1））;

　　底背离：=REF（CLOSE，A1+1）》CLOSE AND DIFF1》REF（DIFF1，A1+1） AND CROSS（DIFF1，DEA1）;

　　STICKLINE（底背离，0，0.03，6，0），COLOR00FF00;

　　DRAWLINE（A1=0，DEA1，底背离，DEA1，0），COLORRED，LINETHICK1;

　　DRAWTEXT（底背离，0.03， ‘底背离’），COLORFF00FF;

　　A2：=BARSLAST（REF（CROSS（DEA1，DIFF1），1））;

　　顶背离：=REF（CLOSE，A2+1）《CLOSE AND REF（DIFF1，A2+1）》DIFF1 AND CROSS（DEA1，DIFF1）;

　　DRAWLINE（A2=0，DEA1，顶背离，DEA1，0），COLORFF8800，LINETHICK1;

　　DRAWTEXT（顶背离，-0.02， ‘顶背离’），COLORFFFF00;

　　DIFF:DIFF1，COLOR009922;

　　DEA:DEA1，COLORYELLOW;

　　ZT：=CROSS（DEA，DIFF）;

　　LS0：=BARSLAST（ZT）;

　　S1：=IF（1，LS0=1，ZT） AND IF（1，DIFF《DEA，0）;

　　DRAWTEXT（S1 AND DIFF》0，DIFF*0.8，1），COLOR00FF00;

　　DRAWTEXT（S1 AND DIFF《0，DIFF*1.8，1），COLOR00FF00;

　　S3：=IF（3，LS0=3，ZT） AND IF（3，DIFF《DEA，0）;

　　DRAWTEXT（S3 AND DIFF》0，DIFF*0.8，3），COLOR00FF00;

　　DRAWTEXT（S3 AND DIFF《0，DIFF*1.4，3），COLOR00FF00;

　　S5：=IF（5，LS0=5，ZT） AND IF（5，DIFF《DEA，0）;

　　DRAWTEXT（S5 AND DIFF》0，DIFF*0.8，5），COLOR00FF00;

　　DRAWTEXT（S5 AND DIFF《0，DIFF*1.4，5），COLOR00FF00;

　　S8：=IF（8，LS0=8，ZT） AND IF（8，DIFF《DEA，0）;

　　DRAWTEXT（S8 AND DIFF》0，DIFF*0.8，8），COLOR00FF00;

　　DRAWTEXT（S8 AND DIFF《0，DIFF*1.8，8），COLOR00FF00;

　　S13：=IF（13，LS0=13，ZT） AND IF（8，DIFF《DEA，0）;

　　DRAWTEXT（S13 AND DIFF》0，DIFF*0.8，13），COLOR00FF00;

　　DRAWTEXT（S13 AND DIFF《0，DIFF*1.2，13），COLOR00FF00;

　　S21：=IF（21，LS0=21，ZT） AND IF（21，DIFF《DEA，0）;

　　DRAWTEXT（S21 AND DIFF》0，DIFF*0.8，21），COLOR00FF00;

　　DRAWTEXT（S21 AND DIFF《0，DIFF*1.2，21），COLOR00FF00;

　　S26：=IF（26，LS0=26，ZT） AND IF（26，DIFF《DEA，0）;

　　DRAWTEXT（S26 AND DIFF》0，DIFF*0.8，26），COLOR00FF00;

　　DRAWTEXT（S26 AND DIFF《0，DIFF*1.2，26），COLOR00FF00;

　　S29：=IF（29，LS0=29，ZT） AND IF（29，DIFF《DEA，0）;

　　DRAWTEXT（S29 AND DIFF》0，DIFF*0.8，29），COLOR00FF00;

　　DRAWTEXT（S29 AND DIFF《0，DIFF*1.2，29），COLOR00FF00;

　　S34：=IF（34，LS0=34，ZT） AND IF（34，DIFF《DEA，0）;

　　DRAWTEXT（S34 AND DIFF》0，DIFF*0.8，34），COLOR00FF00;

　　DRAWTEXT（S34 AND DIFF《0，DIFF*1.8，34），COLOR00FF00;

　　S55：=IF（55，LS0=55，ZT） AND IF（55，DIFF《DEA，0）;

　　DRAWTEXT（S55 AND DIFF》0，DIFF*0.8，55），COLOR00FF00;

　　DRAWTEXT（S55 AND DIFF《0，DIFF*1.8，55），COLOR00FF00;

　　S68：=IF（68，LS0=68，ZT） AND IF（68，DIFF《DEA，0）;

　　DRAWTEXT（S68 AND DIFF》0，DIFF*0.8，68），COLOR00FF00;

　　DRAWTEXT（S68 AND DIFF《0，DIFF*1.8，68），COLOR00FF00;

　　ZTJ：=CROSS（DIFF，DEA）;

　　LSJ：=BARSLAST（ZTJ）;

　　SJ1：=IF（1，LSJ=1，ZTJ） AND IF（1，DIFF》DEA，0）;

　　DRAWTEXT（SJ1 AND DIFF》0，DIFF*1.2，1），COLORFFFFFF;

　　DRAWTEXT（SJ1 AND DIFF《0，DIFF*0.8，1），COLORFFFFFF;

　　SJ3：=IF（3，LSJ=3，LSJ） AND IF（3，DIFF》DEA，0）;

　　DRAWTEXT（SJ3 AND DIFF》0，DIFF*1.2，3），COLORFFFFFF;

　　DRAWTEXT（SJ3 AND DIFF《0，DIFF*0.8，3），COLORFFFFFF;

　　SJ5：=IF（5，LSJ=5，ZTJ） AND IF（5，DIFF》DEA，0）;

　　DRAWTEXT（SJ5 AND DIFF》0，DIFF*1.2，5），COLORFFFFFF;

　　DRAWTEXT（SJ5 AND DIFF《0，DIFF*0.8，5），COLORFFFFFF;

　　SJ8：=IF（8，LSJ=8，ZTJ） AND IF（8，DIFF》DEA，0）;

　　DRAWTEXT（SJ8 AND DIFF》0，DIFF*1.2，8），COLORFFFFFF;

　　DRAWTEXT（SJ8 AND DIFF《0，DIFF*0.8，8），COLORFFFFFF;

　　SJ13：=IF（13，LSJ=13，ZTJ） AND IF（8，DIFF》DEA，0）;

　　DRAWTEXT（SJ13 AND DIFF》0，DIFF*1.2，13），COLORFFFFFF;

　　DRAWTEXT（SJ13 AND DIFF《0，DIFF*0.8，13），COLORFFFFFF;

　　SJ18：=IF（18，LSJ=18，ZTJ） AND IF（8，DIFF》DEA，0）;

　　DRAWTEXT（SJ18 AND DIFF》0，DIFF*1.2，18），COLORFFFFFF;

　　DRAWTEXT（SJ18 AND DIFF《0，DIFF*0.8，18），COLORFFFFFF;

　　SJ21：=IF（21，LSJ=21，ZTJ） AND IF（21，DIFF》DEA，0）;

　　DRAWTEXT（SJ21 AND DIFF》0，DIFF*1.2，21），COLORFFFFFF;

　　DRAWTEXT（SJ21 AND DIFF《0，DIFF*0.8，21），COLORFFFFFF;

　　SJ26：=IF（26，LSJ=26，ZTJ） AND IF（26，DIFF》DEA，0）;

　　DRAWTEXT（SJ26 AND DIFF》0，DIFF*1.2，26），COLORFFFFFF;

　　DRAWTEXT（SJ26 AND DIFF《0，DIFF*0.8，26），COLORFFFFFF;

　　SJ29：=IF（29，LSJ=29，ZTJ） AND IF（29，DIFF》DEA，0）;

　　DRAWTEXT（SJ29 AND DIFF》0，DIFF*1.2，29），COLORFFFFFF;

　　DRAWTEXT（SJ29 AND DIFF《0，DIFF*0.8，29），COLORFFFFFF;

　　SJ34：=IF（34，LSJ=34，ZTJ） AND IF（34，DIFF》DEA，0）;

　　DRAWTEXT（SJ34 AND DIFF》0，DIFF*1.2，34），COLORFFFFFF;

　　DRAWTEXT（SJ34 AND DIFF《0，DIFF*0.8，34），COLORFFFFFF;

　　SJ47：=IF（47，LSJ=47，ZTJ） AND IF（47，DIFF》DEA，0）;

　　DRAWTEXT（SJ47 AND DIFF》0，DIFF*1.2，47），COLORFFFFFF;

　　DRAWTEXT（SJ47 AND DIFF《0，DIFF*0.8，47），COLORFFFFFF;

　　SJ55：=IF（55，LSJ=55，ZTJ） AND IF（55，DIFF》DEA，0）;

　　DRAWTEXT（SJ55 AND DIFF》0，DIFF*1.2，55），COLORFFFFFF;

　　DRAWTEXT（SJ55 AND DIFF《0，DIFF*0.8，55），COLORFFFFFF;

　　SJ60：=IF（60，LSJ=60，ZTJ） AND IF（60，DIFF》DEA，0）;

　　DRAWTEXT（SJ60 AND DIFF》0，DIFF*1.2，63），COLORFFFFFF;

　　DRAWTEXT（SJ60 AND DIFF《0，DIFF*0.8，63），COLORFFFFFF;

　　SJ68：=IF（68，LSJ=68，ZTJ） AND IF（68，DIFF》DEA，0）;

　　DRAWTEXT（SJ68 AND DIFF》0，DIFF*1.2，68），COLORFFFFFF;

　　DRAWTEXT（SJ68 AND DIFF《0，DIFF*0.8，68），COLORFFFFFF;