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

【跟風發套系統】道氏理論系統分享 [開拓者 TB]

  • 咨詢內容: 跟穿堂風一個群的 平時喜歡琢磨點系統 我看流氓風分享了好幾套系統了 我也跟風發一個吧~
    道氏理論大家應該都很熟悉
    不太清楚的同志請自己搜索下 這個東西是套很經典的系統
    因為我是做日內的 所以寫成了日內交易 有興趣的朋友可以改成中長線的系統
    代碼如下
    1. //------------------------------------------------------------------------
    2. // 簡稱: D1
    3. // 名稱: 道氏理論
    4. // 類別: 交易指令
    5. // 類型: 多頭建倉
    6. // 輸出:
    7. //------------------------------------------------------------------------

    8. Params
    9.         Numeric ATime(918);
    10.         Numeric CTime(1510);
    11.         Numeric Lot(1);
    12.         Numeric MoneyLoss(0.6);
    13.         Numeric BarCross(1);
    14.         Numeric Length(5);
    15.        
    16. Vars
    17.         Numeric bTime(0);
    18.         Numeric MyClose(0);
    19.         Numeric MyDiff(0);
    20.         NumericSeries estP(0);
    21.         NumericSeries ExitP(0);
    22.         NumericSeries Position(0);
    23.         NumericSeries est(0);
    24.         NumericSeries est1(0);
    25.         NumericSeries est2(0);
    26.         NumericSeries est3(0);
    27.        
    28.         Bool bTimeCon;
    29.         Bool BarUpCon;
    30.         Bool BarDownCon;
    31.         Bool BarExitCon;
    32.         Bool LongOpenCon;
    33.         Bool ShortOpenCon;
    34.         Bool LongExitCon;
    35.         Bool ShortExitCon;
    36.        
    37. Begin
    38.        
    39.         If (Date != Date[1])
    40.                 {
    41.                         est = Open;
    42.                         est1 = Open;
    43.                         est2 = Open;
    44.                         est3 = Open;
    45.                         estP = 0;
    46.                         ExitP = 0;
    47.                         Position = 0;
    48.                         MyClose = Open;
    49.                 }
    50.         Else
    51.                 {
    52.                         est = est[1];
    53.                         est1 = est1[1];
    54.                         est2 = est2[1];
    55.                         est3 = est3[1];
    56.                         estP = estP[1];
    57.                         ExitP = ExitP[1];
    58.                         Position = Position[1];
    59.                         If(Length != 0) MyClose = Average(Close[1],Length);
    60.                         Else MyClose = Close[1];
    61.                 }
    62.                
    63.         MyDiff = MyClose * BarCross / 1000;
    64.        
    65.         bTime = IntPart(Time*10000);
    66.         bTimeCon = (bTime > ATime) And (bTime < CTime);
    67.        
    68.         If((MyClose < est And MyClose < est1) Or (MyClose > est And MyClose > est1)) est = MyClose;
    69.         If(((MyClose - est) > MyDiff And est < est1) Or ((est - MyClose) > MyDiff And est > est1))
    70.                 {
    71.                         est3 = est2;
    72.                         est2 = est1;
    73.                         est1 = est;
    74.                         est = MyClose;
    75.                 }
    76.                
    77.         If(Position > 0 And High > estP) estP = High;
    78.         If(Position < 0 And Low < estP) estP = Low;
    79.         If(Position > 0) ExitP = estP * (100 - MoneyLoss) / 100;
    80.         If(Position < 0) ExitP = estP * (100 + MoneyLoss) / 100;
    81.        
    82.         If(bTime >= CTime)
    83.         {
    84.                 If (Position > 0)
    85.                         Sell(lot,Open);
    86.                 Else
    87.                         BuyToCover(lot,Open);
    88.         }
    89.          
    90.         If(bTimeCon)
    91.         {
    92.                 If (Position == 0)
    93.                 {
    94.                         If(est3 < est1 And (est2 / 2000 + est2) <= est And est3 < est2)
    95.                         {
    96.                                 Buy(lot,Open);
    97.                                 Position = lot;
    98.                                 estP = Open;
    99.                                 ExitP = estP * (100 - MoneyLoss) / 100;
    100.                                 Commentary("LongOpen");
    101.                                
    102.                         }
    103.                          
    104.                         Else If(est3 > est1 And (est2 - est2 / 2000) >= est And est3 > est2)
    105.                         {
    106.                                 SellShort(lot,Open);
    107.                                 Position = lot * -1;
    108.                                 estP = Open;
    109.                                 ExitP = estP * (100 + MoneyLoss) / 100;
    110.                                 Commentary("ShortOpen");
    111.                         }
    112.                 }
    113.                
    114.                 Else
    115.                
    116.                 {
    117.                         If(Position > 0 And est3 > est1)
    118.                         {
    119.                                 Sell(lot,Open);
    120.                                 Position = 0;
    121.                                 Commentary("LongExit1");
    122.                         }
    123.                        
    124.                         Else If(Position < 0 And est3 < est1)
    125.                         {
    126.                                 BuyToCover(lot,Open);
    127.                                 Position = 0;
    128.                                 Commentary("ShortExit1");
    129.                         }
    130.                        
    131.                         Else If(Position > 0 And Open < ExitP)
    132.                         {
    133.                                 Sell(lot,Open);
    134.                                 Position = 0;
    135.                                 Commentary("LongExit2");
    136.                         }
    137.                        
    138.                         Else If(Position < 0 And Open > ExitP)
    139.                         {
    140.                                 BuyToCover(lot,Open);
    141.                                 Position = 0;
    142.                                 Commentary("ShortExit2");
    143.                         }
    144.                 }
    145.         }
    146.        
    147.         Commentary("Position = "+Text(Position));
    148.         Commentary("ExitP = "+Text(ExitP));
    149. End

    150. //------------------------------------------------------------------------
    151. // 編譯版本        GS2004.06.12
    152. // 用戶版本        2011/05/03 13:21
    153. // 版權所有        illidanyl
    154. // 更改聲明        TradeBlazer Software保留對TradeBlazer平臺
    155. //                        每一版本的TrabeBlazer公式修改和重寫的權利
    156. //------------------------------------------------------------------------

     

  • TB技術人員: 中間有些資金控制的東西 不修改任何參數的日內結果如下 大家圖個樂吧~
    11.jpg (109.97 KB, 下載次數: 8) 2011-7-26 17:08:48 上傳 下載次數: 8

     

  • TB客服: 快把壓箱底的交出來

     

  • 網友回復: 我的測試結果怎么和版主的不一樣?

     

  • 網友回復:
    快把壓箱底的交出來
    穿堂風 發表于 2011-7-26 17:34



        才不要 -v-

 

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

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

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

 


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

