咨詢內容:
老師,可否幫改文化用,DIF:(EMA(CLOSE,6)-EMA(CLOSE,13))*100; DEA:EMA(DIF,5); MACD:(DIF-DEA)*2,COLORSTICK; DRAWICON(CROSS(DIF,DEA),DEA,1); DRAWICON(CROSS(DEA,DIF),DEA,2); IF(DIF DD:=C=HHV(C,180); EE:=DEA< REF(DEA,1) AND REF(DEA CC:=C> REF(C,1) AND REF(C>REF(C,1),1)=1; 頂背離:=(DD AND EE AND DEA< HHV(DEA,180))*DEA; A2:=BARSLAST(REF(CROSS(DEA,DIF),1)); {頂背:=REF(CLOSE,A2+1)DIF AND CROSS(DEA,DIF);} DRAWLINE(A2=0,DEA,頂背離,DEA,0),COLORRED,LINETHICK2; RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; K:SMA(RSV,9,3),COLORYELLOW; D:SMA(K,9,3),COLORWHITE; J:3*K-2*D,COLORMAGENTA; IF(J A1:=BARSLAST(REF(CROSS(DIF,DEA),1)); B1:=REF(C,A1+1)>C ANDREF(DIF,A1+1) A22:=BARSLAST(REF(CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)),1)); B2:=REF(C,A22+1)>CANDREF("KDJ.K"(9,3,3),A22+1)<"KDJ.K"(9,3,3)ANDCROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)); A3:=BARSLAST(REF(CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1)); B3:=REF(C,A3+1)>CANDREF("RSI.RSI1"(6,12,24),A3+1)<"RSI.RSI1"(6,12,24)ANDCROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)); DRAWTEXT(B1,DEA-0.20,'▲MACD底背'),COLORWHITE; DRAWTEXT(B2,D-0.20,'●KDJ底背'),COLORFF00FF; {DJ:=CROSS(J,D) AND D<20; DRAWTEXT(DJ,J-0.3,'低金叉'),COLORCYAN; MDJ:=CROSS(DIF,DEA) AND DEA<0; DRAWTEXT(MDJ,DEA-0.3,'低金叉'),COLORGREEN; DRAWTEXT(CROSS(DEA,DIF),DIF+0.3,'死叉'),COLORYELLOW; DRAWTEXT(CROSS(D,J),J+0.3,'死叉'),COLORRED;} A:=CROSS(DIF,DEA) AND CROSS(K,D) AND CROSS(J,D); DRAWICON(A,LOW*0.98,1); B4:CROSS(DIF,DEA) AND CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)); DRAWTEXT(B4,L-0.20,'★金叉共振'),COLOR0099FF; DRAWICON(CROSS(K,D),D,1); DRAWICON(CROSS(D,K),D,2); BA:=DEA>REF(DEA,1); BB:=SUM(BA,5)>=4; BC:=C BD:=SUM(BC,5)>=2; BXG:FILTER(BB AND BD AND J>REF(J,1) ANDREF(J,1) STICKLINE(BXG,HHV(J,60),HHV(J,60)-20,1,0),COLORRED; SS:=EMA(C,11); LL:=(EMA(C,1)+EMA(C,2)+EMA(C,3)+EMA(C,5))/4; {短:EMA(LL,2),COLORGREEN,LINETHICK2;} {長:EMA(SS,2),COLORMAGENTA,LINETHICK2;} AA:=(C-LLV(C,10))/(HHV(C,10)-LLV(C,10)); (CROSS(AA,0.05)-1);
?
?來源:程序化99
文華技術人員:?參考: DIF:(EMA(CLOSE,6)-EMA(CLOSE,13))*100;DEA:EMA(DIF,5);MACD:(DIF-DEA)*2,COLORSTICK;DRAWICON(CROSS(DIF,DEA),DEA,1);DRAWICON(CROSS(DEA,DIF),DEA,2); LC := REF(CLOSE,1);N1:=7;N2:=14;RSI1:SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100;RSI2:SMA(MAX(CLOSE-LC,0),N2,1)/SMA(ABS(CLOSE-LC),N2,1)*100;DD:=C=HHV(C,180);EE:=DEA< REF(DEA,1);CC:=C> REF(C,1) AND REF(C>REF(C,1),1)=1;頂背離:=(DD AND EE AND DEA< HHV(DEA,180))*DEA;A2:=BARSLAST(REF(CROSS(DEA,DIF),1));頂背:=REF(CLOSE,A2+1) AND CROSS(DEA,DIF);DRAWLINE1(A2=0,DEA,頂背離,DEA,0),COLORRED,LINETHICK2;RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;K:SMA(RSV,9,3),COLORYELLOW;D:SMA(K,9,3),COLORWHITE;J:3*K-2*D,COLORMAGENTA; A1:=BARSLAST(REF(CROSS(DIF,DEA),1));B1:=REF(C,A1+1)>C AND REF(DIF,A1+1);A22:=BARSLAST(REF(CROSS(K,D),1));B2:=REF(C,A22+1)>C AND REF(K,A22+1)<K AND CROSS(K,D);A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1));B3:=REF(C,A3+1)>C AND REF(RSI1,A3+1)<RSI1 AND CROSS(RSI1,RSI2);DRAWTEXT(B1,DEA-0.20,'MACD底背',COLORWHITE;DRAWTEXT(B2,D-0.20,'KDJ底背',COLORFF00FF;DJ:=CROSS(J,D) AND D<20;DRAWTEXT(DJ,J-0.3,'金叉',COLORCYAN;MDJ:=CROSS(DIF,DEA) AND DEA<0;DRAWTEXT(MDJ,DEA-0.3,'金叉',COLORGREEN;DRAWTEXT(CROSS(DEA,DIF),DIF+0.3,'叉',COLORYELLOW;DRAWTEXT(CROSS(D,J),J+0.3,'叉',COLORRED; A:=CROSS(DIF,DEA) AND CROSS(K,D) AND CROSS(J,D);DRAWICON(A,LOW*0.98,1);B4:CROSS(DIF,DEA) AND CROSS(K,D);DRAWTEXT(B4,L-0.20,'金叉共振',COLOR0099FF;DRAWICON(CROSS(K,D),D,1);DRAWICON(CROSS(D,K),D,2);BA:=DEA>REF(DEA,1);BB:=SUM(BA,5)>=4;BC:=C;BD:=SUM(BC,5)>=2;BXG:FILTER(BB AND BD AND J>REF(J,1) AND REF(J,1),2);STICKLINE(BXG,HHV(J,60),HHV(J,60)-20,1,0),COLORRED;SS:=EMA(C,11);LL:=(EMA(C,1)+EMA(C,2)+EMA(C,3)+EMA(C,5))/4;短:EMA(LL,2),COLORGREEN,LINETHICK2; 長:EMA(SS,2),COLORMAGENTA,LINETHICK2; AA:=(C-LLV(C,10))/(HHV(C,10)-LLV(C,10));(CROSS(AA,0.05)-1);
?
?來源: www.tumamayizhan.com
文華客服:
謝謝
?
網友回復:
老師上面的死叉共振,可否也標出來?
?
網友回復:?DIF:(EMA(CLOSE,6)-EMA(CLOSE,13))*100;DEA:EMA(DIF,5);MACD:(DIF-DEA)*2,COLORSTICK;DRAWICON(CROSS(DIF,DEA),DEA,1);DRAWICON(CROSS(DEA,DIF),DEA,2); LC := REF(CLOSE,1);N1:=7;N2:=14;RSI1:SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100;RSI2:SMA(MAX(CLOSE-LC,0),N2,1)/SMA(ABS(CLOSE-LC),N2,1)*100;DD:=C=HHV(C,180);EE:=DEA< REF(DEA,1);CC:=C> REF(C,1) AND REF(C>REF(C,1),1)=1;頂背離:=(DD AND EE AND DEA< HHV(DEA,180))*DEA;A2:=BARSLAST(REF(CROSS(DEA,DIF),1));頂背:=REF(CLOSE,A2+1) AND CROSS(DEA,DIF);DRAWLINE1(A2=0,DEA,頂背離,DEA,0),COLORRED,LINETHICK2;RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;K:SMA(RSV,9,3),COLORYELLOW;D:SMA(K,9,3),COLORWHITE;J:3*K-2*D,COLORMAGENTA; A1:=BARSLAST(REF(CROSS(DIF,DEA),1));B1:=REF(C,A1+1)>C AND REF(DIF,A1+1);A22:=BARSLAST(REF(CROSS(K,D),1));B2:=REF(C,A22+1)>C AND REF(K,A22+1)<K AND CROSS(K,D);A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1));B3:=REF(C,A3+1)>C AND REF(RSI1,A3+1)<RSI1 AND CROSS(RSI1,RSI2);DRAWTEXT(B1,DEA-0.20,'MACD底背',COLORWHITE;DRAWTEXT(B2,D-0.20,'KDJ底背',COLORFF00FF;DJ:=CROSS(J,D) AND D<20;DRAWTEXT(DJ,J-0.3,'金叉',COLORCYAN;MDJ:=CROSS(DIF,DEA) AND DEA<0;DRAWTEXT(MDJ,DEA-0.3,'金叉',COLORGREEN;DRAWTEXT(CROSS(DEA,DIF),DIF+0.3,'叉',COLORYELLOW;DRAWTEXT(CROSS(D,J),J+0.3,'叉',COLORRED; A:=CROSS(DIF,DEA) AND CROSS(K,D) AND CROSS(J,D);DRAWICON(A,LOW*0.98,1);B4:CROSS(DIF,DEA) AND CROSS(K,D);DRAWTEXT(B4,L-0.20,'金叉共振',COLOR0099FF;X:CROSSDOWN(DIF,DEA) AND CROSSDOWN(K,D);DRAWTEXT(X,H+0.20,'死叉共振',COLOR0099FF;DRAWICON(CROSS(K,D),D,1);DRAWICON(CROSS(D,K),D,2);BA:=DEA>REF(DEA,1);BB:=SUM(BA,5)>=4;BC:=C;BD:=SUM(BC,5)>=2;BXG:FILTER(BB AND BD AND J>REF(J,1) AND REF(J,1),2);STICKLINE(BXG,HHV(J,60),HHV(J,60)-20,1,0),COLORRED;SS:=EMA(C,11);LL:=(EMA(C,1)+EMA(C,2)+EMA(C,3)+EMA(C,5))/4;短:EMA(LL,2),COLORGREEN,LINETHICK2; 長:EMA(SS,2),COLORMAGENTA,LINETHICK2; AA:=(C-LLV(C,10))/(HHV(C,10)-LLV(C,10));(CROSS(AA,0.05)-1);