很久不写公式了,把自巳发在xx论坛的东西翻过来,增加点积分,也算来看过骑兵,顶不顶无所谓,只要我真诚交流就可以了。
........................................................................................................
每每读到几个论坛的朋友提及渐变色的运用和如何将公式作二分之一分割,分割为三或四等等,为此我想通过几个公式的实践而加以说明。
就以最近在MACD论坛有一篇受到大家称赞,好评如潮的"飞刀W%R量价齐升选股公式"作例。读完使用说明后,感到作者非常突出-45这个关键位,好得提供了原码,为此我用单色补了一句画色带的语句,当时认为一般人而言,色带的警示作用把线条直观,不仅仅是为了美观。
STICKLINE(-100,-45,-100,10,0),ColorFF7f00;//画一条色带
b:=SMA((3*h+2*c+o+l)/7,10,1);
w1:=-100*(HHV(Hhv(b,1),N1)-b)/(HHV(Hhv(b,1),N1)-LLV(Llv(b,1),N1));
w2:=-100*(HHV(Hhv(b,1),N2)-b)/(HHV(Hhv(b,1),N2)-LLV(Llv(b,1),N2));
w3:=-100*(HHV(Hhv(b,1),N3)-b)/(HHV(Hhv(b,1),N3)-LLV(Llv(b,1),N3));
w4:=-100*(HHV(Hhv(b,1),N4)-b)/(HHV(Hhv(b,1),N4)-LLV(Llv(b,1),N4));
价格WR:(w1+w2+w3+w4)/4,colorgreen,linethick1;
a:=SMA(vol,10,1);
wr1:=-100*(HHV(Hhv(a,1),N1)-a)/(HHV(Hhv(a,1),N1)-LLV(Llv(a,1),N1));
wr2:=-100*(HHV(Hhv(a,1),N2)-a)/(HHV(Hhv(a,1),N2)-LLV(Llv(a,1),N2));
wr3:=-100*(HHV(Hhv(a,1),N3)-a)/(HHV(Hhv(a,1),N3)-LLV(Llv(a,1),N3));
wr4:=-100*(HHV(Hhv(a,1),N4)-a)/(HHV(Hhv(a,1),N4)-LLV(Llv(a,1),N4));
量WR:(wr1+wr2+wr3+wr4)/4,coloryellow,linethick1;
WR1: -100*(HHV(HIGH,55)-CLOSE)/(HHV(HIGH,55)-LLV(LOW,55)),colorred,linethick2;
多空平衡:-50,pointdot;安全线:-20,pointdot;风险区:-80,pointdot,colorcyan;
MA21:MA(C,21);
MA34:MA(C,34);
MA55:MA(C,55);
..........以下是解盘语句,省略(公式另发,注释内附用法)
这是我在年初做的五十五乖离,色带是上下分割的
STICKLINE(15,0,15,10,0),Color00aaff;//画0轴上色带
STICKLINE(-15,0,-15,10,0),ColorFF9f00;//画0轴下色带
个股 : (CLOSE-MA(CLOSE,55))/MA(CLOSE,55)*100,colorred,linethick2;
大盘 : (INDEXC-MA(INDEXC,55))/MA(INDEXC,55)*100,colorGREEN,linethick2;
13,POINTDOT;
0,POINTDOT;
-13,POINTDOT;
也算春色是我仿西湖春色,主要是分四色
RSV:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,10,1);
{J:3*K-2*D;}
STICKLINE(100,0,100,10,0),Color999999;//画色带1
STICKLINE(100,0,80,10,0),ColorFFaa00; //画色带2
STICKLINE(100,0,65,10,0),ColorFFaa00; //也可画色带
STICKLINE(100,0,50,10,0),ColorFFcc00; //画色带3
STICKLINE(100,0,20,10,0),Color666666; //画色带4
FILLRGN(K>D,K,D)COLORWHITE;
FILLRGN(K<D,K,D)COLORRED;
雷电区:90,LINETHICK0;
乌云:80,LINETHICK0;
湖面:50,POINTDOT;
底部:0,crossdot,COLORWHITE;
**********************************************
为了更能说明色彩分割问题我转引自已在十九测市中的一篇短文来作结尾吧。
答几个网友
STICKLINE(10,0,11,10,0),Colorwhite;
STICKLINE(10,0,8,10,0),ColorFF7F00;
STICKLINE(10,0,6.5,10,0),ColorFF7f00;
STICKLINE(10,0,5.0,10,0),ColorFF7f00;
STICKLINE(10,0,3.5,10,0),ColorFF7f00;
STICKLINE(10,0,2.0,10,0),Colorwhite;
5,ColorFF5000;
从渐变色调色板中读到的关于三分之一色彩分割的提问,我试做了一下,大概能给二位一点启发,我就很高兴了,上面是0-10的定位,下面则是0-100的。
STICKLINE(100,0,110,10,0),Colorwhite;
STICKLINE(100,0,80,10,0),ColorFF7F00;
STICKLINE(100,0,65,10,0),ColorFF7f00;
STICKLINE(100,0,50,10,0),ColorFF7f00;
STICKLINE(100,0,35,10,0),ColorFF7f00;
STICKLINE(100,0,20,10,0),Colorwhite;
50,ColorFF5000;
至于0轴的也可以用负数来解决。
