咨詢內容:
請老師幫忙轉換源碼!!謝謝
?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網( www.kzuj.com.cn )
博易技術人員:
DRAWNULL替換NULL,REF替換REFX1
REFX
來源 程序化久久網