請老師幫忙轉(zhuǎn)換源碼!!謝謝 [博易POBO]
咨詢內(nèi)容:
STICKLINE(AA,O,C,3,0),COLORYELLOW;
?STICKLINE(AA,L,H,0,0),COLORYELLOW;
?A:IF(CLOSE>SAR(4,2,20),SAR(4,2,20),NULL),CIRCLEDOT,COLORRED;
?B:IF(CLOSE<SAR(4,2,20),SAR(4,2,20),NULL),CIRCLEDOT,COLORCYAN;?
N250:=250;?
CURRBARSCOUNT:=REFX1(BARPOS,10000)-BARPOS+1;
PT250:=REFX1(HHVBARS(V,N250),10000);?
T250:IF(CURRBARSCOUNT<=N250,REFX1(IF(PT250=0,C,REF(C,PT250)),10000),NULL),COLOR990000,LINETHICK2;?
IF(CURRBARSCOUNT=PT250+1,T250*1.01,NULL),CIRCLEDOT,COLORFF0000,LINETHICK2;?
DRAWTEXT(CURRBARSCOUNT=N250,T250,'T250'),COLOR990000;?
N120:=120;?
PT120:=REFX1(HHVBARS(V,N120),10000);?
T120:IF(CURRBARSCOUNT<=N120,REFX1(IF(PT120=0,C,REF(C,PT120)),10000),NULL),COLORAAAA00,LINETHICK2;?
IF(CURRBARSCOUNT=PT120+1,T120,NULL),CIRCLEDOT,COLORFFFF00,LINETHICK2;?
DRAWTEXT(CURRBARSCOUNT=N120,T120,'T120'),COLORAAAA00;
?N60:=60;?
PT60:=REFX1(HHVBARS(V,N60),10000);?
T60:IF(CURRBARSCOUNT<=N60,REFX1(IF(PT60=0,C,REF(C,PT60)),10000),NULL),COLOR00BB00,LINETHICK2;
?IF(CURRBARSCOUNT=PT60+1,T60,NULL),CIRCLEDOT,COLOR00FF00,LINETHICK2;?
DRAWTEXT(CURRBARSCOUNT=N60,T60,'T60'),COLOR00BB00;?
N30:=30;?
PT30:=REFX1(HHVBARS(V,N30),10000);?
T30:IF(CURRBARSCOUNT<=N30,REFX1(IF(PT30=0,C,REF(C,PT30)),10000),NULL),COLOR0000CC,LINETHICK2;?
IF(CURRBARSCOUNT=PT30+1,T30,NULL),CIRCLEDOT,COLOR0000FF,LINETHICK2;?
DRAWTEXT(CURRBARSCOUNT=N30,T30,'T30'),COLOR0000CC;?
N20:=20;?
PT20:=REFX1(HHVBARS(V,N20),10000);?
T20:IF(CURRBARSCOUNT<=N20,REFX1(IF(PT20=0,C,REF(C,PT20)),10000),NULL),COLORDD00DD,LINETHICK2;
?IF(CURRBARSCOUNT=PT20+1,T20,NULL),CIRCLEDOT,COLORFF00FF,LINETHICK2;?
DRAWTEXT(CURRBARSCOUNT=N20,T20,'T20'),COLORDD00DD;?
N10:=10;?
PT10:=REFX1(HHVBARS(V,N10),10000);?
T10:IF(CURRBARSCOUNT<=N10,REFX1(IF(PT10=0,C,REF(C,PT10)),10000),NULL),COLOR00EEEE,LINETHICK2;?
IF(CURRBARSCOUNT=PT10+1,T10,NULL),CIRCLEDOT,COLOR00FFFF,LINETHICK2;?
DRAWTEXT(CURRBARSCOUNT=N10,T10,'T10'),COLOR00EEEE;?
N5:=5;?
PT5:=REFX1(HHVBARS(V,N5),10000);?
T5:IF(CURRBARSCOUNT<=N5,REFX1(IF(PT5=0,C,REF(C,PT5)),10000),NULL),COLORFFFFFF,LINETHICK2;
?IF(CURRBARSCOUNT=PT5+1,T5,NULL),CIRCLEDOT,COLORFFFFFF,LINETHICK2;?
DRAWTEXT(CURRBARSCOUNT=N5,T5,'T5'),COLORFFFFFF;
?
請老師幫忙轉(zhuǎn)換源碼!!謝謝
?AA:=CLOSE/REF(C,1)>=1.09;?STICKLINE(AA,O,C,3,0),COLORYELLOW;
?STICKLINE(AA,L,H,0,0),COLORYELLOW;
?A:IF(CLOSE>SAR(4,2,20),SAR(4,2,20),NULL),CIRCLEDOT,COLORRED;
?B:IF(CLOSE<SAR(4,2,20),SAR(4,2,20),NULL),CIRCLEDOT,COLORCYAN;?
N250:=250;?
CURRBARSCOUNT:=REFX1(BARPOS,10000)-BARPOS+1;
PT250:=REFX1(HHVBARS(V,N250),10000);?
T250:IF(CURRBARSCOUNT<=N250,REFX1(IF(PT250=0,C,REF(C,PT250)),10000),NULL),COLOR990000,LINETHICK2;?
IF(CURRBARSCOUNT=PT250+1,T250*1.01,NULL),CIRCLEDOT,COLORFF0000,LINETHICK2;?
DRAWTEXT(CURRBARSCOUNT=N250,T250,'T250'),COLOR990000;?
N120:=120;?
PT120:=REFX1(HHVBARS(V,N120),10000);?
T120:IF(CURRBARSCOUNT<=N120,REFX1(IF(PT120=0,C,REF(C,PT120)),10000),NULL),COLORAAAA00,LINETHICK2;?
IF(CURRBARSCOUNT=PT120+1,T120,NULL),CIRCLEDOT,COLORFFFF00,LINETHICK2;?
DRAWTEXT(CURRBARSCOUNT=N120,T120,'T120'),COLORAAAA00;
?N60:=60;?
PT60:=REFX1(HHVBARS(V,N60),10000);?
T60:IF(CURRBARSCOUNT<=N60,REFX1(IF(PT60=0,C,REF(C,PT60)),10000),NULL),COLOR00BB00,LINETHICK2;
?IF(CURRBARSCOUNT=PT60+1,T60,NULL),CIRCLEDOT,COLOR00FF00,LINETHICK2;?
DRAWTEXT(CURRBARSCOUNT=N60,T60,'T60'),COLOR00BB00;?
N30:=30;?
PT30:=REFX1(HHVBARS(V,N30),10000);?
T30:IF(CURRBARSCOUNT<=N30,REFX1(IF(PT30=0,C,REF(C,PT30)),10000),NULL),COLOR0000CC,LINETHICK2;?
IF(CURRBARSCOUNT=PT30+1,T30,NULL),CIRCLEDOT,COLOR0000FF,LINETHICK2;?
DRAWTEXT(CURRBARSCOUNT=N30,T30,'T30'),COLOR0000CC;?
N20:=20;?
PT20:=REFX1(HHVBARS(V,N20),10000);?
T20:IF(CURRBARSCOUNT<=N20,REFX1(IF(PT20=0,C,REF(C,PT20)),10000),NULL),COLORDD00DD,LINETHICK2;
?IF(CURRBARSCOUNT=PT20+1,T20,NULL),CIRCLEDOT,COLORFF00FF,LINETHICK2;?
DRAWTEXT(CURRBARSCOUNT=N20,T20,'T20'),COLORDD00DD;?
N10:=10;?
PT10:=REFX1(HHVBARS(V,N10),10000);?
T10:IF(CURRBARSCOUNT<=N10,REFX1(IF(PT10=0,C,REF(C,PT10)),10000),NULL),COLOR00EEEE,LINETHICK2;?
IF(CURRBARSCOUNT=PT10+1,T10,NULL),CIRCLEDOT,COLOR00FFFF,LINETHICK2;?
DRAWTEXT(CURRBARSCOUNT=N10,T10,'T10'),COLOR00EEEE;?
N5:=5;?
PT5:=REFX1(HHVBARS(V,N5),10000);?
T5:IF(CURRBARSCOUNT<=N5,REFX1(IF(PT5=0,C,REF(C,PT5)),10000),NULL),COLORFFFFFF,LINETHICK2;
?IF(CURRBARSCOUNT=PT5+1,T5,NULL),CIRCLEDOT,COLORFFFFFF,LINETHICK2;?
DRAWTEXT(CURRBARSCOUNT=N5,T5,'T5'),COLORFFFFFF;
?
?
?來源:程序化99網(wǎng)( m.kzuj.com.cn )
博易技術(shù)人員: DRAWNULL替換NULL,REF替換REFX1 REFX 來源 程序化久久網(wǎng)
有思路,想編寫各種指標(biāo)公式,交易模型,選股公式,還原公式的朋友
可聯(lián)系技術(shù)人員 QQ: 262069696 或微信號:cxh99cxh99 進(jìn)行 有償收費(fèi) 編寫!
(怎么收費(fèi),代編流程等詳情請點(diǎn)擊閱讀!)
(注:由于人數(shù)限制,QQ或微信請選擇方便的一個聯(lián)系我們就行,加好友時請簡單備注下您的需求,否則無法通過。謝謝您!)
相關(guān)文章
-
沒有相關(guān)內(nèi)容