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

黄色亚洲精品| 国产伦精品一区二区三区四区免费 | 亚洲精品一级| 欧美搞黄网站| 在线观看日韩av电影| 欧美另类一区| 激情视频一区二区三区| 国产欧美午夜| 欧美日韩午夜| 亚洲色诱最新| 欧美国产高清| 国产亚洲一区在线| 国内精品美女在线观看| 国产精品亚洲欧美| 欧美黄污视频| 国产精品视区| 国产一区观看| 久久国产精品一区二区三区四区 | 韩日成人av| 国产午夜精品一区二区三区欧美 | 国产精品手机在线| 欧美日韩亚洲免费| 欧美亚洲三级| 欧美午夜a级限制福利片| 亚洲国产精品久久久久婷婷老年 | 久久精品亚洲| 99国产精品久久久久老师| 欧美激情视频一区二区三区免费| 国产精品一区在线播放| 尤物网精品视频| 欧美日韩国产精品一卡| 香蕉亚洲视频| 国产精品日韩高清| 国产欧美日韩综合精品二区| 精品动漫av| 黄色欧美成人| 狠色狠色综合久久| 欧美日韩91| 久久综合图片| 亚洲综合国产激情另类一区| 国内揄拍国内精品久久| 欧美一区二区三区在线播放 | 国产精品久久久久9999高清| 狠狠入ady亚洲精品经典电影| 欧美在线视屏| 久久夜色精品| 欧美1区2区| 欧美一区二区三区在线播放| 久久久www| 亚洲欧美视频| 久久亚洲综合网| 欧美日韩精品久久| 欧美日韩免费观看一区| 欧美日韩在线观看一区二区三区| 欧美成人一区二区在线| 麻豆精品视频| 久久久777| 欧美激情综合| 亚洲视频观看| 一区二区三区欧美成人| 国产亚洲一区在线播放| 香蕉久久国产| 欧美成人日本| 国内精品久久久久国产盗摄免费观看完整版| 久久亚洲视频| 影院欧美亚洲| 免费视频一区| 欧美日韩精品一区| 亚洲黄页一区| 午夜一级在线看亚洲| 久久天堂成人| 精品电影一区| 免费在线日韩av| 国产精品a级| 亚洲精品麻豆| 久久综合九色综合久99| 激情国产一区| 久久aⅴ国产紧身牛仔裤| 欧美精品91| 99精品国产在热久久下载| 久久黄色网页| 亚洲美女黄色| 欧美久久久久久| 在线视频精品一区| 欧美特黄a级高清免费大片a级| 亚洲精品男同| 欧美午夜在线视频| 香蕉亚洲视频| 亚洲麻豆av| 欧美午夜不卡| 久久激情一区| 在线亚洲精品| 好吊色欧美一区二区三区四区| 国产精品视频免费观看| 亚洲视频一区| 欧美午夜a级限制福利片| 亚洲欧美日韩国产一区二区| 亚洲国产精品123| 欧美日韩亚洲国产精品| 美女久久一区| 亚洲欧美日韩国产一区二区| 亚洲精品国产日韩| 国语对白精品一区二区| 久久婷婷国产综合尤物精品| 国产三区精品| 99一区二区| 亚洲精品女人| 亚洲电影成人| 禁久久精品乱码| 欧美午夜一区二区福利视频| 久久久天天操| 久久亚洲精品欧美| 久久久久久久久一区二区| 国产精品婷婷| 亚洲综合精品四区| 国产三区二区一区久久| 国产亚洲网站| 免费不卡亚洲欧美| 亚洲免费在线| 欧美一进一出视频| 久久精品午夜| 欧美精品网站| 欧美视频四区| 亚洲国产美女| 国产区二精品视| 亚洲欧美国产精品桃花| 久久国产欧美| 欧美亚洲不卡| 99精品国产福利在线观看免费| 亚洲精品欧洲| 免费在线一区二区| 午夜精品亚洲一区二区三区嫩草| 欧美日韩一卡| 亚洲免费久久| 男人的天堂亚洲| 欧美激情1区2区3区| 黄色免费成人| 国产精品亚洲综合色区韩国| 噜噜噜噜噜久久久久久91| 欧美日本精品| 亚洲精品人人| 久久久久综合| 一区视频在线| 久久激情视频| 亚洲承认在线| 久久精品日产第一区二区| 欧美精选一区| 国产日韩欧美一区二区三区在线观看 | 欧美日韩国产三区| 一区视频在线看| 亚洲中字在线| 亚洲午夜精品久久| 亚洲综合不卡| 91久久黄色| 老牛影视一区二区三区| 亚洲精品一区二区三区樱花| 麻豆成人av| 99国内精品久久久久久久软件| 久久久久91| 国产日韩欧美三级| 亚洲性感美女99在线| 性感少妇一区| 在线观看一区| 欧美日韩三区| 久久天堂成人| 国产日韩精品久久| 欧美黄色免费| 久久久精品性| 亚洲欧美日韩在线综合| av成人黄色| 国产综合视频| 欧美一区二区在线| 亚洲欧美卡通另类91av| 日韩午夜黄色| 亚洲一二三区精品| 国内精品久久久久久久97牛牛 | 欧美精品国产一区| 国产模特精品视频久久久久| 91久久国产自产拍夜夜嗨| 欧美三区在线| 欧美日韩精品免费看| 女同性一区二区三区人了人一| 亚洲视频成人| 在线亚洲一区| 亚洲少妇自拍| 国产视频一区三区| 国产欧美激情| 国产精品免费区二区三区观看| 亚洲国产片色| 91久久国产综合久久蜜月精品| 黑人中文字幕一区二区三区| 国产精品二区在线观看| 欧美日韩亚洲三区| 韩国亚洲精品| 亚洲黄色影院| 国产日韩欧美一区| 国产精品一二| 久久都是精品| 久久亚洲精品伦理| 欧美三级在线| 亚洲黄色免费| 国产精品一区二区a| 麻豆av一区二区三区久久| 老牛国产精品一区的观看方式| 午夜欧美视频| 亚洲精品九九| 性伦欧美刺激片在线观看| 久久国产欧美| 亚洲午夜精品久久久久久app| 亚洲黄色精品| 蜜桃av综合| 雨宫琴音一区二区在线| 99精品热视频只有精品10| 国产伦精品一区二区三区视频黑人| 鲁大师成人一区二区三区| 午夜欧美精品久久久久久久| 伊人成人网在线看| 校园春色综合网| 韩日在线一区| 久久国产精品久久久久久电车 | 欧美精品三区| 夜夜爽www精品| 欧美国产专区| 99香蕉国产精品偷在线观看| 美女日韩在线中文字幕| 激情六月综合| 久久久久中文| 99国产精品久久久久老师| 久久久久久亚洲精品不卡4k岛国| 激情综合中文娱乐网| 亚洲欧美精品| 亚洲啪啪91| 欧美日韩一区二区国产| 国产精品毛片在线| 亚洲午夜精品久久| 久久久久久久久久码影片| 亚洲国产1区| 欧美777四色影| 亚洲一区久久| 一本色道久久综合一区 | 国产日韩视频| 影音先锋久久精品| 欧美a级在线| 国产欧美日韩亚洲| 激情久久五月| 国产综合网站| 欧美精品网站| 久久久噜噜噜久久狠狠50岁| 国产精品日韩一区二区三区| 亚洲欧洲精品一区| 欧美午夜影院| 欧美精品观看| 欧美精品不卡| 欧美福利电影在线观看| 久久久久久黄| 欧美一区视频| 午夜欧美视频| 欧美久久久久久久| 欧美在线视频二区| 欧美.日韩.国产.一区.二区| 久久九九免费| 欧美不卡三区| 欧美日韩视频一区二区三区| 欧美日本韩国在线| 国产精品v日韩精品v欧美精品网站| aa国产精品| 午夜日韩av| 欧美国产精品| 国产精品高清一区二区三区| 欧美大片专区| 欧美日韩国产在线一区| 欧美精品免费观看二区| 午夜久久资源| 欧美xxx在线观看| 欧美日韩成人| 一区在线免费| 99精品视频免费观看| 国产欧美高清| 久久激情中文| 欧美日韩高清免费| 激情欧美国产欧美| 亚洲精品1区2区| 国产精品嫩草99av在线| 性久久久久久| 国产精品二区影院| 亚洲成人自拍视频| 一区二区精品在线观看| 国产伦理一区| 欧美高清日韩| 最新成人av网站| 免费h精品视频在线播放| 久久综合给合久久狠狠色| 国产一区视频在线观看免费| 亚洲电影在线| 麻豆久久久9性大片| 国产精品s色| 国产偷国产偷亚洲高清97cao| 美女精品在线| 亚洲精品1区2区| 久久精品中文| 亚洲人成人一区二区三区| 亚洲一区日本| 国产精品magnet| 午夜在线播放视频欧美| 激情国产一区| 久久人人97超碰国产公开结果| 影音先锋中文字幕一区| 亚洲欧美日韩视频二区| 国产在线日韩| 午夜宅男久久久| 国产在线视频欧美一区二区三区| 亚洲视频成人| 精品不卡视频| 欧美午夜国产| 久久久夜精品| 亚洲综合二区| 在线视频一区观看| 亚洲一本视频| 国产精品v亚洲精品v日韩精品 | 国产精品久久777777毛茸茸| 午夜精品一区二区三区四区| 国产日韩一区二区三区在线| 亚洲午夜精品久久久久久浪潮 | 久久精品亚洲一区二区| 日韩午夜高潮| 亚洲国产精品第一区二区| 午夜性色一区二区三区免费视频| aa日韩免费精品视频一| 一区国产精品| 亚洲午夜激情| 国产一区日韩一区| 欧美色图麻豆| 欧美亚洲不卡| 好吊一区二区三区| 国产精品国产三级国产专区53| 快she精品国产999| 久久久综合网| 女人香蕉久久**毛片精品| 久久一区二区三区四区五区| 男人的天堂亚洲在线| 久久av一区| 麻豆精品视频| 久久先锋影音| 欧美激情视频一区二区三区在线播放| 久久精品女人的天堂av| 欧美fxxxxxx另类| 欧美日韩国产三区| 国产精品theporn| 一区福利视频| 日韩午夜av在线| 国产三级精品在线不卡| 亚洲一区高清| 老司机精品导航| 欧美日韩大片一区二区三区| 国产精品豆花视频| 亚洲国产一区二区三区在线播| 亚洲三级电影在线观看| 一区二区黄色| 久久aⅴ国产紧身牛仔裤| 欧美91视频| 亚洲高清自拍| 香蕉久久国产| 欧美午夜在线| 国产区欧美区日韩区| 久久精品中文| 亚洲午夜精品久久久久久浪潮 | 亚洲综合三区| 欧美激情在线| 亚洲美女毛片| 免费日韩av| 国产精品jizz在线观看美国| 亚洲欧洲久久| 欧美aa国产视频| 99精品视频网| 欧美精品九九| 亚洲一区二区毛片| 国产一区激情| 裸体素人女欧美日韩| 在线精品一区二区| 久久婷婷丁香| 一区二区三区三区在线| 欧美黄色一区二区| 国产精品久久波多野结衣| 欧美日韩亚洲一区二区三区在线观看| 亚洲精品免费观看| 欧美久久一区| 免费在线播放第一区高清av| 极品尤物久久久av免费看| 亚洲欧美日本国产专区一区| 狠狠入ady亚洲精品| 麻豆亚洲精品| 99热免费精品在线观看| 欧美fxxxxxx另类| 国产精品一区免费观看| 亚洲视频一区| 欧美日韩mv| 欧美在线亚洲| 久久久久久亚洲精品杨幂换脸| 日韩天堂av| 亚洲激情一区二区|