以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://222.73.7.161/bbs/index.asp)
--  公式模型编写问题提交  (http://222.73.7.161/bbs/list.asp?boardid=4)
----  老师,能帮忙移植个文华模型吗  (http://222.73.7.161/bbs/dispbbs.asp?boardid=4&id=170304)

--  作者:yeyong
--  发布时间:2019/6/5 11:27:25
--  老师,能帮忙移植个文华模型吗
之前一直用文华进行交易,但是不是很好用,能帮忙移植到金字塔进行交易吗?
MID:=MA(C,N);//计算中轨       
TMP:=STD(C,M)*SDEV;//计算标准差
DISPTOP:REF(MID,P)+TMP;//平移BOLL通道上轨
DISPBOTTOM:REF(MID,P)-TMP;//平移BOLL通道下轨
//系统入场
C>=DISPTOP,BPK;
C<=DISPBOTTOM,SPK;
C<0.97*BKPRICE,SP;
C>1.03*SKPRICE,BP;
AUTOFILTER;
TRADE_OTHER(\'AUTO\');

--  作者:wenarm
--  发布时间:2019/6/5 13:13:41
--  

MID:=MA(C,N);//计算中轨      
TMP:=STD(C,M)*SDEV;//计算标准差
DISPTOP:REF(MID,P)+TMP;//平移BOLL通道上轨
DISPBOTTOM:REF(MID,P)-TMP;//平移BOLL通道下轨
//系统入场


if C>=DISPTOP then begin
 sellshort(HOLDING<0,1,MARKET);
 buy(HOLDING=0,1,MARKET);
end

if C>=DISPTOP then begin
 sell(HOLDING>0,1,MARKET);
 buyshort(HOLDING=0,1,MARKET);
end

if C<0.97*BKPRICE then begin
 sell(HOLDING>0,1,MARKET);
end


if C>1.03*SKPRICE then begin
 sellshort(HOLDING<0,1,MARKET);
end


--  作者:yeyong
--  发布时间:2019/6/5 20:52:37
--  
老师,提示这个东西,请问如何修改啊
图片点击可在新窗口打开查看此主题相关图片如下:qq图片20190605205212.png
图片点击可在新窗口打开查看

--  作者:wenarm
--  发布时间:2019/6/6 8:30:38
--  

MID:=MA(C,N);//计算中轨      
TMP:=STD(C,M)*SDEV;//计算标准差
DISPTOP:REF(MID,P)+TMP;//平移BOLL通道上轨
DISPBOTTOM:REF(MID,P)-TMP;//平移BOLL通道下轨
//系统入场


if C>=DISPTOP then begin
 sellshort(HOLDING<0,1,MARKET);
 buy(HOLDING=0,1,MARKET);
end

if C>=DISPTOP then begin
 sell(HOLDING>0,1,MARKET);
 buyshort(HOLDING=0,1,MARKET);
end

if C<0.97*ENTERPRICE  and HOLDING>0 then begin
 sell(1,1,MARKET);
end


if C>1.03*ENTERPRICE and HOLDING<0 then begin
 sellshort(1,1,MARKET);
end