相關文章

    指定的模型還沒有相關內容!
主站蜘蛛池模板: 51视频精品全部免费最新| 大学寝室沈樵无删减| 图片区网友自拍另类图区| 国产成人久久精品亚洲小说| 全免费a级毛片免费看不卡| 亚洲人成无码网站在线观看| 中文字幕在亚洲第一在线| 55夜色66夜色国产精品视频| 韩国伦理s级在线| 波多野结衣在线观看中文字幕| 日韩在线视频免费| 在线观看星空传媒入口| 国产又色又爽又刺激在线播放| 亚洲综合无码无在线观看| 久久国产乱子伦免费精品| 91精品啪在线观看国产线免费| 青青青手机视频| 欧美黄色xxx| 性满足久久久久久久久| 国产无遮挡又黄又爽在线视频 | 色cccwww在线播放| 欧美性受xxxx白人性爽| 婷婷亚洲综合五月天小说在线| 国产成人免费a在线视频app| 亚洲精品无码专区在线在线播放| 久久99视频精品| 亚洲视频一区二区三区四区| 精品一区二区三区四区在线| 日韩欧美综合在线二区三区| 在线观看国产一区亚洲bd| 含羞草影院视频播放| 久久这里精品国产99丫e6| 91青青青国产在观免费影视| 精品国产第一国产综合精品| 日韩精品中文字幕无码专区| 国产综合久久久久久鬼色| 国产欧美日韩另类精彩视频| 免费国产成人午夜在线观看| 久久亚洲sm情趣捆绑调教| 日本a免费观看| 欧美黑人xxxx性高清版|