咨詢內容：

請老師改成博弈能用的，謝謝

?
?
?
?
? ? ? ? ??DIF:(EMA(CLOSE,12)-EMA(CLOSE,26))*100;
DEA:EMA(DIF,9);
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)>C ANDREF("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)>C ANDREF("RSI.RSI1"(6,12,24),A3 1)<"RSI.RSI1"(6,12,24)AND CROSS("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網（ www.weiqiv.net.cn ）

博易技術人員： ? ? ? ? ? DIF:(EMA(CLOSE,12)-EMA(CLOSE,26))*100;
DEA:EMA(DIF,9);
MACD:(DIF-DEA)*2,COLORSTICK;
DRAWICON(CROSS(DIF,DEA),DEA,1);
DRAWICON(CROSS(DEA,DIF),DEA,2);

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)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;

A1:=BARSLAST(REF(CROSS(DIF,DEA),1));
B1:=REF(C,1)>C AND REF(DIF,1);
A22:=BARSLAST(REF(CROSS(K,D),1));

RSIRSI1:=STKINDI('',0,'RSI.RSI1',6,12,24);
RSIRSI2:=STKINDI('',0,'RSI.RSI2',6,12,24);
B2:=REF(C,A1)>C AND REF(K,1)<K AND CROSS(K,D);
A3:=BARSLAST(REF(CROSS(RSIRSI1,RSIRSI2),1));
B3:=REF(C,1)>C AND REF(RSIRSI1,1)<RSIRSI1 AND CROSS(RSIRSI1,RSIRSI2);
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),10);
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); 來源 程序化久久網