把大智慧的CPX操盤線改成通達信能用的
2020/4/19 18:46:09
公式編寫說明：
大智慧CPX操盤線源碼：{CPX操盤線}bu:=cross(high,SAR(3,1,20));sel:=cross(SAR(3,1,20),low);var1:=last(high<SAR(3,1,20));var2:=last(low>sar(3,1,20));drawflagtext(bu,high,'買入');drawflagtext(sel,low,'賣出');drawtext(bu,LOW,'B'),valign0,align1,coloryellow,linethick2;drawtext(sel,HIGH,'S'),valign2,align1,colorgreen,linethick2;STICKLINE(low>SAR(3,1,20) and isdown,high,open,0.5,1),colorred;STICKLINE(low>SAR(3,1,20) and isdown,close,open,7.5,1),colorred;STICKLINE(low>SAR(3,1,20) and isdown,close,low,0.5,1),colorred;STICKLINE(high<SAR(3,1,20) and isup,high,close,0.5,1),colorcyan;STICKLINE(high<SAR(3,1,20) and isup,close,open,7.5,1),colorcyan;STICKLINE(high<SAR(3,1,20) and isup,open,low,0.5,1),colorcyan;drawflagtext(high<SAR(3,1,20) and high>=ref(high,1),high,'明日突破'+forcast(sar(3,1,20),max(var1,2))+'建議關注');drawflagtext(high<SAR(3,1,20) and highSAR(3,1,20) and low<=ref(low,1),low,'明日跌破'+forcast(sar(3,1,20),max(var2,2))+'注意止盈');drawflagtext(low>SAR(3,1,20) and low>ref(low,1),low,'繼續(xù)持股');{DPCW大盤倉位}Ms5:=SMA(MA(C,2),5,3);Ms13:=SMA(C,13,2);Ms21:=SMA(C,21,1);RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;a:=SMA(RSV,3,1);b:=SMA(a,3,1);DDX:=bigorder(1,2)-bigorder(2,2);DIFF:=EMA(DDX,6) - EMA(DDX,13);DIFF2:=EMA(DDX,9) - EMA(DDX,20);IF(Ms5>REF(Ms5,1)) then m1:=10;ELSE IF(Ms5<REF(Ms5,1)) then m1:=-10;IF(Ms5<C) then m2:=5; ELSE IF(Ms5>C) then m2:=-5;IF(Ms13>REF(Ms13,1)) then m3:=5;ELSE IF(Ms13<REF(Ms13,1)) then m3:=-5;IF(Ms21>REF(Ms21,1)) then m4:=10;ELSE IF(Ms21<REF(Ms21,1)) then m4:=-10;IF(b>90) then m5:=-10;ELSE IF(b<90 AND b>10) then m5:=0;ELSE IF(b<10) then m5:=10;IF(diff>0 AND diff2>0) then m6:=10;ELSE IF(diff>0 OR diff2>0) then m6:=0;ELSE IF(diff<0 AND diff2<0) then m6:=-10;大盤倉位:(m1+m2+m3+m4+m5+m6+50);STICKLINE(大盤倉位>50,0,大盤倉位,9,1),colorF000FF;STICKLINE(大盤倉位<=50,0,大盤倉位,9,0),colorgreen;
公式源碼示例：
BU:=CROSS(HIGH,SAR(3,1,20));
SEL:=CROSS(SAR(3,1,20),LOW);
VAR1:=LAST(HIGH<SAR(3,1,20),30,0);
VAR2:=LAST(LOW>SAR(3,1,20),30,0);
DRAWTEXT(BU,HIGH,'買入');
DRAWTEXT(SEL,LOW,'賣出');
DRAWTEXT(BU,LOW,'B'),COLORYELLOW,LINETHICK2;
DRAWTEXT(SEL,HIGH,'S'),COLORGREEN,LINETHICK2;
STICKLINE(LOW>SAR(3,1,20) AND O>C,HIGH,OPEN,0,1),COLORRED;
STICKLINE(LOW>SAR(3,1,20) AND O>C,CLOSE,OPEN,3,1),COLORRED;
STICKLINE(LOW>SAR(3,1,20) AND O>C,CLOSE,LOW,0,1),COLORRED;
STICKLINE(HIGH<SAR(3,1,20) AND C>O,HIGH,CLOSE,0,1),COLORCYAN;
STICKLINE(HIGH<SAR(3,1,20) AND C>O,CLOSE,OPEN,3,1),COLORCYAN;
STICKLINE(HIGH<SAR(3,1,20) AND C>O,OPEN,LOW,0,1),COLORCYAN;
看股吧公 式 ww w.kanguba.com
其它股票公式列表
