幫我把文華改成金字塔

作者：金字塔來源：cxh99.com 發布時間：2020年04月13日

咨詢內容： ?M:=10;
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值做加權均值計算。
D:MA(B,M);
N:=1;//首次下單手數
AA:=COUNTSIG(BPK,BARPOS)+COUNTSIG(SPK,BARPOS);//之前沒有BPK,SPK信號。
BB:=IF(TRADE_REF(1)=0,IF(REF(ISLASTBPK,1),REF(REFSIG_VOL(BPK,1)+1,1),REF(REFSIG_VOL(SPK,1)+1,1)),N);
CC:=IF(AA<1,N,BB);
CROSS(B,D),BPK(CC);
CROSSDOWN(B,D),SPK(CC);
MULTSIG(0,0,1,0);
//追價委托
SETSIGPRICETYPE(BPK,TRACING_ORDER);
SETSIGPRICETYPE(SPK,TRACING_ORDER);
?
金字塔客服： 以下代碼供參考：
M:=10;
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值做加權均值計算。
D:MA(B,M);
N:=1;//首次下單手數
cd1:ref(holding,1)<0 and holding>0;//利用持倉變化判斷是否反手了
cd2:ref(holding,1)>0 and holding<0;
AA:=COUNT(cd1,BARPOS)+COUNT(cd2,BARPOS);//之前沒有BPK,SPK信號。
BB:=IF(NUMPROFIT(1)=0,ENTERVOL,N);
CC:=IF(AA<1,N,BB);

if CROSS(B,D) then
begin
sellshort(holding<0,holding,market);
buy(holding=0,CC,market);
end

if CROSS(D,B) then
begin
sell(holding>0,holding,market);
buyshort(holding=0,CC,market);
end

//下面這個功能需要使用軟件自帶的追撤單，無法單純用代碼實現。

////追價委托
//SETSIGPRICETYPE(BPK,TRACING_ORDER);
//SETSIGPRICETYPE(SPK,TRACING_ORDER);
//