: | : | :期货量化学习 | :期货量化 |
返回列表 发帖

alert問題

alert問題

本人在寫:
高於前5根BAR 買入
低於前5根BAR賣出
20點takeprofit
買入時:在高位回落0.3%便反向賣出

但寫了數星期ALERT 也不完成
請求各大大幫忙解決



[IntrabarOrderGeneration = True]
[SameExitFromOneEntryOnce = True]
Input: Trailing1( 20 ),Nbar( 5 ), X( 0.3 ), BuyorSellContracts(4),shareCounter1(1);
var: str(""), intrabarpersist mp1(0),intrabarpersist mp0(0), mp2(0), Starp( 0 ), TradeCounts( 0 ), Mycontracts( 0 ), TrailingPrice1( 0 ), intrabarpersist MyHigh( 0 );

var: open_alert(0), takprofit_alert(0); //false = not yet alert

mp2 = mp1;
mp1=mp0;
mp0=marketposition;
str="";

//entry
buy ("Buy") next bar at Highest(high,Nbar) +1 stop ;
sellshort ("Short") next bar at Lowest(low,Nbar)-1 stop ;
TradeCounts = PosTradeCount( 0 ) - 1 ;
Mycontracts = currentcontracts ;

if close >= Highest(high,Nbar) and open_alert = 0 then begin
        str=text(str)+text(Mycontracts)+text(" buy open")+text(BuyorSellContracts);
        open_alert = 1;
        takprofit_alert = 0;
//end else if close > Lowest(high,Nbar) and mp1 = -1 and mp2 = -1 and open_alert = 0 then begin
        //str=text(str)+text(Mycontracts)+text(" buy open")+text(BuyorSellContracts);
        //open_alert = true;
        //takprofit_alert = false;
end else if close <= Lowest(low,Nbar) and open_alert = 0  then begin
        str=text(str)+text(Mycontracts)+text(" sell open")+text(BuyorSellContracts);
        open_alert = 1;
        takprofit_alert = 0;
end;


//long
if mp0 = 1 then begin
        //update high
        if mp1 <> 1 then begin
                MyHigh = High ;
        end else if High > MyHigh then MyHigh = High ;
        //backhand
                sellshort ("call to put") next bar at ( 1 - X / 100 ) * MyHigh stop ;
        //Trailing
        TrailingPrice1 = entryprice + Trailing1 points ;
        //print (date , time_s, TrailingPrice1, entryprice );
        if (close >= TrailingPrice1 and takprofit_alert = 0) then begin
           str=text(str)+text(" Ctp1 ")+text(shareCounter1);
           open_alert = 0;
           takprofit_alert = 1;
        end;
        sell ("Ctp1") next bar at TrailingPrice1 limit;
end

else if mp0 = -1 then
begin
        if mp0 <> mp1 then begin
                if (mp1 = 1) then begin
                       str=text(str)+text(" cut ")+text(Mycontracts)+text(" and call to put ")+text(PosTradeSize(0,0));
                       open_alert = 0;
                end else begin
                        str=text(str)+text(" cut ")+text(Mycontracts)+text(" sell")+text(BuyorSellContracts);
                        open_alert = 0;
                end;
        end ;
        //Trailing
         TrailingPrice1 = entryprice - Trailing1 points;
         if (close <= TrailingPrice1 and takprofit_alert = 0) then begin
             str=text(str)+text(" Ptp1 ")+text(shareCounter1);
             open_alert = 0;
             takprofit_alert = 1;
         end;
         buytocover ("Ptp1") next bar at TrailingPrice1 limit;
end ;


if str<>"" then begin
        alert(str);
        //print (str);
end;

论坛官方微信、群(期货热点、量化探讨、开户与绑定实盘)
 
期货论坛 - 版权/免责声明   1.本站发布源码(包括函数、指标、策略等)均属开放源码,用意在于让使用者学习程序化语法撰写,使用者可以任意修改语法內容并调整参数。仅限用于个人学习使用,请勿转载、滥用,严禁私自连接实盘账户交易
  2.本站发布资讯(包括文章、视频、历史记录、教材、评论、资讯、交易方案等)均系转载自网络主流媒体,内容仅为作者当日个人观点,本网转载此文出于传递更多信息之目的,并不意味着赞同其观点或证实其描述。本网不对该类信息或数据做任何保证。不对您构成任何投资建议,不能依靠信息而取代自身独立判断,不对因使用本篇文章所诉信息或观点等导致的损失承担任何责任。
  3.本站发布资源(包括书籍、杂志、文档、软件等)均从互联网搜索而来,仅供个人免费交流学习,不可用作商业用途,本站不对显示的内容承担任何责任。请在下载后24小时内删除。如果喜欢,请购买正版,谢谢合作!
  4.龙听期货论坛原创文章属本网版权作品,转载须注明来源“龙听期货论坛”,违者本网将保留追究其相关法律责任的权力。本论坛除发布原创文章外,亦致力于优秀财经文章的交流分享,部分文章推送时若未能及时与原作者取得联系并涉及版权问题时,请及时联系删除。联系方式:http://www.qhlt.cn/thread-262-1-1.html

刚看到,我看看,
如何访问权限为100/255贴子:/thread-37840-1-1.html;注册后仍无法回复:/thread-23-1-1.html;微信/QQ群:/thread-262-1-1.html;网盘链接失效解决办法:/thread-93307-1-1.html

TOP

有解決方法嗎?

TOP

学习学习

TOP

返回列表