电竞比分网-中国电竞赛事及体育赛事平台

分享

【通達信】無意強爭春,不與群芳妒(乘風(fēng)對通達信指標寫法的一點小技巧)

 AS400r 2016-09-09
第一課,如何在通達信里畫色彩


通達信畫色帶,沒有飛狐輕松隨意方便,一點局限性,就是只能定義AB之間的畫色帶
DRAWBAND:畫出帶狀線.
用法:DRAWBAND(VAL1,COLOR1,VAL2,COLOR2),當(dāng)VAL1>VAL2時,在VAL1和VAL2之間填充COLOR1;當(dāng)VAL1<VAL2時,填充COLOR2,這里的顏色均使用RGB函數(shù)計算得到。
例如:DRAWBAND(OPEN,RGB(0,224,224),CLOSE,RGB(255,96,96));

下面我以二條布林線畫色帶為例子說明一下,正常對MA20與MA60做二條布林畫色帶

{先隱藏賦值,為了能將你想看到的線型的數(shù)據(jù)顯示在指標的當(dāng)頭位置}
MA20: MA(CLOSE,20),COLORRED,LINETHICK2;
MA60: MA(CLOSE,60),COLORFF0090,LINETHICK2;
UP:MA20+2*STD(CLOSE,20),LINETHICK1,COLOR404080;
DW:MA20-2*STD(CLOSE,20),LINETHICK1,COLORC0C0C0;
UP2:MA60+2*STD(CLOSE,60),LINETHICK1,COLOR808080;
DW2:MA60-2*STD(CLOSE,60),LINETHICK1,COLOR004000;
{然后畫色帶}
DRAWBAND(MA60,RGB(200,150,30),UP2,RGB(200,150,30));
DRAWBAND(MA60,RGB(100,100,150),DW2,RGB(100,100,150));
DRAWBAND(MA20,RGB(0,50,150),DW,RGB(0,50,150));
DRAWBAND(MA20,RGB(155,50,50),UP,RGB(155,50,50));
{因為畫色帶遮擋了原來的K線,所以要重做一次K線}
STICKLINE(C>O,H,L,0,0),COLORRED;
STICKLINE(C<=O,H,L,0,0),COLORCYAN;
STICKLINE(C>O,C,O,3.1,1),COLORRED;
STICKLINE(C<=O,C,O,3.1,0),COLORCYAN;
{最后將你想要的賦值的線畫出來和變色處理}
MA20,COLOR00FFFF,LINETHICK2;
IF(MA(C,20)<REF(MA(C,20),1),MA(C,20),DRAWNULL),COLOR0B0000,LINETHICK2;
MA60,COLORFF0090,LINETHICK2;
IF(MA(C,60)<REF(MA(C,60),1),MA(C,60),DRAWNULL),COLORFFF000,LINETHICK2;



要解決這個問題,那么我們就變通一下,將指標修改一下
要做一個小限制
IF(A>B,A,B)--就是當(dāng)A大于B時,顯示A,否則顯示B


{先隱藏賦值,為了能將你想看到的線型的數(shù)據(jù)顯示在指標的當(dāng)頭位置}
MA20: MA(CLOSE,20),COLORRED,LINETHICK2;
MA60: MA(CLOSE,60),COLORFF0090,LINETHICK2;
UP:MA20+2*STD(CLOSE,20),LINETHICK1,COLOR404080;
DW:MA20-2*STD(CLOSE,20),LINETHICK1,COLORC0C0C0;
UP2:MA60+2*STD(CLOSE,60),LINETHICK1,COLOR808080;
DW2:MA60-2*STD(CLOSE,60),LINETHICK1,COLOR004000;
{然后畫色帶}
DRAWBAND(MA60,RGB(200,150,30),UP2,RGB(200,150,30));
DRAWBAND(MA60,RGB(100,100,150),DW2,RGB(100,100,150));
DRAWBAND(MA20,RGB(0,50,150),DW,RGB(0,50,150));
DRAWBAND(MA20,RGB(155,50,50),UP,RGB(155,50,50));
{IF(UP>UP2,UP2,UP)就是當(dāng)UP大于UP2時,顯示UP2,否則顯示UP}
DRAWBAND(UP,RGB(0,150,50),IF(UP>UP2,UP2,UP),RGB(0,150,50));
DRAWBAND(DW,RGB(0,150,50),IF(DW<DW2,DW2,DW ),RGB(0,150,50));
{因為畫色帶遮擋了原來的K線,所以要重做一次K線}
STICKLINE(C>O,H,L,0,0),COLORRED;
STICKLINE(C<=O,H,L,0,0),COLORCYAN;
STICKLINE(C>O,C,O,3.1,1),COLORRED;
STICKLINE(C<=O,C,O,3.1,0),COLORCYAN;
{最后將你想要的賦值的線畫出來和變色處理}
MA20,COLOR00FFFF,LINETHICK2;
IF(MA(C,20)<REF(MA(C,20),1),MA(C,20),DRAWNULL),COLOR0B0000,LINETHICK2;
MA60,COLORFF0090,LINETHICK2;
IF(MA(C,60)<REF(MA(C,60),1),MA(C,60),DRAWNULL),COLORFFF000,LINETHICK2;


