月通道指标----大智慧版
20天均线又称月线，无疑是市场波动的生命线，利用股价与月线的偏离度原理
而得的月通道主图，对股价波动的高低可以有效监控，从而避免在实战中出现
高吸低抛的错误，更好地把握波段获利时机！
源码如下，欢迎指正。谢谢。
=======================================================
Sq:=ma(c,20);
hld:=(close-Sq)/Sq;
hh:=ref(hhv(hld,360),1);
ll:=ref(llv(hld,360),1);
zz:=(hh+ll)/2;
ww:=(hh-ll)*5/6+ll;
dd:=(hh-ll)*1/6+ll;

【平衡】:sq*(1+zz),coloryellow,linethick0;
PARTLINE(【平衡】,【平衡】>ref(【平衡】,1),RGB(255,255,0),【平衡】<ref(【平衡】,1),RGB(0,255,0),1,RGB(0,0,255)),linethick2;

【顶】:sq*(1+hh),colorred,linethick2;
次高:sq*(1+ww),colorff00ff;
次低:sq*(1+dd),colorwhite;
【底】:sq*(1+ll),color00ff00,linethick2;

drawtext(h>次高 and c<次高,次高,'★'),coloryellow;
drawtext(h>【顶】 and c<【顶】,h,'★'),color00ff00;
drawtext(l<次低 and c>次低,次低,'▲'),coloryellow;
drawtext(l<【底】 and c>【底】,l,'▲'),color00ff00;

【量h】:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,21)/HHV(C,21))*100);
stickline(【量h】=100,l,h,1,0),colorff00ff;
stickline(【量h】=100 and c>=o,c,o,8,1),colorff00ff;
stickline(【量h】=100 and c<o,c,o,8,0),colorff00ff;


ZDF:=(C-REF(C,1))/REF(C,1)*100;
STICKLINE(ZDF>9.8,O,C,6,0),COLORRED;
STICKLINE(ZDF<-9.8,O,C,5,0),COLORBLUE;
=================================================================
粉色K线代表量饱和，饱和成头几率大。
实心红K为涨停，蓝心为跌停。
老话一句：运用之妙，存乎一心！
==============================================

自坐沙发，静候交流！
==========================================
大智慧5.9版源码如下：
Sq:=ma(c,20);
hld:=(close-Sq)/Sq;

hh:=ref(hhv(hld,360),1);
ll:=ref(llv(hld,360),1);
zz:=(hh+ll)/2;
ww:=(hh-ll)*5/6+ll;
dd:=(hh-ll)*1/6+ll;

【平衡】:sq*(1+zz),coloryellow,pointdot,linethick0;
stickline(【平衡】>ref(【平衡】,1),【平衡】,ref(【平衡】,1),4,0),colorred;
stickline(【平衡】<=ref(【平衡】,1),【平衡】,ref(【平衡】,1),4,0),color00ff00;
【顶】:sq*(1+hh),colorred,linethick2;
次高:sq*(1+ww),colorff00ff;
次低:sq*(1+dd),colorwhite;
【底】:sq*(1+ll),color00ff00,linethick2;

drawtext(h>次高 and c<次高,次高,'★'),coloryellow;
drawtext(h>【顶】 and c<【顶】,h,'★'),color00ff00;
drawtext(l<次低 and c>次低,次低,'▲'),coloryellow;
drawtext(l<【底】 and c>【底】,l,'▲'),color00ff00;

【量h】:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,21)/HHV(C,21))*100);
stickline(【量h】=100,l,h,1,0),colorff00ff;
stickline(【量h】=100 and c>=o,c,o,8,1),colorff00ff;
stickline(【量h】=100 and c<o,c,o,8,0),colorff00ff;


ZDF:=(C-REF(C,1))/REF(C,1)*100;
STICKLINE(ZDF>9.8,O,C,6,0),COLORRED;
STICKLINE(ZDF<-9.8,O,C,5,0),COLORBLUE;
============================================================================================
飞狐版

Sq:=ma(c,20);
hld:=(close-Sq)/Sq;
hh:=ref(hhv(hld,360),1);
ll:=ref(llv(hld,360),1);
zz:=(hh+ll)/2;
ww:=(hh-ll)*5/6+ll;
dd:=(hh-ll)*1/6+ll;

【平衡】:sq*(1+zz),coloryellow,linethick0;
PARTLINE(【平衡】>=ref(【平衡】,1),【平衡】),COLORRED,linethick2;
PARTLINE(【平衡】<ref(【平衡】,1),【平衡】),COLORGREEN,linethick2;

【顶】:sq*(1+hh),colorred,linethick2;
次高:sq*(1+ww),colorff00ff;
次低:sq*(1+dd),colorwhite;
【底】:sq*(1+ll),color00ff00,linethick2;

drawtext(h>次高 and c<次高,次高,'★'),coloryellow;
drawtext(h>【顶】 and c<【顶】,h,'★'),color00ff00;
drawtext(l<次低 and c>次低,次低,'▲'),coloryellow;
drawtext(l<【底】 and c>【底】,l,'▲'),color00ff00;

【量h】:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,21)/HHV(C,21))*100);
stickline(【量h】=100,l,h,1,0),colorff00ff;
stickline(【量h】=100 and c>=o,c,o,8,1),colorff00ff;
stickline(【量h】=100 and c<o,c,o,8,0),colorff00ff;

