通达信集波浪斐波拉契数列黄金分割于一体主图源码
通达信
2016年开局不利，虽说股市涨跌自有其内在的因素，但也及其影响新年喜庆的气氛，特别在论坛下了波浪，斐波拉契数列及黄金分割指标，自己稍加组合改动，分享给坛友们。
大家应该可以看出我分享的指标一个比一个实用，这个指标还有持股持币提示，如我贴图的股票002751，红色K线为持股，绿色K线为持币(也就是说要卖出，无论那天卖出都是对的；另外这个指标还包涵神奇的斐波那契数列，在重要的时间窗口如果与系统指标发生共振将产生强大的动能；指标中的黄金分割线会对于目前所处位置有一个的提示作用，对于可能的支撑位压力位了然于胸，结合大盘可以做出提前预判
{通达信主图指标 - 波浪斐波那契黄金分割系统}
{参数设置}
N:=60; {斐波那契周期数}
P:=20; {均线周期}
{1. 基础价格计算}
HH:=HHV(H,N);
LL:=LLV(L,N);
MID:=(HH+LL)/2;
{2. 斐波那契关键位计算（基于近期高低点）}
HIGH_POINT:=REF(HHV(H,30),1);
LOW_POINT:=REF(LLV(L,30),1);
RANGE1:=HIGH_POINT-LOW_POINT;
{黄金分割关键位}
FIB_0:LOW_POINT,COLORGREEN,LINETHICK2;
FIB_0_236:LOW_POINT+RANGE1*0.236,COLORYELLOW;
FIB_0_382:LOW_POINT+RANGE1*0.382,COLORCYAN;
FIB_0_5:LOW_POINT+RANGE1*0.5,COLORMAGENTA;
FIB_0_618:LOW_POINT+RANGE1*0.618,COLORRED,LINETHICK2;
FIB_0_786:LOW_POINT+RANGE1*0.786,COLORYELLOW;
FIB_1:HIGH_POINT,COLORGREEN,LINETHICK2;
{3. 波浪理论相关指标}
MA20:MA(C,P),COLORWHITE,LINETHICK2;
MA60:MA(C,60),COLORYELLOW,LINETHICK2;
{4. 价格通道（布林带变体）}
UB:MA(C,20)+2*STD(C,20),COLOR00FF00;
LB:MA(C,20)-2*STD(C,20),COLOR00FF00;
{5. 自动识别波浪高低点}
WAVE_HIGH:=IF(H>REF(HHV(H,5),1) AND H>REFX(HHV(H,5),1),H,DRAWNULL);
WAVE_LOW:=IF(L<REF(LLV(L,5),1) AND L<REFX(LLV(L,5),1),L,DRAWNULL);
STICKLINE(WAVE_HIGH>0,WAVE_HIGH,WAVE_HIGH*1.001,5,0),COLORRED;
STICKLINE(WAVE_LOW>0,WAVE_LOW,WAVE_LOW*0.999,5,0),COLORGREEN;
{7. 支撑阻力带}
S1:HHV(REF(H,1),10),COLOR008800,DOTLINE;
S2:LLV(REF(L,1),10),COLOR008800,DOTLINE;
{8. 价格与斐波那契位关系提示}
DRAWICON(CROSS(C,FIB_0_618),L*0.99,1);
DRAWICON(CROSS(FIB_0_618,C),H*1.01,2);
DRAWICON(CROSS(C,FIB_0_382),L*0.99,1);
DRAWICON(CROSS(FIB_0_382,C),H*1.01,2);
{10. 趋势强度指标}
TREND_STRENGTH:=(C-LLV(L,20))/(HHV(H,20)-LLV(L,20))*100;
DRAWTEXT_FIX(ISLASTBAR,0.9,0.05,0,STRCAT('趋势强度:',CON2STR(TREND_STRENGTH,1))),COLORYELLOW;
{11. 波浪计数标记（简化）}
AUTOWAVE:=IF(C>REF(HHV(H,10),1),1,IF(C<REF(LLV(L,10),1),-1,0));
DRAWTEXT(AUTOWAVE=1 AND REF(AUTOWAVE,1)<>1,L*0.98,'↖浪1'),COLORRED;
DRAWTEXT(AUTOWAVE=-1 AND REF(AUTOWAVE,1)<>-1,H*1.02,'↘浪2'),COLORGREEN;
{12. 关键位置提示}
DRAWTEXT(ISLASTBAR,FIB_0_236,'23.6%'),COLORYELLOW;
DRAWTEXT(ISLASTBAR,FIB_0_382,'38.2%'),COLORCYAN;
DRAWTEXT(ISLASTBAR,FIB_0_5,'50%'),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,FIB_0_618,'61.8%'),COLORRED;
DRAWTEXT(ISLASTBAR,FIB_0_786,'78.6%'),COLORYELLOW;
{13. 主图K线}
STICKLINE(C>=O,C,O,3,0),COLORRED;
STICKLINE(C<O,C,O,3,0),COLORCYAN;
STICKLINE(C>=O,O,L,0,0),COLORRED;
STICKLINE(C>=O,C,H,0,0),COLORRED;
STICKLINE(C<O,O,H,0,0),COLORCYAN;
STICKLINE(C<O,C,L,0,0),COLORCYAN;
未来函数检测结果如下：
该公式包含未来函数:REFX
定制指标公式、软件请联系QQ或微信同号：88652583
N赋值:60
P赋值:20
HH赋值:N日内最高价的最高值
LL赋值:N日内最低价的最低值
MID赋值:(HH+LL)/2
HIGH_POINT赋值:1日前的30日内最高价的最高值
LOW_POINT赋值:1日前的30日内最低价的最低值
RANGE1赋值:HIGH_POINT-LOW_POINT
输出FIB_0:LOW_POINT,画绿色,线宽为2
输出FIB_0_236:LOW_POINT+RANGE1*0.236,画黄色
输出FIB_0_382:LOW_POINT+RANGE1*0.382,画青色
输出FIB_0_5:LOW_POINT+RANGE1*0.5,画洋红色
输出FIB_0_618:LOW_POINT+RANGE1*0.618,画红色,线宽为2
输出FIB_0_786:LOW_POINT+RANGE1*0.786,画黄色
输出FIB_1:HIGH_POINT,画绿色,线宽为2
输出MA20:收盘价的P日简单移动平均,画白色,线宽为2
输出MA60:收盘价的60日简单移动平均,画黄色,线宽为2
输出UB:收盘价的20日简单移动平均+2*收盘价的20日估算标准差,COLOR00FF00
输出LB:收盘价的20日简单移动平均-2*收盘价的20日估算标准差,COLOR00FF00
WAVE_HIGH赋值:如果最高价>1日前的5日内最高价的最高值ANDH>1日后的5日内最高价的最高值,返回最高价,否则返回无效数
WAVE_LOW赋值:如果最低价<1日前的5日内最低价的最低值ANDL<1日后的5日内最低价的最低值,返回最低价,否则返回无效数
当满足条件WAVE_HIGH>0时,在WAVE_HIGH和WAVE_HIGH*1.001位置之间画柱状线,宽度为5,0不为0则画空心柱.,画红色
当满足条件WAVE_LOW>0时,在WAVE_LOW和WAVE_LOW*0.999位置之间画柱状线,宽度为5,0不为0则画空心柱.,画绿色
输出S1:10日内1日前的最高价的最高值,COLOR008800,DOTLINE
输出S2:10日内1日前的最低价的最低值,COLOR008800,DOTLINE
当满足条件收盘价上穿FIB_0_618时,在最低价*0.99位置画1号图标
当满足条件FIB_0_618上穿收盘价时,在最高价*1.01位置画2号图标
当满足条件收盘价上穿FIB_0_382时,在最低价*0.99位置画1号图标
当满足条件FIB_0_382上穿收盘价时,在最高价*1.01位置画2号图标
TREND_STRENGTH赋值:(收盘价-20日内最低价的最低值)/(20日内最高价的最高值-20日内最低价的最低值)*100
当满足条件是否最后一个周期时,在横轴0.9纵轴0.05位置书写文字,画黄色
AUTOWAVE赋值:如果收盘价>1日前的10日内最高价的最高值,返回1,否则返回如果收盘价<1日前的10日内最低价的最低值,返回-1,否则返回0
当满足条件AUTOWAVE=1ANDREF(AUTOWAVE,1)不等于1时,在最低价*0.98位置书写文字,画红色
当满足条件AUTOWAVE=-1ANDREF(AUTOWAVE,1)不等于-1时,在最高价*1.02位置书写文字,画绿色
当满足条件是否最后一个周期时,在FIB_0_236位置书写文字,画黄色
当满足条件是否最后一个周期时,在FIB_0_382位置书写文字,画青色
当满足条件是否最后一个周期时,在FIB_0_5位置书写文字,画洋红色
当满足条件是否最后一个周期时,在FIB_0_618位置书写文字,画红色
当满足条件是否最后一个周期时,在FIB_0_786位置书写文字,画黄色
当满足条件收盘价>=开盘价时,在收盘价和开盘价位置之间画柱状线,宽度为3,0不为0则画空心柱.,画红色
当满足条件收阴线时,在收盘价和开盘价位置之间画柱状线,宽度为3,0不为0则画空心柱.,画青色
当满足条件收盘价>=开盘价时,在开盘价和最低价位置之间画柱状线,宽度为0,0不为0则画空心柱.,画红色
当满足条件收盘价>=开盘价时,在收盘价和最高价位置之间画柱状线,宽度为0,0不为0则画空心柱.,画红色
当满足条件收阴线时,在开盘价和最高价位置之间画柱状线,宽度为0,0不为0则画空心柱.,画青色
当满足条件收阴线时,在收盘价和最低价位置之间画柱状线,宽度为0,0不为0则画空心柱.,画青色
