中文字幕av无码不卡免费_蜜臀AV无码精品人妻色欲_亚洲成AV人片在线观看无码不卡_无码专区天天躁天天躁在线

您現在的位置:程序化交易>> 期貨公式>> 交易開拓者(TB)>> 開拓者公式>>正文內容

開拓者左右互博 日內隨機交易策略源碼[開拓者公式]

開拓者左右互博 日內隨機交易策略源碼

//------------------------------------------------------------------------
// 簡稱: LeftRightTrading
// 名稱: LeftRightTrading
// 類別: 公式應用
// 類型: 用戶應用
//------------------------------------------------------------------------
Params
        Bool bInitStatus(False);
    Numeric InitMyRealMP(0);
    Numeric InitPreMyRealMP(0);
        Numeric FirstGrid(5);
        Numeric TotalGrids(10);
        Numeric GridInterval(5);
        Numeric WinGrid(5);
        Numeric EveryLots(1);
        Numeric OffSet(1);
       
        Numeric StyleChangeGrid(3);
        Bool ProgramTest(False);//是否測試 True 是 False 實盤
       
Vars
        NumericSeries MidLine;
        Numeric MinPoint;
        Numeric AskLine;
        Numeric BidLine;
        Numeric RealMidLine;
        Numeric MyRealMP(0);
        Numeric TmpGridIndex;
        Numeric qcbz;
        Bool TradeTime;
        Numeric TmpLots;
        Numeric PreRealMidLine;
        Numeric PreMyRealMP;
        Numeric MyBuyPosition;
        Numeric MySellPosition;
        Numeric EndTime;
        Bool        bJudgeTime;       
        Numeric ExitOnCloseMins(14.58);
       
        //Debug
        String FilePath;
       