第二課,主圖疊加指標,先說疊加最高和最低點無法確定的副圖指標,這里以疊加MACD為例子

要疊加一個副圖,首先要定義副圖中心值的位置,然后再作分割處理
{先隱藏賦值,為了能將你想看到的線型的數(shù)據(jù)顯示在指標的當(dāng)頭位置}
MA20: MA(CLOSE,20),COLORRED,LINETHICK2;
MA60: MA(CLOSE,60),COLORFF0090,LINETHICK2;
UP:MA20+2*STD(CLOSE,20),LINETHICK1,COLOR404080;
DW:MA20-2*STD(CLOSE,20),LINETHICK1,COLORC0C0C0;
UP2:MA60+2*STD(CLOSE,60),LINETHICK1,COLOR808080;
DW2:MA60-2*STD(CLOSE,60),LINETHICK1,COLOR004000;
{然后畫色帶}
DRAWBAND(MA60,RGB(200,150,30),UP2,RGB(200,150,30));
DRAWBAND(MA60,RGB(100,100,150),DW2,RGB(100,100,150));
DRAWBAND(MA20,RGB(0,50,150),DW,RGB(0,50,150));
DRAWBAND(MA20,RGB(155,50,50),UP,RGB(155,50,50));
{IF(UP>UP2,UP2,UP)就是當(dāng)UP大于UP2時,顯示UP2,否則顯示UP}
DRAWBAND(UP,RGB(0,150,50),IF(UP>UP2,UP2,UP),RGB(0,150,50));
DRAWBAND(DW,RGB(0,150,50),IF(DW<DW2,DW2,DW ),RGB(0,150,50));
{疊加MACD}
DIFZ:=EMA(C,12)-EMA(C,26);
DEAZ:=EMA(DIFZ,9);
MACDZ:=2*(DIFZ-DEAZ);
HH0:=CONST(HHV(H,120))*1;{以現(xiàn)價的N日最高值為高點,我取120日,這個取值可以根據(jù)
自己電腦的版面而定}
LL0:=CONST(LLV(L,120))*1;{以現(xiàn)價的N日最低值為高點}
MM0:=CONST((HH0+LL0)/2);{取中間值}
HL0:=CONST(IF(CONST(C)>=MM0,LL0-(HH0-LL0)*0.2,HH0+(HH0-LL0)*0.2));
{此句為便于疊加副圖不影響版面,當(dāng)現(xiàn)價大于中間值時將疊加副圖放在主圖上沿反之放下沿
LL0-(HH0-LL0)*0.2是限制副圖大小0.2可根據(jù)自己的喜好調(diào)節(jié)}
HH1:=IF(CONST(C)<MM0,HH0,HL0);{再次設(shè)定疊加副圖的最高值,根據(jù)現(xiàn)價與中間值的關(guān)系可上可下}
LL1:=IF(CONST(C)>=MM0,LL0,HL0);{再次設(shè)定疊加副圖的最低值}
HL1:=(HH1+LL1)/2;{最后確定副圖的中間值位置}
STICKLINE(MACDZ>0,MACDZ*2+HL1,HL1,1,0),COLOR400080;
STICKLINE(MACDZ>0 AND MACDZ>REF(MACDZ,1),MACDZ*2+HL1,HL1,1,0),COLOR00FFFF;
STICKLINE(MACDZ<0,MACDZ*2+HL1,HL1,1,0),COLOR008080;
STICKLINE(MACDZ<0 AND MACDZ>REF(MACDZ,1),MACDZ*2+HL1,HL1,1,0),COLORC080FF;
(DIFZ*2+HL1),COLORRED;
(DEAZ*2+HL1),COLORFFFFFF;
IF(DIFZ<=REF(DIFZ,1),DIFZ*2+HL1,DRAWNULL),COLORFFF000;

