請(qǐng)老師改成博弈指標(biāo) [博易POBO]
咨詢內(nèi)容:
N00:=150;判斷高低:=3;
高0:=REF(HHV(H,N00),判斷高低);
近期頂:REFDATE(高0,DATE),COLORGREEN,LINETHICK3;
最頂:=REFDATE(近期頂,DATE),NODRAW;
出:=最頂=H AND ((C-L)<(O-C) OR (O-L)<(C-O)),NODRAW;
STICKLINE(出,C,O,3,0),COLORGREEN;
STICKLINE(出,C,O,2,0),COLORGREEN;
低0:=REF(LLV(L,N00),判斷高低);
近期底:REFDATE(低0,DATE),COLORRED,LINETHICK3;
最底:=REFDATE(近期底,DATE),NODRAW;
進(jìn):=最底=L AND ((C+L)<(O+C) OR (O+L)<(C+O)),NODRAW;
STICKLINE(進(jìn),H,L,3,0),COLORRED;
STICKLINE(進(jìn),C,O,2,0),COLORRED;
N250:=250;
PT250:=CONST(HHVBARS(V,N250));
T250:IF(CURRBARSCOUNT<=N250,CONST(IF(PT250=0,C,REF(C,PT250))),DRAWNULL),COLORMAGENTA,LINETHICK2;
IF(CURRBARSCOUNT=PT250+1,T250*1.01,DRAWNULL),CIRCLEDOT,COLORFF0000,LINETHICK2;
DRAWTEXT(CURRBARSCOUNT=N250,T250,'250'),COLOR990000;
N120:=120;
PT120:=CONST(HHVBARS(V,N120));
T120:IF(CURRBARSCOUNT<=N120,CONST(IF(PT120=0,C,REF(C,PT120))),DRAWNULL),COLORAAAA00,LINETHICK2;
IF(CURRBARSCOUNT=PT120+1,T120,DRAWNULL),CIRCLEDOT,COLORFFFF00,LINETHICK2;
DRAWTEXT(CURRBARSCOUNT=N120,T120,'120'),COLORAAAA00;
N60:=60;
PT60:=CONST(HHVBARS(V,N60));
T60:IF(CURRBARSCOUNT<=N60,CONST(IF(PT60=0,C,REF(C,PT60))),DRAWNULL),COLOR00BB00,LINETHICK2;
IF(CURRBARSCOUNT=PT60+1,T60,DRAWNULL),CIRCLEDOT,COLOR00FF00,LINETHICK2;
DRAWTEXT(CURRBARSCOUNT=N60,T60,'60'),COLOR00BB00;
N30:=30;
PT30:=CONST(HHVBARS(V,N30));
T30:IF(CURRBARSCOUNT<=N30,CONST(IF(PT30=0,C,REF(C,PT30))),DRAWNULL),COLOR0000CC,LINETHICK2;
IF(CURRBARSCOUNT=PT30+1,T30,DRAWNULL),CIRCLEDOT,COLOR0000FF,LINETHICK2;
DRAWTEXT(CURRBARSCOUNT=N30,T30,'30'),COLOR0000CC;
N20:=20;
PT20:=CONST(HHVBARS(V,N20));
T20:IF(CURRBARSCOUNT<=N20,CONST(IF(PT20=0,C,REF(C,PT20))),DRAWNULL),COLORDD00DD,LINETHICK2;
IF(CURRBARSCOUNT=PT20+1,T20,DRAWNULL),CIRCLEDOT,COLORFF00FF,LINETHICK2;
DRAWTEXT(CURRBARSCOUNT=N20,T20,'20'),COLORDD00DD;
阻力:REFDATE(REF(HHV(H,22),1),DATE),DOTLINE,LINETHICK2;
底0:REFDATE(REF(LLV(L,22),1),DATE),DOTLINE,LINETHICK2;
N00:=150;判斷高低:=3;
高0:=REF(HHV(H,N00),判斷高低);
近期頂:REFDATE(高0,DATE),COLORGREEN,LINETHICK3;
最頂:=REFDATE(近期頂,DATE),NODRAW;
出:=最頂=H AND ((C-L)<(O-C) OR (O-L)<(C-O)),NODRAW;
STICKLINE(出,C,O,3,0),COLORGREEN;
STICKLINE(出,C,O,2,0),COLORGREEN;
低0:=REF(LLV(L,N00),判斷高低);
近期底:REFDATE(低0,DATE),COLORRED,LINETHICK3;
最底:=REFDATE(近期底,DATE),NODRAW;
進(jìn):=最底=L AND ((C+L)<(O+C) OR (O+L)<(C+O)),NODRAW;
STICKLINE(進(jìn),H,L,3,0),COLORRED;
STICKLINE(進(jìn),C,O,2,0),COLORRED;
N250:=250;
CURRBARSCOUNT:=DATACOUNT-BARPOS;
PT250:=HHVBARS(V,N250);
T250:IF(CURRBARSCOUNT<=N250,IF(PT250=0,C,REF(C,PT250)),DRAWNULL),COLORMAGENTA,LINETHICK2;
IF(CURRBARSCOUNT=PT250+1,T250*1.01,DRAWNULL),CIRCLEDOT,COLORFF0000,LINETHICK2;
DRAWTEXT(CURRBARSCOUNT=N250,T250,'250'),COLOR990000;
N120:=120;
PT120:=HHVBARS(V,N120);
T120:IF(CURRBARSCOUNT<=N120,IF(PT120=0,C,REF(C,PT120)),DRAWNULL),COLORAAAA00,LINETHICK2;
IF(CURRBARSCOUNT=PT120+1,T120,DRAWNULL),CIRCLEDOT,COLORFFFF00,LINETHICK2;
DRAWTEXT(CURRBARSCOUNT=N120,T120,'120'),COLORAAAA00;
N60:=60;
PT60:=HHVBARS(V,N60);
T60:IF(CURRBARSCOUNT<=N60,IF(PT60=0,C,REF(C,PT60)),DRAWNULL),COLOR00BB00,LINETHICK2;
IF(CURRBARSCOUNT=PT60+1,T60,DRAWNULL),CIRCLEDOT,COLOR00FF00,LINETHICK2;
DRAWTEXT(CURRBARSCOUNT=N60,T60,'60'),COLOR00BB00;
N30:=30;
PT30:=HHVBARS(V,N30);
T30:IF(CURRBARSCOUNT<=N30,IF(PT30=0,C,REF(C,PT30)),DRAWNULL),COLOR0000CC,LINETHICK2;
IF(CURRBARSCOUNT=PT30+1,T30,DRAWNULL),CIRCLEDOT,COLOR0000FF,LINETHICK2;
DRAWTEXT(CURRBARSCOUNT=N30,T30,'30'),COLOR0000CC;
N20:=20;
PT20:=HHVBARS(V,N20);
T20:IF(CURRBARSCOUNT<=N20,IF(PT20=0,C,REF(C,PT20)),DRAWNULL),COLORDD00DD,LINETHICK2;
IF(CURRBARSCOUNT=PT20+1,T20,DRAWNULL),CIRCLEDOT,COLORFF00FF,LINETHICK2;
DRAWTEXT(CURRBARSCOUNT=N20,T20,'20'),COLORDD00DD;
阻力:REFDATE(REF(HHV(H,22),1),DATE),POINTDOT,LINETHICK2;
底0:REFDATE(REF(LLV(L,22),1),DATE),POINTDOT,LINETHICK2; ?老師圖中圓圈處橫線,應(yīng)該是直線 來源 程序化久久網(wǎng)
請(qǐng)老師改成博弈指標(biāo)
MA(C,30);N00:=150;判斷高低:=3;
高0:=REF(HHV(H,N00),判斷高低);
近期頂:REFDATE(高0,DATE),COLORGREEN,LINETHICK3;
最頂:=REFDATE(近期頂,DATE),NODRAW;
出:=最頂=H AND ((C-L)<(O-C) OR (O-L)<(C-O)),NODRAW;
STICKLINE(出,C,O,3,0),COLORGREEN;
STICKLINE(出,C,O,2,0),COLORGREEN;
低0:=REF(LLV(L,N00),判斷高低);
近期底:REFDATE(低0,DATE),COLORRED,LINETHICK3;
最底:=REFDATE(近期底,DATE),NODRAW;
進(jìn):=最底=L AND ((C+L)<(O+C) OR (O+L)<(C+O)),NODRAW;
STICKLINE(進(jìn),H,L,3,0),COLORRED;
STICKLINE(進(jìn),C,O,2,0),COLORRED;
N250:=250;
PT250:=CONST(HHVBARS(V,N250));
T250:IF(CURRBARSCOUNT<=N250,CONST(IF(PT250=0,C,REF(C,PT250))),DRAWNULL),COLORMAGENTA,LINETHICK2;
IF(CURRBARSCOUNT=PT250+1,T250*1.01,DRAWNULL),CIRCLEDOT,COLORFF0000,LINETHICK2;
DRAWTEXT(CURRBARSCOUNT=N250,T250,'250'),COLOR990000;
N120:=120;
PT120:=CONST(HHVBARS(V,N120));
T120:IF(CURRBARSCOUNT<=N120,CONST(IF(PT120=0,C,REF(C,PT120))),DRAWNULL),COLORAAAA00,LINETHICK2;
IF(CURRBARSCOUNT=PT120+1,T120,DRAWNULL),CIRCLEDOT,COLORFFFF00,LINETHICK2;
DRAWTEXT(CURRBARSCOUNT=N120,T120,'120'),COLORAAAA00;
N60:=60;
PT60:=CONST(HHVBARS(V,N60));
T60:IF(CURRBARSCOUNT<=N60,CONST(IF(PT60=0,C,REF(C,PT60))),DRAWNULL),COLOR00BB00,LINETHICK2;
IF(CURRBARSCOUNT=PT60+1,T60,DRAWNULL),CIRCLEDOT,COLOR00FF00,LINETHICK2;
DRAWTEXT(CURRBARSCOUNT=N60,T60,'60'),COLOR00BB00;
N30:=30;
PT30:=CONST(HHVBARS(V,N30));
T30:IF(CURRBARSCOUNT<=N30,CONST(IF(PT30=0,C,REF(C,PT30))),DRAWNULL),COLOR0000CC,LINETHICK2;
IF(CURRBARSCOUNT=PT30+1,T30,DRAWNULL),CIRCLEDOT,COLOR0000FF,LINETHICK2;
DRAWTEXT(CURRBARSCOUNT=N30,T30,'30'),COLOR0000CC;
N20:=20;
PT20:=CONST(HHVBARS(V,N20));
T20:IF(CURRBARSCOUNT<=N20,CONST(IF(PT20=0,C,REF(C,PT20))),DRAWNULL),COLORDD00DD,LINETHICK2;
IF(CURRBARSCOUNT=PT20+1,T20,DRAWNULL),CIRCLEDOT,COLORFF00FF,LINETHICK2;
DRAWTEXT(CURRBARSCOUNT=N20,T20,'20'),COLORDD00DD;
阻力:REFDATE(REF(HHV(H,22),1),DATE),DOTLINE,LINETHICK2;
底0:REFDATE(REF(LLV(L,22),1),DATE),DOTLINE,LINETHICK2;
?
?來源:程序化99網(wǎng)( www.kzuj.com.cn )
博易技術(shù)人員: MA(C,30);N00:=150;判斷高低:=3;
高0:=REF(HHV(H,N00),判斷高低);
近期頂:REFDATE(高0,DATE),COLORGREEN,LINETHICK3;
最頂:=REFDATE(近期頂,DATE),NODRAW;
出:=最頂=H AND ((C-L)<(O-C) OR (O-L)<(C-O)),NODRAW;
STICKLINE(出,C,O,3,0),COLORGREEN;
STICKLINE(出,C,O,2,0),COLORGREEN;
低0:=REF(LLV(L,N00),判斷高低);
近期底:REFDATE(低0,DATE),COLORRED,LINETHICK3;
最底:=REFDATE(近期底,DATE),NODRAW;
進(jìn):=最底=L AND ((C+L)<(O+C) OR (O+L)<(C+O)),NODRAW;
STICKLINE(進(jìn),H,L,3,0),COLORRED;
STICKLINE(進(jìn),C,O,2,0),COLORRED;
N250:=250;
CURRBARSCOUNT:=DATACOUNT-BARPOS;
PT250:=HHVBARS(V,N250);
T250:IF(CURRBARSCOUNT<=N250,IF(PT250=0,C,REF(C,PT250)),DRAWNULL),COLORMAGENTA,LINETHICK2;
IF(CURRBARSCOUNT=PT250+1,T250*1.01,DRAWNULL),CIRCLEDOT,COLORFF0000,LINETHICK2;
DRAWTEXT(CURRBARSCOUNT=N250,T250,'250'),COLOR990000;
N120:=120;
PT120:=HHVBARS(V,N120);
T120:IF(CURRBARSCOUNT<=N120,IF(PT120=0,C,REF(C,PT120)),DRAWNULL),COLORAAAA00,LINETHICK2;
IF(CURRBARSCOUNT=PT120+1,T120,DRAWNULL),CIRCLEDOT,COLORFFFF00,LINETHICK2;
DRAWTEXT(CURRBARSCOUNT=N120,T120,'120'),COLORAAAA00;
N60:=60;
PT60:=HHVBARS(V,N60);
T60:IF(CURRBARSCOUNT<=N60,IF(PT60=0,C,REF(C,PT60)),DRAWNULL),COLOR00BB00,LINETHICK2;
IF(CURRBARSCOUNT=PT60+1,T60,DRAWNULL),CIRCLEDOT,COLOR00FF00,LINETHICK2;
DRAWTEXT(CURRBARSCOUNT=N60,T60,'60'),COLOR00BB00;
N30:=30;
PT30:=HHVBARS(V,N30);
T30:IF(CURRBARSCOUNT<=N30,IF(PT30=0,C,REF(C,PT30)),DRAWNULL),COLOR0000CC,LINETHICK2;
IF(CURRBARSCOUNT=PT30+1,T30,DRAWNULL),CIRCLEDOT,COLOR0000FF,LINETHICK2;
DRAWTEXT(CURRBARSCOUNT=N30,T30,'30'),COLOR0000CC;
N20:=20;
PT20:=HHVBARS(V,N20);
T20:IF(CURRBARSCOUNT<=N20,IF(PT20=0,C,REF(C,PT20)),DRAWNULL),COLORDD00DD,LINETHICK2;
IF(CURRBARSCOUNT=PT20+1,T20,DRAWNULL),CIRCLEDOT,COLORFF00FF,LINETHICK2;
DRAWTEXT(CURRBARSCOUNT=N20,T20,'20'),COLORDD00DD;
阻力:REFDATE(REF(HHV(H,22),1),DATE),POINTDOT,LINETHICK2;
底0:REFDATE(REF(LLV(L,22),1),DATE),POINTDOT,LINETHICK2; ?老師圖中圓圈處橫線,應(yīng)該是直線 來源 程序化久久網(wǎng)
有思路,想編寫各種指標(biāo)公式,交易模型,選股公式,還原公式的朋友
可聯(lián)系技術(shù)人員 QQ: 262069696 或微信號(hào):cxh99cxh99 進(jìn)行 有償收費(fèi) 編寫!
(怎么收費(fèi),代編流程等詳情請(qǐng)點(diǎn)擊閱讀!)
(注:由于人數(shù)限制,QQ或微信請(qǐng)選擇方便的一個(gè)聯(lián)系我們就行,加好友時(shí)請(qǐng)簡(jiǎn)單備注下您的需求,否則無法通過。謝謝您!)
相關(guān)文章
-
沒有相關(guān)內(nèi)容