修改為文華

作者：文華財經(jīng) 來源：cxh99.com 發(fā)布時間：2022年06月20日

咨詢內(nèi)容： ?通達信改成文華：（一共兩個）1. DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);DEA:=EMA(DIF,9);MACD:=2*(DIF-DEA);CCDD1:=C/DIF>=-15.68 && C/DIF<0;CCDD2:=C/DIF>=-21.38 && C/DIF<0;SJ:=MACD>REF(MACD,1);XXD:=DIF<REF(DIF,1);JJC:=CROSS(DIF,DEA);一號:IF(SJ && XXD && CCDD1,1,0),COLORWHITE;二號:IF(JJC && CCDD2,1,0),COLORYELLOW;X0ZHH:=BARSLAST(CROSS(0,DIF))+1;SCCTS:=BARSLAST(CROSS(DEA,DIF))+1,NODRAW;DIFZDZ1:=LLV(DIF,SCCTS),NODRAW;GJJZDZ:=LLV(L,SCCTS),NODRAW;DIFZDZ2:=LLV(DIF,X0ZHH),NODRAW;DIFWS0ZZ:=HHV(DIF,SCCTS)<-0.08;LGLJXX:=REF(MACD,1)<0 && REF(MACD,2)<0;BLLL:=LGLJXX && DIFWS0ZZ && (DIFZDZ1>=REF(DIFZDZ1,SCCTS) || DIFZDZ1>=REF(DIFZDZ2,SCCTS)) && GJJZDZ<=REF(GJJZDZ,SCCTS);三號:IF(JJC && DIF<0 && BLLL,1.5,0),COLORMAGENTA;

2.
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);DEA:=EMA(DIF,9);MACD:=2*(DIF-DEA);CDQS:=DIF<-0.25{ && DIF/C<-0.064};SJ:=MACD>REF(MACD,1);XXD:=DIF<REF(DIF,1) && DIF<MACD;JCC:=CROSS(DIF,DEA);SCC:=CROSS(DEA,DIF);AAA:=(2*C+H+L+2*O)/6;VAR1:=(8*AAA+2*REF(AAA,6)+REF(AAA,8))/36;VAR2:=(HHV(VAR1,2)+HHV(VAR1,4)+HHV(VAR1,8))/3;VAR3:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,8))/3;VAR4:=(HHV(VAR2,2)+HHV(VAR2,4)+HHV(VAR2,8))/3;VAR5:=(LLV(VAR3,2)+LLV(VAR3,4)+LLV(VAR3,8))/3;VAR6:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,8))/3;AAE:= WINNER(CLOSE+CLOSE*15/100)*100;BBE:= WINNER(CLOSE+CLOSE*0/100)*100;CCE:= AAE-BBE;DDE:= (WINNER(CLOSE-CLOSE*0.1/100)-WINNER(CLOSE-CLOSE*15/100))*100;EEE:= CCE<3 AND DDE<0.5 AND OPEN>LOW;AE1:= DYNAINFO(6);F1:=COUNT(L=LLV(L,60),10)>=1;F2:=DIF<-0.09;F3:=C>0 AND (C/O>1.03 OR C>1.05*REF(C,1));F4:=CROSS(DIF,DEA);B1:=MA(C,200);B3:=B1*0.75;B4:=IF(C<B3,1,0);雙龍抄底:=F1 AND F2 AND F3 AND F4 AND B4;OSS:=DEA>=0;OZFJ:=DIF<=0.25;AE2:= IF(LOW>AE1,0,IF(HIGH<AE1,1,(AE1-LOW+0.01)/(HIGH-LOW+0.01)));AE3:= VOL/WINNER(LOW);AE4:= REF(HHV(CLOSE,120),1);AE5:= REF(LLV(CLOSE,120),1);AE6:= 100*(CLOSE-AE5)/(AE4-AE5);AE7:= AE2>0 OR AE2=1;AE8:= AE7 AND AE3/REF(AE3,3)>=3 AND AE6<80;AE9:= REF(AE8,1) OR REF(AE8,2) OR REF(AE8,3) OR REF(AE8,4);AE10:= AE8 AND AE9;AE11:= IF(FILTER(AE8,3),5,0);AE12:= FILTER(IF(FILTER(AE10,3) OR EEE,10,0),3);ZT_1:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1);ZT_2:=ZT_1>=0.099 AND CLOSE=HIGH AND LOW!=HIGH;S1:=MA((2*C+H+L)/4,5);?S2:=S1*(200-102)/100;S3:=(1-7/100)*DMA(C,ABS((2*C+H+L)/4-MA(C,20))/MA(C,20));?S4:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;?S5:=3*SMA(S4,3,1)-2*SMA(SMA(S4,3,1),3,1);?S6:=((H+L+C)/3-MA((H+L+C)/3,14))/(0.015*AVEDEV((H+L+C)/3,14));?A:=REF(VAR6,1)=REF(VAR1,1) AND VAR6<VAR1;B:=REF(VAR5,1)=REF(VAR1,1) AND VAR5<VAR1;E:=REF(VAR4,1)=REF(VAR1,1) AND VAR4>VAR1;F:=REF(VAR1,1)>REF(VAR5,1) AND VAR5=VAR1;一號:IF(JCC && OSS,1,0),COLORWHITE;SOZZ:=BARSLAST(CROSS(DEA,-0.11));二號:IF(一號 && COUNT(SCC,SOZZ)=1,2,0),COLORYELLOW;JJLL:=V/REF(V,1)>=3 || V/REF(MA(V,5),1)>=3;三號:IF(一號 && (JJLL=1 || REF(JJLL,1)=1),3,0),COLORMAGENTA;

