交易危机

 找回密码
 快捷注册(禁q号)

QQ登录

只需一步,快速开始

搜索
广告位
查看: 6804|回复: 35
打印 上一主题 下一主题

[其他] 分享修改一蒙圈通道可讨论

[复制链接]

2128

主题

6万

积分

157

精华

大型投行

金钱
61414 美元
权重
640
跳转到指定楼层
楼主
发表于 2016-3-15 20:30 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式


最大化中文版,便于看懂。
去伪存真,留下了精华。
通道.zip (1.45 KB, 下载次数: 5)

  1. #property description "三条线通道"
  2. #property strict
  3. #property indicator_chart_window//主窗口显示

  4. extern int    第一个开              = 1;           // 从第一个k开始画 extern=屏幕上显示可修改。去掉则只能从代码处修改。
  5. extern int    最后一开               = 50;          // 通道包括50个k
  6. extern ENUM_TIMEFRAMES FixedPeriod  = 0;           // 通道使用时间周期   ENUM_TIMEFRAMES ???    Fixedperiod 似乎很难理解。容我消化
  7. extern double cDeviation            = 1;         // 通道可调宽度
  8. extern ENUM_LINE_STYLE cStyle       = 0;           // 通道样式0表直线
  9. extern color  cColor                = clrRoyalBlue;// 通道颜色 蓝色
  10. extern int    cWidth                = 1;           // 通道宽度1像素
  11. string StdDevChannel="通道";
  12. datetime 首k画,尾k完;

  13. int OnInit()
  14.   {
  15.    IndicatorShortName("简称通道");
  16.    return(INIT_SUCCEEDED);
  17.   }

  18. void OnDeinit(const int reason)
  19.   {
  20.    if(ObjectFind(StdDevChannel) >= 0)  ObjectDelete(StdDevChannel);//   
  21.    Comment("");
  22.   }

  23. int OnCalculate(const int rates_total,  // 输入时间序列大小
  24.                 const int prev_calculated,// 前一次调用处理的柱
  25.                 const datetime &time[],// 时间
  26.                 const double &open[], // 开盘价
  27.                 const double &high[], // 最高价
  28.                 const double &low[], // 最低价
  29.                 const double &close[],  // 收盘价
  30.                 const long &tick_volume[],  // 订单交易量
  31.                 const long &volume[],  // 真实交易量
  32.                 const int &spread[]) // 点差
  33.   {

  34.    int counted_bars=IndicatorCounted(),
  35.    limit=Bars-counted_bars,i;
  36.    if(counted_bars < 0)  return(-1);//如果图表没k,程序运行结束
  37.    if(counted_bars>0) counted_bars--;//如果图表正常,继续统计k
  38.    for(i=limit-1; i>=0; i--)
  39.      {
  40.       首k画 = iTime(NULL, FixedPeriod, i+第一个开);//默认品种 默认周期 默认指定k起画
  41.       尾k完  = iTime(NULL, FixedPeriod, i+最后一开);
  42.      }

  43.    DrawSDChannel(StdDevChannel,cDeviation,尾k完,首k画,cColor,cStyle,cWidth);//控制蓝线
  44.    /*画通道公式(通道,可调宽度,尾k,首k画,颜色,样式,宽度)神奇的公式
  45.    */
  46.    return(rates_total);
  47.   }

  48. void DrawSDChannel(string name,double deviation,datetime t1,datetime t2,color clr,int style,int width)
  49.    /*画通道公式(通道名,可调宽度,t1尾k,t2首k画,clr颜色,style样式,width宽度)神奇的公式
  50.    */
  51.   {
  52.    ObjectDelete(name);
  53.    ObjectCreate(name,OBJ_STDDEVCHANNEL,0,t1,0,t2,0);
  54.    ObjectSet(name,OBJPROP_DEVIATION,deviation);
  55.    ObjectSet(name,OBJPROP_COLOR,clr);
  56.    ObjectSet(name,OBJPROP_STYLE,style);
  57.    ObjectSet(name,OBJPROP_WIDTH,width);
  58.    ObjectSet(name,OBJPROP_RAY,true);
  59.   }


复制代码

评分

参与人数 1金钱 +80 收起 理由
admin + 80 神奇的大爷

查看全部评分

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏2 转播转播 分享分享 分享淘帖 支持支持 保留保留

122

主题

3万

积分

23

精华

地佐更接地气

大型投行

金钱
30818 美元
权重
870
沙发
发表于 2016-3-15 20:34 | 只看该作者
看看,咱也帮你找一个,嘿嘿
如果你认为看懂了市场,那你一定是误解了市场。