{因為畫色帶遮擋了原來的K線,所以要重做一次K線}
STICKLINE(C>O,H,L,0,0),COLORRED;
STICKLINE(C<=O,H,L,0,0),COLORCYAN;
STICKLINE(C>O,C,O,3.1,1),COLORRED;
STICKLINE(C<=O,C,O,3.1,0),COLORCYAN;
{最后將你想要的賦值的線畫出來和變色處理}
MA20,COLOR00FFFF,LINETHICK2;
IF(MA(C,20)<REF(MA(C,20),1),MA(C,20),DRAWNULL),COLOR0B0000,LINETHICK2;
MA60,COLORFF0090,LINETHICK2;
IF(MA(C,60)<REF(MA(C,60),1),MA(C,60),DRAWNULL),COLORFFF000,LINETHICK2;





第三課,如果在主圖疊加有最高最低數(shù)據(jù)限制的副圖,這里以疊加RSI為例子

RSI的數(shù)值最高是100,最低是0,有了這個定義就好辦了(疊加KDJ性質(zhì)一樣),以疊加MACD的模板繼續(xù)修改


首先我們要做一個疊加副圖模板


HH:=CONST(HHV(C,120))*1;{取現(xiàn)價的N日最大值}
LL:=CONST(LLV(C,120))*1;{取現(xiàn)價的N日最小值}
HL:=CONST(IF(CONST((HH+LL)/2)<CONST(C),LL-(HH-LL)*0.2,HH+(HH-LL)*0.2));
{取疊加副圖自動轉(zhuǎn)換高低值,當(dāng)現(xiàn)價小于中間值時以LL-(HH-LL)*0.2為副圖自動轉(zhuǎn)換高低值,反之以HH+(HH-LL)*0.2為副圖自動轉(zhuǎn)換高低值}
HH1:=IF(CONST((HH+LL)/2)>CONST(C),HH,HL);{當(dāng)現(xiàn)價小于中間值時以最大值為最高點,反之以HL為最高點}
LL1:=IF(CONST((HH+LL)/2)<CONST(C),LL,HL);{當(dāng)現(xiàn)價小于中間值時以最小值為最低點,反之以HL為最低點}
HLMAX:=MAX(HH1,LL1);{設(shè)定所要疊加副圖比例的最大值}
HLMIN:=MIN(HH1,LL1);{設(shè)定所以疊加副圖比例的最小值}
HLMN1:=(HLMAX+HLMIN)/2;{取設(shè)定所要疊加副圖比例的最大最小值的中間值}
HLMN2:=HLMAX-HLMIN;{取設(shè)定所要疊加副圖比例的最大最小值的差值}
HLMN3:=(副圖比例最高值-副圖比例最低值)/2;
HLMN4:=副圖比例最高值-副圖比例最低值;
所疊加副圖線:(副圖線形-HLMN4)*HLMN2/HLMN3+HLMN1;{按比例疊加副圖線的計算方式}
由于所要疊加副圖的正常比例最高值是100,最低值是0,所以
HLMN3:=(副圖比例最高值-副圖比例最低值)/2;
HLMN4:=副圖比例最高值-副圖比例最低值;
所疊加副圖線:(副圖線形-HLMN3)*HLMN2/HLMN4+HLMN1;{按比例疊加副圖線的計算方式}


可以修改成
HLMN3:=(100-0)/2;
HLMN4:=100-0;

直接簡化為

所疊加副圖線:(副圖線形-50)*HLMN2/100+HLMN1;{按比例疊加副圖線的計算方式}



模板在此有更詳細的解釋
http://www./viewthread. ... 26amp%3Btypeid%3D38
-------------------
有了以上疊加副圖的模板,那么就好辦了,就以疊加RSI為例子