Begin
        If((Weekday()!=5)&&(Weekday()!=6)&&(Weekday()!=7)){EndTime=0.151500;ExitOnCloseMins=15.13;}
        If(Weekday()==5){EndTime=0.150000;ExitOnCloseMins=14.58;}
        If(!ProgramTest)TradeTime=(Q_LastTime>=0.091500 And CurrentTime>0.091500 And CurrentTime<0.113000) Or (CurrentTime>0.130000 And CurrentTime<EndTime);
        If(ProgramTest)TradeTime=(CurrentTime>0.091500 And CurrentTime<0.113000) Or (CurrentTime>0.130000 And CurrentTime<EndTime);
       
        FilePath="C:\\LeftRightTrading_ea.txt";
       
        MyRealMP=GetGlobalVar(0);
        qcbz=GetGlobalVar(1);
        PreRealMidLine=GetGlobalVar(2);
        PreMyRealMP=GetGlobalVar(3);
        If(BarStatus==0 And (MyRealMP==InvalidNumeric || bInitStatus))
        {
                //If(A_BuyPosition>0)MyRealMP=A_BuyPosition;
                //Else If(A_SellPosition>0)MyRealMP=-1*A_SellPosition;
                //Else MyRealMP=InitMyRealMP;
                MyRealMP=InitMyRealMP;
                PreMyRealMP=InitPreMyRealMP;
               
        }
       
        If((Weekday()!=5)&&(Weekday()!=6)&&(Weekday()!=7))
                bJudgeTime=(Time==0.091500 Or Time==0.092500 Or Time==0.093500 Or Time==0.094500 Or Time==0.095500 Or Time==0.100500 Or Time==0.101500 Or Time==0.102500 Or Time==0.103500 Or Time==0.104500 Or Time==0.105500 Or Time==0.110500 Or Time==0.111500 Or Time==0.112500 Or Time==0.130000  Or Time==0.131000  Or Time==0.132000  Or Time==0.133000 Or Time==0.134000 Or Time==0.135000 Or Time==0.140000 Or Time==0.141000 Or Time==0.142000 Or Time==0.14300 Or Time==0.144000 Or Time==0.145000 Or Time==0.150000 Or Time==0.151000);
        If(Weekday()==5)
                bJudgeTime=(Time==0.091500 Or Time==0.092500 Or Time==0.093500 Or Time==0.094500 Or Time==0.095500 Or Time==0.100500 Or Time==0.101500 Or Time==0.102500 Or Time==0.103500 Or Time==0.104500 Or Time==0.105500 Or Time==0.110500 Or Time==0.111500 Or Time==0.112500 Or Time==0.130000  Or Time==0.131000  Or Time==0.132000  Or Time==0.133000 Or Time==0.134000 Or Time==0.135000 Or Time==0.140000 Or Time==0.141000 Or Time==0.142000 Or Time==0.14300 Or Time==0.144000 Or Time==0.145000);
        If(bJudgeTime)
        {
                MidLine=Open;
                PreRealMidLine=MidLine[1];
        }
        Else
        {
                MidLine=MidLine[1];
        }
        RealMidLine=MidLine;
        MinPoint=MinMove*PriceScale;
        If(!ProgramTest)AskLine=Q_AskPrice;Else AskLine=High;
        If(!ProgramTest)BidLine=Q_BidPrice;Else BidLine=Low;
        If(!ProgramTest)MyBuyPosition=A_BuyPosition;
        If(!ProgramTest)MySellPosition=A_SellPosition;
       
               
        If(BarStatus==2 && A_AccountID!="" && TradeTime)
        {
                If(Q_AskPrice<=0 || Q_BidPrice<=0) Return;
                If(Q_BidPrice==Q_UpperLimit || Q_AskPrice ==Q_LowerLimit) Return;
                If(High==Low)Return;
                If((Weekday()!=5)&&(Weekday()!=6)&&(Weekday()!=7))
                        bJudgeTime=(Time==0.091500 Or Time==0.092500 Or Time==0.093500 Or Time==0.094500 Or Time==0.095500 Or Time==0.100500 Or Time==0.101500 Or Time==0.102500 Or Time==0.103500 Or Time==0.104500 Or Time==0.105500 Or Time==0.110500 Or Time==0.111500 Or Time==0.112500 Or Time==0.130000  Or Time==0.131000  Or Time==0.132000  Or Time==0.133000 Or Time==0.134000 Or Time==0.135000 Or Time==0.140000 Or Time==0.141000 Or Time==0.142000 Or Time==0.14300 Or Time==0.144000 Or Time==0.145000 Or Time==0.150000 Or Time==0.151000);
               
                If(Weekday()==5)
                        bJudgeTime=(Time==0.091500 Or Time==0.092500 Or Time==0.093500 Or Time==0.094500 Or Time==0.095500 Or Time==0.100500 Or Time==0.101500 Or Time==0.102500 Or Time==0.103500 Or Time==0.104500 Or Time==0.105500 Or Time==0.110500 Or Time==0.111500 Or Time==0.112500 Or Time==0.130000  Or Time==0.131000  Or Time==0.132000  Or Time==0.133000 Or Time==0.134000 Or Time==0.135000 Or Time==0.140000 Or Time==0.141000 Or Time==0.142000 Or Time==0.14300 Or Time==0.144000 Or Time==0.145000);
                //FileAppend(FilePath,"bJudgeTime=");
               
                If(TradeTime)//定時清倉,重置中線值
                {
                        If(qcbz==1)
                        {
                                //FileAppend(FilePath,"Excute qcbz=1!  "+", MyRealMP="+Text(MyRealMP)+", MySellPosition="+Text(MySellPosition)+", MyBuyPosition="+Text(MyBuyPosition)+", PreMyRealMP="+Text(PreMyRealMP)+", A_SellProfitLoss="+Text(A_SellProfitLoss)+", A_BuyProfitLoss="+Text(A_BuyProfitLoss));
                                If(MySellPosition>0 And MyRealMP>0 And A_SellProfitLoss>0)
                                {
                                        TmpLots=MySellPosition;
                                        A_SendOrder(Enum_Buy,Enum_Exit,TmpLots,Q_AskPrice+OffSet*MinPoint);
                                        If(PreMyRealMP>0)MyRealMP=MyRealMP+PreMyRealMP-IntPart(TmpLots/EveryLots);
                                        Else If (PreMyRealMP<=0 And MyRealMP>0)MyRealMP=MyRealMP-IntPart(TmpLots/EveryLots);
                                        MySellPosition=MySellPosition-TmpLots;
                                }
                                If(MyBuyPosition>0 And MyRealMP<0 And A_BuyProfitLoss>0)
                                {
                                        TmpLots=MyBuyPosition;
                                        A_SendOrder(Enum_Sell,Enum_Exit,TmpLots,Q_BidPrice-OffSet*MinPoint);
                                        If(PreMyRealMP<0)MyRealMP=MyRealMP+PreMyRealMP+IntPart(TmpLots/EveryLots);
                                        Else If (PreMyRealMP>=0)MyRealMP=MyRealMP+IntPart(TmpLots/EveryLots);
                                        MyBuyPosition=MyBuyPosition-TmpLots;
                                } // cxh99.com

                                If(MySellPosition>0 And PreMyRealMP>0)
                                {
                                        TmpLots=Min(MySellPosition,PreMyRealMP*EveryLots);
                                        A_SendOrder(Enum_Buy,Enum_Exit,TmpLots,Q_AskPrice+OffSet*MinPoint);
                                        MyRealMP=MyRealMP+PreMyRealMP-IntPart(TmpLots/EveryLots);
                                        MySellPosition=MySellPosition-TmpLots;
                                }
                                If(MyBuyPosition>0 And PreMyRealMP<0)
                                {
                                        TmpLots=Min(MyBuyPosition,-1*PreMyRealMP*EveryLots);
                                        A_SendOrder(Enum_Sell,Enum_Exit,TmpLots,Q_BidPrice-OffSet*MinPoint);
                                        MyRealMP=MyRealMP+PreMyRealMP+IntPart(TmpLots/EveryLots);
                                        MyBuyPosition=MyBuyPosition-TmpLots;
                                }
                                PreMyRealMP=MyRealMP;
                                MyRealMP=0;
                                qcbz=0;
                               
                        }
                        Else {qcbz=1;}
                       
                        If(CurrentTime<ExitOnCloseMins/100 And qcbz!=0)
                        {
                                //FileAppend(FilePath,"Excute1!  "+"PreMyRealMP="+Text(PreMyRealMP)+"MySellPosition="+Text(MySellPosition)+"MyBuyPosition="+Text(MyBuyPosition));
                               
                                If(MySellPosition>0 And PreMyRealMP>0)
                                {
                                        TmpGridIndex=Abs(BidLine-PreRealMidLine)/(GridInterval*MinPoint);
                                        FileAppend(FilePath,"TmpGridIndex1="+Text(TmpGridIndex));
                                        If(TmpGridIndex>=StyleChangeGrid+1 And AskLine>PreRealMidLine+FirstGrid*MinPoint)
                                        {
                                                TmpLots=Min(MySellPosition,PreMyRealMP*EveryLots);
                                                A_SendOrder(Enum_Buy,Enum_Exit,TmpLots,Q_AskPrice+OffSet*MinPoint);
                                                PreMyRealMP=PreMyRealMP-IntPart(TmpLots/EveryLots);
                                        }
                                        TmpGridIndex=Abs(PreRealMidLine-AskLine)/(GridInterval*MinPoint);
                                        FileAppend(FilePath,"TmpGridIndex2="+Text(TmpGridIndex));
                                        If(TmpGridIndex<=StyleChangeGrid And AskLine<PreRealMidLine-FirstGrid*MinPoint)
                                        {
                                                TmpLots=Min(MySellPosition,PreMyRealMP*EveryLots);
                                                A_SendOrder(Enum_Buy,Enum_Exit,TmpLots,Q_AskPrice+OffSet*MinPoint);
                                                PreMyRealMP=PreMyRealMP-IntPart(TmpLots/EveryLots);
                                        }
                                       
                                }
                                Else If(MyBuyPosition>0 And PreMyRealMP<0)
                                {
                                        TmpGridIndex=Abs(BidLine-PreRealMidLine)/(GridInterval*MinPoint);
                                        FileAppend(FilePath,"TmpGridIndex3="+Text(TmpGridIndex));
                                        If(TmpGridIndex<=StyleChangeGrid And BidLine>PreRealMidLine+FirstGrid*MinPoint)
                                        {
                                                TmpLots=Min(MyBuyPosition,-1*PreMyRealMP*EveryLots);
                                                A_SendOrder(Enum_Sell,Enum_Exit,TmpLots,Q_BidPrice-OffSet*MinPoint);
                                                PreMyRealMP=PreMyRealMP+IntPart(TmpLots/EveryLots);
                                        }
                                        TmpGridIndex=Abs(PreRealMidLine-AskLine)/(GridInterval*MinPoint);
                                        FileAppend(FilePath,"TmpGridIndex4="+Text(TmpGridIndex));
                                        If(TmpGridIndex>=StyleChangeGrid And BidLine<PreRealMidLine-FirstGrid*MinPoint)
                                        {
                                                TmpLots=Min(MyBuyPosition,-1*PreMyRealMP*EveryLots);
                                                A_SendOrder(Enum_Sell,Enum_Exit,TmpLots,Q_BidPrice-OffSet*MinPoint);
                                                PreMyRealMP=PreMyRealMP+IntPart(TmpLots/EveryLots);
                                        }
                                }
                                If(PreMyRealMP>0 And AskLine>PreRealMidLine-FirstGrid*MinPoint And MySellPosition>0 )
                                {
                                        TmpGridIndex=Abs(AskLine-PreRealMidLine)/(GridInterval*MinPoint);
                                        FileAppend(FilePath,"TmpGridIndex5="+Text(TmpGridIndex));
                                        If(TmpGridIndex<=PreMyRealMP-1 And TmpGridIndex<=StyleChangeGrid)
                                        {
                                                PreMyRealMP=PreMyRealMP-1;
                                                A_SendOrder(Enum_Buy,Enum_Exit,EveryLots,Q_AskPrice+OffSet*MinPoint);
                                        }
                                }
                                Else If(PreMyRealMP<0 And BidLine<PreRealMidLine+FirstGrid*MinPoint And MyBuyPosition>0 )
                                {
                                        TmpGridIndex=Abs(PreMyRealMP-BidLine)/(GridInterval*MinPoint);
                                        FileAppend(FilePath,"TmpGridIndex6="+Text(TmpGridIndex));
                                        If(-1*TmpGridIndex>=PreMyRealMP+1 And TmpGridIndex<=StyleChangeGrid)
                                        {
                                                PreMyRealMP=PreMyRealMP+1;
                                                A_SendOrder(Enum_Sell,Enum_Exit,EveryLots,Q_BidPrice-OffSet*MinPoint);
                                        }
                                }
                               
                               
                               
                                If(PreMyRealMP<0 And BidLine>PreRealMidLine+FirstGrid*MinPoint And MyBuyPosition>0 )
                                {
                                        TmpGridIndex=Abs(BidLine-MinPoint-PreRealMidLine)/(GridInterval*MinPoint);
                                        FileAppend(FilePath,"TmpGridIndex7="+Text(TmpGridIndex));
                                        If(TmpGridIndex<=-1*PreMyRealMP-1 And TmpGridIndex>=StyleChangeGrid)
                                        {
                                                PreMyRealMP=PreMyRealMP+1;
                                                A_SendOrder(Enum_Sell,Enum_Exit,EveryLots,Q_BidPrice-OffSet*MinPoint);
                                        }
                                }
                                Else If(PreMyRealMP>0 And AskLine<PreRealMidLine-FirstGrid*MinPoint And MySellPosition>0 )
                                {
                                        TmpGridIndex=Abs(PreMyRealMP-AskLine+MinPoint)/(GridInterval*MinPoint);
                                        FileAppend(FilePath,"TmpGridIndex8="+Text(TmpGridIndex));
                                        If(TmpGridIndex>=PreMyRealMP-1 And TmpGridIndex>=StyleChangeGrid)
                                        {
                                                PreMyRealMP=PreMyRealMP-1;
                                                A_SendOrder(Enum_Buy,Enum_Exit,EveryLots,Q_AskPrice+OffSet*MinPoint);
                                        }
                                }
                               
                                If(MySellPosition>0 And MyRealMP>0)
                                {
                                        TmpGridIndex=Abs(BidLine-RealMidLine)/(GridInterval*MinPoint);
                                        FileAppend(FilePath,"TmpGridIndex9="+Text(TmpGridIndex));
                                        If(TmpGridIndex>=StyleChangeGrid+1 And AskLine>RealMidLine+FirstGrid*MinPoint)
                                        {
                                                TmpLots=Min(MySellPosition,MyRealMP*EveryLots);
                                                A_SendOrder(Enum_Buy,Enum_Exit,TmpLots,Q_AskPrice+OffSet*MinPoint);
                                                MyRealMP=MyRealMP-IntPart(TmpLots/EveryLots);
                                        }
                                        TmpGridIndex=Abs(RealMidLine-AskLine)/(GridInterval*MinPoint);
                                        FileAppend(FilePath,"TmpGridIndex10="+Text(TmpGridIndex));
                                        If(TmpGridIndex<=StyleChangeGrid And AskLine<RealMidLine-FirstGrid*MinPoint)
                                        {
                                                TmpLots=Min(MySellPosition,MyRealMP*EveryLots);
                                                A_SendOrder(Enum_Buy,Enum_Exit,TmpLots,Q_AskPrice+OffSet*MinPoint);
                                                MyRealMP=MyRealMP-IntPart(TmpLots/EveryLots);
                                        }
                                }///來源: www.tumamayizhan.com QQ 1145508240

                                Else If(MyBuyPosition>0 And MyRealMP<0)
                                {
                                        TmpGridIndex=Abs(BidLine-RealMidLine)/(GridInterval*MinPoint);
                                        FileAppend(FilePath,"TmpGridIndex11="+Text(TmpGridIndex));
                                        If(TmpGridIndex<=StyleChangeGrid And BidLine>RealMidLine+FirstGrid*MinPoint)
                                        {
                                                TmpLots=Min(MyBuyPosition,-1*MyRealMP*EveryLots);
                                                A_SendOrder(Enum_Sell,Enum_Exit,TmpLots,Q_BidPrice-OffSet*MinPoint);
                                                MyRealMP=MyRealMP+IntPart(TmpLots/EveryLots);
                                        }
                                        TmpGridIndex=Abs(RealMidLine-AskLine)/(GridInterval*MinPoint);
                                        FileAppend(FilePath,"TmpGridIndex12="+Text(TmpGridIndex));
                                        If(TmpGridIndex>=StyleChangeGrid+1 And BidLine<RealMidLine-FirstGrid*MinPoint)
                                        {
                                                TmpLots=Min(MyBuyPosition,-1*MyRealMP*EveryLots);
                                                A_SendOrder(Enum_Sell,Enum_Exit,TmpLots,Q_BidPrice-OffSet*MinPoint);
                                                MyRealMP=MyRealMP+IntPart(TmpLots/EveryLots);
                                        }
                                }
                                                               
                                If(MyRealMP>0 And AskLine>RealMidLine-FirstGrid*MinPoint And MySellPosition>0)
                                {
                                        TmpGridIndex=Abs(AskLine-RealMidLine)/(GridInterval*MinPoint);
                                        FileAppend(FilePath,"TmpGridIndex13="+Text(TmpGridIndex));
                                        If(TmpGridIndex<=MyRealMP-1 And TmpGridIndex<=StyleChangeGrid)
                                        {
                                                MyRealMP=MyRealMP-1;
                                                A_SendOrder(Enum_Buy,Enum_Exit,TmpLots,Q_AskPrice+OffSet*MinPoint);
                                                MyRealMP=MyRealMP-IntPart(TmpLots/EveryLots);
                                        }
                                       
                                }
                                Else If(MyRealMP<0 And BidLine<RealMidLine+FirstGrid*MinPoint And MyBuyPosition>0)
                                {
                                        TmpGridIndex=Abs(RealMidLine-BidLine)/(GridInterval*MinPoint);
                                        FileAppend(FilePath,"TmpGridIndex14="+Text(TmpGridIndex));
                                        If(-1*TmpGridIndex>=MyRealMP+1 And TmpGridIndex<=StyleChangeGrid)
                                        {
                                                MyRealMP=MyRealMP+1;
                                                A_SendOrder(Enum_Sell,Enum_Exit,TmpLots,Q_BidPrice-OffSet*MinPoint);
                                                MyRealMP=MyRealMP+IntPart(TmpLots/EveryLots);
                                        }
                                }                       
                               
                                If(MyRealMP>0 And AskLine<RealMidLine-FirstGrid*MinPoint And MySellPosition>0)
                                {
                                        TmpGridIndex=Abs(RealMidLine-AskLine+MinPoint)/(GridInterval*MinPoint);
                                        FileAppend(FilePath,"TmpGridIndex15="+Text(TmpGridIndex));
                                        If(TmpGridIndex<=MyRealMP-1 And TmpGridIndex>=StyleChangeGrid)
                                        {
                                                MyRealMP=MyRealMP-1;
                                                A_SendOrder(Enum_Buy,Enum_Exit,TmpLots,Q_AskPrice+OffSet*MinPoint);
                                                MyRealMP=MyRealMP-IntPart(TmpLots/EveryLots);
                                        }                                       
                                }
                                Else If(MyRealMP<0 And BidLine>RealMidLine+FirstGrid*MinPoint And MyBuyPosition>0)
                                {
                                        TmpGridIndex=Abs(BidLine-MinPoint-RealMidLine)/(GridInterval*MinPoint);
                                        FileAppend(FilePath,"TmpGridIndex16="+Text(TmpGridIndex));
                                        If(TmpGridIndex<=-1*MyRealMP-1 And TmpGridIndex>=StyleChangeGrid)
                                        {
                                                MyRealMP=MyRealMP+1;
                                                A_SendOrder(Enum_Sell,Enum_Exit,TmpLots,Q_BidPrice-OffSet*MinPoint);
                                        }
                                }
                               
                                // www.tumamayizhan.com **********************************************************
                                //FileAppend(FilePath,"Excute***!  "+", MyRealMP="+Text(MyRealMP)+", BidLine="+Text(BidLine)+", RealMidLine="+Text(RealMidLine)+", FirstGrid="+Text(FirstGrid)+", MinPoint="+Text(MinPoint)+", AskLine="+Text(AskLine)+", TmpGridIndex="+Text(TmpGridIndex));
                                If(MyRealMP>=0 And BidLine>=RealMidLine+FirstGrid*MinPoint)
                                {                                       
                                        TmpGridIndex=Abs(BidLine-RealMidLine)/(GridInterval*MinPoint);
                                        FileAppend(FilePath,"TmpGridIndex17="+Text(TmpGridIndex)+"MyRealMP="+Text(MyRealMP)+"TotalGrids="+Text(TotalGrids)+"StyleChangeGrid="+Text(StyleChangeGrid));
                                        If(TmpGridIndex>=MyRealMP+1 And MyRealMP<TotalGrids And TmpGridIndex<=StyleChangeGrid)
                                        {
                                                MyRealMP=MyRealMP+1;
                                                A_SendOrder(Enum_Sell,Enum_Entry,TmpLots,Q_BidPrice-OffSet*MinPoint);
                                                MyRealMP=MyRealMP-IntPart(TmpLots/EveryLots);
                                        }                                       
                                }
                                Else If(MyRealMP<=0 And AskLine<=RealMidLine-FirstGrid*MinPoint And MyBuyPosition>0)
                                {
                                        FileAppend(FilePath, "TmpGridIndex18="+Text(TmpGridIndex)+"MyRealMP="+Text(MyRealMP)+"TotalGrids="+Text(TotalGrids)+"StyleChangeGrid="+Text(StyleChangeGrid));
                                        TmpGridIndex=Abs(RealMidLine-AskLine)/(GridInterval*MinPoint);
                                        If(TmpGridIndex>=-1*MyRealMP+1 And -1*MyRealMP<TotalGrids And TmpGridIndex<=StyleChangeGrid)
                                        {
                                                MyRealMP=MyRealMP-1;
                                                A_SendOrder(Enum_Buy,Enum_Entry,TmpLots,Q_AskPrice+OffSet*MinPoint);
                                        }
                                }
                               
                               
                               
                                If(MyRealMP<=0 And BidLine>RealMidLine+FirstGrid*MinPoint)
                                {
                                        TmpGridIndex=Abs(BidLine-RealMidLine)/(GridInterval*MinPoint);
                                        FileAppend(FilePath,"TmpGridIndex19="+Text(TmpGridIndex)+"MyRealMP="+Text(MyRealMP)+"TotalGrids="+Text(TotalGrids)+"StyleChangeGrid="+Text(StyleChangeGrid));
                                        If(TmpGridIndex>=-1*MyRealMP+1 And -1*MyRealMP<TotalGrids And TmpGridIndex>=StyleChangeGrid)
                                        {
                                                MyRealMP=MyRealMP-1;
                                                A_SendOrder(Enum_Buy,Enum_Entry,TmpLots,Q_AskPrice+OffSet*MinPoint);
                                                MyRealMP=MyRealMP-IntPart(TmpLots/EveryLots);
                                        }                                        
                                }
                                Else If(MyRealMP>=0 And AskLine<RealMidLine-FirstGrid*MinPoint And MyBuyPosition>0)
                                {
                                        TmpGridIndex=Abs(RealMidLine-AskLine)/(GridInterval*MinPoint);
                                        FileAppend(FilePath,"TmpGridIndex20="+Text(TmpGridIndex)+"MyRealMP="+Text(MyRealMP)+"TotalGrids="+Text(TotalGrids)+"StyleChangeGrid="+Text(StyleChangeGrid));
                                        If(TmpGridIndex>=MyRealMP+1 And MyRealMP<TotalGrids And TmpGridIndex>=StyleChangeGrid+1)
                                        {
                                                MyRealMP=MyRealMP+1;
                                                A_SendOrder(Enum_Sell,Enum_Entry,TmpLots,Q_BidPrice-OffSet*MinPoint);
                                        }
                                }
                                //****************************************************************
                               
                        }
                        Else If(CurrentTime>ExitOnCloseMins/100)
                        {
                                If(MySellPosition>0)
                                {
                                        A_SendOrder(Enum_Buy,Enum_Exit,MySellPosition, Q_AskPrice+OffSet*MinPoint);
                                }
                                Else If(MyBuyPosition>0)
                                {
                                        A_SendOrder(Enum_Sell,Enum_Exit,MyBuyPosition, Q_BidPrice-OffSet*MinPoint);
                                }
                                MyRealMP=0;
                                PreMyRealMP=0;
                        }
                }
                //Else FileAppend(FilePath,"Not Trading Time.***");
               
                SetGlobalVar(0,MyRealMP);
                SetGlobalVar(1,qcbz);
                SetGlobalVar(2,PreRealMidLine);
                SetGlobalVar(3,PreMyRealMP);
                Commentary("本時段中線="+Text(RealMidLine));
                Commentary("上時段中線="+Text(PreRealMidLine));
                Commentary("本時段倉位="+Text(MyRealMP*EveryLots));
                Commentary("上時段留倉="+Text(PreMyRealMP*EveryLots));
                Commentary("當前時間="+TimeToString(CurrentTime));
                Commentary("清倉標志="+Text(qcbz));
               
        }
