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

 


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

相關文章

    沒有相關內容
主站蜘蛛池模板: 香港三级绝色杨贵妃电影| 一级一级18女人毛片| 国产成人福利免费视频| 成在线人永久免费视频播放| 亚洲视频在线一区二区| 麻豆aⅴ精品无码一区二区 | 国产00粉嫩馒头一线天萌白酱| 97日日碰曰曰摸日日澡| 日本精品一区二区三区在线视频| 亚洲高清视频在线播放| 羞羞社区在线观看视频| 国产国产人免费人成免费视频| aa级国产女人毛片水真多| 成人午夜视频在线播放| 亚洲三级小视频| 精品久久久久香蕉网| 国产一区二区高清| 青青草原免费在线| 国产高清在线看| www.亚洲精品| 日本视频免费高清一本18| 亚洲国产品综合人成综合网站| 男人与禽交的方法| 免费视频专区一国产盗摄| 国产高清国内精品福利| 天天做天天摸天天爽天天爱| 久久久国产99久久国产久| 最新更新国内自拍视频| 人成精品视频三区二区一区| 精品女同一区二区三区免费播放| 国产一区二区在线观看麻豆| 青青草偷拍视频| 国产成人久久精品亚洲小说| 韩国成人在线视频| 国产欧美精品一区二区三区| 久青草国产免费观看| 97碰公开在线观看免费视频| 废柴视频网最新fcww78| 中文字幕成人乱码在线电影| 无码人妻丰满熟妇区五十路百度| 久久久xxxx|