老師請幫忙修改一下指標在博弈大師使用謝謝 [博易POBO]
咨詢內容:
PLZ:=CONST(BARSLAST(PURC=H))+1;
頂X:=CONST(IF(PLZ=1,H,REF(H,PLZ-1)));
QQT:=CONST(FINDLOW(L,0,10*10,1));
PLL:=CONST(BARSLAST(QQT=L))+1;
低X:=CONST(IF(PLL=1,L,REF(L,PLL-1)));
頂點:=頂X*VARY,COLORRED;
底點:=低X*VARY,COLORRED;
波動速率:=100*((頂X-低X)/(IF(PLL>PLZ,低X,頂X)))/(PLL-PLZ),NODRAW,COLORMAGENTA;
波動幅度:=((頂X-低X)/(IF(PLL>PLZ,低X,頂X)))*100;
波動價位:=(頂X-低X)*(IF(PLL>PLZ,1,-1));
BPURC:=CONST(FINDHIGH(H,0,(IF(0>0,0,IF(PLZ<PLL,10,10)))*5,1));
BPLZ:=CONST(BARSLAST(BPURC=H))+1;
BQQT:=CONST(FINDLOW(L,0,(IF(0>0,0,IF(PLZ<PLL,10,10)))*5,1));
BPLL:=CONST(BARSLAST(BQQT=L))+1;
BLC1:=CONST(FINDHIGH(H,0,(IF(0>0,0,IF(PLZ<PLL,10,10)))*5,1));
BLC2:=CONST(BARSLAST(BPURC=H))+1;
BLC頂X:=CONST(IF(BPLZ=1,H,REF(H,BPLZ-1)));
BLC3:=CONST(FINDLOW(L,0,(IF(0>0,0,IF(PLZ<PLL,10,10)))*5,1));
B6C4:=CONST(BARSLAST(BQQT=L))+1;
BLC低X:=CONST(IF(BPLL=1,L,REF(L,BPLL-1)));
BASE:=IF(波動速率<0,BLC頂X,BLC低X),COLORRED;
BLCX:=IF(波動速率<0,-1,1);
BLCZ:=(頂點-底點)*(IF(PLL>PLZ,1,-1));
B618:=BASE+(BLCZ*0.618),COLORRED,DOTLINE;
B382:=BASE+(BLCZ*0.382),COLORRED,DOTLINE;
XZDD:=IF(PLL>PLZ,BPLL,BPLZ);
STICKLINE(CURRBARSCOUNT=XZDD ,BASE,B300,0,0),COLORRED,LINETHICK6;
零Y:IF(CURRBARSCOUNT=XZDD,BASE,DRAWNULL),COLORYELLOW,LINETHICK9;
Y382Y:IF(CURRBARSCOUNT=XZDD,B382,DRAWNULL),COLORYELLOW,LINETHICK6;
Y618Y: IF(CURRBARSCOUNT=XZDD,B618,DRAWNULL),COLORYELLOW,LINETHICK6;
DRAWTEXT(CURRBARSCOUNT=XZDD,BASE,'---------BASE'),COLORRED;
DRAWTEXT(CURRBARSCOUNT=XZDD,B618,'---------0.618'),COLORRED;
DRAWTEXT(CURRBARSCOUNT=XZDD,B382,'---------0.382'),COLORRED;
DRAWICON(CURRBARSCOUNT=XZDD,BASE,9);
如此復雜的程序化,背后的邏輯也堅如磐石吧? 老師好麻煩給修改一下 來源 程序化久久網
老師請幫忙修改一下指標在博弈大師使用謝謝
PURC:=CONST(FINDHIGH(H,0,10*10,1));PLZ:=CONST(BARSLAST(PURC=H))+1;
頂X:=CONST(IF(PLZ=1,H,REF(H,PLZ-1)));
QQT:=CONST(FINDLOW(L,0,10*10,1));
PLL:=CONST(BARSLAST(QQT=L))+1;
低X:=CONST(IF(PLL=1,L,REF(L,PLL-1)));
頂點:=頂X*VARY,COLORRED;
底點:=低X*VARY,COLORRED;
波動速率:=100*((頂X-低X)/(IF(PLL>PLZ,低X,頂X)))/(PLL-PLZ),NODRAW,COLORMAGENTA;
波動幅度:=((頂X-低X)/(IF(PLL>PLZ,低X,頂X)))*100;
波動價位:=(頂X-低X)*(IF(PLL>PLZ,1,-1));
BPURC:=CONST(FINDHIGH(H,0,(IF(0>0,0,IF(PLZ<PLL,10,10)))*5,1));
BPLZ:=CONST(BARSLAST(BPURC=H))+1;
BQQT:=CONST(FINDLOW(L,0,(IF(0>0,0,IF(PLZ<PLL,10,10)))*5,1));
BPLL:=CONST(BARSLAST(BQQT=L))+1;
BLC1:=CONST(FINDHIGH(H,0,(IF(0>0,0,IF(PLZ<PLL,10,10)))*5,1));
BLC2:=CONST(BARSLAST(BPURC=H))+1;
BLC頂X:=CONST(IF(BPLZ=1,H,REF(H,BPLZ-1)));
BLC3:=CONST(FINDLOW(L,0,(IF(0>0,0,IF(PLZ<PLL,10,10)))*5,1));
B6C4:=CONST(BARSLAST(BQQT=L))+1;
BLC低X:=CONST(IF(BPLL=1,L,REF(L,BPLL-1)));
BASE:=IF(波動速率<0,BLC頂X,BLC低X),COLORRED;
BLCX:=IF(波動速率<0,-1,1);
BLCZ:=(頂點-底點)*(IF(PLL>PLZ,1,-1));
B618:=BASE+(BLCZ*0.618),COLORRED,DOTLINE;
B382:=BASE+(BLCZ*0.382),COLORRED,DOTLINE;
XZDD:=IF(PLL>PLZ,BPLL,BPLZ);
STICKLINE(CURRBARSCOUNT=XZDD ,BASE,B300,0,0),COLORRED,LINETHICK6;
零Y:IF(CURRBARSCOUNT=XZDD,BASE,DRAWNULL),COLORYELLOW,LINETHICK9;
Y382Y:IF(CURRBARSCOUNT=XZDD,B382,DRAWNULL),COLORYELLOW,LINETHICK6;
Y618Y: IF(CURRBARSCOUNT=XZDD,B618,DRAWNULL),COLORYELLOW,LINETHICK6;
DRAWTEXT(CURRBARSCOUNT=XZDD,BASE,'---------BASE'),COLORRED;
DRAWTEXT(CURRBARSCOUNT=XZDD,B618,'---------0.618'),COLORRED;
DRAWTEXT(CURRBARSCOUNT=XZDD,B382,'---------0.382'),COLORRED;
DRAWICON(CURRBARSCOUNT=XZDD,BASE,9);
?
?來源:程序化99網( www.tumamayizhan.com )
博易技術人員: 您就是大神!如此復雜的程序化,背后的邏輯也堅如磐石吧? 老師好麻煩給修改一下 來源 程序化久久網
有思路,想編寫各種指標公式,交易模型,選股公式,還原公式的朋友
可聯系技術人員 QQ: 262069696 或微信號:cxh99cxh99 進行 有償收費 編寫!
(注:由于人數限制,QQ或微信請選擇方便的一個聯系我們就行,加好友時請簡單備注下您的需求,否則無法通過。謝謝您!)
相關文章
-
沒有相關內容