End
//------------------------------------------------------------------------

//------------------------------------------------------------------------
// 簡稱: LeftRightTrading
// 來源: www.tumamayizhan.com QQ 1145508240

// 類別: 公式應用
// 類型: 用戶應用
//------------------------------------------------------------------------

 

 

 

有思路,想編寫各種指標公式,程序化交易模型,選股公式,預警公式的朋友

可聯系技術人員 QQ: 1145508240  有需要幫忙請點擊這里留言!!!進行 有償 編寫!不貴!點擊查看價格!

 


【字體: 】【打印文章】【查看評論

相關文章

    沒有相關內容
  中文字幕av无码不卡免费_蜜臀AV无码精品人妻色欲_亚洲成AV人片在线观看无码不卡_无码专区天天躁天天躁在线

亚洲欧美日韩国产一区| 久久看片网站| 欧美~级网站不卡| 久久www成人_看片免费不卡| 性欧美xxxx大乳国产app| 久久精品综合| 亚洲五月婷婷| 久久精品官网| 亚洲国产日韩在线| 免费中文字幕日韩欧美| 女人天堂亚洲aⅴ在线观看| 欧美视频一区| 国产亚洲二区| 欧美国产视频在线观看| 亚洲高清视频在线观看| 亚洲一区二区精品在线| 欧美日韩一区二区三区在线观看免| 亚洲视频在线二区| 久久成人国产| 在线观看视频日韩| 久久久www| 在线视频免费在线观看一区二区| 久久尤物视频| 一本久道久久综合婷婷鲸鱼| 久久亚洲精品伦理| 一区二区三区欧美成人| 欧美日韩一区二区三区四区在线观看 | 老妇喷水一区二区三区| 亚洲网站视频| 欧美xxx在线观看| 国产精品普通话对白| 欧美精品三区| 久久久久久网| 性感少妇一区| 亚洲一区二区三区精品在线观看| 在线观看一区视频| 国产精品yjizz| 欧美一区激情视频在线观看| 欧美一级播放| 国产午夜精品一区二区三区欧美 | 在线视频精品| 激情欧美国产欧美| 久久字幕精品一区| 亚洲专区在线| 性刺激综合网| 久久精品二区| 久久综合一区| 欧美黄色精品| 久久久精品五月天| 久久久久国产精品午夜一区| 午夜一区在线| 久久久国产精品一区二区中文| 亚洲精品四区| 在线看无码的免费网站| 激情视频一区二区三区| 亚洲特级毛片| 日韩亚洲精品在线| 国产伦精品一区二区三区高清版| 国产精品一区二区欧美| 午夜一级久久| 欧美精品尤物在线| 激情婷婷亚洲| 一区二区精品在线观看| 国产精品一二| 久热这里只精品99re8久| 久久在线91| 国产精品www994| 亚洲国产三级| 国产伦精品一区二区| 性欧美暴力猛交另类hd| 欧美/亚洲一区| 一区二区亚洲精品| 99精品视频免费| 男人天堂欧美日韩| 欧美另类综合| 亚洲精品三级| 久久亚裔精品欧美| 亚洲午夜黄色| 国产精品一区二区三区四区五区| 久久精品亚洲| 一区在线免费观看| 国产精品亚洲一区| 欧美日韩网站| 国产区日韩欧美| 欧美精品在线一区| 国产欧美三级| 亚洲五月婷婷| 每日更新成人在线视频| 亚洲大片在线| 女同一区二区| 国产精品夜夜夜| 亚洲性色视频| 美女日韩在线中文字幕| 一区在线视频| 久热国产精品| 国产伦精品一区二区三区高清版| 欧美全黄视频| 亚洲一区二区网站| 亚洲国产精品一区制服丝袜 | 美女亚洲精品| 在线观看不卡| 欧美一区二区在线| 国产一区白浆| 亚洲免费成人| 影音先锋日韩资源| 欧美日韩一区在线播放| 亚洲一区二区成人| 精品不卡在线| 欧美成人综合| 国产主播一区| 欧美日韩精品免费看| 亚洲一区视频| 99精品久久久| 亚洲日本激情| 在线播放精品| 亚洲国产精品一区| 一区二区视频欧美| 激情一区二区三区| 国产精品v日韩精品v欧美精品网站 | 亚洲免费成人| 日韩亚洲视频在线| 在线日本高清免费不卡| 国产综合色一区二区三区| 欧美韩日精品| 欧美精品二区| 欧美日韩亚洲一区在线观看| 久久精品五月| 女主播福利一区| 午夜精品一区二区三区四区| 欧美99久久| 欧美久久电影| 亚洲午夜电影| 亚洲欧洲三级| 正在播放亚洲| 亚洲一区三区视频在线观看| 亚洲中午字幕| 久久中文在线| 亚洲图片欧洲图片日韩av| 亚洲成人自拍视频| 国产一区二区三区久久| 亚洲欧美卡通另类91av| 午夜在线一区二区| 欧美成人69| 国产精品啊啊啊| 亚洲精品四区| 久久久久一区| 亚洲国产日韩在线| 先锋影音一区二区三区| 欧美777四色影| 一区二区亚洲| 亚洲专区在线| 欧美日韩一区综合| 一本一本久久a久久精品综合妖精| 国产精品免费区二区三区观看| 久久av一区二区三区| 欧美午夜视频| 99在线精品免费视频九九视| 久久不射网站| 激情自拍一区| 性感少妇一区| 影音先锋国产精品| 久久精品成人| 亚洲作爱视频| 欧美日本亚洲| 校园春色综合网| 亚洲国产精品视频一区| 美女国产一区| 中文亚洲免费| 在线成人h网| 欧美高清视频一区| 国产农村妇女毛片精品久久莱园子| 午夜日韩激情| 性娇小13――14欧美| 在线视频观看日韩| 亚洲欧美一区二区原创| 国产日韩欧美一区二区| 精品91在线| 欧美日韩高清免费| 久久高清一区| 99精品国产99久久久久久福利| 欧美 日韩 国产 一区| 国产精品乱子乱xxxx| 国产精品99一区二区| 欧美在线1区| 午夜亚洲精品| 亚洲一区二区三区精品在线观看| 亚洲黄色影院| 一区视频在线| 精品电影一区| 亚洲一本视频| 亚洲调教视频在线观看| 欧美精品aa| 欧美国产91| 欧美1区3d| 欧美一区影院| 欧美日本在线| 欧美日本一区二区视频在线观看 | 欧美成人一区二免费视频软件| 一区二区免费在线视频| 亚洲茄子视频| 一级日韩一区在线观看| 亚洲麻豆一区| 国产精品久久国产愉拍 | 国产精品v欧美精品v日本精品动漫 | 亚洲成人自拍视频| 韩日午夜在线资源一区二区| 欧美视频福利| 在线看片欧美| 一区二区三区四区五区精品| 国产亚洲第一区| 免费视频一区二区三区在线观看| 国产精品手机在线| 免费亚洲网站| 午夜精品区一区二区三| 国产综合网站| 亚洲伦伦在线| 亚洲欧美日韩视频二区| 欧美高清视频一区| 精品白丝av| 国产日韩在线一区二区三区| 久久大逼视频| 欧美日韩亚洲一区| 亚洲精品无人区| 蜜乳av另类精品一区二区| 欧美精品一级| 亚洲国产美女| 蜜桃av一区| 激情综合久久| 性色av一区二区怡红| 午夜欧美理论片| 亚洲精品一级| 久久在线精品| 一本色道久久综合一区| 久久人人97超碰国产公开结果| 国内一区二区在线视频观看| 国产精品久久久久久久久久妞妞| 久久久久久一区| 1024日韩| 欧美精品播放| 国产精品久久亚洲7777| 国产一区二区三区四区三区四| 日韩亚洲一区在线播放| 午夜日韩激情| 国产精品久久一区二区三区| 欧美网站在线| 久久精品动漫| 一区二区三区视频在线播放| 欧美性久久久| 久久精品综合一区| 免费看亚洲片| 一区二区三区国产在线| 国产精品www.| 欧美在线三区| 午夜亚洲精品| 国产精品久久国产愉拍| 在线精品亚洲一区二区| 欧美日韩mv| 午夜精品偷拍| 久久久成人网| 久久精品欧洲| 国产伦精品一区二区三区视频孕妇 | 欧美日本国产| 亚洲欧美日韩在线观看a三区| 亚洲国产清纯| 亚洲成人直播| 在线观看成人一级片| 狠狠入ady亚洲精品| 欧美1区3d| 欧美日韩一区二区国产| 国产精品v欧美精品∨日韩| 午夜精品亚洲| 欧美天堂亚洲电影院在线观看| 欧美成ee人免费视频| 欧美成熟视频| 狠狠色噜噜狠狠狠狠色吗综合| 国产精品v欧美精品v日韩精品| 欧美激情视频一区二区三区在线播放 | 国产亚洲午夜| 一区二区三区视频在线播放| 亚洲视频大全| 久久精品电影| 国产自产精品| 国产日韩欧美一区在线| 麻豆av一区二区三区久久| 久久亚洲一区| 在线精品一区二区| 国产精品毛片一区二区三区 | 欧美日本亚洲| 一区国产精品| 亚洲一区bb| 欧美精品尤物在线| 99精品久久久| 欧美成熟视频| 亚洲成色最大综合在线| 在线午夜精品| 欧美暴力喷水在线| 亚洲国产激情| 久久一区二区精品| 欧美日韩国产色综合一二三四| 欧美日韩亚洲一区二区三区在线 | 欧美日韩亚洲一区二区三区在线观看 | 国产九九精品| 日韩视频在线观看国产| 亚洲一区二区精品在线观看| 在线一区欧美| 一本色道久久精品| 欧美激情性爽国产精品17p| 欧美久久一区| 亚洲国产电影| 国产午夜精品一区二区三区欧美| 国产欧美高清| 伊人成人在线| 亚洲女同同性videoxma| 久久精品中文| 国产亚洲第一区| 久久国产精品久久久久久电车| 毛片一区二区| 国产亚洲高清视频| 久热re这里精品视频在线6| 欧美高清日韩| 久久精品观看| 国产一区久久| 欧美日韩免费高清| 麻豆成人在线| 国产精品二区在线观看| 久久久久一区| 激情五月***国产精品| 国产亚洲欧美一区二区| 激情成人综合| 美女精品国产| 亚洲精品社区| 在线观看欧美一区| 鲁大师成人一区二区三区| 久久电影一区| 国产亚洲综合精品| 国产综合欧美在线看| 欧美日韩高清在线一区| 一本一本久久a久久精品综合妖精| 麻豆精品91| 性色一区二区| 在线播放不卡| 久热综合在线亚洲精品| 久久久久高清| 国产视频在线观看一区| 国产精品hd| 国产精品国产一区二区| 久久精品女人| 一区二区动漫| 国内精品久久国产| 久久精品女人的天堂av| 久久久久国产一区二区| 日韩午夜在线| 伊人色综合久久天天五月婷| 狠狠色综合色区| 欧美黄色大片网站| 日韩视频二区| 亚洲综合好骚| 国产日韩一区二区三区| 欧美亚洲专区| 亚洲永久网站| 国产精品一区亚洲| 久久久99爱| 久久不射中文字幕| 久久久国产精品一区二区三区| 一区二区三区成人精品| 亚洲国产日韩在线| 国产欧美一区二区三区另类精品 | 久久久国产亚洲精品| 久久久久国产精品午夜一区| 国产欧美日韩一区二区三区在线| 国产综合精品一区| 一区二区三区四区五区精品视频| 精品69视频一区二区三区Q| 亚洲神马久久| 国产精品三上| 蜜桃av久久久亚洲精品| 国产精品xvideos88| 国产精品地址| 欧美一区影院| 99综合视频| 午夜在线播放视频欧美| 国语对白精品一区二区| 红桃视频亚洲| 欧美日韩在线精品一区二区三区| 亚洲国产影院| 国产欧美日韩综合精品二区| 欧美91福利在线观看| 欧美日韩免费观看一区=区三区| 欧美精品大片| 亚洲综合国产激情另类一区| 午夜一区二区三视频在线观看| 国产精品swag| 亚洲国产一区二区三区高清| 亚洲精品国产系列| 欧美日韩国产高清视频| 狠狠色丁香久久综合频道| 久久xxxx| 亚洲午夜激情在线| 国产三区精品| 在线日韩av|