中文字幕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人片在线观看无码不卡_无码专区天天躁天天躁在线

亚洲视频播放| 国产精品久久一区二区三区| 国产农村妇女精品一二区| 免费久久久一本精品久久区 | 午夜在线精品偷拍| 久久综合九色| 国产三区精品| 国产精品播放| 性欧美xxxx大乳国产app| 欧美视频久久| 男人的天堂亚洲| 日韩视频精品| 精品动漫3d一区二区三区免费| 亚洲欧美日韩精品一区二区| 在线成人欧美| 欧美 日韩 国产在线| 99精品欧美| 亚洲视频久久| 欧美日韩精品| 欧美a级在线| 久久精品女人的天堂av| 一区二区三区av| 激情综合视频| 午夜精品久久久久99热蜜桃导演 | 国产精品v欧美精品v日韩| 国产精品婷婷| 国产伦精品一区二区三区照片91| 亚洲第一伊人| 在线欧美视频| 亚洲一二三区精品| 欧美激情亚洲| 欧美日韩一卡| 国产一区日韩欧美| 欧美另类亚洲| 欧美三级视频| 韩日精品视频| 亚洲精品在线二区| 中文在线不卡| 午夜亚洲激情| 国语对白精品一区二区| 久久精品91| 免费不卡亚洲欧美| 久久xxxx精品视频| 久久精品日韩| 欧美天堂亚洲电影院在线观看 | 欧美精品一卡| 女人天堂亚洲aⅴ在线观看| 久久只有精品| 欧美成人中文| 国内精品久久久久久久影视麻豆| 韩国一区二区三区美女美女秀| 亚洲午夜一级| 亚洲巨乳在线| 欧美亚洲一区| 国内精品亚洲| 国产日韩专区| 欧美久久电影| 亚洲黄色一区| 性欧美xxxx大乳国产app| 老**午夜毛片一区二区三区| 国产精品www994| 亚洲美女少妇无套啪啪呻吟| 亚洲一区二区三区在线观看视频| 久久久久国内| 亚洲成人资源| 久久www成人_看片免费不卡| 国产精品国色综合久久| 国产亚洲福利| 欧美私人啪啪vps| 国产欧美日韩一级| 欧美精品成人| 国产亚洲一级| 国产精品初高中精品久久| 一区二区三区欧美在线| 欧美99久久| 国产日韩精品久久| 欧美精品aa| 久久国产免费| 亚洲主播在线| 久久午夜激情| 91久久在线| 欧美99在线视频观看| 亚洲少妇一区| 亚洲国产婷婷| 国内激情久久| 亚洲欧美综合国产精品一区| 国产精品久久国产三级国电话系列 | 国产一区二区三区无遮挡 | 一区二区三区四区五区精品| 午夜国产欧美理论在线播放 | 国产精品久久久免费 | 午夜视频一区| 久久国产高清| 午夜综合激情| 国产精品综合| 一本色道久久精品| 亚洲国产网站| 在线日韩av| 精品成人一区| 在线观看成人av电影| 国产精品久久7| 欧美日韩一卡| 免费久久99精品国产自在现线| 欧美日韩系列| 欧美体内she精视频在线观看| 久久国产精品亚洲va麻豆| 国产三区精品| 国产毛片久久| 亚洲综合欧美日韩| 国产美女精品| 免费亚洲视频| 久久久久久精| 午夜久久99| 欧美精品综合| 亚洲丰满在线| 一区二区日韩免费看| 一区二区三区四区五区在线| 999在线观看精品免费不卡网站| 亚洲女人av| 久久精品五月婷婷| 欧美一区二区在线| 欧美日本国产精品| 狠狠久久婷婷| 一本色道久久综合| 久久av一区二区三区亚洲| 久久人人九九| 欧美日韩在线高清| 在线日韩电影| 亚洲一区三区视频在线观看| 久久免费一区| 国内外成人免费视频| 日韩天堂av| 久久国产欧美| 国产精品magnet| 在线成人亚洲| 免费试看一区| 激情综合久久| 国产精品久久国产三级国电话系列 | 欧美天天在线| 亚洲精品一区二区三区av| 久久riav二区三区| 黄色国产精品| 久久大香伊蕉在人线观看热2| 欧美午夜不卡| 免费久久99精品国产自| 亚洲视频在线二区| 麻豆精品传媒视频| 亚洲欧洲日本mm| 女人香蕉久久**毛片精品| 亚洲另类视频| 国产自产精品| 久久亚洲色图| 亚洲影院免费| 亚洲另类自拍| 国产精品国产三级国产专区53| 国产精品久久久久久模特| 欧美日韩国产色综合一二三四| 精品二区视频| 国产视频一区在线观看一区免费| 欧美日韩国产高清视频| 免费亚洲网站| 一区二区高清| 在线不卡视频| 欧美激情性爽国产精品17p| 国产日韩欧美一区二区| 韩日成人在线| 午夜电影亚洲| 久久久久欧美精品| 国产精品主播| 国产亚洲高清视频| 亚洲欧洲一区二区在线观看| 狠狠久久综合婷婷不卡| 欧美三级在线| 欧美婷婷久久| 欧美全黄视频| 欧美日韩精选| 欧美日韩一区二区三区在线视频| 久久久久一区| 久久久噜噜噜久久狠狠50岁| 午夜一区二区三区不卡视频| 国产精品久久久对白| 99热免费精品| 一区二区三区欧美在线| 一本色道久久| 国产精品一区视频网站| 国产美女在线精品免费观看| 国产嫩草一区二区三区在线观看| 国产欧美亚洲一区| 国产一区二区三区的电影| 中文网丁香综合网| 欧美亚洲一区二区三区| 久久人人97超碰人人澡爱香蕉| 久久婷婷激情| 欧美日韩综合精品| 在线观看视频免费一区二区三区| 亚洲激情社区| 在线综合欧美| 免费久久久一本精品久久区 | 欧美午夜一区| 欧美日韩精品免费观看视频完整| 国产一区二区三区四区hd| 精品91免费| 国产日韩亚洲| 欧美伊人久久| 激情视频一区二区三区| 日韩一级免费| 免费在线成人av| 欧美日韩国产精品一卡| 亚洲福利一区| 亚洲主播在线| 欧美视频一区| 国产精品一区二区欧美| 欧美成人一品| 亚洲黄色大片| 老妇喷水一区二区三区| 在线看片一区| 亚洲综合欧美日韩| 欧美精品不卡| 国产精品日韩一区二区三区| 午夜久久影院| 国产农村妇女精品一二区| 国产精品草草| 亚洲女人av| 在线日韩电影| 欧美精品成人| 性久久久久久| 亚洲成人自拍视频| 久久久久久久高潮| 99精品国产高清一区二区| 欧美一区二区在线| 国产欧美短视频| 国产综合精品| 玖玖精品视频| 免费在线播放第一区高清av| 亚洲国产日韩欧美| 欧美全黄视频| 久久久久久一区| 香蕉国产精品偷在线观看不卡| 免费在线成人| 国产精品a级| 亚洲免费在线| 一区二区av| 亚洲国产国产亚洲一二三| 午夜日韩福利| 久久久久久9| 国产日韩亚洲| 精品91在线| 欧美 日韩 国产 一区| 亚洲综合视频一区| av成人天堂| 在线观看亚洲| 国产精品v欧美精品v日韩精品| 久久久国产精品一区二区中文| 国产日韩一区二区三区| 夜夜爽www精品| 1000部精品久久久久久久久| 国产精品乱子乱xxxx| 午夜亚洲精品| 亚洲欧美日韩专区| 国产伦精品一区二区三区视频孕妇| 亚洲性图久久| 狠狠入ady亚洲精品| 欧美日韩一区二区三区四区在线观看| 久久九九精品| 欧美成人精品| 国产在线精品二区| 欧美日本亚洲| 国产综合网站| 亚洲国产高清视频| 一区二区毛片| 国产精品推荐精品| 国产一区导航| 久久不射网站| 久久综合九色综合久99| 欧美日韩18| 亚洲国产精品综合| 国产视频在线观看一区| 久久高清免费观看| 欧美成人有码| 亚洲人成久久| 午夜一级久久| 国产精品多人| 国产精品久久777777毛茸茸| 模特精品在线| 欧美中文日韩| 欧美午夜不卡| 亚洲黄色大片| 欧美一级专区| 激情久久五月| 免费不卡亚洲欧美| 国产精品久久7| 国产伦精品一区二区三区照片91| 免费日韩av片| 激情另类综合| 久久久久网站| 亚洲激情综合| 亚洲欧美影院| 国产欧美91| 黄色一区三区| 久久久久久久高潮| 亚洲精品1区| 亚洲综合视频一区| 国产在线精品二区| 亚洲一区日韩在线| 亚洲高清网站| 老妇喷水一区二区三区| 亚洲人成人一区二区三区| 另类激情亚洲| 国产一区二区三区的电影| 在线国产日韩| 新67194成人永久网站| 欧美黄在线观看| 亚欧美中日韩视频| 亚洲一区二区四区| av不卡在线看| 在线精品一区二区| 好吊日精品视频| 欧美精品一区在线| 久久一区二区三区四区五区| 亚洲一区二区三区高清| 一区二区av| 国产偷国产偷亚洲高清97cao| 亚洲精品九九| 99精品国产在热久久婷婷| 亚洲成人在线| 亚洲精品少妇| 国产私拍一区| 午夜一区二区三视频在线观看| 中文在线一区| 亚洲一区二区在| 免费在线观看成人av| 久久福利一区| 欧美在线91| 狠狠88综合久久久久综合网| 伊人狠狠色j香婷婷综合| 亚洲国产一区二区三区a毛片| 亚洲精品精选| 欧美一区=区| 欧美日韩一区二区视频在线| 国内精品亚洲| 一区二区三区精品视频在线观看| 国产亚洲激情| 久久一区精品| 在线国产欧美| 亚洲一区二区伦理| 欧美freesex交免费视频| 精品福利av| 亚洲一区二区三区精品视频| 久久一区二区三区av| 亚洲午夜一区| 亚洲一卡久久| 欧美日韩免费高清| 在线亚洲美日韩| 久久综合给合久久狠狠色| 黄色国产精品一区二区三区| 一区二区毛片| 国产精品videossex久久发布| 最新日韩在线| 欧美成人中文| 国产亚洲精品v| 欧美黄污视频| 国产日韩欧美一区二区| 欧美日韩p片| 久久久噜噜噜久久狠狠50岁| 精品91视频| 国产亚洲毛片在线| 国产一区二区三区四区hd| 国产日韩1区| 国产中文一区二区| 欧美亚洲一区| 一区二区三区久久网| 欧美理论在线| 欧美亚洲一区| 麻豆久久精品| 欧美国产激情| 影音先锋亚洲一区| 欧美专区18| 亚洲精品无人区| 国内精品福利| 欧美日韩精选| 午夜精品视频| 久久久噜噜噜| 久久国产毛片| 久久精品国产第一区二区三区最新章节 | 国产精品一区二区三区免费观看| 欧美黄污视频| 久久另类ts人妖一区二区| 亚洲一区二区高清视频| 日韩一级免费| 亚洲毛片网站| 99av国产精品欲麻豆| 亚洲国产三级| 伊人成人在线视频| 国产综合精品一区| 欧美日韩一区二区视频在线 | 久久夜色精品| 久久国产免费| 久久国产精品一区二区三区四区| 国产精品久久久久久模特| 一本色道久久综合亚洲精品不卡|