您現(xiàn)在的位置:程序化交易>> 期貨公式>> 交易開(kāi)拓者(TB)>> 開(kāi)拓者公式>>正文內(nèi)容

一個(gè)簡(jiǎn)單日內(nèi)30分鐘高低點(diǎn)突破系統(tǒng)bt源碼[開(kāi)拓者公式]

  •  //------------------------------------------------------------------------
    // 簡(jiǎn)稱: a_1fenrn4
    // 名稱: a_1fenrn4
    // 類別: 公式應(yīng)用 
    // 類型: 用戶應(yīng)用
    // 輸出: www.tumamayizhan.com  QQ 511411198
    //------------------------------------------------------------------------


    Params  
      
         // Numeric nYestCloseInput(2210);  
    Vars
          
               String  FileName("d:\\log\\log.txt");
              
               Numeric Offset(3);
               Numeric OffsetMargin(0);         

               Bool   bUp(false);
               Bool   bDown(false);
                
           
               Numeric lots(1);          
               Numeric length(10);
              
               NumericSeries MyPrice;
               NumericSeries myExitPrice;
               Bool SendOrderThisBar(False);
               Bool bStart(False);
              
               Numeric i(0);
               Numeric nHighPrice(0);//全局變量的1
               Numeric nLowPrice(0);//全局變量的0
              
              
               Numeric       nDuoZhiS(0);//全局變量的5                    
               Numeric       nKongZhiS(0);//全局變量的6
              
               Numeric       nYestClose(0);//全局變量的7
              
               BoolSeries    bDuoStoped(false);
               BoolSeries    bKongStoped(false);
              
    Begin
          /*
          FileAppend(FileName,"Bartime="+DateTimeToString(Date+Time)
                               +"  currentTime=  "+TimeToString(currentTime)
                               +"  MarketPosition="+Text(MarketPosition)
                                +"  CurrentDate="+DateTimeToString(CurrentDate)                          
                      );
              
                    */         
                
            OffsetMargin=Offset*MinMove*PriceScale;

                                   
            //1
            //If(Time==0.090000) //商品
            If(Time==0.091500)   //股指
            {

             //每天初始化開(kāi)倉(cāng)條件
               bDuoStoped=false;
               bKongStoped=false;          

            }// www.tumamayizhan.com

      
              
            //2、當(dāng)走完length,即10個(gè)周期k線時(shí)才判斷高低點(diǎn)
        //If(Time==0.091000) 商品
        If(Time==0.094500)
            {
                nHighPrice=High[1];
                    for i=1  To 30
                    {
                            If(High[i] > nHighPrice)
                               nHighPrice = High[i];
                    }
                     
                    SetGlobalVar(1,nHighPrice);
                   
                   
                    nLowPrice=low[1];
                    for i=1  To 30
                    {
                            If(low[i] < nLowPrice)
                               nLowPrice = low[i];
                                                     
                    } // www.tumamayizhan.com
                    SetGlobalVar(0,nLowPrice);

            }

           
            //3、當(dāng)超過(guò)length,即30個(gè)周期k線時(shí)才啟動(dòng)實(shí)際的程序運(yùn)行
            If(Time>=0.094500)
            {
               bStart=True;
                
               nHighPrice=getGlobalVar(1);
               nLowPrice=getGlobalVar(0);
               FileAppend(FileName,"10日最高價(jià)="+Text( nHighPrice)
                                                       +"  10日最低價(jià)="+Text(nLowPrice)
                                                
                      );
              
             Commentary("10日最高價(jià)="+Text(nHighPrice));
             Commentary("10日最低價(jià)="+Text(nLowPrice));
                   
            }       
             
                 FileAppend(FileName,"昨天收盤價(jià)="+Text(CloseD(1))                                       
                      );
              
              //4、開(kāi)倉(cāng)操作
             If(!bDuoStoped and MarketPosition<>1 and High>nHighPrice   and OpenInt>OpenInt[1] and Time>=0.0945 and bStart)//從11:21開(kāi)始啟動(dòng)自動(dòng)交易
              {
                            MyPrice = Max(Open,nHighPrice)+OffsetMargin;                               
                            Buy(Lots,MyPrice);                                 
                            SendOrderThisBar = true;
                             
                            FileAppend(FileName,"<<<<<<<<買入開(kāi)倉(cāng)Buy entry"+TimeToString(Time)
                                                    +"多單價(jià)格:"+Text(MyPrice)
                                                    +"   目前持倉(cāng)量:"+Text(OpenInt)
                                                    +"   前一個(gè)持倉(cāng)量:"+Text(OpenInt[1])
                                                   
                                                    );
                            //設(shè)置止損條件                       
                            SetGlobalVar(5,0);
              }
                      
              If(!bKongStoped and MarketPosition<>-1 and low<nLowPrice and OpenInt>OpenInt[1]  and Time>=0.0945 and bStart)
              {
                              
                           
                            MyPrice = Min(Open,nLowPrice)-OffsetMargin;                                 
                            SellShort(Lots,MyPrice);                               
                            SendOrderThisBar = true;
                           
                            FileAppend(FileName," >>>>>>>賣出開(kāi)倉(cāng)Sell entry"+TimeToString(Time)
                                                    +"空單單價(jià)格:"+Text(MyPrice)
                                                    +"   目前持倉(cāng)量:"+Text(OpenInt)
                                                    +"   前一個(gè)持倉(cāng)量:"+Text(OpenInt[1])
                                                    );
                                                   
                            //設(shè)置止損條件                       
                            SetGlobalVar(6,0);
              }

              //5、正常平倉(cāng)操作
           
              If(MarketPosition == 1) // 有多倉(cāng)的情況
           {  
                                   
                      If(High<High[1] and Low<Low[1])//創(chuàng)新低                 
                      {
                         nDuoZhiS=getGlobalVar(5);
                         SetGlobalVar(5,nDuoZhiS+1); //多單止損
                             
                             FileAppend(FileName,"<<<<<<<<多倉(cāng)止損條件判斷"+TimeToString(Time)
                                       +"nDuoZhiS:"+Text(nDuoZhiS)
                                               +" 更新后是getGlobalVar(5):"+Text(getGlobalVar(5))
                            );
                      }
           
              
                 //If(Low < nTodayAP)  
                     If(getGlobalVar(5)==3)
              {
                //myExitPrice = max(Low,Low[1] - OffsetMargin);
                            myExitPrice = Low;
                            myExitPrice = IIF(myExitPrice > Open, Open,myExitPrice); // 大跳空的時(shí)候用開(kāi)盤價(jià)代替
                Sell(0,myExitPrice);    // 數(shù)量用0的情況下將全部平倉(cāng) www.tumamayizhan.com
                            bDuoStoped=True;
                           
                            FileAppend(FileName,"<<<<<<<<多倉(cāng)賣出平倉(cāng)"+TimeToString(Time)
                            +"多單價(jià)格:"+Text(myExitPrice)
                            +"  getGlobalVar(5):"+Text(getGlobalVar(5))
                           
                            );
              }
               }Else If(MarketPosition ==-1) // 有空倉(cāng)的情況
                    {
                           
                        //低點(diǎn)轉(zhuǎn)折
                      
                            If(High>High[1] and Low>Low[1])//創(chuàng)新低       
                              {
                                     nKongZhiS=getGlobalVar(6);
                                     SetGlobalVar(6,nKongZhiS+1); //多單止損
                                     
                                     FileAppend(FileName,"<<<<<<<<空倉(cāng)止損條件判斷"+TimeToString(Time)
                                                       +"nDuoZhiS:"+Text(nKongZhiS)
                                                       +" 更新后是getGlobalVar(6):"+Text(getGlobalVar(6))
                                    );
                              }
                              
                      
                        //If(High > nTodayAP)
                            If(getGlobalVar(6)==3)
                {
                                    //myExitPrice = Min(High,nTodayAP + nTodayAP);
                                myExitPrice = High;
                                    myExitPrice = IIF(myExitPrice < Open, Open,myExitPrice); // 大跳空的時(shí)候用開(kāi)盤價(jià)代替
                                    BuyToCover(0,myExitPrice);    // 數(shù)量用0的情況下將全部平倉(cāng)
                                   
                                    bKongStoped=True;
                                   
                                                    FileAppend(FileName,"<<<<<<<<空倉(cāng)買入平倉(cāng)"+TimeToString(Time)
                                    +" 價(jià)格:"+Text(myExitPrice)
                                    +"  getGlobalVar(6):"+Text(getGlobalVar(6))
                           
                            );
                }
              
                }
                              
             //6、尾盤多空全部平倉(cāng) QQ 511411198
             If((Date[-1]!=InvalidInteger and Date!=Date[-1]) Or (Date[-1]==InvalidInteger and Date<CurrentDate))
             {
             
                            Sell(0,Close-Offset*MinMove*PriceScale);
                            BuyToCover(0,Close+Offset*MinMove*PriceScale);
                            FileAppend(FileName,"******************歷史尾盤平倉(cāng)");
             }                                                  
             //Else If(Date==CurrentDate and Time==0.1455 and CurrentTime>=0.1459)//5分鐘周期 www.tumamayizhan.com  QQ 1145508240
             Else If(Date==CurrentDate and Time==0.1514 and CurrentTime>=0.151430)//1分鐘周期
             {
                            FileAppend(FileName,"******************今天尾盤平倉(cāng)");
                            Sell(0,Close-Offset*MinMove*PriceScale);
                            BuyToCover(0,Close+Offset*MinMove*PriceScale);
            }
                 
                       
    End
              















     

 

