[求助]飛狐轉文華

老師你好：

請幫忙轉文華，謝謝！?

?

KKK:=IF(DATE<1301231,1,1);
方向線5:=KKK*2*CLOSE-REF(CLOSE,3);
收盤:CLOSE,LINETHICK0;
G:=IF(HIGH=HHV(HIGH,3),1,0);
D:=IF(LOW=LLV(LOW,3),1,0);
S:=IF(REF(G,2)=1 AND REF(G,1)=0 AND G=0,REF(HIGH,2),REF(HIGH,2+BARSLAST(REF(G,2)=1 AND REF(G,1)=0 AND G=0)));
X:=IF(REF(D,2)=1 AND REF(D,1)=0 AND D=0,REF(LOW,2),REF(LOW,2+BARSLAST(REF(D,2)=1 AND REF(D,1)=0 AND D=0)));
K1:=IF(HIGH>=MA(CLOSE,1),S,REF(S,BARSLAST(HIGH>MA(CLOSE,1))));
K2:=IF(LOW<=MA(CLOSE,1),X,REF(X,BARSLAST(LOW<=MA(CLOSE,1))));
C1:=REF(CLOSE,1)<=K1 AND CLOSE>K1;
C2:=REF(CLOSE,1)>=K2 AND CLOSE<K2;
K3:=BARSLAST(C1);
K4:=BARSLAST(C2);
PARTLINE(K3>K4,K1),LINETHICK2,color10000;





末升高點:=HIGH<REF(HIGH,1) AND REF(HIGH,1)>REF(HIGH,2);
KK:=BARSLAST(末升高點*KKK);
末升高:KKK*REF(HIGH,KK+1),LINETHICK0;
PARTLINE(CLOSE,末升高*KKK),LINEDOT,LINETHICK1,colorFF0000;
VK:=VOL;
末升低點:=CROSS(CLOSE,末升高) AND (CLOSE-REF(末升高,0))/REF(末升高,0)>=0.03 OR VOL>REF(VOL,1) AND CLOSE>OPEN AND CLOSE>1*REF((CLOSE+OPEN)/2,1) AND LOW>REF(LOW,1) AND REF(LOW,1)<REF(LOW,2) OR REF(VOL,1)>REF(VOL,2) AND CLOSE>OPEN AND CLOSE>REF(CLOSE,1)*1.04 AND (REF(CLOSE,1)-REF(CLOSE,2))/REF(CLOSE,2)>=0.03;
TJ:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>=0.095 OR 末升低點;
SJ:=KKK*BARSLAST(TJ);
TJ1:=VOL<REF(VOL,1) AND REF(VOL,1)>REF(VOL,2) OR CLOSE>REF(CLOSE,1) AND REF(CLOSE,1)>REF(CLOSE,2) AND REF(CLOSE,2)>REF(CLOSE,3);
SJ1:=BARSLAST(TJ1)*KKK;
XDJL:=SJ;

PPPP:=BARSLAST(XDJL);
止盈:REF(LOW,SJ1+1)*(KKK),LINETHICK1,color80;
ZSD:=KKK*REF(LOW,SJ+1);
止損:ZSD,colorFF;
PARTLINE(CLOSE>=ZSD,KKK*ZSD),LINETHICK3,colorFF00FF;
PARTLINE(CLOSE<REF(ZSD,1) AND CLOSE<=ZSD,ZSD*KKK),LINETHICK5,colorFF0000;

LLL:=IF(PPPP=0,REF(LOW,PPPP+1),1);

N字選股:CROSS(CLOSE,ZSD) OR CROSS(CLOSE,末升高) OR ZSD>REF(ZSD,1),LINETHICK0,colorFF;
轉折選股:ZSD>REF(ZSD,1),LINETHICK0;
drawicon(N字選股>0,l,5);

drawicon(轉折選股>0,l,5);

?

?來源:程序化99