老師幫忙改文華7用的謝謝
作者：文華財經 來源：cxh99.com 發布時間：2023年11月02日
-
咨詢內容：
?主圖
X_1:=EMA(OPEN,60);
X_2:=EMA(CLOSE,60);
X_3:=IF(X_1>REF(X_1,1) AND X_2>REF(X_2,1),1,0);
X_4:=MA(CLOSE,13);
X_5:=REF(X_4,13/2+1);
X_6:=(EMA(CLOSE,60)+EMA(CLOSE,90))/2;
X_7:=(2*CLOSE+HIGH+LOW)/4;
X_8:=EMA(X_7,99)*0.91;
X_9:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100;
X_10:=BARSLAST(X_9>3);
X_11:=IF(X_10>0,1,0);
STICKLINE(CLOSE>X_5 AND CLOSE>=X_6,OPEN,CLOSE,3,0),COLORRED;
STICKLINE(CLOSE>X_5 AND CLOSE<=X_8,OPEN,CLOSE,3,0),COLORGREEN;
STICKLINE(CLOSE>X_5 AND CLOSE>X_8 AND CLOSE<X_6,OPEN,CLOSE,3,0),COLORBLUE;
STICKLINE(CLOSE>X_5 AND X_11=0,OPEN,CLOSE,3,0),COLORYELLOW;
STICKLINE(CLOSE>X_5,OPEN,CLOSE,1,0),COLORWHITE;
DRAWICON(CROSS(CLOSE,X_5),LOW*0.99,9);
DRAWICON(CROSS(X_5,CLOSE),HIGH*1.01,2);
X_12:=MA(CLOSE,5);
QQ:MA(CLOSE,20),COLORYELLOW,LINETHICK2;
WWW:IF(X_12>QQ,QQ,X_12),COLORGRAY,LINETHICK2;
X_13:=CROSS(CLOSE,X_5) AND CLOSE>X_5 AND X_11=0;
X_14:=BARSCOUNT(CLOSE)=ISLASTBAR;
X_15:=BARSLAST(X_14);
X_16:=HHV(HIGH,50);
X_17:=LLV(LOW,50);
X_18:=CLOSE>X_5 AND CLOSE>=X_6;
X_19:=CLOSE>X_5 AND CLOSE>X_8 AND CLOSE<X_6;
X_20:=CLOSE>X_5 AND CLOSE<=X_8;
X_21:=CLOSE<=X_5;
X_22:=WWW>REF(WWW,1) AND WWW!=QQ;
X_23:=WWW>REF(WWW,1) AND WWW=QQ AND X_3!=1;
X_24:=WWW>REF(WWW,1) AND WWW=QQ AND X_3=1;
X_25:=CLOSE>X_5 AND X_11=0;
X_26:=X_18+X_19+X_20+X_21+X_22+X_23+X_24+X_25;
X_27:=(X_16-X_17)/(X_26+8);
DRAWTEXT(CLOSE>0 AND X_18>0 AND ISLASTBAR,X_16-X_27,1),COLORRED;
DRAWTEXT(CLOSE>0 AND X_19>0 AND ISLASTBAR,X_16-X_27,2),COLORFF7700;
DRAWTEXT(CLOSE>0 AND X_20>0 AND ISLASTBAR,X_16-X_27,3),COLORGREEN;
DRAWTEXT(CLOSE>0 AND X_21>0 AND ISLASTBAR,X_16-X_27,4),COLORGRAY;
DRAWTEXT(CLOSE>0 AND X_22>0 AND ISLASTBAR,X_16-X_27*2,5),COLORGREEN;
DRAWTEXT(CLOSE>0 AND X_23>0 AND ISLASTBAR,X_16-X_27*2,6),COLORFF66FF;
DRAWTEXT(CLOSE>0 AND X_24>0 AND ISLASTBAR,X_16-X_27*2,7),COLORRED;
?
?來源:程序化99
-
文華技術人員：
?
副圖
CBFB:=COSTEX(C,REF(C,1));
JL:=IF(C>CBFB,V,0);
CL:=IF(C<CBFB,V,0);
JLH:=SUM(JL,4);
CLH:=SUM(CL,4);
LHB:=CLH/JLH;
TJ1:=IF(HHV(LHB,5)>4 AND CROSS(2,LHB) AND C>=O,1,0);
STICKLINE(TJ1=1,0,10,1.5,1),COLORYELLOW;
DRAWICON(TJ1,7,9);
DRAWTEXT(TJ1=1,5,'飛俠標記',COLORRED;
?
?來源: www.kzuj.com.cn
-
文華客服：
?老師能不能改成30分級別使用的
?
-
網友回復：
COSTEX暫時無法修改。
下面是1樓源碼的改寫，可以加載到30分鐘周期使用。
?
參考：
X_1:=EMA(OPEN,60);X_2:=EMA(CLOSE,60);X_3:=IF(X_1>REF(X_1,1) AND X_2>REF(X_2,1),1,0);X_4:=MA(CLOSE,13);X_5:=REF(X_4,13/2+1);X_6:=(EMA(CLOSE,60)+EMA(CLOSE,90))/2;X_7:=(2*CLOSE+HIGH+LOW)/4;X_8:=EMA(X_7,99)*0.91;X_9:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100;X_10:=BARSLAST(X_9>3);X_11:=IF(X_10>0,1,0);STICKLINE1(CLOSE>X_5 AND CLOSE>=X_6,OPEN,CLOSE,3,0),COLORRED;STICKLINE1(CLOSE>X_5 AND CLOSE<=X_8,OPEN,CLOSE,3,0),COLORGREEN;STICKLINE1(CLOSE>X_5 AND CLOSE>X_8 AND CLOSE<X_6,OPEN,CLOSE,3,0),COLORBLUE;STICKLINE1(CLOSE>X_5 AND X_11=0,OPEN,CLOSE,3,0),COLORYELLOW;STICKLINE1(CLOSE>X_5,OPEN,CLOSE,1,0),COLORWHITE;DRAWICON(CROSS(CLOSE,X_5),LOW*0.99,9);DRAWICON(CROSS(X_5,CLOSE),HIGH*1.01,2);X_12:=MA(CLOSE,5);QQ:MA(CLOSE,20),COLORYELLOW,LINETHICK2;WWW:IF(X_12>QQ,QQ,X_12),COLORGRAY,LINETHICK2;X_13:=CROSS(CLOSE,X_5) AND CLOSE>X_5 AND X_11=0;X_14:=BARSCOUNT(CLOSE)=ISLASTBAR;X_15:=BARSLAST(X_14);X_16:=HHV(HIGH,50);X_17:=LLV(LOW,50);X_18:=CLOSE>X_5 AND CLOSE>=X_6;X_19:=CLOSE>X_5 AND CLOSE>X_8 AND CLOSE<X_6;X_20:=CLOSE>X_5 AND CLOSE<=X_8;X_21:=CLOSE<=X_5;X_22:=WWW>REF(WWW,1) AND WWW<>QQ;X_23:=WWW>REF(WWW,1) AND WWW=QQ AND X_3<>1;X_24:=WWW>REF(WWW,1) AND WWW=QQ AND X_3=1;X_25:=CLOSE>X_5 AND X_11=0;X_26:=X_18+X_19+X_20+X_21+X_22+X_23+X_24+X_25;X_27:=(X_16-X_17)/(X_26+8);DRAWTEXT(CLOSE>0 AND X_18>0 AND ISLASTBAR,X_16-X_27,' 1'),COLORRED;DRAWTEXT(CLOSE>0 AND X_19>0 AND ISLASTBAR,X_16-X_27,' 2'),COLORFF7700;DRAWTEXT(CLOSE>0 AND X_20>0 AND ISLASTBAR,X_16-X_27,' 3'),COLORGREEN;DRAWTEXT(CLOSE>0 AND X_21>0 AND ISLASTBAR,X_16-X_27,' 4'),COLORGRAY;DRAWTEXT(CLOSE>0 AND X_22>0 AND ISLASTBAR,X_16-X_27*2,' 5'),COLORGREEN;DRAWTEXT(CLOSE>0 AND X_23>0 AND ISLASTBAR,X_16-X_27*2,' 6'),COLORFF66FF;DRAWTEXT(CLOSE>0 AND X_24>0 AND ISLASTBAR,X_16-X_27*2,' 7'),COLORRED;
?
打印本文
關閉窗口