您現在的位置:程序化交易>> 期貨公式>> 交易開拓者(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  點擊在線交流進行 有償 改編!

 


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

相關文章

    沒有相關內容
主站蜘蛛池模板: 小受bl灌满白浊夹多人4p| 久久久久久亚洲精品中文字幕 | 免费A级毛片无码无遮挡| 亚洲国产精品ⅴa在线观看| 久久国产精品99精品国产| xxxxx性欧美| 日本人与动zozo| 综合亚洲欧美日韩一区二区 | 特级毛片s级全部免费| 最新黄色网址在线观看| 少妇被躁爽到高潮无码文| 国产精品亚洲а∨无码播放不卡| 国产三级久久久精品麻豆三级 | 欧美jizz18性欧美年轻| 希崎杰西卡一二三区中文字幕| 国产超爽人人爽人人做| 国语对白avxxxooo| 国产乱人伦偷精品视频下| 亚洲精品综合久久中文字幕| 亚洲视频一二三| 久久国产精品麻豆映画| 97无码免费人妻超级碰碰夜夜| 视频aavvmm国产野外| 欧美成人亚洲欧美成人| 忘忧草日本在线播放www| 国产成年无码久久久久毛片| 伊人久久综在合线亚洲91| 久久国产精品国产精品| 91成人免费观看| 精品少妇人妻av无码专区| 最近中文字幕国语免费完整| 天天干天天色天天| 国产一级电影在线观看| 亚洲人成电影在线观看青青| 一个人免费视频观看在线www | 精品无码av无码免费专区| 日韩精品电影在线| 国产草草影院ccyycom| 免费高清在线影片一区| 久久九九精品国产av片国产| 2021国产麻豆剧传媒仙踪林|