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

拋物線轉向系統分享 [開拓者 TB]

  • 咨詢內容: 剛才看到群里討論了會SAR,很多人也想寫一個SAR系統,最近比較忙,利用午飯時間寫了個SAR系統,大家拿去擴充吧

     

  • TB技術人員: 原創作品,轉載注明出處
    1. //------------------------------------------------------------------------
    2. // 簡稱: SAR_system
    3. // 名稱:
    4. // 類別: 公式應用
    5. // 類型: 用戶應用
    6. // 輸出: 穿堂風
    7. //------------------------------------------------------------------------

    8. Params
    9.         Numeric AfStep(0.02);
    10.         Numeric AfLimit(0.2) ;
    11.         Numeric malen(120);
    12.         Numeric stopLoss(1);
    13.         Numeric BuyLots(1);
    14.         Numeric offset(0);
    15. Vars
    16.         Numeric oParCl( 0 );
    17.         Numeric oParOp( 0 );
    18.         Numeric oPosition( 0 );
    19.         Numeric oTransition( 0 );
    20.         NumericSeries oParOp_s;
    21.         Numeric oParOp_p;
    22.         Numeric i_offset;
    23.         Numeric ma;
    24.         Bool bUpline;
    25.         string strkey;
    26.         string strValue;
    27.         Numeric i_stopLoss;
    28.        
    29. Begin

    30.         ma = Average(Open,malen);
    31.         bUpline = Open>= ma;
    32.         ParabolicSAR( AfStep, AfLimit, oParCl, oParOp, oPosition, oTransition ) ;
    33.         oParOp_s = oParOp;
    34.         oParOp_p = oParOp_s[1];
    35.         i_offset = offset*MinMove*PriceScale;
    36.         i_stopLoss = stopLoss*(OpenD(0)/100);
    37.        
    38.         Commentary("oParOp:"+Text(oParOp));
    39.         Commentary("oTransition:"+Text(oTransition));
    40.         Commentary("oPosition:"+Text(oPosition));
    41. If(CurrentBar>malen)
    42. {
    43.         PlotNumeric("oParCl",oParCl);
    44.         If(malen != 0)
    45.         {
    46.                 PlotNumeric("ma",ma);
    47.         }


    48.         If(MarketPosition == 0)
    49.         {
    50.                 If(malen == 0)
    51.                 {
    52.                         bUpline = True;
    53.                 }

    54.                 If(oTransition == 1 and bUpline)
    55.                 {
    56.                         Buy(BuyLots,Max(Open,oParOp_p)+i_offset);
    57.                         Return;
    58.                 }
    59.                
    60.                 If(malen == 0)
    61.                 {
    62.                         bUpline = False;
    63.                 }

    64.                 If(oTransition == -1 and bUpline==False)
    65.                 {
    66.                         SellShort(BuyLots,Min(Open,oParOp_p)-i_offset);
    67.                         Return;
    68.                 }
    69.         }

    70.         If(MarketPosition == 1)
    71.         {
    72.                 If(malen == 0)
    73.                 {
    74.                         bUpline = False;
    75.                 }
    76.                
    77.                 If(LastEntryPrice-Low>=i_stopLoss)
    78.                 {
    79.                         Sell(BuyLots,Min(Open,LastEntryPrice-i_stopLoss)-i_offset);
    80.                         Return;
    81.                 }
    82.                 If(oPosition == -1)
    83.                 {

    84.                         If(oTransition == -1 and bUpline==False)
    85.                         {
    86.                                 SellShort(BuyLots,Min(Open,oParOp_p)-i_offset);
    87.                         }
    88.                         Else
    89.                         {
    90.                                 Sell(BuyLots,Min(Open,oParOp_p)-i_offset);
    91.                         }
    92.                 }
    93.         }

    94.         If(MarketPosition == -1)
    95.         {
    96.                 If(malen == 0)
    97.                 {
    98.                         bUpline = True;
    99.                 }

    100.                 If(High-LastEntryPrice>=i_stopLoss)
    101.                 {
    102.                         BuyToCover(BuyLots,Max(Open,LastEntryPrice+i_stopLoss)+i_offset);
    103.                         Return;
    104.                 }               
    105.                 If(oPosition == 1)
    106.                 {
    107.                         If(oTransition == 1 and bUpline)
    108.                         {
    109.                                 Buy(BuyLots,Max(Open,oParOp_p)+i_offset);
    110.                         }
    111.                         Else
    112.                         {
    113.                                 BuyToCover(BuyLots,Max(Open,oParOp_p)+i_offset);
    114.                         }
    115.                 }
    116.         }
    117. }
    118. End

    119. //------------------------------------------------------------------------
    120. // 編譯版本        GS2010.12.08
    121. // 用戶版本        2011/09/05 12:21
    122. // 版權所有        穿堂風
    123. // 更改聲明        TradeBlazer Software保留對TradeBlazer平臺
    124. //                        每一版本的TrabeBlazer公式修改和重寫的權利
    125. //------------------------------------------------------------------------
    復制代碼

     

  • TB客服: 1.jpg (69.84 KB, 下載次數: 9) 2011-9-5 12:44:55 上傳 下載次數: 9
    2.jpg (93.09 KB, 下載次數: 6) 2011-9-5 12:44:55 上傳 下載次數: 6

     

  • 網友回復: 因為時間短促,已盡量考慮邏輯性,如果有質疑的地方,一定要細看代碼,我不希望沒分析清楚就說未來函數,這是對我的不尊重.

     

  • 網友回復: 謝謝分享,,,好月餅!

 

如果以上指標公式不適用于您常用的行情軟件

或者您想改編成選股公式,以便快速選出某種形態個股的話,

可以聯系我們相關技術人員 QQ: 262069696  點擊在線交流進行 有償 改編!

 


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

相關文章

    沒有相關內容
主站蜘蛛池模板: 久久伊人精品一区二区三区| 俺来也俺去啦久久综合网| 午夜激情小视频| 国语自产精品视频在线区| 一级做α爱**毛片| 报告夫人漫画画免费读漫画在线观看漫画ag| 亚洲1区1区3区4区产品乱码芒果| 欧美日韩在线视频| 亚洲综合在线视频| 男男暴菊gay无套网站| 午夜羞羞视频在线观看| 色偷偷一区二区无码视频| 国产在线不卡视频| 久久久久久不卡| 国产第一页福利| 4hu四虎最新免费地址| 在线播放日本爽快片| ririai66在线观看视频| 影音先锋无码a∨男人资源站| 中文毛片无遮挡高清免费| 日本阿v精品视频在线观看| 久久综合久久久久88| 最近中文字幕在线mv视频7| 亚洲中文字幕无码中文 | 国产精品无码一区二区在线| 99er在线视频| 外卖员被男顾客gay| sihu永久在线播放地址| 小小的日本三电影免费观看 | 国产一级一片免费播放视频| 高岭家の二轮花未增删| 国产大片黄在线观看| 成年人在线看片| 国产成人a人亚洲精品无码| 黄色毛片在线播放| 国产女人的一级毛片视频| 高能预警韩国双ts超美| 国产婷婷色综合av蜜臀av| 高潮毛片无遮挡高清免费| 国产午夜鲁丝片AV无码| 青青青青啪视频在线观看|