市场从来不在乎你、我或任何专家,从不会按照你认为发生什么就应该要发生什么那样。

在市场中赚钱并不容易,但是有可能的,只有把资金、技术、心理这三者和谐地融汇贯通去指导行为,将会走向更加有利可图的交易之路!

13

主题

3722

积分

0

精华

中级操盘手

金钱
3722 美元
权重
0
板凳
发表于 2016-3-15 20:35 | 只看该作者
学习下,虽然不懂

2128

主题

6万

积分

157

精华

大型投行

金钱
61414 美元
权重
640
地板
 楼主| 发表于 2016-3-15 20:37 | 只看该作者
extern ENUM_TIMEFRAMES FixedPeriod  = 0;   

教科书
extern doubule  xxxx=12323
变成
extern ENUM_TIMEFRAMES FixedPeriod  = 0;   
啥意思

ENUM_TIMEFRAMES =应该跟double意思一样,因为位置一样
FixedPeriod  =起的名字,按理可以随意修改。

忽然发现
mt4升级了。
ENUM_TIMEFRAMES应该是个公式。 且是跟时间周期相关的公式。
卧槽,soga,


以此类推

10.extern ENUM_LINE_STYLE cStyle       = 0;           // 通道样式0表直线

ENUM_LINE_STYLE =画图的样式,画直线?画虚线?妥了。

2128

主题

6万

积分

157

精华

大型投行

金钱
61414 美元
权重
640
5
 楼主| 发表于 2016-3-15 20:39 | 只看该作者
本帖最后由 frlin2003 于 2016-3-15 20:40 编辑

通道是斜的,那句话控制的?极度蒙圈
教科书通道=
最少三点才能确定

现在,只要两点,一地鸡毛。

2128

主题

6万

积分

157

精华

大型投行

金钱
61414 美元
权重
640
6
 楼主| 发表于 2016-3-15 20:43 | 只看该作者
第一个k起画,默认第50个k是最后一个k;=2个点。

2128

主题

6万

积分

157

精华

大型投行

金钱
61414 美元
权重
640
7
 楼主| 发表于 2016-3-15 20:44 | 只看该作者
DrawSDChannel  好像问题都集中在这个单词上,soga,还是自言自语好。突然找到了蛋

2128

主题

6万

积分

157

精华

大型投行

金钱
61414 美元
权重
640
8
 楼主| 发表于 2016-3-15 20:44 | 只看该作者
DrawSDChannel 貌似这个词,具有一个功能就是;
直接画出三条线。给出2个点,就自动生成。

2128

主题

6万

积分

157

精华

大型投行

金钱
61414 美元
权重
640
9
 楼主| 发表于 2016-3-15 20:45 | 只看该作者
神奇的大爷

122

主题

3万

积分

23

精华

地佐更接地气

大型投行

金钱
30818 美元
权重
870
10
发表于 2016-3-15 20:46 | 只看该作者
村支书,改编一下吧。



通道.rar (9.77 KB, 下载次数: 9)


嘿嘿





如果你认为看懂了市场,那你一定是误解了市场。

市场从来不在乎你、我或任何专家,从不会按照你认为发生什么就应该要发生什么那样。

在市场中赚钱并不容易,但是有可能的,只有把资金、技术、心理这三者和谐地融汇贯通去指导行为,将会走向更加有利可图的交易之路!

2128

主题

6万

积分

157

精华

大型投行

金钱
61414 美元
权重
640
11
 楼主| 发表于 2016-3-15 20:46 | 只看该作者
容我马上紧急换个算法,
测试 DrawSDChannel的神奇功能

2128

主题

6万

积分

157

精华

大型投行

金钱
61414 美元
权重
640
12
 楼主| 发表于 2016-3-15 20:51 | 只看该作者
可中文名 发表于 2016-3-15 20:46
村支书,改编一下吧。

如何改编

2128

主题

6万

积分

157

精华

大型投行

金钱
61414 美元
权重
640
13
 楼主| 发表于 2016-3-15 21:03 | 只看该作者
本帖最后由 frlin2003 于 2016-3-15 21:07 编辑

日,OBJ_STDDEVCHANNEL这个单词才是自动画通道的核心。
darw不是。只是表示。

中文名称:标准差通道

2128

主题

6万

积分

157

精华

大型投行

金钱
61414 美元
权重
640
14
 楼主| 发表于 2016-3-15 21:10 | 只看该作者
怪不得测试没效果,没有丝毫反应,md,把文件保存到桌面上了。 今天game over,明天接着斗

2128

主题

6万

积分

157

精华

大型投行

