咨詢內容:
老師這個咋改成博弈的
M:=3;
A:=(3*C+L+O+H)/6;//3倍收盤價與最高價、最低價、開盤價之和的均值。
B:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+REF(A,20))/210;
//對A值做加權均值計算。
D1:=MA(B,M);//對B值做10周期平均計算。
JC:=REF(CROSS(C,D1),1)&&EVERY(C>D1,2);
SC:=REF(CROSS(D1,C),1)&&EVERY(C<D1,2);
N1:=BARSLAST(JC)+1;
N2:=BARSLAST(SC)+1;
L1:=REF(LLVBARS(L,N2),N1) + N1;//周期數
Q1:=REF(HHVBARS(H,N1),N2) + N2;//周期數
L2:=REF(LLVBARS(L,N2),SUMBARS(JC,2))+SUMBARS(JC,2);
L3:=REF(LLVBARS(L,N2),SUMBARS(JC,3))+SUMBARS(JC,3);
MM:=MOD(SUM(IF(JC&&COUNT(JC,BARSLAST(SC))=1,1,0),0),3);
NN:=MOD(SUM(IF(SC&&COUNT(SC,BARSLAST(JC))=1,1,0),0),3);
KTEXT(JC&&COUNT(JC,BARSLAST(SC))=1&&MM=1||COUNT(JC,0)=1 ,-L1,REF(L,L1),1,COLORMAGENTA,'↑'),FONTSIZE60;
KTEXT(JC&&COUNT(JC,BARSLAST(SC))=1&&MM=2 ,-L1,REF(L,L1),1,COLORMAGENTA,'↑'),FONTSIZE60;
KTEXT(JC&&COUNT(JC,BARSLAST(SC))=1&&MM=0 ,-L1,REF(L,L1),1,COLORMAGENTA,'↑'),FONTSIZE60;
KTEXT(SC&&COUNT(SC,BARSLAST(JC))=1&&NN=1||COUNT(SC,0)=1 ,-Q1,REF(H,Q1),1,COLORMAGENTA,'↓'),FONTSIZE60;
KTEXT(SC&&COUNT(SC,BARSLAST(JC))=1&&NN=2 ,-Q1,REF(H,Q1),1,COLORMAGENTA,'↓'),FONTSIZE60;
KTEXT(SC&&COUNT(SC,BARSLAST(JC))=1&&NN=0 ,-Q1,REF(H,Q1),1,COLORMAGENTA,'↓'),FONTSIZE60;
DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
RSV:= (CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
FASTK:=SMA(RSV,3,1);
K:=SMA(FASTK,3,1);
D:=SMA(K,3,1);
MA5:MA(C,10),COLORGREEN,LINETHICK2;
DRAWCOLORLINE(C>MA5,MA5,COLORRED,COLORGREEN),LINETHICK3;
DRAWCOLORKLINE(1,COLORWHITE,0);
DRAWCOLORKLINE(DIFF>REF(DIFF,1)&&K>REF(K,1)&&MA5>REF(MA5,1),COLORRED,0);
DRAWCOLORKLINE(DIFF<REF(DIFF,1)&&K<REF(K,1)&&MA5<REF(MA5,1),COLORGREEN,0);
?
?來源:程序化99網( www.tumamayizhan.com )
博易技術人員:
無法修改,函數不匹配
來源 程序化久久網