?
?
?來源:程序化99
文華技術人員： 指標一可以直接在文華軟件上使用，
指標二修改參考：
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);DEA:=EMA(DIF,9);MACD:=2*(DIF-DEA);CDQS:=DIF<-0.25{ && DIF/C<-0.064};SJ:=MACD>REF(MACD,1);XXD:=DIF<REF(DIF,1) && DIF<MACD;JCC:=CROSS(DIF,DEA);SCC:=CROSS(DEA,DIF);AAA:=(2*C+H+L+2*O)/6;VAR1:=(8*AAA+2*REF(AAA,6)+REF(AAA,8))/36;VAR2:=(HHV(VAR1,2)+HHV(VAR1,4)+HHV(VAR1,8))/3;VAR3:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,8))/3;VAR4:=(HHV(VAR2,2)+HHV(VAR2,4)+HHV(VAR2,8))/3;VAR5:=(LLV(VAR3,2)+LLV(VAR3,4)+LLV(VAR3,8))/3;VAR6:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,8))/3;AAE:= WINNER(CLOSE+CLOSE*15/100)*100;BBE:= WINNER(CLOSE+CLOSE*0/100)*100;CCE:= AAE-BBE;DDE:= (WINNER(CLOSE-CLOSE*0.1/100)-WINNER(CLOSE-CLOSE*15/100))*100;EEE:= CCE<3 AND DDE<0.5 AND OPEN>LOW;AE1:= GETPRICE('OW';F1:=COUNT(L=LLV(L,60),10)>=1;F2:=DIF<-0.09;F3:=C>0 AND (C/O>1.03 OR C>1.05*REF(C,1));F4:=CROSS(DIF,DEA);B1:=MA(C,200);B3:=B1*0.75;B4:=IF(C<B3,1,0);雙龍抄底:=F1 AND F2 AND F3 AND F4 AND B4;OSS:=DEA>=0;OZFJ:=DIF<=0.25;AE2:= IF(LOW>AE1,0,IF(HIGH<AE1,1,(AE1-LOW+0.01)/(HIGH-LOW+0.01)));AE3:= VOL/WINNER(LOW);AE4:= REF(HHV(CLOSE,120),1);AE5:= REF(LLV(CLOSE,120),1);AE6:= 100*(CLOSE-AE5)/(AE4-AE5);AE7:= AE2>0 OR AE2=1;AE8:= AE7 AND AE3/REF(AE3,3)>=3 AND AE6<80;AE9:= REF(AE8,1) OR REF(AE8,2) OR REF(AE8,3) OR REF(AE8,4);AE10:= AE8 AND AE9;AE11:= IF(FILTER(AE8,3),5,0);AE12:= FILTER(IF(FILTER(AE10,3) OR EEE,10,0),3);ZT_1:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1);ZT_2:=ZT_1>=0.099 AND CLOSE=HIGH AND LOW=HIGH;S1:=MA((2*C+H+L)/4,5);?S2:=S1*(200-102)/100;S3:=(1-7/100)*DMA(C,ABS((2*C+H+L)/4-MA(C,20))/MA(C,20));?S4:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;?S5:=3*SMA(S4,3,1)-2*SMA(SMA(S4,3,1),3,1);?S6:=((H+L+C)/3-MA((H+L+C)/3,14))/(0.015*AVEDEV((H+L+C)/3,14));?A:=REF(VAR6,1)=REF(VAR1,1) AND VAR6<VAR1;B:=REF(VAR5,1)=REF(VAR1,1) AND VAR5<VAR1;E:=REF(VAR4,1)=REF(VAR1,1) AND VAR4>VAR1;F:=REF(VAR1,1)>REF(VAR5,1) AND VAR5=VAR1;一號:IF(JCC && OSS,1,0),COLORWHITE;SOZZ:=BARSLAST(CROSS(DEA,-0.11));二號:IF(一號 && COUNT(SCC,SOZZ)=1,2,0),COLORYELLOW;JJLL:=V/REF(V,1)>=3 || V/REF(MA(V,5),1)>=3;三號:IF(一號 && (JJLL=1 || REF(JJLL,1)=1),3,0),COLORMAGENTA;