HH:=CONST(HHV(C,120))*1;
LL:=CONST(LLV(C,120))*1;
HL:=CONST(IF(CONST((HH+LL)/2)<CONST(C),LL-(HH-LL)*0.3,HH+(HH-LL)*0.3));
HH1:=IF(CONST((HH+LL)/2)>CONST(C),HH,HL);
LL1:=IF(CONST((HH+LL)/2)<CONST(C),LL,HL);
{以下是設(shè)定疊加副圖的比例}
HLMAX:=MAX(HH1,LL1);
HLMIN:=MIN(HH1,LL1);
HLMN1:=(HLMAX+HLMIN)/2;
HLMN2:=HLMAX-HLMIN;
{疊加副圖}
STICKLINE(C,HH1,HH1,1,0),COLOR858500;
STICKLINE(C,LL1,LL1,1,0),COLOR858500;
STICKLINE(C,(HH1+LL1)/2,(HH1+LL1)/2,1,0),COLOR858500;
("RSI.RSI1"-50)*HLMN2/100+HLMN1,COLORFC80FF,LINETHICK2;
("RSI.RSI2"-50)*HLMN2/100+HLMN1,COLOR00FFFF;
("RSI.RSI3"-50)*HLMN2/100+HLMN1,COLORFFFFFF;

STICKLINE(C>O,H,L,0,0),COLORRED;
STICKLINE(C<=O,H,L,0,0),COLORCYAN;
STICKLINE(C>O,C,O,3.1,1),COLORRED;
STICKLINE(C<=O,C,O,3.1,0),COLORCYAN;

M5:MA(C,5);
M10:MA(C,10);
M20:MA(C,20);
M60:MA(C,60);




如果你想再復(fù)雜點,多疊加那就加啊
HH:=CONST(HHV(C,120))*1;
LL:=CONST(LLV(C,120))*1;
HL:=CONST(IF(CONST((HH+LL)/2)<CONST(C),LL-(HH-LL)*0.3,HH+(HH-LL)*0.3));
HH1:=IF(CONST((HH+LL)/2)>CONST(C),HH,HL);
LL1:=IF(CONST((HH+LL)/2)<CONST(C),LL,HL);
{以下是設(shè)定疊加副圖的比例}
HLMAX:=MAX(HH1,LL1);
HLMIN:=MIN(HH1,LL1);
HLMN1:=(HLMAX+HLMIN)/2;
HLMN2:=HLMAX-HLMIN;

{先對最高最低值畫色帶,也可用柱子表示}
STICKLINE(C,HH1,(HH1+LL1)/2,5,0),COLOR858500;
STICKLINE(C,LL1,(HH1+LL1)/2,5,0),COLOR330000;
{對副圖的數(shù)值進行分割}
STICKLINE(C,(75-50)*HLMN2/100+HLMN1,(100-50)*HLMN2/100+HLMN1,5,0),
COLOR000088;
STICKLINE(C,(25-50)*HLMN2/100+HLMN1,(0-50)*HLMN2/100+HLMN1,5,0),
COLOR555555;
{疊加副圖}
STICKLINE("KDJ.K"(9,3,3)>"KDJ.D"(9,3,3),("KDJ.K"(9,3,3)-50)*HLMN2/100
+HLMN1,("KDJ.D"(9,3,3)-50)*HLMN2/100+HLMN1,1.5,0),COLOR5955FF;
STICKLINE("KDJ.K"(9,3,3)<"KDJ.D"(9,3,3),("KDJ.K"(9,3,3)-50)*HLMN2/100
+HLMN1,("KDJ.D"(9,3,3)-50)*HLMN2/100+HLMN1,1.5,0),COLORFF5955;
W1:=(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14))*100;
(W1-50)*HLMN2/100+HLMN1,COLORBLUE;
("RSI.RSI1"-50)*HLMN2/100+HLMN1,COLORFC80FF,LINETHICK2;
("RSI.RSI2"-50)*HLMN2/100+HLMN1,COLOR00FFFF;
("RSI.RSI3"-50)*HLMN2/100+HLMN1,COLORFFFFFF;

STICKLINE(C>O,H,L,0,0),COLORRED;
STICKLINE(C<=O,H,L,0,0),COLORCYAN;
STICKLINE(C>O,C,O,3.1,1),COLORRED;
STICKLINE(C<=O,C,O,3.1,0),COLORCYAN;

M5:MA(C,5);
M10:MA(C,10);
M20:MA(C,20);
M60:MA(C,60);








有的朋友喜歡雙疊加,也做了一個參考

MA5:MA(CLOSE,5),COLORFF00FF,LINETHICK0;
MA13:MA(C,13),COLOR00FFFF,LINETHICK0;
MA34: MA(CLOSE,34),COLORRED,LINETHICK0;
MA55: MA(CLOSE,55),COLORFF0090,LINETHICK0;