有思路,想編寫各種指標(biāo)公式,程序化交易模型,選股公式,預(yù)警公式的朋友

可聯(lián)系技術(shù)人員 QQ: 1145508240  點(diǎn)擊這里給我發(fā)消息進(jìn)行 有償 編寫!不貴!點(diǎn)擊查看價(jià)格!

 


【字體: 】【打印文章】【查看評(píng)論

相關(guān)文章

    沒(méi)有相關(guān)內(nèi)容
  主站蜘蛛池模板: 久久精品国产99久久无毒不卡| 四虎影视成人精品| 一区二区三区观看| 日韩大乳视频中文字幕| 天堂新版8中文在线8| 久久精品国产亚洲av麻豆| 渣男渣女抹胸渣男渣女在一起| 国产aⅴ激情无码久久久无码| 亚洲人成777| 在线观看国产精品va| 中文字幕在线永久在线视频2020| 精品无码国产污污污免费网站国产| 国产精品_国产精品_国产精品| а天堂中文地址在线| 日本老妇人乱xxy| 亚洲日韩激情无码一区| 精品乱码一区二区三区四区| 国产在线a免费观看| 18禁无遮挡羞羞污污污污免费| 娇妻第一次被多p| 亚洲国产理论片在线播放| 精品一区二区三区波多野结衣| 国产另类在线观看| 4399理论片午午伦夜理片| 好吊操在线视频| 中文字幕高清在线观看| 旧里番洗濯屋1一2集无删减| 亚洲欧美日韩中文字幕在线一区| 黑冰女王踩踏视频免费专区| 国内少妇人妻丰满AV| 一本色道久久88亚洲综合| 日本人亚洲人jjzzjjzz页码1| 亚洲一卡2卡3卡4卡国产网站| 波多野结衣免费在线| 六月丁香婷婷色狠狠久久| 菠萝蜜视频入口| 国产日产高清欧美一区| 55夜色66夜色国产精品视频| 天天插在线视频| 一级毛片试看三分钟| 无码精品国产一区二区免费|