ZDF:=(C-REF(C,1))/REF(C,1)*100;
STICKLINE(ZDF>9.8,O,C,6,0),COLORRED;
STICKLINE(ZDF<-9.8,O,C,5,0),COLORBLUE;
========================================================================
通达信版

SQ:=MA(C,20);
HLD:=(CLOSE-SQ)/SQ;
HH:=REF(HHV(HLD,360),1);
LL:=REF(LLV(HLD,360),1);
ZZ:=(HH+LL)/2;
WW:=(HH-LL)*5/6+LL;
DD:=(HH-LL)*1/6+LL;

【平衡】:SQ*(1+ZZ),COLORYELLOW;
IF(【平衡】<REF(【平衡】,1),【平衡】,DRAWNULL),COLOR00FF00;
【顶】:SQ*(1+HH),COLORRED,LINETHICK2;
次高:SQ*(1+WW),COLORFF00FF;
次低:SQ*(1+DD),COLORWHITE;
【底】:SQ*(1+LL),COLOR00FF00,LINETHICK2;

DRAWTEXT(H>次高 AND C<次高,次高,'★'),COLORYELLOW;
DRAWTEXT(H>【顶】 AND C<【顶】,H,'★'),COLOR00FF00;
DRAWTEXT(L<次低 AND C>次低,次低,'▲'),COLORYELLOW;
DRAWTEXT(L<【底】 AND C>【底】,L,'▲'),COLOR00FF00;

【量H】:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,21)/HHV(C,21))*100);
STICKLINE(【量H】=100,L,H,1,0),COLORFF00FF;
STICKLINE(【量H】=100 AND C>=O,C,O,8,1),COLORFF00FF;
STICKLINE(【量H】=100 AND C<O,C,O,8,0),COLORFF00FF;

ZDF:=(C-REF(C,1))/REF(C,1)*100;
STICKLINE(ZDF>9.8,O,C,6,0),COLORRED;
STICKLINE(ZDF<-9.8,O,C,5,0),COLORBLUE;
===========================================================
Sq:=ma(c,20);
改为：Sq:=ma(c,N);     N为可调参数。
这样喜欢不同周期的朋友可以自行设定。因人而定，效果更好。
贴图比较。N=5.
=========================================================

N=60


[ 本帖最后由 ljcqbb 于 2008-10-26 15:22 编辑 ]

谢谢 奉献！

谢谢源码分享。

谢谢源码分享。

效果不错，继续改进造福大家。

谢了

谢谢楼主分享

谢谢源码分享。

谢谢楼主分享

rsi布林通道使用效果如何?

请问老师，【月通道】指标，有的不能显示，比如601766，中国南车等等新股，谢谢指导。

新股不能正常显示的原因在于统计天数不足。
请将源码作如下改进，即可解决。
----------------------------------------------------------------------------------------------
tt:=BARSCOUNT(C);
Sq:=ma(c,n);
hld:=(close-Sq)/Sq;
pt:=if(tt<360,tt,360);
hh:=ref(hhv(hld,pt),1);
ll:=ref(llv(hld,pt),1);

自用通道改进版本在此
=================================
tt:=BARSCOUNT(C);
Sq:=ma(c,n);
hld:=(close-Sq)/Sq;
pt:=if(tt<360,tt,360);
hh:=ref(hhv(hld,pt),1);
ll:=ref(llv(hld,pt),1);
zz:=(hh+ll)/2;
ww:=(hh-ll)*5/6+ll;
dd:=(hh-ll)*1/6+ll;

【平衡】:sq*(1+zz),coloryellow,linethick0;
PARTLINE(【平衡】,【平衡】>ref(【平衡】,1),RGB(255,255,0),【平衡】<ref(【平衡】,1),RGB(0,255,0),1,RGB(0,0,255)),linethick2;

【顶】:sq*(1+hh),colorred,linethick2;
次高:sq*(1+ww),colorff00ff;
次低:sq*(1+dd),colorwhite;
【底】:sq*(1+ll),color00ff00,linethick2;

drawtext(h>次高 and c<次高,次高,'★'),coloryellow;
drawtext(h>【顶】 and c<【顶】,h,'★'),color00ff00;
drawtext(l<次低 and c>次低,次低,'▲'),coloryellow;
drawtext(l<【底】 and c>【底】,l,'▲'),color00ff00;

【量h】:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,21)/HHV(C,21))*100);
stickline(【量h】=100,l,h,1,0),colorff00ff;
stickline(【量h】=100 and c>=o,c,o,8,1),colorff00ff;
stickline(【量h】=100 and c<o,c,o,8,0),colorff00ff;


ZDF:=(C-REF(C,1))/REF(C,1)*100;
STICKLINE(ZDF>9.8,O,C,6,0),COLORRED;
STICKLINE(ZDF<-9.8,O,C,5,0),COLORBLUE;

[ 本帖最后由 ljcqbb 于 2008-11-17 20:54 编辑 ]

谢谢源码分享

谢谢源码分享。

非常感谢，感觉很好用，谢谢！！

用了通道+量布林的朋友应该已经获利了结了。
我们等待市场提供下一次出击时机。
目前，总结实战经验与教训，学习再学习！！！

谢谢源码分享

谢谢源码分享。

谢谢源码分享

早就有了，这里应该有人发布过了，还是谢谢！

谢谢源码分享。