HH0:=CONST(HHV(C,150));
LL0:=CONST(LLV(C,150));
HL:=CONST(IF(CONST((HH0+LL0)/2)<CONST(C),LL0-(HH0-LL0)*0.2,HH0+(HH0-LL0)*0.2));
HH1:=IF(CONST((HH0+LL0)/2)>CONST(C),HH0,HL);
LL1:=IF(CONST((HH0+LL0)/2)<CONST(C),LL0,HL);
HL2:=CONST(IF(CONST((HH0+LL0)/2)>CONST(C),LL0*0.95-(HH0-LL0)*0.1,HH0*0.95+(HH0-LL0)*0.1));
HLMAX:=MAX(HH1,LL1);
HLMIN:=MIN(HH1,LL1);
HLMN1:=(HLMAX+HLMIN)/2;
HLMN2:=HLMAX-HLMIN;




STICKLINE(C,HH1,(HH1+LL1)/2,5,0),COLOR858500;
STICKLINE(C,LL1,(HH1+LL1)/2,5,0),COLOR330000;
STICKLINE(C,(0.75-0.5)*HLMN2/0.5+HLMN1,(1-0.5)*HLMN2/0.5+HLMN1,5,0),
COLOR000088;
STICKLINE(C,(0.25-0.5)*HLMN2/0.5+HLMN1,(0-0.5)*HLMN2/0.5+HLMN1,5,0),
COLOR555555;

STICKLINE("KDJ.K"(9,3,3)>"KDJ.D"(9,3,3),("KDJ.K"(9,3,3)/100-0.5)*HLMN2/0.5
+HLMN1,("KDJ.D"(9,3,3)/100-0.5)*HLMN2/0.5+HLMN1,1.5,0),COLOR5955FF;
STICKLINE("KDJ.K"(9,3,3)<"KDJ.D"(9,3,3),("KDJ.K"(9,3,3)/100-0.5)*HLMN2/0.5
+HLMN1,("KDJ.D"(9,3,3)/100-0.5)*HLMN2/0.5+HLMN1,1.5,0),COLORFF5955;
("KDJ.J"(27,3,3)/100-0.5)*HLMN2/0.5+HLMN1,COLORFC80FF,LINETHICK2;
("KDJ.K"(27,3,3)/100-0.5)*HLMN2/0.5+HLMN1,COLOR00FFFF;
("KDJ.D"(27,3,3)/100-0.5)*HLMN2/0.5+HLMN1,COLORFFFFFF;

STICKLINE("MACD.MACD">0,"MACD.MACD"*2+HL2,HL2,1,0),COLOR400080;
STICKLINE("MACD.MACD">0 AND "MACD.MACD">REF("MACD.MACD",1),
"MACD.MACD"*2+HL2,HL2,1,0),COLOR00FFFF;
STICKLINE("MACD.MACD"<0,"MACD.MACD"*2+HL2,HL2,1,0),COLOR008080;
STICKLINE("MACD.MACD"<0 AND "MACD.MACD">REF("MACD.MACD",1),
"MACD.MACD"*2+HL2,HL2,1,0),COLORC080FF;
("MACD.DIF"*2+HL2),COLORRED;
("MACD.DEA"*2+HL2),COLORFFFFFF;


MA13,COLOR00FFFF,LINETHICK2;
IF(MA(C,13)<REF(MA(C,13),1),MA(C,13),DRAWNULL),COLOR0B0000,LINETHICK2;
MA55,COLORFF0090,LINETHICK2;
IF(MA(C,55)<REF(MA(C,55),1),MA(C,55),DRAWNULL),COLORFFF000,LINETHICK2;
STICKLINE(C>O,H,L,0,0),COLORRED;
STICKLINE(C<=O,H,L,0,0),COLORCYAN;
STICKLINE(C>O,C,O,3.1,1),COLORRED;
STICKLINE(C<=O,C,O,3.1,0),COLORCYAN;

MA34,COLORRED;
IF(MA(C,34)<REF(MA(C,34),1),MA(C,34),DRAWNULL),COLORC08000,LINETHICK1;
MA5,COLORFF00FF;
IF(MA(C,5)<REF(MA(C,5),1),MA(C,5),DRAWNULL),COLORCYAN,LINETHICK1;


副圖疊加

以MACD為例子,因為MACD的高低點值難以確定,所以要疊加KDJ/RSI等,就以MACD為主體

疊加可以做成二種方式

一是MACD在上疊加在下

