以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (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=162587)
--  作者：代人发贴
--  发布时间：2018/4/8 15:47:02
--  图表改后台
图表改后台
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:改为后台策略.rar
--  作者：FireScript
--  发布时间：2018/4/8 17:00:24
--  
 先说明下：简单的可以进行图表转后台，复杂的比如那2个海龟系统无法进行转换。我把其中简单的编写完成后给你供参考。
--  作者：FireScript
--  发布时间：2018/4/9 9:51:14
--  
 均线单边多：下单条件不用改，改下下单语句就行了。

if J>D&&C>MA5&&C>MA4&&C>MA3&&C>MA2&&C>MA1&&C>O then
begin
tsellshort(1,TSELLHOLDINGEX(\'\',\'\',0),mkt);
tbuy(1,1,mkt);
end

if J>D&&C>MA5&&C>MA4&&C>MA3&&C>MA2&&C>MA1&&C>O then
begin
tbuy(1,1,mkt);
end

if J<D&&C>MA5&&C>MA4&&C>MA3&&C>MA2&&C>MA1 then
begin
tsell(1,TBUYHOLDINGEX(\'\',\'\',0),mkt);
end

if J>D&&C<MA5&&C<MA4&&C<MA3&&C<MA2&&C<MA1 then
begin
tsellshort(1,TSELLHOLDINGEX(\'\',\'\',0),mkt);
end

if J<D then
begin
tsell(1,TBUYHOLDINGEX(\'\',\'\',0),mkt);
end

if J>D then
begin
tsellshort(1,TSELLHOLDINGEX(\'\',\'\',0),mkt);
end


其他的可以参考这个修改。主要希望用户能学习到后台和图表语句的差别。