金钱
61414 美元
权重
640
15
 楼主| 发表于 2016-3-15 21:12 | 只看该作者
本帖最后由 frlin2003 于 2016-3-15 21:21 编辑

加个班
@可中文名


  1. #property  copyright "ANG3110@latchess.com"
  2. //---------ang_PR (Din)--------------------
  3. #property indicator_chart_window//主窗口显示指标
  4. #property indicator_buffers 5//一共5个公式数组需要进行处理
  5. #property indicator_color1 RoyalBlue//指标1蓝色
  6. #property indicator_color2 LimeGreen//绿色
  7. #property indicator_color3 LimeGreen//绿色
  8. #property indicator_color4 Goldenrod//黄色
  9. #property indicator_color5 Goldenrod//黄色
  10. //-----------------------------------
  11. extern int bars_back = 125;   //统计125个k
  12. extern int m = 2;//m=?
  13. extern int i = 0;
  14. extern double kstd = 2.0;
  15. extern int sName = 1102;
  16. //-----------------------
  17. double fx[], sqh[], sql[], stdh[], stdl[];
  18. double ai[10,10], b[10], x[10], sx[20];
  19. double sum;
  20. int    ip, p, n, f;
  21. double qq, mm, tt;
  22. int    ii, jj, kk, ll, nn;
  23. double sq, std;
  24. //*******************************************
  25. int init()
  26. {
  27.    IndicatorShortName("Center of Gravity");
  28.    SetIndexStyle(0, DRAW_LINE);
  29.    SetIndexBuffer(0, fx);
  30.    SetIndexBuffer(1, sqh);
  31.    SetIndexBuffer(2, sql);
  32.    SetIndexBuffer(3, stdh);
  33.    SetIndexBuffer(4, stdl);
  34.    p = MathRound(bars_back);
  35.    nn = m + 1;
  36.    ObjectCreate("pr" + sName, 22, 0, Time[p], fx[p]);
  37.    ObjectSet("pr" + sName, 14, 159);
  38.    return(0);
  39. }
  40. //----------------------------------------------------------
  41. int deinit()
  42. {
  43.    ObjectDelete("pr" + sName);
  44. }
  45. //**********************************************************************************************
  46. int start()
  47. {
  48.    int mi;
  49. //-------------------------------------------------------------------------------------------
  50.    ip = iBarShift(Symbol(), Period(), ObjectGet("pr" + sName, OBJPROP_TIME1));
  51.    p = bars_back;
  52.    sx[1] = p + 1;
  53.    SetIndexDrawBegin(0, Bars - p - 1);//开始画的位置
  54.    SetIndexDrawBegin(1, Bars - p - 1);
  55.    SetIndexDrawBegin(2, Bars - p - 1);
  56.    SetIndexDrawBegin(3, Bars - p - 1);
  57.    SetIndexDrawBegin(4, Bars - p - 1);
  58. //----------------------sx-------------------------------------------------------------------
  59.    for(mi = 1; mi <= nn * 2 - 2; mi++)//n-mi之间的k 求和
  60.    {
  61.       sum = 0;
  62.       for(n = i; n <= i + p; n++)
  63.       {
  64.          sum += MathPow(n, mi);
  65.       }
  66.       sx[mi + 1] = sum;
  67.    }  
  68. //----------------------syx-----------
  69.    for(mi = 1; mi <= nn; mi++)
  70.    {
  71.       sum = 0.00000;
  72.       for(n = i; n <= i + p; n++)
  73.       {
  74.          if(mi == 1)
  75.             sum += Close[n];//收盘价求和
  76.          else
  77.             sum += Close[n] * MathPow(n, mi - 1);//收盘价 *前一根之前绝对值,有点恍惚
  78.       }
  79.       b[mi] = sum;
  80.    }
  81. //===============Matrix=======================================================================================================
  82.    for(jj = 1; jj <= nn; jj++)
  83.    {
  84.       for(ii = 1; ii <= nn; ii++)
  85.       {
  86.          kk = ii + jj - 1;
  87.          ai[ii, jj] = sx[kk];
  88.       }
  89.    }  
  90. //===============Gauss========================================================================================================
  91.    for(kk = 1; kk <= nn - 1; kk++)
  92.    {
  93.       ll = 0; mm = 0;
  94.       for(ii = kk; ii <= nn; ii++)
  95.       {
  96.          if(MathAbs(ai[ii, kk]) > mm)
  97.          {
  98.             mm = MathAbs(ai[ii, kk]);
  99.             ll = ii;
  100.          }
  101.       }
  102.       if(ll == 0)
  103.          return(0);   

  104.       if(ll != kk)
  105.       {
  106.          for(jj = 1; jj <= nn; jj++)
  107.          {
  108.             tt = ai[kk, jj];
  109.             ai[kk, jj] = ai[ll, jj];
  110.             ai[ll, jj] = tt;
  111.          }
  112.          tt = b[kk]; b[kk] = b[ll]; b[ll] = tt;
  113.       }  
  114.       for(ii = kk + 1; ii <= nn; ii++)
  115.       {
  116.          qq = ai[ii, kk] / ai[kk, kk];
  117.          for(jj = 1; jj <= nn; jj++)
  118.          {
  119.             if(jj == kk)
  120.                ai[ii, jj] = 0;
  121.             else
  122.                ai[ii, jj] = ai[ii, jj] - qq * ai[kk, jj];
  123.          }
  124.          b[ii] = b[ii] - qq * b[kk];
  125.       }
  126.    }  
  127.    x[nn] = b[nn] / ai[nn, nn];
  128.    for(ii = nn - 1; ii >= 1; ii--)
  129.    {
  130.       tt = 0;
  131.       for(jj = 1; jj <= nn - ii; jj++)
  132.       {
  133.          tt = tt + ai[ii, ii + jj] * x[ii + jj];
  134.          x[ii] = (1 / ai[ii, ii]) * (b[ii] - tt);
  135.       }
  136.    }
  137. //===========================================================================================================================
  138.    for(n = i; n <= i + p; n++)
  139.    {
  140.       sum = 0;
  141.       for(kk = 1; kk <= m; kk++)
  142.       {
  143.          sum += x[kk + 1] * MathPow(n, kk);
  144.       }
  145.       fx[n] = x[1] + sum;
  146.    }
  147. //-----------------------------------Std-----------------------------------------------------------------------------------
  148.    sq = 0.0;
  149.    for(n = i; n <= i + p; n++)
  150.    {
  151.       sq += MathPow(Close[n] - fx[n], 2);
  152.    }
  153.    sq = MathSqrt(sq / (p + 1)) * kstd;
  154.    std = iStdDev(NULL, 0, p, MODE_SMA, 0, PRICE_CLOSE, i) * kstd;
  155.    for(n = i; n <= i + p; n++)
  156.    {
  157.       sqh[n] = fx[n] + sq;
  158.       sql[n] = fx[n] - sq;
  159.       stdh[n] = fx[n] + std;
  160.       stdl[n] = fx[n] - std;
  161.    }
  162. //-------------------------------------------------------------------------------
  163.    ObjectMove("pr" + sName, 0, Time[p], fx[p]);
  164. //----------------------------------------------------------------------------------------------------------------------------
  165.    return(0);
  166. }
  167. //==========================================================================================================================   