DIF:"MACD.DIF",NODRAW;
DEA:"MACD.DEA",NODRAW;
MACD:"MACD.MACD",COLORSTICK,NODRAW;

HH:=CONST(HHV(DIF,60))*1;
LL:=CONST(LLV(DIF,60))*1;
HL:=CONST(IF(CONST((HH+LL)/2)>CONST(DIF),LL-(HH-LL)*0.5,HH+(HH-LL)*0.5));

HH1:=IF(CONST(HL)<CONST(DIF),LL,HL);
LL1:=IF(CONST(HL)>CONST(DIF),HH,HL);

{以下是設(shè)定疊加副圖的比例}
HLMAX:=MAX(HH1,LL1);
HLMIN:=MIN(HH1,LL1);
HLMN1:=(HLMAX+HLMIN)/2;
HLMN2:=HLMAX-HLMIN;
{先對最高最低值畫色帶,也可用柱子表示}
STICKLINE(C,HH1,(HH1+LL1)/2,5,0),COLOR858500;
STICKLINE(C,LL1,(HH1+LL1)/2,5,0),COLOR330000;
{對副圖的數(shù)值進行分割}
STICKLINE(C,(75-50)*HLMN2/100+HLMN1,(100-50)*HLMN2/100+HLMN1,5,0),
COLOR000088;
STICKLINE(C,(25-50)*HLMN2/100+HLMN1,(0-50)*HLMN2/100+HLMN1,5,0),
COLOR555555;

STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,1.8,0),COLOR000055;
STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,1.1,0),COLOR000099;
STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,0.6,0),COLOR0000BB;
STICKLINE(MACD<=REF(MACD,1) AND MACD>0,0,MACD,1.8,0),COLOR888888;
STICKLINE(MACD<=REF(MACD,1) AND MACD>0,0,MACD,1.1,0),COLORBBBBBB;
STICKLINE(MACD<=REF(MACD,1) AND MACD>0,0,MACD,0.6,0),COLORDDDDDD;
STICKLINE(MACD>REF(MACD,1) AND MACD<0,0,MACD,1.8,0),COLOR3377AA;
STICKLINE(MACD>REF(MACD,1) AND MACD<0,0,MACD,1.1,0),COLOR3388BB;
STICKLINE(MACD>REF(MACD,1) AND MACD<0,0,MACD,0.6,0),COLOR4499CC;
STICKLINE(MACD<=REF(MACD,1) AND MACD<0,0,MACD,1.8,0),COLORFF3300;
STICKLINE(MACD<=REF(MACD,1) AND MACD<0,0,MACD,1.1,0),COLORFF5500;
STICKLINE(MACD<=REF(MACD,1) AND MACD<0,0,MACD,0.6,0),COLORFF7700;

{疊加副圖}
STICKLINE("KDJ.K"(9,3,3)>"KDJ.D"(9,3,3),("KDJ.K"(9,3,3)-50)*HLMN2/100
+HLMN1,("KDJ.D"(9,3,3)-50)*HLMN2/100+HLMN1,1.5,0),COLOR5955FF;
STICKLINE("KDJ.K"(9,3,3)<"KDJ.D"(9,3,3),("KDJ.K"(9,3,3)-50)*HLMN2/100
+HLMN1,("KDJ.D"(9,3,3)-50)*HLMN2/100+HLMN1,1.5,0),COLORFF5955;
W1:=(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14))*100;
(W1-50)*HLMN2/100+HLMN1,COLORBLUE;
("RSI.RSI1"-50)*HLMN2/100+HLMN1,COLORFC80FF,LINETHICK2;
("RSI.RSI2"-50)*HLMN2/100+HLMN1,COLOR00FFFF;
("RSI.RSI3"-50)*HLMN2/100+HLMN1,COLORFFFFFF;

DRAWBAND(DIF,RGB(200,50,55),DEA,RGB(50,100,10));
IF(C>0,DIF,DRAWNULL),COLORRED,LINETHICK1;
IF(C>0,DEA,DRAWNULL),COLOR00FFFF,LINETHICK1;
IF(DEA<REF(DEA,1),DEA,DRAWNULL),COLORBE7F6F,LINETHICK1;
IF(DIF<=REF(DIF,1),DIF,DRAWNULL),COLORBLUE,LINETHICK1;





二是MACD在上時疊加也在上

DIF:"MACD.DIF",NODRAW;
DEA:"MACD.DEA",NODRAW;
MACD:"MACD.MACD",COLORSTICK,NODRAW;

