一直用文華，很不習(xí)慣金字塔的軟件

但是朋友給了一個(gè)金字塔公式，天天開兩個(gè)軟件，好煩，請老師幫忙改成文華的，可以嗎，謝謝

 input:mm1(4,4,5,1);
input:mm2(4,2,5,1);
input:mm3(5,4,6,1);
input:mm4(10,8,10,1);
input:mm5(200,170,260,10);
input:mm6(7,6,10,1);
runmode:=0;
variable:ema12=c,ema26=c,dea=0;
if day<>ref(day,1) then begin
  ema12:=c;
  ema26:=c;
  dea:=0;
end
ema12:=ema12*11/13+c*2/13;
ema26:=ema26*25/27+c*2/27;
diff:=ema12-ema26;
dea:=dea*4/5+diff/5;
dea1:=dea;
macd:=2*(diff-dea),colorstick;


TYP:= (HIGH + LOW + CLOSE)/3;
cci:=(TYP-MA(TYP,6))/(0.015*AVEDEV(TYP,6));
開多1:=count(diff>ref(diff,1),mm1)=mm1;
開多2:=count(macd>ref(macd,1),mm2)=mm2;
開多3:=count(diff>dea1,mm3)=mm3;
開多:=開多1 AND 開多2 AND 開多3;
開空1:=count(diff<ref(diff,1),mm1)=mm1;
開空2:=count(macd<ref(macd,1),mm2)=mm2;
開空3:=count(diff<dea1,mm3)=mm3;
開空:=開空1 AND 開空2 AND 開空3;


平多1:=count(macd<ref(macd,1),mm4)=mm4;
平多2:=cci>mm5;
平空1:=count(macd>ref(macd,1),mm4)=mm4;
平空2:=cci<-mm5;
平多:=平多1 or 平多2 or CLOSE<=(ENTERPRICE-mm6); 
平空:=平空1 or 平空2 or CLOSE>=(ENTERPRICE+mm6);
 
IF HOLDING>0 AND 平多 THEN SELL(1,0,MARKET);
IF HOLDING>0 AND TIME=151200  THEN SELL(1,0,MARKET);
IF HOLDING<0 AND 平空  THEN SELLSHORT(1,0,MARKET);
IF HOLDING<0 AND TIME=151200  THEN SELLSHORT(1,0,MARKET);
IF HOLDING=0 AND 開多  AND TIME<150900  THEN BUY(1,1,MARKET); 
IF HOLDING=0 AND 開空  AND TIME<150900  THEN BUYSHORT(1,1,MARKET);


{
KD:=;          //開多條件
PD:=;          //平多條件
KK:=;          //開空條件
PK:=;          //平空條件


平空:SELLSHORT(PK,1,THISCLOSE);                  //平空信號
開多:BUY(KD AND HOLDING=0,1,THISCLOSE);          //開多信號
平多:SELL(PD,1,THISCLOSE);                       //平多信號
開空:BUYSHORT(KK AND HOLDING=0,1,THISCLOSE);     //開空信號

}
{
信號語句排列規(guī)則——先平后開
“費(fèi)率設(shè)置”按鈕——用于合理設(shè)置模型“費(fèi)率”，以便在圖形上正確輸出如下帳戶信息：

內(nèi)容非常多，辛苦老師了~

最近改寫需求較多，相關(guān)同事分析研究后給您回復(fù)，請耐心等待

另外，您的版本不是最新版，請登錄文華官網(wǎng)下載最新WH6贏順實(shí)盤通用版：www.wenhua.com.cn  

嗯，辛苦啦～

確實(shí)太多

最近改寫需求較多，相關(guān)同事分析研究后給您回復(fù)，請耐心等待

另外，您的版本不是最新版，請登錄文華官網(wǎng)下載最新WH6贏順實(shí)盤通用版：www.wenhua.com.cn  

我用的是WH6啊