复制代码

14

主题

5953

积分

0

精华

高级操盘手

金钱
5953 美元
权重
0
16
发表于 2016-3-15 21:15 | 只看该作者
我发现搞外汇的到最后很有可能搞成精神分裂
一射千里

2128

主题

6万

积分

157

精华

大型投行

金钱
61414 美元
权重
640
17
 楼主| 发表于 2016-3-15 21:18 | 只看该作者
qwer 发表于 2016-3-15 21:15
我发现搞外汇的到最后很有可能搞成精神分裂

自学习的过程,往往先被鄙视N次

14

主题

5953

积分

0

精华

高级操盘手

金钱
5953 美元
权重
0
18
发表于 2016-3-15 21:21 | 只看该作者
frlin2003 发表于 2016-3-15 21:18
自学习的过程,往往先被鄙视N次

大爷神级,无人可极,后来者只能仰望了!
一射千里

2128

主题

6万

积分

157

精华

大型投行

金钱
61414 美元
权重
640
19
 楼主| 发表于 2016-3-15 21:22 | 只看该作者
qwer 发表于 2016-3-15 21:21
大爷神级,无人可极,后来者只能仰望了!

神奇

2128

主题

6万

积分

157

精华

大型投行

金钱
61414 美元
权重
640
20
 楼主| 发表于 2016-3-15 21:37 | 只看该作者
您需要登录后才可以回帖 登录 | 快捷注册(禁q号)

本版积分规则

QQ|黄金吧|黄金论坛|手机版|指标下载|非农|目录|交易危机

版权所有: ©2014-2021 fx3q.com Powered by Discuz! X3
皖ICP备: 2024050410号-2

风险提示:杠杆风险高,交易要谨慎 声明:坛友发言和回复均为个人观点,不代表论坛立场。
若有侵权请联系fx3q@qq.com删除

快速回复 返回顶部 返回列表