HH:=CONST(HHV(DIF,60))*1;
LL:=CONST(LLV(DIF,60))*1;
HL:=CONST(IF(CONST((HH+LL)/2)<CONST(DIF),LL-(HH-LL)*0.5,HH+(HH-LL)*0.5));
HH1:=IF(CONST(HL)>CONST(DIF),HH,HL);
LL1:=IF(CONST(HL)<CONST(DIF),LL,HL);
{以下是設(shè)定疊加副圖的比例}
HLMAX:=MAX(HH1,LL1);
HLMIN:=MIN(HH1,LL1);
HLMN1:=(HLMAX+HLMIN)/2;
HLMN2:=HLMAX-HLMIN;
{先對最高最低值畫色帶,也可用柱子表示}
STICKLINE(C,HH1,(HH1+LL1)/2,5,0),COLOR858500;
STICKLINE(C,LL1,(HH1+LL1)/2,5,0),COLOR330000;
{對副圖的數(shù)值進行分割}
STICKLINE(C,(75-50)*HLMN2/100+HLMN1,(100-50)*HLMN2/100+HLMN1,5,0),
COLOR000088;
STICKLINE(C,(25-50)*HLMN2/100+HLMN1,(0-50)*HLMN2/100+HLMN1,5,0),
COLOR555555;

STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,1.8,0),COLOR000055;
STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,1.1,0),COLOR000099;
STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,0.6,0),COLOR0000BB;
STICKLINE(MACD<=REF(MACD,1) AND MACD>0,0,MACD,1.8,0),COLOR888888;
STICKLINE(MACD<=REF(MACD,1) AND MACD>0,0,MACD,1.1,0),COLORBBBBBB;
STICKLINE(MACD<=REF(MACD,1) AND MACD>0,0,MACD,0.6,0),COLORDDDDDD;
STICKLINE(MACD>REF(MACD,1) AND MACD<0,0,MACD,1.8,0),COLOR3377AA;
STICKLINE(MACD>REF(MACD,1) AND MACD<0,0,MACD,1.1,0),COLOR3388BB;
STICKLINE(MACD>REF(MACD,1) AND MACD<0,0,MACD,0.6,0),COLOR4499CC;
STICKLINE(MACD<=REF(MACD,1) AND MACD<0,0,MACD,1.8,0),COLORFF3300;
STICKLINE(MACD<=REF(MACD,1) AND MACD<0,0,MACD,1.1,0),COLORFF5500;
STICKLINE(MACD<=REF(MACD,1) AND MACD<0,0,MACD,0.6,0),COLORFF7700;
{疊加副圖}
STICKLINE("KDJ.K"(9,3,3)>"KDJ.D"(9,3,3),("KDJ.K"(9,3,3)-50)*HLMN2/100
+HLMN1,("KDJ.D"(9,3,3)-50)*HLMN2/100+HLMN1,1.5,0),COLOR5955FF;
STICKLINE("KDJ.K"(9,3,3)<"KDJ.D"(9,3,3),("KDJ.K"(9,3,3)-50)*HLMN2/100
+HLMN1,("KDJ.D"(9,3,3)-50)*HLMN2/100+HLMN1,1.5,0),COLORFF5955;
W1:=(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14))*100;
(W1-50)*HLMN2/100+HLMN1,COLORBLUE;
("RSI.RSI1"-50)*HLMN2/100+HLMN1,COLORFC80FF,LINETHICK2;
("RSI.RSI2"-50)*HLMN2/100+HLMN1,COLOR00FFFF;
("RSI.RSI3"-50)*HLMN2/100+HLMN1,COLORFFFFFF;

DRAWBAND(DIF,RGB(200,50,55),DEA,RGB(50,100,10));
IF(C>0,DIF,DRAWNULL),COLORRED,LINETHICK1;
IF(C>0,DEA,DRAWNULL),COLOR00FFFF,LINETHICK1;
IF(DEA<REF(DEA,1),DEA,DRAWNULL),COLORBE7F6F,LINETHICK1;
IF(DIF<=REF(DIF,1),DIF,DRAWNULL),COLORBLUE,LINETHICK1;




疊加到最低值確定最高值不確定的副圖,如VOL

相對來說,這個更簡單,還是那個模板,因為VOL的低點是確立的0,所以只要取階段最高點做疊加高點,取階段最高點的1/2做疊加最低點就行了

