打印本文
關(guān)閉窗口
相關(guān)標(biāo)簽: 同花順bs買賣點(diǎn)自動提示 、 同花順小財(cái)神bs買賣點(diǎn) 、 大智慧bs買賣點(diǎn)可信嗎 、 通達(dá)信買賣點(diǎn)指標(biāo) 、 通達(dá)信分時(shí)買賣點(diǎn)提示 、 通達(dá)信手機(jī)指標(biāo) 、 同花順bs買賣點(diǎn)指標(biāo)公式 、 買賣點(diǎn)提示指標(biāo)公式 、 bs買賣點(diǎn)指標(biāo)好用嗎 、 同花順bs點(diǎn)怎么設(shè)置 、 股票bs點(diǎn)分析方法 、 bs點(diǎn)出現(xiàn)的股票怎么篩選 、
?
參數(shù)使用：
1：調(diào)節(jié)參數(shù)切換；切換=1時(shí)顯示區(qū)間黃金分割；切換=2時(shí)顯示區(qū)間江恩分割；切換=3時(shí)顯示區(qū)間百分比；切換=4時(shí)顯示各個(gè)平均線；切換=5時(shí)顯示布林線；
2：當(dāng)切換等于1或者2或者3時(shí)，分別調(diào)整起點(diǎn)和終點(diǎn)的值，可確定你要分割的區(qū)間（兩條豎線之間區(qū)間）
用途：任何各種分割，都是對前面的某個(gè)波段區(qū)間的分割，來研判現(xiàn)在股價(jià)的趨勢，以及可能的壓力位，支撐位；
對個(gè)股來說，有的主力資金習(xí)慣用黃金分割，有的主力資金習(xí)慣用江恩分割或者百分比來作為技術(shù)參考；
特別是能主導(dǎo)某個(gè)股票股價(jià)趨勢的主力資金，他們一段時(shí)間會用江恩分割，另一段時(shí)間會用百分比或者黃金分割（為什么？你一想就明白了）；本人做這個(gè)公式的目的就是在此；
平均線，均線粘合度，布林線這是通用問題不多說；
中位線是各個(gè)平均線的平均值線，他的作用是很大的，往往是波段的壓力線，支撐線，可以找個(gè)股比較比較就知道了；
//區(qū)間三分割主圖或者副圖
?
?
?
原理解析：
//參數(shù) 起點(diǎn)(0,999,60),終點(diǎn)(0,999,10),切換(1,5,1)DRAWGBKLAST(1,STRIP(自定色,自定色,1))
NX賦值:到最后交易的周期+1
WZ賦值:到最后交易的周期+1=1
WX賦值:到最后交易的周期+1=起點(diǎn)
WT賦值:上次WX距今天數(shù)
WXZ賦值:如果WT>=0,返回1,否則返回?zé)o效數(shù)
QH賦值:如果NX>=終點(diǎn)ANDNX<=起點(diǎn),返回最高價(jià),否則返回?zé)o效數(shù)
QL賦值:如果NX>=終點(diǎn)ANDNX<=起點(diǎn),返回最低價(jià),否則返回?zé)o效數(shù)
XZ賦值:如果NX>=終點(diǎn),返回1,否則返回?zé)o效數(shù)
分割計(jì)算ZH賦值:0日內(nèi)QH的最高值
ZL賦值:0日內(nèi)QL的最低值
HXT賦值:(ZH-ZL)
J1賦值:ZH-HXT*0.241
J2賦值:ZH-HXT*0.382
J3賦值:ZH-HXT*0.613
J4賦值:ZH-HXT*0.786
JXT賦值:(ZH-ZL)/8
H1賦值:ZH-JXT*1
H2賦值:ZH-JXT*2
H3賦值:ZH-JXT*3
H4賦值:ZH-JXT*5
H5賦值:ZH-JXT*6
H6賦值:ZH-JXT*7
BXT賦值:(ZH-ZL)/10
B1賦值:ZH-BXT*1
B2賦值:ZH-BXT*2
B3賦值:ZH-BXT*3
B4賦值:ZH-BXT*4
B5賦值:ZH-BXT*6
B6賦值:ZH-BXT*7
B7賦值:ZH-BXT*8
B8賦值:ZH-BXT*9
//K線STICKLINE(開盤價(jià),收盤價(jià) ,開盤價(jià),9,0 ),COLOR000000
當(dāng)滿足條件收陰線時(shí),在收盤價(jià)和開盤價(jià)位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR007700
當(dāng)滿足條件收陰線時(shí),在收盤價(jià)和開盤價(jià)位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLOR009900
當(dāng)滿足條件收陰線時(shí),在收盤價(jià)和開盤價(jià)位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR00BB00
當(dāng)滿足條件收陰線時(shí),在收盤價(jià)和開盤價(jià)位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR00DD00
當(dāng)滿足條件收陰線時(shí),在最高價(jià)和最低價(jià)位置之間畫柱狀線,寬度為1.5,0不為0則畫空心柱.,COLOR00FF00
當(dāng)滿足條件收盤價(jià)>=開盤價(jià)時(shí),在收盤價(jià)和開盤價(jià)位置之間畫柱狀線,寬度為8,0不為0則畫空心柱. ,COLOR000077
當(dāng)滿足條件收盤價(jià)>=開盤價(jià)時(shí),在收盤價(jià)和開盤價(jià)位置之間畫柱狀線,寬度為7,0不為0則畫空心柱. ,COLOR000099
當(dāng)滿足條件收盤價(jià)>=開盤價(jià)時(shí),在收盤價(jià)和開盤價(jià)位置之間畫柱狀線,寬度為5,0不為0則畫空心柱. ,COLOR0000BB
當(dāng)滿足條件收盤價(jià)>=開盤價(jià)時(shí),在收盤價(jià)和開盤價(jià)位置之間畫柱狀線,寬度為3,0不為0則畫空心柱. ,COLOR0000DD
當(dāng)滿足條件收盤價(jià)>=開盤價(jià)時(shí),在最高價(jià)和最低價(jià)位置之間畫柱狀線,寬度為1.5,0不為0則畫空心柱.,COLOR0000FF
當(dāng)滿足條件最高價(jià)=LOWANDCLOSE>1日前的收盤價(jià)時(shí),在最高價(jià)-0.01和最高價(jià)+0.01位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR0000FF
當(dāng)滿足條件最高價(jià)=LOWANDCLOSE<1日前的收盤價(jià)時(shí),在最高價(jià)-0.01和最高價(jià)+0.01位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR00FF00
//分割顯示IF 切換>=1 AND 切換<=3 THEN BEGINVERLINE(NX=終點(diǎn) OR NX=起點(diǎn),2),COLOR009FFF
X1賦值:如果切換=1,返回J1,否則返回如果切換=2,返回H1,否則返回如果切換=3,返回B1,否則返回?zé)o效數(shù)
X2賦值:如果切換=1,返回J2,否則返回如果切換=2,返回H2,否則返回如果切換=3,返回B2,否則返回?zé)o效數(shù)
X3賦值:如果切換=1,返回J3,否則返回如果切換=2,返回H3,否則返回如果切換=3,返回B3,否則返回?zé)o效數(shù)
X4賦值:如果切換=1,返回J4,否則返回如果切換=2,返回H4,否則返回如果切換=3,返回B4,否則返回?zé)o效數(shù)
輸出高:若如果WZ,返回ZH,否則返回?zé)o效數(shù)則將最近起點(diǎn)-1周期置為1*WXZ,COLORFF88FF,線寬為2
輸出低:若如果WZ,返回ZL,否則返回?zé)o效數(shù)則將最近起點(diǎn)-1周期置為1*WXZ,COLORFF88FF,線寬為2
輸出中:若如果WZ,返回(ZH+ZL)/2,否則返回?zé)o效數(shù)則將最近起點(diǎn)-1周期置為1*WXZ,COLORFF88FF
輸出分1:若如果WZ,返回X1,否則返回?zé)o效數(shù)則將最近起點(diǎn)-1周期置為1*WXZ,COLORFFFF00
輸出分2:若如果WZ,返回X2,否則返回?zé)o效數(shù)則將最近起點(diǎn)-1周期置為1*WXZ,COLORFFFF00
輸出分3:若如果WZ,返回X3,否則返回?zé)o效數(shù)則將最近起點(diǎn)-1周期置為1*WXZ,COLORFFFF00
輸出分4:若如果WZ,返回X4,否則返回?zé)o效數(shù)則將最近起點(diǎn)-1周期置為1*WXZ,COLORFFFF00
END
BEGINX5賦值:如果切換=2,返回H5,否則返回B5
X6賦值:如果切換=2,返回H6,否則返回B6
輸出分5:若如果WZ,返回X5,否則返回?zé)o效數(shù)則將最近起點(diǎn)-1周期置為1*WXZ,COLORFFFF00
輸出分6:若如果WZ,返回X6,否則返回?zé)o效數(shù)則將最近起點(diǎn)-1周期置為1*WXZ,COLORFFFF00
END
BEGINX7賦值:B7
X8賦值:B8
輸出分7:若如果WZ,返回X7,否則返回NULL則將最近起點(diǎn)-1周期置為1*WXZ,COLORFFFF00
輸出分8:若如果WZ,返回X8,否則返回NULL則將最近起點(diǎn)-1周期置為1*WXZ,COLORFFFF00
END
//分割提示DRAWTEXT(WZ,高,'`'+TOSTRING(高,2)+'(高)'),COLORFF88FF
當(dāng)滿足條件WZ時(shí),在低位置書寫文字,COLORFF88FF
當(dāng)滿足條件WZ時(shí),在中位置書寫文字,COLORFF88FF
當(dāng)滿足條件WZ時(shí),在分1位置書寫文字,COLORFFFFFF
當(dāng)滿足條件WZ時(shí),在分2位置書寫文字,COLORFFFFFF
當(dāng)滿足條件WZ時(shí),在分3位置書寫文字,COLORFFFFFF
當(dāng)滿足條件WZ時(shí),在分4位置書寫文字,COLORFFFFFF
當(dāng)滿足條件WZ時(shí),在分5位置書寫文字,COLORFFFFFF
當(dāng)滿足條件WZ時(shí),在分6位置書寫文字,COLORFFFFFF
當(dāng)滿足條件WZ時(shí),在分7位置書寫文字,COLORFFFFFF
當(dāng)滿足條件WZ時(shí),在分8位置書寫文字,COLORFFFFFF
輸出條件判斷 切換=4 THEN BEGINAA5:收盤價(jià)的5日簡單移動平均,COLORFFFFFF
輸出AA10:收盤價(jià)的10日簡單移動平均,COLOR00FFFF
輸出AA20:收盤價(jià)的20日簡單移動平均,COLOR009FFF
輸出AA30:收盤價(jià)的30日簡單移動平均,COLORFFFF00
輸出AA60:收盤價(jià)的60日簡單移動平均,COLOR0000FF
輸出AA120:收盤價(jià)的120日簡單移動平均,COLOR00FF00
輸出AA250:收盤價(jià)的250日簡單移動平均,COLORFF00FF
ZDX賦值:AA5和AA10的較大值
ZXX賦值:AA5和AA10的較小值
NHD賦值:(ZDX/ZXX-1)*100
中位線賦值:(AA5+AA10+AA20+AA30+AA60+AA120+AA250)/7
PARTLINE(中位線,1,自定色,1,自定色),線寬為2
當(dāng)滿足條件到最后交易的周期+1=1時(shí),在中位線位置書寫文字,COLORFF88FF
END
輸出條件判斷 切換=5 THEN BEGINBOLL:收盤價(jià)的20日簡單移動平均,COLORCCCCCC
//曲線屬性--輸出線性--不輸出PARTLINE(BOLL,BOLL>BOLL[1],自定色,BOLL<=BOLL[1],自定色)
輸出UB:BOLL+2*收盤價(jià)的20日估算標(biāo)準(zhǔn)差,COLORFF88FF
輸出LB:BOLL-2*收盤價(jià)的20日估算標(biāo)準(zhǔn)差,COLOR00FFFF
當(dāng)滿足條件到最后交易的周期+1=1時(shí),在BOLL位置書寫文字,COLORFF88FF
END
當(dāng)滿足條件到最后交易的周期=1時(shí),在橫軸1/100縱軸0位置書寫文字,COLOR00FFFF
源碼：
?
//參數(shù) 起點(diǎn)(0,999,60),終點(diǎn)(0,999,10),切換(1,5,1)
DRAWGBKLAST(1,STRIP(RGB(30,80,220),RGB(130,80,180),1));
nx:=CURRBARSCOUNT+1;
wz:=CURRBARSCOUNT+1=1;
wx:=CURRBARSCOUNT+1=起點(diǎn);
wt:=BARSLAST(wx);
wxz:=IF(wt>=0,1,DRAWNULL);
QH:=IF(nx>=終點(diǎn) AND nx<=起點(diǎn),H,DRAWNULL);
QL:=IF(nx>=終點(diǎn) AND nx<=起點(diǎn),L,DRAWNULL);
XZ:=IF(nx>=終點(diǎn),1,DRAWNULL);
//分割計(jì)算
ZH:=HHV(QH,0);
ZL:=LLV(QL,0);
HXT:=(ZH-ZL);
J1:=ZH-HXT*0.241;
J2:=ZH-HXT*0.382;
J3:=ZH-HXT*0.613;
J4:=ZH-HXT*0.786;
JXT:=(ZH-ZL)/8;
H1:=ZH-JXT*1;
H2:=ZH-JXT*2;
H3:=ZH-JXT*3;
H4:=ZH-JXT*5;
H5:=ZH-JXT*6;
H6:=ZH-JXT*7;
BXT:=(ZH-ZL)/10;
B1:=ZH-BXT*1;
B2:=ZH-BXT*2;
B3:=ZH-BXT*3;
B4:=ZH-BXT*4;
B5:=ZH-BXT*6;
B6:=ZH-BXT*7;
B7:=ZH-BXT*8;
B8:=ZH-BXT*9;
//k線
STICKLINE(OPEN,CLOSE ,OPEN,9,0 ),COLOR000000;
STICKLINE(OPEN>CLOSE ,CLOSE ,OPEN,8,0 ),COLOR007700;
STICKLINE(OPEN>CLOSE ,CLOSE ,OPEN,7,0 ),COLOR009900;
STICKLINE(OPEN>CLOSE ,CLOSE ,OPEN,5,0 ),COLOR00bb00;
STICKLINE(OPEN>CLOSE ,CLOSE ,OPEN,3,0 ),COLOR00dd00;
STICKLINE(OPEN>CLOSE ,HIGH,LOW,1.5 ,0 ),COLOR00ff00;
STICKLINE(CLOSE>=OPEN ,CLOSE,OPEN,8,0) ,COLOR000077;
STICKLINE(CLOSE>=OPEN ,CLOSE,OPEN,7,0) ,COLOR000099;
STICKLINE(CLOSE>=OPEN ,CLOSE,OPEN,5,0) ,COLOR0000bb;
STICKLINE(CLOSE>=OPEN ,CLOSE,OPEN,3,0) ,COLOR0000dd;
STICKLINE(CLOSE>=OPEN ,HIGH,LOW,1.5,0 ),COLOR0000FF;
STICKLINE(HIGH=LOW AND CLOSE>REF(CLOSE,1),HIGH-0.01,HIGH+0.01,8,0 ),COLOR0000FF;
STICKLINE(HIGH=LOW AND CLOSE<REF(CLOSE,1),HIGH-0.01,HIGH+0.01,8,0 ),COLOR00FF00;
//分割顯示
IF 切換>=1 AND 切換<=3 THEN BEGIN
VERLINE(nx=終點(diǎn) OR nx=起點(diǎn),2),COLOR009fff;
x1:=IF(切換=1,J1,IF(切換=2,H1,IF(切換=3,B1,DRAWNULL)));
x2:=IF(切換=1,J2,IF(切換=2,H2,IF(切換=3,B2,DRAWNULL)));
x3:=IF(切換=1,J3,IF(切換=2,H3,IF(切換=3,B3,DRAWNULL)));
x4:=IF(切換=1,J4,IF(切換=2,H4,IF(切換=3,B4,DRAWNULL)));
高:BACKSET(IF(wz,ZH,DRAWNULL),起點(diǎn)-1)*wxz,COLORff88ff,LINETHICK2;
低:BACKSET(IF(wz,ZL,DRAWNULL),起點(diǎn)-1)*wxz,COLORff88ff,LINETHICK2;
中:BACKSET(IF(wz,(ZH+ZL)/2,DRAWNULL),起點(diǎn)-1)*wxz,COLORff88ff;
分1:BACKSET(IF(wz,X1,DRAWNULL),起點(diǎn)-1)*wxz,COLORffff00;
分2:BACKSET(IF(wz,X2,DRAWNULL),起點(diǎn)-1)*wxz,COLORffff00;
分3:BACKSET(IF(wz,X3,DRAWNULL),起點(diǎn)-1)*wxz,COLORffff00;
分4:BACKSET(IF(wz,X4,DRAWNULL),起點(diǎn)-1)*wxz,COLORffff00;
END;
IF 切換=2 OR 切換=3 THEN BEGIN
x5:=IF(切換=2,H5,B5);
x6:=IF(切換=2,H6,B6);
分5:BACKSET(IF(wz,X5,DRAWNULL),起點(diǎn)-1)*wxz,COLORffff00;
分6:BACKSET(IF(wz,X6,DRAWNULL),起點(diǎn)-1)*wxz,COLORffff00;
END;
IF 切換=3 THEN BEGIN
x7:=B7;
x8:=B8;
分7:BACKSET(IF(wz,X7,NULL),起點(diǎn)-1)*wxz,COLORffff00;
分8:BACKSET(IF(wz,X8,NULL),起點(diǎn)-1)*wxz,COLORffff00;
END;
//分割提示
DRAWTEXT(wz,高,'`'+TOSTRING(高,2)+'(高)'),COLORff88ff;
DRAWTEXT(wz,低,'`'+TOSTRING(低,2)+'(低)'),COLORff88ff;
DRAWTEXT(wz,中,'`'+TOSTRING(中,2)+'(中)'),COLORff88ff;
DRAWTEXT(wz,分1,'`'+TOSTRING(分1,2)+'(分1)'),COLORffffff;
DRAWTEXT(wz,分2,'`'+TOSTRING(分2,2)+'(分2)'),COLORffffff;
DRAWTEXT(wz,分3,'`'+TOSTRING(分3,2)+'(分3)'),COLORffffff;
DRAWTEXT(wz,分4,'`'+TOSTRING(分4,2)+'(分4)'),COLORffffff;
DRAWTEXT(wz,分5,'`'+TOSTRING(分5,2)+'(分5)'),COLORffffff;
DRAWTEXT(wz,分6,'`'+TOSTRING(分6,2)+'(分6)'),COLORffffff;
DRAWTEXT(wz,分7,'`'+TOSTRING(分7,2)+'(分7)'),COLORffffff;
DRAWTEXT(wz,分8,'`'+TOSTRING(分8,2)+'(分8)'),COLORffffff;
IF 切換=4 THEN BEGIN
AA5:MA(C,5),colorffffff;
AA10:MA(C,10),color00ffff;
AA20:MA(C,20),color009fff;
AA30:MA(C,30),colorffff00;
AA60:MA(C,60),color0000ff;
AA120:MA(C,120),color00ff00;
AA250:MA(C,250),colorff00ff;
zdx:=MAX(AA5,AA10,AA20,AA30,AA60,AA120,AA250);
ZXx:=MIN(AA5,AA10,AA20,AA30,AA60,AA120,AA250);
nhd:=(zdx/ZXx-1)*100;
中位線:=(AA5+AA10+AA20+AA30+AA60+AA120+AA250)/7;
PARTLINE(中位線,1,RGB(255,100,255),1,RGB(255,100,255)),LINETHICK2;
DRAWTEXT(CURRBARSCOUNT+1=1,中位線,'``中位線:'+TOSTRING(中位線,2)+'`\n``粘合度:'+TOSTRING(nhd,2)+'%'),colorff88ff;
END;
IF 切換=5 THEN BEGIN
BOLL:MA(CLOSE,20),COLORcccccc;//曲線屬性--輸出線性--不輸出
PARTLINE(BOLL,BOLL>BOLL[1],RGB(255,0,0),BOLL<=BOLL[1],RGB(0,255,255));
UB:BOLL+2*STD(CLOSE,20),COLORff88ff;
LB:BOLL-2*STD(CLOSE,20),COLOR00FFff;
DRAWTEXT(CURRBARSCOUNT+1=1,BOLL,'``中軌值:'+TOSTRING(BOLL,2)+'`\n``上下軌比:'+TOSTRING((UB/LB-1)*100,2)+'%'),colorff88ff;
END;
DRAWTEXT_FIX(CURRBARSCOUNT=1,1/100,0,0,'休閑人原創(chuàng)【分割圖】 當(dāng)前是'+IF(切換=1,'[黃金分割]',IF(切換=2,'[江恩分割]',
IF(切換=3,'[百分比]',IF(切換=4,'[平均線]','布林線'))))),color00ffff;
{來源:www.tumamayizhan.com 程序化交易}
?
公式導(dǎo)入教程: 【通達(dá)信公式源碼導(dǎo)入方法教程】 【同花順公式源碼導(dǎo)入方法教程】 【大智慧新一代公式源碼導(dǎo)入方法教程】
?
原理解析：
?
源碼：
?