量:V,NODRAW;
R1:"RSI.RSI1"(6,12,24),COLOR00FFFF,NODRAW;
R2:"RSI.RSI2"(6,12,24),COLORFFFFFF,NODRAW;
R3:EMA("RSI.RSI3"(6,12,24),21),COLOR1477FF,NODRAW;



HH:=CONST(HHV(V,100))*1.2;
LL:=CONST(HH/2),POINTDOT;
MM:=(HH+LL)/2;
STICKLINE(C,HH,MM,5,0),COLOR858500;
STICKLINE(C,LL,MM,5,0),COLOR330000;


HKMAX:=MAX(HH,LL);
LKMIN:=MIN(HH,LL);
KHLB:=(HKMAX+LKMIN)/2;
KHLC:=HKMAX-LKMIN;
STICKLINE(C,(0.8-0.5)*KHLC/1+KHLB,(1-0.5)*KHLC/1+KHLB,5,0),COLOR000088;
STICKLINE(C,(0.2-0.5)*KHLC/1+KHLB,(0-0.5)*KHLC/1+KHLB,5,0),COLOR555555;


STICKLINE(C>REF(C,1),0,V,2.5,1),COLORRED;
STICKLINE(C<=REF(C,1),0,V,2.5,1),COLORFFF000;


MV5:INTPART(MA(V,5)),COLORRED;
MV10:MA(V,10),COLORFF00FF,LINETHICK1;
MV35:INTPART(MA(V,35)),COLORYELLOW,LINETHICK2;
IF(MV35<=REF(MV35,1),MV35,DRAWNULL),COLORBLUE,LINETHICK2;
IF(MV10<=REF(MV10,1),MV10,DRAWNULL),COLOR008080,LINETHICK1;
IF(MV5<=REF(MV5,1),MV5,DRAWNULL),COLORCYAN;

(EMA("RSI.RSI3"(6,12,24)/100,21)-0.5)*KHLC/1+KHLB,COLOR1477FF,LINETHICK2;
IF(EMA(EMA("RSI.RSI3"(6,12,48)/100,14),5)<=REF(EMA(EMA("RSI.RSI3"(6,12,48)/100,14),5),1)
,(EMA(EMA("RSI.RSI3"(6,12,48)/100,14),5)-0.5)*KHLC/1+KHLB,DRAWNULL)
,COLORFFF000,LINETHICK2;
("RSI.RSI1"(6,12,24)/100-0.5)*KHLC/1+KHLB,COLOR00FFFF;
("RSI.RSI2"(6,12,24)/100-0.5)*KHLC/1+KHLB,COLORFFFFFF;



主圖疊加量


HH0:=CONST(HHV(H,120))*1;
LL0:=CONST(LLV(L,120))*1;
MM0:=CONST((HH0+LL0)/2);
HH1:=IF(CONST(C)<MM0,LL0-(HH0-LL0)*0.4,LL0-(HH0-LL0)*0.2),COLORRED;
LL1:=LL0;HLMAX:=MAX(HH1,LL1);
HLMIN:=MIN(HH1,LL1);
HLMN1:=(HLMAX+HLMIN)/2;
HLMN2:=(HLMAX-HLMIN);
HLMN3:=HHV(V,250)/2;
HLMN4:=HHV(V,250);
VZ:=(V-HLMN3)*HLMN2/HLMN4+HLMN1;
STICKLINE(C>=O,VZ,(0-HLMN3)*HLMN2/HLMN4+HLMN1,2,1),COLORRED;
STICKLINE(C<O,VZ,(0-HLMN3)*HLMN2/HLMN4+HLMN1,2,0),COLORCYAN;
(MA(V,5)-HLMN3)*HLMN2/HLMN4+HLMN1,COLORFFFFFF;
(MA(V,10)-HLMN3)*HLMN2/HLMN4+HLMN1,COLOR00FFFF;





整套方法已經(jīng)寫完,謹以此奉獻給熱愛指標的朋友們!希望你能提煉出更好的方法和技巧!

    本站是提供個人知識管理的網(wǎng)絡(luò)存儲空間,所有內(nèi)容均由用戶發(fā)布,不代表本站觀點。請注意甄別內(nèi)容中的聯(lián)系方式、誘導(dǎo)購買等信息,謹防詐騙。如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容,請點擊一鍵舉報。
    轉(zhuǎn)藏 分享 獻花(0

    0條評論

    發(fā)表

    請遵守用戶 評論公約

    類似文章 更多