: | : | :期货程序化 | :期货程序化研究 | :期货量化学习 | :期货量化 |
返回列表 发帖

[MetaStock] Cog Stochastic and Fx Trend Trading System

龙听

Rank: 9Rank: 9Rank: 9

UID
2 
积分
2721794 
威望
1310892 布 
龙e币
1410902 刀 
注册时间
2009-12-3 
最后登录
2024-4-27 

Medal No.1
1# 跳转到 » 倒序看帖
打印
tT
发表于 2020-6-3 08:33 | 只看该作者

[MetaStock] Cog Stochastic and Fx Trend Trading System

Cog Stocastic Indicator
Submit by JamesUK 31/10/2010

Time Frame 30 min or higher;

Currency pairs: any;

Indicator:

COGSTOCH Indicator;

FX Trend;

Pivot point multitimframe;

Polynomial Regression trading
rules for opening orders

Buy order : open buy order when the indicator Cogstochastic crosses upward into aqua bands and fx trend indicator is color aqua;

Stop loss 2 pips abpve previous swing;

Sell order :open Sell order when the indicator Cogstochastic crosses downward into red bands and fx trend indicator is color red;
Stop loss 2 pips below previous swing;

Exit position, options,:

1)On the levels pivot;

2) when FX trend indicator change color;

3) with profit target predetermined depends by time frame and currency pairs.

This is an strategy for binary option. High Low binary option trading strategy (60 min)

Time Frame 30 min.

In the pictures Cog Stochastic and FX Trend forex system in action.

Share your opinion, can help everyone to understand the forex strategy.

收藏 分享
论坛官方微信、群（期货热点、量化探讨、开户与绑定实盘）
 
期货论坛 - 版权/免责声明   1.本站发布源码(包括函数、指标、策略等)均属开放源码，用意在于让使用者学习程序化语法撰写，使用者可以任意修改语法內容并调整参数。仅限用于个人学习使用，请勿转载、滥用，严禁私自连接实盘账户交易。
  2.本站发布资讯(包括文章、视频、历史记录、教材、评论、资讯、交易方案等)均系转载自网络主流媒体，内容仅为作者当日个人观点，本网转载此文出于传递更多信息之目的，并不意味着赞同其观点或证实其描述。本网不对该类信息或数据做任何保证。不对您构成任何投资建议，不能依靠信息而取代自身独立判断，不对因使用本篇文章所诉信息或观点等导致的损失承担任何责任。
  3.本站发布资源(包括书籍、杂志、文档、软件等)均从互联网搜索而来，仅供个人免费交流学习，不可用作商业用途，本站不对显示的内容承担任何责任。请在下载后24小时内删除。如果喜欢，请购买正版，谢谢合作！
  4.龙听期货论坛原创文章属本网版权作品，转载须注明来源“龙听期货论坛”，违者本网将保留追究其相关法律责任的权力。本论坛除发布原创文章外，亦致力于优秀财经文章的交流分享，部分文章推送时若未能及时与原作者取得联系并涉及版权问题时，请及时联系删除。联系方式：http://www.qhlt.cn/thread-262-1-1.html
如何访问权限为100/255贴子：/thread-37840-1-1.html；注册后仍无法回复：/thread-23-1-1.html；微信/QQ群：/thread-262-1-1.html；网盘链接失效解决办法：/thread-93307-1-1.html

龙听

Rank: 9Rank: 9Rank: 9

UID
2 
积分
2721794 
威望
1310892 布 
龙e币
1410902 刀 
注册时间
2009-12-3 
最后登录
2024-4-27 

Medal No.1
2#
发表于 2020-6-3 08:34 | 只看该作者
齿轮随机和外汇趋势交易系统
嵌齿轮定指标

由JamesUK提交2010年10月31日

时限30分钟或以上；

货币对：任意；

指标：
COGSTOCH指标；

外汇趋势 ;

枢轴点多帧 ;

多项式回归交易
开仓规则

买单：当指标Cogstochastic向上跨入水色带且fx趋势指标为有色水色时，打开买入订单 ；

止损较上个交易日高出2个基点；

卖单：当指标Cogstochastic向下穿过红色带并且FX趋势指标为红色时，打开卖单。
止损比前一个波动低2个基点；

出口位置，选项：

1）在水平轴上；

2）当外汇趋势指标改变颜色时；

3）预定的利润目标取决于时间范围和货币对。


这是二元期权的策略。高低二元期权交易策略（60分钟）

时限30分钟


图片中的Cog随机指标和FX Trend 外汇系统 正在运行。
如何访问权限为100/255贴子：/thread-37840-1-1.html；注册后仍无法回复：/thread-23-1-1.html；微信/QQ群：/thread-262-1-1.html；网盘链接失效解决办法：/thread-93307-1-1.html

TOP

龙听

Rank: 9Rank: 9Rank: 9

UID
2 
积分
2721794 
威望
1310892 布 
龙e币
1410902 刀 
注册时间
2009-12-3 
最后登录
2024-4-27 

Medal No.1
3#
发表于 2020-6-3 08:39 | 只看该作者
COGSTOCH指标
  1. //+------------------------------------------------------------------+
  2. //|                                                     COGSTOCH.mq4 |
  3. //| Original Code from NG3110@latchess.com                           |                                    
  4. //| Linuxser 2007 for TSD    http://www.forex-tsd.com/               |
  5. //| Stoch Modified Brooky    http://www.brooky-indicators.com        |
  6. //+------------------------------------------------------------------+
  7. #property  copyright "ANG3110@latchess.com"
  8. //---------ang_pr (Din)--------------------
  9. #property indicator_separate_window
  10. #property indicator_buffers 7
  11. #property indicator_color1 Gray
  12. #property indicator_color2 IndianRed
  13. #property indicator_color3 CadetBlue
  14. #property indicator_color4 Pink
  15. #property indicator_color5 PowderBlue
  16. #property indicator_color6 Blue
  17. #property indicator_color7 Red


  20. #property indicator_level1 80
  21. #property indicator_level2 50
  22. #property indicator_level3 20
  23. #property indicator_level4 100
  24. #property indicator_level5 00

  26. #property indicator_style1 1
  27. #property indicator_style7 2

  29. #property indicator_width2 2
  30. #property indicator_width3 2


  33. //-----------------------------------
  34. extern int bars_back = 192;
  35. extern int stoch_k = 14;
  36. extern int stoch_d = 5;
  37. extern int stoch_s = 3;


  40. extern int m = 5;
  41. extern int i = 1;
  42. extern double kstd = 1.618;
  43. extern double kstd.internal = 0.8;
  44. extern int sName = 2;
  45. //-----------------------
  46. double fx[], sqh[], sql[], stdh[], stdl[], stochdata[], stochsdata[];
  47. double ai[10,10], b[10], x[10], sx[20];
  48. double sum;
  49. int    ip, p, n, f;
  50. double qq, mm, tt;
  51. int    ii, jj, kk, ll, nn;
  52. double sq, std;
  53. //*******************************************
  54. int init()
  55. {
  56.    IndicatorShortName("COGSTOCH: Mod by Brooky-Indicators.com");
  57.    
  58.    SetIndexBuffer(0, fx);SetIndexStyle(0, DRAW_LINE);
  59.    SetIndexBuffer(1, sqh);
  60.    SetIndexBuffer(2, sql);
  61.    SetIndexBuffer(3, stdh);
  62.    SetIndexBuffer(4, stdl);
  63.    SetIndexBuffer(5, stochdata);SetIndexStyle(5, DRAW_LINE);
  64.    SetIndexBuffer(6, stochsdata);SetIndexStyle(6, DRAW_LINE);
  65.    p = MathRound(bars_back);
  66.    
  67.    nn = m + 1;
  68.    ObjectCreate("sstart" + sName, 22, 0, Time[p], fx[p]);
  69.    ObjectSet("sstart" + sName, 14, 159);
  70.    return(0);
  71. }
  72. //----------------------------------------------------------
  73. int deinit()
  74. {
  75.    ObjectDelete("sstart" + sName);
  76. }
  77. //**********************************************************************************************
  78. int start()
  79. {
  80.    int mi;
  81. //-------------------------------------------------------------------------------------------
  82.    ip = iBarShift(Symbol(), Period(), ObjectGet("sstart" + sName, OBJPROP_TIME1));
  83.    p = bars_back;
  84.    sx[1] = p + 1;
  85.    SetIndexDrawBegin(0, Bars - p - 1);
  86.    SetIndexDrawBegin(1, Bars - p - 1);
  87.    SetIndexDrawBegin(2, Bars - p - 1);
  88.    SetIndexDrawBegin(3, Bars - p - 1);
  89.    SetIndexDrawBegin(4, Bars - p - 1);
  90. //----------------------sx-------------------------------------------------------------------

  92.      int rlimit;
  93.      int rcounted_bars=IndicatorCounted();
  94.   //---- check for possible errors
  95.      if(rcounted_bars<0) return(-1);
  96.   //---- the last counted bar will be recounted
  97.      if(rcounted_bars>0) rcounted_bars--;
  98.      rlimit=Bars-rcounted_bars;
  99.   //---- main loop
  100.      for(int ri=0; ri<rlimit; ri++)
  101.        {
  102.       
  103.        stochdata[ri]= iStochastic(NULL,0,stoch_k,stoch_d,stoch_s,MODE_SMA,0,MODE_MAIN,ri);
  104.        stochsdata[ri]= iStochastic(NULL,0,stoch_k,stoch_d,stoch_s,MODE_SMA,0,MODE_SIGNAL,ri);
  105.        }


  108.    for(mi = 1; mi <= nn * 2 - 2; mi++)
  109.    {
  110.       sum = 0;
  111.       for(n = i; n <= i + p; n++)
  112.       {
  113.          sum += MathPow(n, mi);
  114.       }
  115.       sx[mi + 1] = sum;
  116.    }  
  117. //----------------------syx-----------
  118.    for(mi = 1; mi <= nn; mi++)
  119.    {
  120.    
  121.       sum = 0.00000;
  122.       for(n = i; n <= i + p; n++)
  123.       {
  124.          if(mi == 1)
  125.             sum += iStochastic(NULL,0,stoch_k,stoch_d,stoch_s,MODE_SMA,0,MODE_MAIN,n);//rsi_period  iRSI(NULL,0,rsi_period,prICE_CLOSE,n)
  126.          else
  127.             sum += iStochastic(NULL,0,stoch_k,stoch_d,stoch_s,MODE_SMA,0,MODE_MAIN,n) * MathPow(n, mi - 1);
  128.       }
  129.       b[mi] = sum;
  130.    }
  131. //===============Matrix=======================================================================================================
  132.    for(jj = 1; jj <= nn; jj++)
  133.    {
  134.       for(ii = 1; ii <= nn; ii++)
  135.       {
  136.          kk = ii + jj - 1;
  137.          ai[ii, jj] = sx[kk];
  138.       }
  139.    }  
  140. //===============Gauss========================================================================================================
  141.    for(kk = 1; kk <= nn - 1; kk++)
  142.    {
  143.       ll = 0; mm = 0;
  144.       for(ii = kk; ii <= nn; ii++)
  145.       {
  146.          if(MathAbs(ai[ii, kk]) > mm)
  147.          {
  148.             mm = MathAbs(ai[ii, kk]);
  149.             ll = ii;
  150.          }
  151.       }
  152.       if(ll == 0)
  153.          return(0);   

  155.       if(ll != kk)
  156.       {
  157.          for(jj = 1; jj <= nn; jj++)
  158.          {
  159.             tt = ai[kk, jj];
  160.             ai[kk, jj] = ai[ll, jj];
  161.             ai[ll, jj] = tt;
  162.          }
  163.          tt = b[kk]; b[kk] = b[ll]; b[ll] = tt;
  164.       }  
  165.       for(ii = kk + 1; ii <= nn; ii++)
  166.       {
  167.          qq = ai[ii, kk] / ai[kk, kk];
  168.          for(jj = 1; jj <= nn; jj++)
  169.          {
  170.             if(jj == kk)
  171.                ai[ii, jj] = 0;
  172.             else
  173.                ai[ii, jj] = ai[ii, jj] - qq * ai[kk, jj];
  174.          }
  175.          b[ii] = b[ii] - qq * b[kk];
  176.       }
  177.    }  
  178.    x[nn] = b[nn] / ai[nn, nn];
  179.    for(ii = nn - 1; ii >= 1; ii--)
  180.    {
  181.       tt = 0;
  182.       for(jj = 1; jj <= nn - ii; jj++)
  183.       {
  184.          tt = tt + ai[ii, ii + jj] * x[ii + jj];
  185.          x[ii] = (1 / ai[ii, ii]) * (b[ii] - tt);
  186.       }
  187.    }
  188. //===========================================================================================================================
  189.    for(n = i; n <= i + p; n++)
  190.    {
  191.       sum = 0;
  192.       for(kk = 1; kk <= m; kk++)
  193.       {
  194.          sum += x[kk + 1] * MathPow(n, kk);
  195.       }
  196.       fx[n] = x[1] + sum;
  197.    }
  198. //-----------------------------------Std-----------------------------------------------------------------------------------
  199.    sq = 0.0;
  200.    for(n = i; n <= i + p; n++)
  201.    {
  202.       sq += MathPow(iStochastic(NULL,0,stoch_k,stoch_d,stoch_s,MODE_SMA,0,MODE_MAIN,n) - fx[n], 2);
  203.    }
  204.    sq = MathSqrt(sq / (p + 1)) * kstd;
  205.    std = iStdDevOnArray(stochdata,0,p,0,MODE_SMA,i) *kstd.internal;
  206.    for(n = i; n <= i + p; n++)
  207.    {
  208.       sqh[n] = fx[n] + sq;
  209.       sql[n] = fx[n] - sq;
  210.       stdh[n] = fx[n] + std;
  211.       stdl[n] = fx[n] - std;
  212.    }
  213. //-------------------------------------------------------------------------------
  214.    ObjectMove("sstart" + sName, 0, Time[p], fx[p]);
  215. //----------------------------------------------------------------------------------------------------------------------------
  216.    return(0);
  217. }
  218. //==========================================================================================================================   
复制代码
如何访问权限为100/255贴子：/thread-37840-1-1.html；注册后仍无法回复：/thread-23-1-1.html；微信/QQ群：/thread-262-1-1.html；网盘链接失效解决办法：/thread-93307-1-1.html

TOP

龙听

Rank: 9Rank: 9Rank: 9

UID
2 
积分
2721794 
威望
1310892 布 
龙e币
1410902 刀 
注册时间
2009-12-3 
最后登录
2024-4-27 

Medal No.1
4#
发表于 2020-6-3 08:41 | 只看该作者
枢轴点多时间框架（Pivot point multitimframe）
  1. /*
  2.    Generated by EX4-TO-MQ4 decompiler V4.0.224.1 []
  3.    Website: http://purebeam.biz
  4.    E-mail : purebeam@gmail.com
  5. */
  6. #property copyright "Copyright ?2004, MetaQuotes Software Corp."
  7. #property link      "http://www.metaquotes.net"

  9. #property indicator_chart_window
  10. #property indicator_buffers 4
  11. #property indicator_color1 CLR_NONE
  12. #property indicator_color2 Black
  13. #property indicator_color3 Black
  14. #property indicator_color4 Black

  16. extern bool midpivots = FALSE;
  17. extern bool Fhr = FALSE;
  18. extern bool daily = TRUE;
  19. extern bool weekly = TRUE;
  20. extern bool monthly = TRUE;
  21. extern int Period1 = 1440;
  22. double gd_100 = 0.0;
  23. double gd_108 = 0.0;
  24. double gd_116 = 0.0;
  25. double gd_unused_124 = 0.0;
  26. double gd_132 = 0.0;
  27. double gd_140 = 0.0;
  28. double gd_unused_148 = 0.0;
  29. double gd_unused_156 = 0.0;
  30. double gd_unused_164 = 0.0;
  31. double g_price_172 = 0.0;
  32. double gd_180 = 0.0;
  33. double g_price_188;
  34. double g_price_196;
  35. double g_price_204;
  36. double g_price_212;
  37. double g_price_220;
  38. double g_price_228;
  39. double g_price_236;
  40. double g_price_244;
  41. double g_price_252;
  42. double g_price_260;
  43. double g_price_268;
  44. double g_price_276;
  45. double gd_284 = 0.0;
  46. double gd_292 = 0.0;
  47. double gd_300 = 0.0;
  48. double gda_308[2][6];
  49. double g_ibuf_312[];
  50. double gd_316 = 0.0;
  51. double gd_324 = 0.0;
  52. double gd_332 = 0.0;
  53. double gd_unused_340 = 0.0;
  54. double gd_348 = 0.0;
  55. double gd_356 = 0.0;
  56. double gd_unused_364 = 0.0;
  57. double gd_unused_372 = 0.0;
  58. double gd_unused_380 = 0.0;
  59. double g_price_388 = 0.0;
  60. double gd_396 = 0.0;
  61. double g_price_404;
  62. double g_price_412;
  63. double g_price_420;
  64. double g_price_428;
  65. double g_price_436;
  66. double g_price_444;
  67. double g_price_452;
  68. double g_price_460;
  69. double g_price_468;
  70. double g_price_476;
  71. double g_price_484;
  72. double g_price_492;
  73. double gd_500 = 0.0;
  74. double gd_508 = 0.0;
  75. double gd_516 = 0.0;
  76. double gda_524[2][6];
  77. double g_ibuf_528[];
  78. double gd_532 = 0.0;
  79. double gd_540 = 0.0;
  80. double gd_548 = 0.0;
  81. double gd_unused_556 = 0.0;
  82. double gd_564 = 0.0;
  83. double gd_572 = 0.0;
  84. double gd_unused_580 = 0.0;
  85. double gd_unused_588 = 0.0;
  86. double gd_unused_596 = 0.0;
  87. double g_price_604 = 0.0;
  88. double gd_612 = 0.0;
  89. double g_price_620;
  90. double g_price_628;
  91. double g_price_636;
  92. double g_price_644;
  93. double g_price_652;
  94. double g_price_660;
  95. double g_price_668;
  96. double g_price_676;
  97. double g_price_684;
  98. double g_price_692;
  99. double g_price_700;
  100. double g_price_708;
  101. double gd_716 = 0.0;
  102. double gd_724 = 0.0;
  103. double gd_732 = 0.0;
  104. double gda_740[2][6];
  105. double g_ibuf_744[];
  106. double gd_748 = 0.0;
  107. double gd_756 = 0.0;
  108. double gd_764 = 0.0;
  109. double gd_unused_772 = 0.0;
  110. double gd_780 = 0.0;
  111. double gd_788 = 0.0;
  112. double gd_unused_796 = 0.0;
  113. double gd_unused_804 = 0.0;
  114. double gd_unused_812 = 0.0;
  115. double g_price_820 = 0.0;
  116. double gd_828 = 0.0;
  117. double g_price_836;
  118. double g_price_844;
  119. double g_price_852;
  120. double g_price_860;
  121. double g_price_868;
  122. double g_price_876;
  123. double g_price_884;
  124. double g_price_892;
  125. double g_price_900;
  126. double g_price_908;
  127. double g_price_916;
  128. double g_price_924;
  129. double gd_932 = 0.0;
  130. double gd_940 = 0.0;
  131. double gd_948 = 0.0;
  132. double gda_956[2][6];
  133. double g_ibuf_960[];

  135. int init() {
  136.    IndicatorBuffers(4);
  137.    SetIndexStyle(0, DRAW_ARROW);
  138.    SetIndexArrow(0, 159);
  139.    SetIndexBuffer(0, g_ibuf_312);
  140.    SetIndexStyle(0, DRAW_ARROW);
  141.    SetIndexArrow(0, 159);
  142.    SetIndexBuffer(1, g_ibuf_528);
  143.    SetIndexStyle(0, DRAW_ARROW);
  144.    SetIndexArrow(0, 159);
  145.    SetIndexBuffer(2, g_ibuf_744);
  146.    SetIndexStyle(0, DRAW_ARROW);
  147.    SetIndexArrow(0, 159);
  148.    SetIndexBuffer(3, g_ibuf_960);
  149.    g_price_404 = 0;
  150.    g_price_412 = 0;
  151.    g_price_420 = 0;
  152.    g_price_428 = 0;
  153.    g_price_436 = 0;
  154.    g_price_444 = 0;
  155.    g_price_452 = 0;
  156.    g_price_460 = 0;
  157.    g_price_468 = 0;
  158.    g_price_476 = 0;
  159.    g_price_484 = 0;
  160.    g_price_492 = 0;
  161.    g_price_620 = 0;
  162.    g_price_628 = 0;
  163.    g_price_636 = 0;
  164.    g_price_644 = 0;
  165.    g_price_652 = 0;
  166.    g_price_660 = 0;
  167.    g_price_668 = 0;
  168.    g_price_676 = 0;
  169.    g_price_684 = 0;
  170.    g_price_692 = 0;
  171.    g_price_700 = 0;
  172.    g_price_708 = 0;
  173.    g_price_836 = 0;
  174.    g_price_844 = 0;
  175.    g_price_852 = 0;
  176.    g_price_860 = 0;
  177.    g_price_868 = 0;
  178.    g_price_876 = 0;
  179.    g_price_884 = 0;
  180.    g_price_892 = 0;
  181.    g_price_900 = 0;
  182.    g_price_908 = 0;
  183.    g_price_916 = 0;
  184.    g_price_924 = 0;
  185.    g_price_188 = 0;
  186.    g_price_196 = 0;
  187.    g_price_204 = 0;
  188.    g_price_212 = 0;
  189.    g_price_220 = 0;
  190.    g_price_228 = 0;
  191.    g_price_236 = 0;
  192.    g_price_244 = 0;
  193.    g_price_252 = 0;
  194.    g_price_260 = 0;
  195.    g_price_268 = 0;
  196.    g_price_276 = 0;
  197.    return (0);
  198. }

  200. int deinit() {
  201.    ObjectDelete("Fhr_R1 Label");
  202.    ObjectDelete("Fhr_R1 Line");
  203.    ObjectDelete("Fhr_R2 Label");
  204.    ObjectDelete("Fhr_R2 Line");
  205.    ObjectDelete("Fhr_R3 Label");
  206.    ObjectDelete("Fhr_R3 Line");
  207.    ObjectDelete("Fhr_S1 Label");
  208.    ObjectDelete("Fhr_S1 Line");
  209.    ObjectDelete("Fhr_S2 Label");
  210.    ObjectDelete("Fhr_S2 Line");
  211.    ObjectDelete("Fhr_S3 Label");
  212.    ObjectDelete("Fhr_S3 Line");
  213.    ObjectDelete("Fhr_P Label");
  214.    ObjectDelete("Fhr_P Line");
  215.    ObjectDelete("Fhr_M5 Label");
  216.    ObjectDelete("Fhr_M5 Line");
  217.    ObjectDelete("Fhr_M4 Label");
  218.    ObjectDelete("Fhr_M4 Line");
  219.    ObjectDelete("Fhr_M3 Label");
  220.    ObjectDelete("Fhr_M3 Line");
  221.    ObjectDelete("Fhr_M2 Label");
  222.    ObjectDelete("Fhr_M2 Line");
  223.    ObjectDelete("Fhr_M1 Label");
  224.    ObjectDelete("Fhr_M1 Line");
  225.    ObjectDelete("Fhr_M0 Label");
  226.    ObjectDelete("Fhr_M0 Line");
  227.    ObjectDelete("D_R1 Label");
  228.    ObjectDelete("D_R1 Line");
  229.    ObjectDelete("D_R2 Label");
  230.    ObjectDelete("D_R2 Line");
  231.    ObjectDelete("D_R3 Label");
  232.    ObjectDelete("D_R3 Line");
  233.    ObjectDelete("D_S1 Label");
  234.    ObjectDelete("D_S1 Line");
  235.    ObjectDelete("D_S2 Label");
  236.    ObjectDelete("D_S2 Line");
  237.    ObjectDelete("D_S3 Label");
  238.    ObjectDelete("D_S3 Line");
  239.    ObjectDelete("D_P Label");
  240.    ObjectDelete("D_P Line");
  241.    ObjectDelete("D_M5 Label");
  242.    ObjectDelete("D_M5 Line");
  243.    ObjectDelete("D_M4 Label");
  244.    ObjectDelete("D_M4 Line");
  245.    ObjectDelete("D_M3 Label");
  246.    ObjectDelete("D_M3 Line");
  247.    ObjectDelete("D_M2 Label");
  248.    ObjectDelete("D_M2 Line");
  249.    ObjectDelete("D_M1 Label");
  250.    ObjectDelete("D_M1 Line");
  251.    ObjectDelete("D_M0 Label");
  252.    ObjectDelete("D_M0 Line");
  253.    ObjectDelete("W_R1 Label");
  254.    ObjectDelete("W_R1 Line");
  255.    ObjectDelete("W_R2 Label");
  256.    ObjectDelete("W_R2 Line");
  257.    ObjectDelete("W_R3 Label");
  258.    ObjectDelete("W_R3 Line");
  259.    ObjectDelete("W_S1 Label");
  260.    ObjectDelete("W_S1 Line");
  261.    ObjectDelete("W_S2 Label");
  262.    ObjectDelete("W_S2 Line");
  263.    ObjectDelete("W_S3 Label");
  264.    ObjectDelete("W_S3 Line");
  265.    ObjectDelete("W_P Label");
  266.    ObjectDelete("W_P Line");
  267.    ObjectDelete("W_M5 Label");
  268.    ObjectDelete("W_M5 Line");
  269.    ObjectDelete("W_M4 Label");
  270.    ObjectDelete("W_M4 Line");
  271.    ObjectDelete("W_M3 Label");
  272.    ObjectDelete("W_M3 Line");
  273.    ObjectDelete("W_M2 Label");
  274.    ObjectDelete("W_M2 Line");
  275.    ObjectDelete("W_M1 Label");
  276.    ObjectDelete("W_M1 Line");
  277.    ObjectDelete("W_M0 Label");
  278.    ObjectDelete("W_M0 Line");
  279.    ObjectDelete("M_R1 Label");
  280.    ObjectDelete("M_R1 Line");
  281.    ObjectDelete("M_R2 Label");
  282.    ObjectDelete("M_R2 Line");
  283.    ObjectDelete("M_R3 Label");
  284.    ObjectDelete("M_R3 Line");
  285.    ObjectDelete("M_S1 Label");
  286.    ObjectDelete("M_S1 Line");
  287.    ObjectDelete("M_S2 Label");
  288.    ObjectDelete("M_S2 Line");
  289.    ObjectDelete("M_S3 Label");
  290.    ObjectDelete("M_S3 Line");
  291.    ObjectDelete("M_P Label");
  292.    ObjectDelete("M_P Line");
  293.    ObjectDelete("M_M5 Label");
  294.    ObjectDelete("M_M5 Line");
  295.    ObjectDelete("M_M4 Label");
  296.    ObjectDelete("M_M4 Line");
  297.    ObjectDelete("M_M3 Label");
  298.    ObjectDelete("M_M3 Line");
  299.    ObjectDelete("M_M2 Label");
  300.    ObjectDelete("M_M2 Line");
  301.    ObjectDelete("M_M1 Label");
  302.    ObjectDelete("M_M1 Line");
  303.    ObjectDelete("M_M0 Label");
  304.    ObjectDelete("M_M0 Line");
  305.    return (0);
  306. }

  308. int start() {
  309.    ArrayCopyRates(gda_308, Symbol(), PERIOD_H4);
  310.    gd_140 = gda_308[1][4];
  311.    gd_unused_124 = gda_308[1][1];
  312.    gd_unused_148 = gda_308[0][1];
  313.    gd_116 = gda_308[1][3];
  314.    gd_132 = gda_308[1][2];
  315.    gd_100 = gda_308[0][3];
  316.    gd_108 = gda_308[0][2];
  317.    gd_300 = gd_100 - gd_108;
  318.    gd_180 = gd_116 - gd_132;
  319.    g_price_172 = (gd_116 + gd_132 + gd_140) / 3.0;
  320.    g_price_188 = 2.0 * g_price_172 - gd_132;
  321.    g_price_260 = 2.0 * g_price_172 - gd_116;
  322.    g_price_196 = g_price_172 + (gd_116 - gd_132);
  323.    g_price_268 = g_price_172 - (gd_116 - gd_132);
  324.    g_price_204 = 2.0 * g_price_172 + (gd_116 - 2.0 * gd_132);
  325.    g_price_252 = (g_price_196 + g_price_204) / 2.0;
  326.    g_price_244 = (g_price_188 + g_price_196) / 2.0;
  327.    g_price_236 = (g_price_172 + g_price_188) / 2.0;
  328.    g_price_228 = (g_price_172 + g_price_260) / 2.0;
  329.    g_price_220 = (g_price_260 + g_price_268) / 2.0;
  330.    g_price_276 = 2.0 * g_price_172 - (2.0 * gd_116 - gd_132);
  331.    g_price_212 = (g_price_268 + g_price_276) / 2.0;
  332.    if (gd_180 > 5.0) gd_284 = gd_180;
  333.    else gd_284 = 10000.0 * gd_180;
  334.    if (gd_300 > 5.0) gd_292 = gd_300;
  335.    else gd_292 = 10000.0 * gd_300;
  336.    ArrayCopyRates(gda_524, Symbol(), PERIOD_D1);
  337.    gd_356 = gda_524[1][4];
  338.    gd_unused_340 = gda_524[1][1];
  339.    gd_unused_364 = gda_524[0][1];
  340.    gd_332 = gda_524[1][3];
  341.    gd_348 = gda_524[1][2];
  342.    gd_316 = gda_524[0][3];
  343.    gd_324 = gda_524[0][2];
  344.    gd_516 = gd_316 - gd_324;
  345.    gd_396 = gd_332 - gd_348;
  346.    g_price_388 = (gd_332 + gd_348 + gd_356) / 3.0;
  347.    g_price_404 = 2.0 * g_price_388 - gd_348;
  348.    g_price_476 = 2.0 * g_price_388 - gd_332;
  349.    g_price_412 = g_price_388 + (gd_332 - gd_348);
  350.    g_price_484 = g_price_388 - (gd_332 - gd_348);
  351.    g_price_420 = 2.0 * g_price_388 + (gd_332 - 2.0 * gd_348);
  352.    g_price_468 = (g_price_412 + g_price_420) / 2.0;
  353.    g_price_460 = (g_price_404 + g_price_412) / 2.0;
  354.    g_price_452 = (g_price_388 + g_price_404) / 2.0;
  355.    g_price_444 = (g_price_388 + g_price_476) / 2.0;
  356.    g_price_436 = (g_price_476 + g_price_484) / 2.0;
  357.    g_price_492 = 2.0 * g_price_388 - (2.0 * gd_332 - gd_348);
  358.    g_price_428 = (g_price_484 + g_price_492) / 2.0;
  359.    if (gd_396 > 5.0) gd_500 = gd_396;
  360.    else gd_500 = 10000.0 * gd_396;
  361.    if (gd_516 > 5.0) gd_508 = gd_516;
  362.    else gd_508 = 10000.0 * gd_516;
  363.    ArrayCopyRates(gda_740, Symbol(), PERIOD_W1);
  364.    gd_572 = gda_740[1][4];
  365.    gd_unused_556 = gda_740[1][1];
  366.    gd_unused_580 = gda_740[0][1];
  367.    gd_548 = gda_740[1][3];
  368.    gd_564 = gda_740[1][2];
  369.    gd_532 = gda_740[0][3];
  370.    gd_540 = gda_740[0][2];
  371.    gd_732 = gd_532 - gd_540;
  372.    gd_612 = gd_548 - gd_564;
  373.    g_price_604 = (gd_548 + gd_564 + gd_572) / 3.0;
  374.    g_price_620 = 2.0 * g_price_604 - gd_564;
  375.    g_price_692 = 2.0 * g_price_604 - gd_548;
  376.    g_price_628 = g_price_604 + (gd_548 - gd_564);
  377.    g_price_700 = g_price_604 - (gd_548 - gd_564);
  378.    g_price_636 = 2.0 * g_price_604 + (gd_548 - 2.0 * gd_564);
  379.    g_price_684 = (g_price_628 + g_price_636) / 2.0;
  380.    g_price_676 = (g_price_620 + g_price_628) / 2.0;
  381.    g_price_668 = (g_price_604 + g_price_620) / 2.0;
  382.    g_price_660 = (g_price_604 + g_price_692) / 2.0;
  383.    g_price_652 = (g_price_692 + g_price_700) / 2.0;
  384.    g_price_708 = 2.0 * g_price_604 - (2.0 * gd_548 - gd_564);
  385.    g_price_644 = (g_price_700 + g_price_708) / 2.0;
  386.    if (gd_612 > 5.0) gd_716 = gd_612;
  387.    else gd_716 = 10000.0 * gd_612;
  388.    if (gd_732 > 5.0) gd_724 = gd_732;
  389.    else gd_724 = 10000.0 * gd_732;
  390.    ArrayCopyRates(gda_956, Symbol(), PERIOD_MN1);
  391.    gd_788 = gda_956[1][4];
  392.    gd_unused_772 = gda_956[1][1];
  393.    gd_unused_796 = gda_956[0][1];
  394.    gd_764 = gda_956[1][3];
  395.    gd_780 = gda_956[1][2];
  396.    gd_748 = gda_956[0][3];
  397.    gd_756 = gda_956[0][2];
  398.    gd_948 = gd_748 - gd_756;
  399.    gd_828 = gd_764 - gd_780;
  400.    g_price_820 = (gd_764 + gd_780 + gd_788) / 3.0;
  401.    g_price_836 = 2.0 * g_price_820 - gd_780;
  402.    g_price_908 = 2.0 * g_price_820 - gd_764;
  403.    g_price_844 = g_price_820 + (gd_764 - gd_780);
  404.    g_price_916 = g_price_820 - (gd_764 - gd_780);
  405.    g_price_852 = 2.0 * g_price_820 + (gd_764 - 2.0 * gd_780);
  406.    g_price_900 = (g_price_844 + g_price_852) / 2.0;
  407.    g_price_892 = (g_price_836 + g_price_844) / 2.0;
  408.    g_price_884 = (g_price_820 + g_price_836) / 2.0;
  409.    g_price_876 = (g_price_820 + g_price_908) / 2.0;
  410.    g_price_868 = (g_price_908 + g_price_916) / 2.0;
  411.    g_price_924 = 2.0 * g_price_820 - (2.0 * gd_764 - gd_780);
  412.    g_price_860 = (g_price_916 + g_price_924) / 2.0;
  413.    if (gd_828 > 5.0) gd_932 = gd_828;
  414.    else gd_932 = 10000.0 * gd_828;
  415.    if (gd_948 > 5.0) gd_940 = gd_948;
  416.    else gd_940 = 10000.0 * gd_948;
  417.    if (Fhr == TRUE) {
  418.       if (ObjectFind("Fhr_R1 label") != 0) {
  419.          ObjectCreate("Fhr_R1 label", OBJ_TEXT, 0, Time[0], g_price_188);
  420.          ObjectSetText("Fhr_R1 label", "Fhr_R1 " + DoubleToStr(g_price_188, 4), 8, "Arial", CLR_NONE);
  421.       } else ObjectMove("Fhr_R1 label", 0, Time[0], g_price_188);
  422.       if (ObjectFind("Fhr_R2 label") != 0) {
  423.          ObjectCreate("Fhr_R2 label", OBJ_TEXT, 0, Time[20], g_price_196);
  424.          ObjectSetText("Fhr_R2 label", "Fhr_R2 " + DoubleToStr(g_price_196, 4), 8, "Arial", CLR_NONE);
  425.       } else ObjectMove("Fhr_R2 label", 0, Time[0], g_price_196);
  426.       if (ObjectFind("Fhr_R3 label") != 0) {
  427.          ObjectCreate("Fhr_R3 label", OBJ_TEXT, 0, Time[20], g_price_204);
  428.          ObjectSetText("Fhr_R3 label", "Fhr_R3 " + DoubleToStr(g_price_204, 4), 8, "Arial", CLR_NONE);
  429.       } else ObjectMove("Fhr_R3 label", 0, Time[0], g_price_204);
  430.       if (ObjectFind("Fhr_P label") != 0) {
  431.          ObjectCreate("Fhr_P label", OBJ_TEXT, 0, Time[0], g_price_172);
  432.          ObjectSetText("Fhr_P label", "Fhr_Pivot " + DoubleToStr(g_price_172, 4), 8, "Arial", CLR_NONE);
  433.       } else ObjectMove("Fhr_P label", 0, Time[0], g_price_172);
  434.       if (ObjectFind("Fhr_S1 label") != 0) {
  435.          ObjectCreate("Fhr_S1 label", OBJ_TEXT, 0, Time[0], g_price_260);
  436.          ObjectSetText("Fhr_S1 label", "Fhr_S1 " + DoubleToStr(g_price_260, 4), 8, "Arial", CLR_NONE);
  437.       } else ObjectMove("Fhr_S1 label", 0, Time[0], g_price_260);
  438.       if (ObjectFind("Fhr_S2 label") != 0) {
  439.          ObjectCreate("Fhr_S2 label", OBJ_TEXT, 0, Time[20], g_price_268);
  440.          ObjectSetText("Fhr_S2 label", "Fhr_S2 " + DoubleToStr(g_price_268, 4), 8, "Arial", CLR_NONE);
  441.       } else ObjectMove("Fhr_S2 label", 0, Time[0], g_price_268);
  442.       if (ObjectFind("Fhr_S3 label") != 0) {
  443.          ObjectCreate("Fhr_S3 label", OBJ_TEXT, 0, Time[20], g_price_276);
  444.          ObjectSetText("Fhr_S3 label", "Fhr_S3 " + DoubleToStr(g_price_276, 4), 8, "Arial", CLR_NONE);
  445.       } else ObjectMove("Fhr_S3 label", 0, Time[0], g_price_276);
  446.       if (ObjectFind("Fhr_S1 line") != 0) {
  447.          ObjectCreate("Fhr_S1 line", OBJ_HLINE, 0, Time[0], g_price_260);
  448.          ObjectSet("Fhr_S1 line", OBJPROP_STYLE, STYLE_SOLID);
  449.          ObjectSet("Fhr_S1 line", OBJPROP_WIDTH, 1);
  450.          ObjectSet("Fhr_S1 line", OBJPROP_COLOR, Blue);
  451.       } else ObjectMove("Fhr_S1 line", 0, Time[40], g_price_260);
  452.       if (ObjectFind("Fhr_S2 line") != 0) {
  453.          ObjectCreate("Fhr_S2 line", OBJ_HLINE, 0, Time[40], g_price_268, Time[0], g_price_268);
  454.          ObjectSet("Fhr_S2 line", OBJPROP_STYLE, STYLE_SOLID);
  455.          ObjectSet("Fhr_S2 line", OBJPROP_WIDTH, 1);
  456.          ObjectSet("Fhr_S2 line", OBJPROP_COLOR, Blue);
  457.       } else ObjectMove("Fhr_S2 line", 0, Time[40], g_price_268);
  458.       if (ObjectFind("Fhr_S3 line") != 0) {
  459.          ObjectCreate("Fhr_S3 line", OBJ_HLINE, 0, Time[40], g_price_276, Time[0], g_price_276);
  460.          ObjectSet("Fhr_S3 line", OBJPROP_STYLE, STYLE_SOLID);
  461.          ObjectSet("Fhr_S3 line", OBJPROP_WIDTH, 1);
  462.          ObjectSet("Fhr_S3 line", OBJPROP_COLOR, Blue);
  463.       } else ObjectMove("Fhr_S3 line", 0, Time[40], g_price_276);
  464.       if (ObjectFind("Fhr_P line") != 0) {
  465.          ObjectCreate("Fhr_P line", OBJ_HLINE, 0, Time[40], g_price_172, Time[0], g_price_172);
  466.          ObjectSet("Fhr_P line", OBJPROP_STYLE, STYLE_SOLID);
  467.          ObjectSet("Fhr_P line", OBJPROP_WIDTH, 1);
  468.          ObjectSet("Fhr_P line", OBJPROP_COLOR, LightBlue);
  469.       } else ObjectMove("Fhr_P line", 0, Time[40], g_price_172);
  470.       if (ObjectFind("Fhr_R1 line") != 0) {
  471.          ObjectCreate("Fhr_R1 line", OBJ_HLINE, 0, Time[40], g_price_188, Time[0], g_price_188);
  472.          ObjectSet("Fhr_R1 line", OBJPROP_STYLE, STYLE_SOLID);
  473.          ObjectSet("Fhr_R1 line", OBJPROP_WIDTH, 1);
  474.          ObjectSet("Fhr_R1 line", OBJPROP_COLOR, Red);
  475.       } else ObjectMove("Fhr_R1 line", 0, Time[40], g_price_188);
  476.       if (ObjectFind("Fhr_R2 line") != 0) {
  477.          ObjectCreate("Fhr_R2 line", OBJ_HLINE, 0, Time[0], g_price_196);
  478.          ObjectSet("Fhr_R2 line", OBJPROP_STYLE, STYLE_SOLID);
  479.          ObjectSet("Fhr_R2 line", OBJPROP_WIDTH, 1);
  480.          ObjectSet("Fhr_R2 line", OBJPROP_COLOR, Red);
  481.       } else ObjectMove("Fhr_R2 line", 0, Time[40], g_price_196);
  482.       if (ObjectFind("Fhr_R3 line") != 0) {
  483.          ObjectCreate("Fhr_R3 line", OBJ_HLINE, 0, Time[40], g_price_204, Time[0], g_price_204);
  484.          ObjectSet("Fhr_R3 line", OBJPROP_STYLE, STYLE_SOLID);
  485.          ObjectSet("Fhr_R3 line", OBJPROP_WIDTH, 1);
  486.          ObjectSet("Fhr_R3 line", OBJPROP_COLOR, Red);
  487.       } else ObjectMove("Fhr_R3 line", 0, Time[40], g_price_204);
  488.    }
  489.    if (Fhr == TRUE && midpivots == TRUE) {
  490.       if (ObjectFind("Fhr_M5 label") != 0) {
  491.          ObjectCreate("Fhr_M5 label", OBJ_TEXT, 0, Time[20], g_price_252);
  492.          ObjectSetText("Fhr_M5 label", " Fhr_M5 " + DoubleToStr(g_price_252, 4), 8, "Arial", CLR_NONE);
  493.       } else ObjectMove("Fhr_M5 label", 0, Time[0], g_price_252);
  494.       if (ObjectFind("Fhr_M4 label") != 0) {
  495.          ObjectCreate("Fhr_M4 label", OBJ_TEXT, 0, Time[20], g_price_244);
  496.          ObjectSetText("Fhr_M4 label", "Fhr_M4 " + DoubleToStr(g_price_244, 4), 8, "Arial", CLR_NONE);
  497.       } else ObjectMove("Fhr_M4 label", 0, Time[0], g_price_244);
  498.       if (ObjectFind("Fhr_M3 label") != 0) {
  499.          ObjectCreate("Fhr_M3 label", OBJ_TEXT, 0, Time[20], g_price_236);
  500.          ObjectSetText("Fhr_M3 label", "Fhr_M3 " + DoubleToStr(g_price_236, 4), 8, "Arial", CLR_NONE);
  501.       } else ObjectMove("Fhr_M3 label", 0, Time[0], g_price_236);
  502.       if (ObjectFind("Fhr_M2 label") != 0) {
  503.          ObjectCreate("Fhr_M2 label", OBJ_TEXT, 0, Time[20], g_price_228);
  504.          ObjectSetText("Fhr_M2 label", "Fhr_M2 " + DoubleToStr(g_price_228, 4), 8, "Arial", CLR_NONE);
  505.       } else ObjectMove("Fhr_M2 label", 0, Time[0], g_price_228);
  506.       if (ObjectFind("Fhr_M1 label") != 0) {
  507.          ObjectCreate("Fhr_M1 label", OBJ_TEXT, 0, Time[20], g_price_220);
  508.          ObjectSetText("Fhr_M1 label", "Fhr_M1 " + DoubleToStr(g_price_220, 4), 8, "Arial", CLR_NONE);
  509.       } else ObjectMove("Fhr_M1 label", 0, Time[0], g_price_220);
  510.       if (ObjectFind("Fhr_M0 label") != 0) {
  511.          ObjectCreate("Fhr_M0 label", OBJ_TEXT, 0, Time[20], g_price_212);
  512.          ObjectSetText("Fhr_M0 label", "Fhr_M0 " + DoubleToStr(g_price_212, 4), 8, "Arial", CLR_NONE);
  513.       } else ObjectMove("Fhr_M0 label", 0, Time[0], g_price_212);
  514.       if (ObjectFind("Fhr_M5 line") != 0) {
  515.          ObjectCreate("Fhr_M5 line", OBJ_HLINE, 0, Time[0], g_price_252, Time[0], g_price_252);
  516.          ObjectSet("Fhr_M5 line", OBJPROP_STYLE, STYLE_SOLID);
  517.          ObjectSet("Fhr_M5 line", OBJPROP_WIDTH, 1);
  518.          ObjectSet("Fhr_M5 line", OBJPROP_COLOR, Red);
  519.       } else ObjectMove("Fhr_M5 line", 0, Time[40], g_price_252);
  520.       if (ObjectFind("Fhr_M4 line") != 0) {
  521.          ObjectCreate("Fhr_M4 line", OBJ_HLINE, 0, Time[40], g_price_244, Time[0], g_price_244);
  522.          ObjectSet("Fhr_M4 line", OBJPROP_STYLE, STYLE_SOLID);
  523.          ObjectSet("Fhr_M4 line", OBJPROP_WIDTH, 1);
  524.          ObjectSet("Fhr_M4 line", OBJPROP_COLOR, Red);
  525.       } else ObjectMove("Fhr_M4 line", 0, Time[40], g_price_244);
  526.       if (ObjectFind("Fhr_M3 line") != 0) {
  527.          ObjectCreate("Fhr_M3 line", OBJ_HLINE, 0, Time[0], g_price_236, Time[0], g_price_236);
  528.          ObjectSet("Fhr_M3 line", OBJPROP_STYLE, STYLE_SOLID);
  529.          ObjectSet("Fhr_M3 line", OBJPROP_WIDTH, 1);
  530.          ObjectSet("Fhr_M3 line", OBJPROP_COLOR, Red);
  531.       } else ObjectMove("Fhr_M3 line", 0, Time[40], g_price_236);
  532.       if (ObjectFind("Fhr_M2 line") != 0) {
  533.          ObjectCreate("Fhr_M2 line", OBJ_HLINE, 0, Time[40], g_price_228);
  534.          ObjectSet("Fhr_M2 line", OBJPROP_STYLE, STYLE_SOLID);
  535.          ObjectSet("Fhr_M2 line", OBJPROP_WIDTH, 1);
  536.          ObjectSet("Fhr_M2 line", OBJPROP_COLOR, Blue);
  537.       } else ObjectMove("Fhr_M2 line", 0, Time[40], g_price_228);
  538.       if (ObjectFind("Fhr_M1 line") != 0) {
  539.          ObjectCreate("Fhr_M1 line", OBJ_HLINE, 0, Time[40], g_price_220);
  540.          ObjectSet("Fhr_M1 line", OBJPROP_STYLE, STYLE_SOLID);
  541.          ObjectSet("Fhr_M1 line", OBJPROP_WIDTH, 1);
  542.          ObjectSet("Fhr_M1 line", OBJPROP_COLOR, Blue);
  543.       } else ObjectMove("Fhr_M1 line", 0, Time[40], g_price_220);
  544.       if (ObjectFind("Fhr_M0 line") != 0) {
  545.          ObjectCreate("Fhr_M0 line", OBJ_HLINE, 0, Time[40], g_price_212);
  546.          ObjectSet("Fhr_M0 line", OBJPROP_STYLE, STYLE_SOLID);
  547.          ObjectSet("Fhr_M0 line", OBJPROP_WIDTH, 1);
  548.          ObjectSet("Fhr_M0 line", OBJPROP_COLOR, Blue);
  549.       } else ObjectMove("Fhr_M0 line", 0, Time[40], g_price_212);
  550.    }
  551.    if (daily == TRUE) {
  552.       if (ObjectFind("D_R1 label") != 0) {
  553.          ObjectCreate("D_R1 label", OBJ_TEXT, 0, Time[20], g_price_404);
  554.          ObjectSetText("D_R1 label", "                              D_R1 " + DoubleToStr(g_price_404, 4), 8, "Arial", CLR_NONE);
  555.       } else ObjectMove("     D_R1 label", 0, Time[0], g_price_404);
  556.       if (ObjectFind("D_R2 label") != 0) {
  557.          ObjectCreate("D_R2 label", OBJ_TEXT, 0, Time[20], g_price_412);
  558.          ObjectSetText("D_R2 label", "                              D_R2 " + DoubleToStr(g_price_412, 4), 8, "Arial", CLR_NONE);
  559.       } else ObjectMove("D_R2 label", 0, Time[0], g_price_412);
  560.       if (ObjectFind("D_R3 label") != 0) {
  561.          ObjectCreate("D_R3 label", OBJ_TEXT, 0, Time[20], g_price_420);
  562.          ObjectSetText("D_R3 label", "                              D_R3 " + DoubleToStr(g_price_420, 4), 8, "Arial", CLR_NONE);
  563.       } else ObjectMove("D_R3 label", 0, Time[0], g_price_420);
  564.       if (ObjectFind("D_P label") != 0) {
  565.          ObjectCreate("D_P label", OBJ_TEXT, 0, Time[0], g_price_388);
  566.          ObjectSetText("D_P label", "                               D_Pivot " + DoubleToStr(g_price_388, 4), 8, "Arial", CLR_NONE);
  567.       } else ObjectMove("D_P label", 0, Time[0], g_price_388);
  568.       if (ObjectFind("D_S1 label") != 0) {
  569.          ObjectCreate("D_S1 label", OBJ_TEXT, 0, Time[0], g_price_476);
  570.          ObjectSetText("D_S1 label", "                              D_S1 " + DoubleToStr(g_price_476, 4), 8, "Arial", CLR_NONE);
  571.       } else ObjectMove("D_S1 label", 0, Time[0], g_price_476);
  572.       if (ObjectFind("D_S2 label") != 0) {
  573.          ObjectCreate("D_S2 label", OBJ_TEXT, 0, Time[20], g_price_484);
  574.          ObjectSetText("D_S2 label", "                              D_S2 " + DoubleToStr(g_price_484, 4), 8, "Arial", CLR_NONE);
  575.       } else ObjectMove("D_S2 label", 0, Time[0], g_price_484);
  576.       if (ObjectFind("D_S3 label") != 0) {
  577.          ObjectCreate("D_S3 label", OBJ_TEXT, 0, Time[20], g_price_492);
  578.          ObjectSetText("D_S3 label", "                              D_S3 " + DoubleToStr(g_price_492, 4), 8, "Arial", CLR_NONE);
  579.       } else ObjectMove("D_S3 label", 0, Time[0], g_price_492);
  580.       if (ObjectFind("D_S1 line") != 0) {
  581.          ObjectCreate("D_S1 line", OBJ_HLINE, 0, Time[0], g_price_476, Time[0], g_price_476);
  582.          ObjectSet("D_S1 line", OBJPROP_STYLE, STYLE_SOLID);
  583.          ObjectSet("D_S1 line", OBJPROP_WIDTH, 1);
  584.          ObjectSet("D_S1 line", OBJPROP_COLOR, Blue);
  585.       } else ObjectMove("D_S1 line", 0, Time[40], g_price_476);
  586.       if (ObjectFind("D_S2 line") != 0) {
  587.          ObjectCreate("D_S2 line", OBJ_HLINE, 0, Time[40], g_price_484);
  588.          ObjectSet("D_S2 line", OBJPROP_STYLE, STYLE_SOLID);
  589.          ObjectSet("D_S2 line", OBJPROP_WIDTH, 1);
  590.          ObjectSet("D_S2 line", OBJPROP_COLOR, Blue);
  591.       } else ObjectMove("D_S2 line", 0, Time[40], g_price_484);
  592.       if (ObjectFind("D_S3 line") != 0) {
  593.          ObjectCreate("D_S3 line", OBJ_HLINE, 0, Time[40], g_price_492);
  594.          ObjectSet("D_S3 line", OBJPROP_STYLE, STYLE_SOLID);
  595.          ObjectSet("D_S3 line", OBJPROP_WIDTH, 1);
  596.          ObjectSet("D_S3 line", OBJPROP_COLOR, Blue);
  597.       } else ObjectMove("D_S3 line", 0, Time[40], g_price_492);
  598.       if (ObjectFind("D_P line") != 0) {
  599.          ObjectCreate("D_P line", OBJ_HLINE, 0, Time[40], g_price_388);
  600.          ObjectSet("D_P line", OBJPROP_STYLE, STYLE_SOLID);
  601.          ObjectSet("D_P line", OBJPROP_WIDTH, 1);
  602.          ObjectSet("D_P line", OBJPROP_COLOR, LightBlue);
  603.       } else ObjectMove("D_P line", 0, Time[40], g_price_388);
  604.       if (ObjectFind("D_R1 line") != 0) {
  605.          ObjectCreate("D_R1 line", OBJ_HLINE, 0, Time[40], g_price_404);
  606.          ObjectSet("D_R1 line", OBJPROP_STYLE, STYLE_SOLID);
  607.          ObjectSet("D_R1 line", OBJPROP_WIDTH, 1);
  608.          ObjectSet("D_R1 line", OBJPROP_COLOR, Red);
  609.       } else ObjectMove("D_R1 line", 0, Time[40], g_price_404);
  610.       if (ObjectFind("D_R2 line") != 0) {
  611.          ObjectCreate("D_R2 line", OBJ_HLINE, 0, Time[40], g_price_412);
  612.          ObjectSet("D_R2 line", OBJPROP_STYLE, STYLE_SOLID);
  613.          ObjectSet("D_R2 line", OBJPROP_WIDTH, 1);
  614.          ObjectSet("D_R2 line", OBJPROP_COLOR, Red);
  615.       } else ObjectMove("D_R2 line", 0, Time[40], g_price_412);
  616.       if (ObjectFind("D_R3 line") != 0) {
  617.          ObjectCreate("D_R3 line", OBJ_HLINE, 0, Time[40], g_price_420);
  618.          ObjectSet("D_R3 line", OBJPROP_STYLE, STYLE_SOLID);
  619.          ObjectSet("D_R3 line", OBJPROP_WIDTH, 1);
  620.          ObjectSet("D_R3 line", OBJPROP_COLOR, Red);
  621.       } else ObjectMove("D_R3 line", 0, Time[40], g_price_420);
  622.    }
  623.    if (daily == TRUE && midpivots == TRUE) {
  624.       if (ObjectFind("D_M5 label") != 0) {
  625.          ObjectCreate("D_M5 label", OBJ_TEXT, 0, Time[20], g_price_468);
  626.          ObjectSetText("D_M5 label", "                              D_M5 " + DoubleToStr(g_price_468, 4), 8, "Arial", CLR_NONE);
  627.       } else ObjectMove("D_M5 label", 0, Time[0], g_price_468);
  628.       if (ObjectFind("D_M4 label") != 0) {
  629.          ObjectCreate("D_M4 label", OBJ_TEXT, 0, Time[20], g_price_460);
  630.          ObjectSetText("D_M4 label", "                              D_M4 " + DoubleToStr(g_price_460, 4), 8, "Arial", CLR_NONE);
  631.       } else ObjectMove("D_M4 label", 0, Time[0], g_price_460);
  632.       if (ObjectFind("D_M3 label") != 0) {
  633.          ObjectCreate("D_M3 label", OBJ_TEXT, 0, Time[20], g_price_452);
  634.          ObjectSetText("D_M3 label", "                              D_M3 " + DoubleToStr(g_price_452, 4), 8, "Arial", CLR_NONE);
  635.       } else ObjectMove("D_M3 label", 0, Time[0], g_price_452);
  636.       if (ObjectFind("D_M2 label") != 0) {
  637.          ObjectCreate("D_M2 label", OBJ_TEXT, 0, Time[20], g_price_444);
  638.          ObjectSetText("D_M2 label", "                              D_M2 " + DoubleToStr(g_price_444, 4), 8, "Arial", CLR_NONE);
  639.       } else ObjectMove("D_M2 label", 0, Time[0], g_price_444);
  640.       if (ObjectFind("D_M1 label") != 0) {
  641.          ObjectCreate("D_M1 label", OBJ_TEXT, 0, Time[20], g_price_436);
  642.          ObjectSetText("D_M1 label", "                              D_M1 " + DoubleToStr(g_price_436, 4), 8, "Arial", CLR_NONE);
  643.       } else ObjectMove("D_M1 label", 0, Time[0], g_price_436);
  644.       if (ObjectFind("D_M0 label") != 0) {
  645.          ObjectCreate("D_M0 label", OBJ_TEXT, 0, Time[20], g_price_428);
  646.          ObjectSetText("D_M0 label", "                              D_M0 " + DoubleToStr(g_price_428, 4), 8, "Arial", CLR_NONE);
  647.       } else ObjectMove("D_M0 label", 0, Time[0], g_price_428);
  648.       if (ObjectFind("D_M5 line") != 0) {
  649.          ObjectCreate("D_M5 line", OBJ_HLINE, 0, Time[40], g_price_468);
  650.          ObjectSet("D_M5 line", OBJPROP_STYLE, STYLE_SOLID);
  651.          ObjectSet("D_M5 line", OBJPROP_WIDTH, 1);
  652.          ObjectSet("D_M5 line", OBJPROP_COLOR, Red);
  653.       } else ObjectMove("D_M5 line", 0, Time[40], g_price_468);
  654.       if (ObjectFind("D_M4 line") != 0) {
  655.          ObjectCreate("D_M4 line", OBJ_HLINE, 0, Time[40], g_price_460);
  656.          ObjectSet("D_M4 line", OBJPROP_STYLE, STYLE_SOLID);
  657.          ObjectSet("D_M4 line", OBJPROP_WIDTH, 1);
  658.          ObjectSet("D_M4 line", OBJPROP_COLOR, Red);
  659.       } else ObjectMove("D_M4 line", 0, Time[40], g_price_460);
  660.       if (ObjectFind("D_M3 line") != 0) {
  661.          ObjectCreate("D_M3 line", OBJ_HLINE, 0, Time[40], g_price_452);
  662.          ObjectSet("D_M3 line", OBJPROP_STYLE, STYLE_SOLID);
  663.          ObjectSet("D_M3 line", OBJPROP_WIDTH, 1);
  664.          ObjectSet("D_M3 line", OBJPROP_COLOR, Red);
  665.       } else ObjectMove("D_M3 line", 0, Time[40], g_price_452);
  666.       if (ObjectFind("D_M2 line") != 0) {
  667.          ObjectCreate("D_M2 line", OBJ_HLINE, 0, Time[40], g_price_444);
  668.          ObjectSet("D_M2 line", OBJPROP_STYLE, STYLE_SOLID);
  669.          ObjectSet("D_M2 line", OBJPROP_WIDTH, 1);
  670.          ObjectSet("D_M2 line", OBJPROP_COLOR, Blue);
  671.       } else ObjectMove("D_M2 line", 0, Time[40], g_price_444);
  672.       if (ObjectFind("D_M1 line") != 0) {
  673.          ObjectCreate("D_M1 line", OBJ_HLINE, 0, Time[40], g_price_436);
  674.          ObjectSet("D_M1 line", OBJPROP_STYLE, STYLE_SOLID);
  675.          ObjectSet("D_M1 line", OBJPROP_WIDTH, 1);
  676.          ObjectSet("D_M1 line", OBJPROP_COLOR, Blue);
  677.       } else ObjectMove("D_M1 line", 0, Time[40], g_price_436);
  678.       if (ObjectFind("D_M0 line") != 0) {
  679.          ObjectCreate("D_M0 line", OBJ_HLINE, 0, Time[40], g_price_428);
  680.          ObjectSet("D_M0 line", OBJPROP_STYLE, STYLE_SOLID);
  681.          ObjectSet("D_M0 line", OBJPROP_WIDTH, 1);
  682.          ObjectSet("D_M0 line", OBJPROP_COLOR, Blue);
  683.       } else ObjectMove("D_M0 line", 0, Time[40], g_price_428);
  684.    }
  685.    if (weekly == TRUE) {
  686.       if (ObjectFind("W_R1 label") != 0) {
  687.          ObjectCreate("W_R1 label", OBJ_TEXT, 0, Time[0], g_price_620);
  688.          ObjectSetText("W_R1 label", "W_R1 " + DoubleToStr(g_price_620, 4), 8, "Arial", CLR_NONE);
  689.       } else ObjectMove("W_R1 label", 0, Time[0], g_price_620);
  690.       if (ObjectFind("W_R2 label") != 0) {
  691.          ObjectCreate("W_R2 label", OBJ_TEXT, 0, Time[20], g_price_628);
  692.          ObjectSetText("W_R2 label", "W_R2 " + DoubleToStr(g_price_628, 4), 8, "Arial", CLR_NONE);
  693.       } else ObjectMove("W_R2 label", 0, Time[0], g_price_628);
  694.       if (ObjectFind("W_R3 label") != 0) {
  695.          ObjectCreate("W_R3 label", OBJ_TEXT, 0, Time[20], g_price_636);
  696.          ObjectSetText("W_R3 label", "W_R3 " + DoubleToStr(g_price_636, 4), 8, "Arial", CLR_NONE);
  697.       } else ObjectMove("W_R3 label", 0, Time[0], g_price_636);
  698.       if (ObjectFind("W_P label") != 0) {
  699.          ObjectCreate("W_P label", OBJ_TEXT, 0, Time[0], g_price_604);
  700.          ObjectSetText("W_P label", "W_Pivot " + DoubleToStr(g_price_604, 4), 8, "Arial", CLR_NONE);
  701.       } else ObjectMove("W_P label", 0, Time[0], g_price_604);
  702.       if (ObjectFind("W_S1 label") != 0) {
  703.          ObjectCreate("W_S1 label", OBJ_TEXT, 0, Time[0], g_price_692);
  704.          ObjectSetText("W_S1 label", "W_S1 " + DoubleToStr(g_price_692, 4), 8, "Arial", CLR_NONE);
  705.       } else ObjectMove("W_S1 label", 0, Time[0], g_price_692);
  706.       if (ObjectFind("W_S2 label") != 0) {
  707.          ObjectCreate("W_S2 label", OBJ_TEXT, 0, Time[20], g_price_700);
  708.          ObjectSetText("W_S2 label", "W_S2 " + DoubleToStr(g_price_700, 4), 8, "Arial", CLR_NONE);
  709.       } else ObjectMove("W_S2 label", 0, Time[0], g_price_700);
  710.       if (ObjectFind("W_S3 label") != 0) {
  711.          ObjectCreate("W_S3 label", OBJ_TEXT, 0, Time[20], g_price_708);
  712.          ObjectSetText("W_S3 label", "W_S3 " + DoubleToStr(g_price_708, 4), 8, "Arial", CLR_NONE);
  713.       } else ObjectMove("W_S3 label", 0, Time[0], g_price_708);
  714.       if (ObjectFind("W_S1 line") != 0) {
  715.          ObjectCreate("W_S1 line", OBJ_HLINE, 0, Time[40], g_price_692);
  716.          ObjectSet("W_S1 line", OBJPROP_STYLE, STYLE_SOLID);
  717.          ObjectSet("W_S1 line", OBJPROP_WIDTH, 1);
  718.          ObjectSet("W_S1 line", OBJPROP_COLOR, Blue);
  719.       } else ObjectMove("W_S1 line", 0, Time[40], g_price_692);
  720.       if (ObjectFind("W_S2 line") != 0) {
  721.          ObjectCreate("W_S2 line", OBJ_HLINE, 0, Time[40], g_price_700);
  722.          ObjectSet("W_S2 line", OBJPROP_STYLE, STYLE_SOLID);
  723.          ObjectSet("W_S2 line", OBJPROP_WIDTH, 1);
  724.          ObjectSet("W_S2 line", OBJPROP_COLOR, Blue);
  725.       } else ObjectMove("W_S2 line", 0, Time[40], g_price_700);
  726.       if (ObjectFind("W_S3 line") != 0) {
  727.          ObjectCreate("W_S3 line", OBJ_HLINE, 0, Time[40], g_price_708);
  728.          ObjectSet("W_S3 line", OBJPROP_STYLE, STYLE_SOLID);
  729.          ObjectSet("W_S3 line", OBJPROP_WIDTH, 1);
  730.          ObjectSet("W_S3 line", OBJPROP_COLOR, Blue);
  731.       } else ObjectMove("W_S3 line", 0, Time[40], g_price_708);
  732.       if (ObjectFind("W_P line") != 0) {
  733.          ObjectCreate("W_P line", OBJ_HLINE, 0, Time[40], g_price_604);
  734.          ObjectSet("W_P line", OBJPROP_STYLE, STYLE_SOLID);
  735.          ObjectSet("W_P line", OBJPROP_WIDTH, 1);
  736.          ObjectSet("W_P line", OBJPROP_COLOR, LightBlue);
  737.       } else ObjectMove("W_P line", 0, Time[40], g_price_604);
  738.       if (ObjectFind("W_R1 line") != 0) {
  739.          ObjectCreate("W_R1 line", OBJ_HLINE, 0, Time[40], g_price_620);
  740.          ObjectSet("W_R1 line", OBJPROP_STYLE, STYLE_SOLID);
  741.          ObjectSet("W_R1 line", OBJPROP_WIDTH, 1);
  742.          ObjectSet("W_R1 line", OBJPROP_COLOR, Red);
  743.       } else ObjectMove("W_R1 line", 0, Time[40], g_price_620);
  744.       if (ObjectFind("W_R2 line") != 0) {
  745.          ObjectCreate("W_R2 line", OBJ_HLINE, 0, Time[40], g_price_628);
  746.          ObjectSet("W_R2 line", OBJPROP_STYLE, STYLE_SOLID);
  747.          ObjectSet("W_R2 line", OBJPROP_WIDTH, 1);
  748.          ObjectSet("W_R2 line", OBJPROP_COLOR, Red);
  749.       } else ObjectMove("W_R2 line", 0, Time[40], g_price_628);
  750.       if (ObjectFind("W_R3 line") != 0) {
  751.          ObjectCreate("W_R3 line", OBJ_HLINE, 0, Time[40], g_price_636);
  752.          ObjectSet("W_R3 line", OBJPROP_STYLE, STYLE_SOLID);
  753.          ObjectSet("W_R3 line", OBJPROP_WIDTH, 1);
  754.          ObjectSet("W_R3 line", OBJPROP_COLOR, Red);
  755.       } else ObjectMove("W_R3 line", 0, Time[40], g_price_636);
  756.    }
  757.    if (weekly == TRUE && midpivots == TRUE) {
  758.       if (ObjectFind("W_M5 label") != 0) {
  759.          ObjectCreate("W_M5 label", OBJ_TEXT, 0, Time[20], g_price_684);
  760.          ObjectSetText("W_M5 label", "W_M5 " + DoubleToStr(g_price_684, 4), 8, "Arial", CLR_NONE);
  761.       } else ObjectMove("W_M5 label", 0, Time[0], g_price_684);
  762.       if (ObjectFind("W_M4 label") != 0) {
  763.          ObjectCreate("W_M4 label", OBJ_TEXT, 0, Time[20], g_price_676);
  764.          ObjectSetText("W_M4 label", "W_M4 " + DoubleToStr(g_price_676, 4), 8, "Arial", CLR_NONE);
  765.       } else ObjectMove("W_M4 label", 0, Time[0], g_price_676);
  766.       if (ObjectFind("W_M3 label") != 0) {
  767.          ObjectCreate("W_M3 label", OBJ_TEXT, 0, Time[20], g_price_668);
  768.          ObjectSetText("W_M3 label", "W_M3 " + DoubleToStr(g_price_668, 4), 8, "Arial", CLR_NONE);
  769.       } else ObjectMove("W_M3 label", 0, Time[0], g_price_668);
  770.       if (ObjectFind("W_M2 label") != 0) {
  771.          ObjectCreate("W_M2 label", OBJ_TEXT, 0, Time[20], g_price_660);
  772.          ObjectSetText("W_M2 label", "W_M2 " + DoubleToStr(g_price_660, 4), 8, "Arial", CLR_NONE);
  773.       } else ObjectMove("W_M2 label", 0, Time[0], g_price_660);
  774.       if (ObjectFind("W_M1 label") != 0) {
  775.          ObjectCreate("W_M1 label", OBJ_TEXT, 0, Time[20], g_price_652);
  776.          ObjectSetText("W_M1 label", "W_M1 " + DoubleToStr(g_price_652, 4), 8, "Arial", CLR_NONE);
  777.       } else ObjectMove("W_M1 label", 0, Time[0], g_price_652);
  778.       if (ObjectFind("W_M0 label") != 0) {
  779.          ObjectCreate("W_M0 label", OBJ_TEXT, 0, Time[20], g_price_644);
  780.          ObjectSetText("W_M0 label", "W_M0 " + DoubleToStr(g_price_644, 4), 8, "Arial", CLR_NONE);
  781.       } else ObjectMove("W_M0 label", 0, Time[0], g_price_644);
  782.       if (ObjectFind("W_M5 line") != 0) {
  783.          ObjectCreate("W_M5 line", OBJ_HLINE, 0, Time[40], g_price_684);
  784.          ObjectSet("W_M5 line", OBJPROP_STYLE, STYLE_SOLID);
  785.          ObjectSet("W_M5 line", OBJPROP_WIDTH, 1);
  786.          ObjectSet("W_M5 line", OBJPROP_COLOR, Red);
  787.       } else ObjectMove("W_M5 line", 0, Time[40], g_price_684);
  788.       if (ObjectFind("W_M4 line") != 0) {
  789.          ObjectCreate("W_M4 line", OBJ_HLINE, 0, Time[40], g_price_676);
  790.          ObjectSet("W_M4 line", OBJPROP_STYLE, STYLE_SOLID);
  791.          ObjectSet("W_M4 line", OBJPROP_WIDTH, 1);
  792.          ObjectSet("W_M4 line", OBJPROP_COLOR, Red);
  793.       } else ObjectMove("W_M4 line", 0, Time[40], g_price_676);
  794.       if (ObjectFind("W_M3 line") != 0) {
  795.          ObjectCreate("W_M3 line", OBJ_HLINE, 0, Time[40], g_price_668);
  796.          ObjectSet("W_M3 line", OBJPROP_STYLE, STYLE_SOLID);
  797.          ObjectSet("W_M3 line", OBJPROP_WIDTH, 1);
  798.          ObjectSet("W_M3 line", OBJPROP_COLOR, Red);
  799.       } else ObjectMove("W_M3 line", 0, Time[40], g_price_668);
  800.       if (ObjectFind("W_M2 line") != 0) {
  801.          ObjectCreate("W_M2 line", OBJ_HLINE, 0, Time[40], g_price_660);
  802.          ObjectSet("W_M2 line", OBJPROP_STYLE, STYLE_SOLID);
  803.          ObjectSet("W_M2 line", OBJPROP_WIDTH, 1);
  804.          ObjectSet("W_M2 line", OBJPROP_COLOR, Blue);
  805.       } else ObjectMove("W_M2 line", 0, Time[40], g_price_660);
  806.       if (ObjectFind("W_M1 line") != 0) {
  807.          ObjectCreate("W_M1 line", OBJ_HLINE, 0, Time[40], g_price_652);
  808.          ObjectSet("W_M1 line", OBJPROP_STYLE, STYLE_SOLID);
  809.          ObjectSet("W_M1 line", OBJPROP_WIDTH, 1);
  810.          ObjectSet("W_M1 line", OBJPROP_COLOR, Blue);
  811.       } else ObjectMove("W_M1 line", 0, Time[40], g_price_652);
  812.       if (ObjectFind("W_M0 line") != 0) {
  813.          ObjectCreate("W_M0 line", OBJ_HLINE, 0, Time[40], g_price_644);
  814.          ObjectSet("W_M0 line", OBJPROP_STYLE, STYLE_SOLID);
  815.          ObjectSet("W_M0 line", OBJPROP_WIDTH, 1);
  816.          ObjectSet("W_M0 line", OBJPROP_COLOR, Blue);
  817.       } else ObjectMove("W_M0 line", 0, Time[40], g_price_644);
  818.    }
  819.    if (monthly == TRUE) {
  820.       if (ObjectFind("M_R1 label") != 0) {
  821.          ObjectCreate("M_R1 label", OBJ_TEXT, 0, Time[0], g_price_836);
  822.          ObjectSetText("M_R1 label", " M_R1 " + DoubleToStr(g_price_836, 4), 8, "Arial", CLR_NONE);
  823.       } else ObjectMove("M_R1 label", 0, Time[0], g_price_836);
  824.       if (ObjectFind("M_R2 label") != 0) {
  825.          ObjectCreate("M_R2 label", OBJ_TEXT, 0, Time[20], g_price_844);
  826.          ObjectSetText("M_R2 label", " M_R2 " + DoubleToStr(g_price_844, 4), 8, "Arial", CLR_NONE);
  827.       } else ObjectMove("M_R2 label", 0, Time[0], g_price_844);
  828.       if (ObjectFind("M_R3 label") != 0) {
  829.          ObjectCreate("M_R3 label", OBJ_TEXT, 0, Time[20], g_price_852);
  830.          ObjectSetText("M_R3 label", " M_R3 " + DoubleToStr(g_price_852, 4), 8, "Arial", CLR_NONE);
  831.       } else ObjectMove("M_R3 label", 0, Time[0], g_price_852);
  832.       if (ObjectFind("M_P label") != 0) {
  833.          ObjectCreate("M_P label", OBJ_TEXT, 0, Time[0], g_price_820);
  834.          ObjectSetText("M_P label", "M_Pivot " + DoubleToStr(g_price_820, 4), 8, "Arial", CLR_NONE);
  835.       } else ObjectMove("M_P label", 0, Time[0], g_price_820);
  836.       if (ObjectFind("M_S1 label") != 0) {
  837.          ObjectCreate("M_S1 label", OBJ_TEXT, 0, Time[0], g_price_908);
  838.          ObjectSetText("M_S1 label", "M_S1 " + DoubleToStr(g_price_908, 4), 8, "Arial", CLR_NONE);
  839.       } else ObjectMove("M_S1 label", 0, Time[0], g_price_908);
  840.       if (ObjectFind("M_S2 label") != 0) {
  841.          ObjectCreate("M_S2 label", OBJ_TEXT, 0, Time[20], g_price_916);
  842.          ObjectSetText("M_S2 label", "S2 " + DoubleToStr(g_price_916, 4), 8, "Arial", CLR_NONE);
  843.       } else ObjectMove("M_S2 label", 0, Time[0], g_price_916);
  844.       if (ObjectFind("M_S3 label") != 0) {
  845.          ObjectCreate("M_S3 label", OBJ_TEXT, 0, Time[20], g_price_924);
  846.          ObjectSetText("M_S3 label", "M_S3 " + DoubleToStr(g_price_924, 4), 8, "Arial", CLR_NONE);
  847.       } else ObjectMove("M_S3 label", 0, Time[0], g_price_924);
  848.       if (ObjectFind("M_S1 line") != 0) {
  849.          ObjectCreate("M_S1 line", OBJ_HLINE, 0, Time[40], g_price_908);
  850.          ObjectSet("M_S1 line", OBJPROP_STYLE, STYLE_SOLID);
  851.          ObjectSet("M_S1 line", OBJPROP_WIDTH, 1);
  852.          ObjectSet("M_S1 line", OBJPROP_COLOR, Blue);
  853.       } else ObjectMove("M_S1 line", 0, Time[40], g_price_908);
  854.       if (ObjectFind("M_S2 line") != 0) {
  855.          ObjectCreate("M_S2 line", OBJ_HLINE, 0, Time[40], g_price_916);
  856.          ObjectSet("M_S2 line", OBJPROP_STYLE, STYLE_SOLID);
  857.          ObjectSet("M_S2 line", OBJPROP_WIDTH, 1);
  858.          ObjectSet("M_S2 line", OBJPROP_COLOR, Blue);
  859.       } else ObjectMove("M_S2 line", 0, Time[40], g_price_916);
  860.       if (ObjectFind("M_S3 line") != 0) {
  861.          ObjectCreate("M_S3 line", OBJ_HLINE, 0, Time[40], g_price_924);
  862.          ObjectSet("M_S3 line", OBJPROP_STYLE, STYLE_SOLID);
  863.          ObjectSet("M_S3 line", OBJPROP_WIDTH, 1);
  864.          ObjectSet("M_S3 line", OBJPROP_COLOR, Blue);
  865.       } else ObjectMove("M_S3 line", 0, Time[40], g_price_924);
  866.       if (ObjectFind("M_P line") != 0) {
  867.          ObjectCreate("M_P line", OBJ_HLINE, 0, Time[40], g_price_820);
  868.          ObjectSet("M_P line", OBJPROP_STYLE, STYLE_SOLID);
  869.          ObjectSet("M_P line", OBJPROP_WIDTH, 1);
  870.          ObjectSet("M_P line", OBJPROP_COLOR, LightBlue);
  871.       } else ObjectMove("M_P line", 0, Time[40], g_price_820);
  872.       if (ObjectFind("M_R1 line") != 0) {
  873.          ObjectCreate("M_R1 line", OBJ_HLINE, 0, Time[40], g_price_836);
  874.          ObjectSet("M_R1 line", OBJPROP_STYLE, STYLE_SOLID);
  875.          ObjectSet("M_R1 line", OBJPROP_WIDTH, 1);
  876.          ObjectSet("M_R1 line", OBJPROP_COLOR, Red);
  877.       } else ObjectMove("M_R1 line", 0, Time[40], g_price_836);
  878.       if (ObjectFind("M_R2 line") != 0) {
  879.          ObjectCreate("M_R2 line", OBJ_HLINE, 0, Time[40], g_price_844);
  880.          ObjectSet("M_R2 line", OBJPROP_STYLE, STYLE_SOLID);
  881.          ObjectSet("M_R2 line", OBJPROP_WIDTH, 1);
  882.          ObjectSet("M_R2 line", OBJPROP_COLOR, Red);
  883.       } else ObjectMove("M_R2 line", 0, Time[40], g_price_844);
  884.       if (ObjectFind("M_R3 line") != 0) {
  885.          ObjectCreate("M_R3 line", OBJ_HLINE, 0, Time[40], g_price_852);
  886.          ObjectSet("M_R3 line", OBJPROP_STYLE, STYLE_SOLID);
  887.          ObjectSet("M_R3 line", OBJPROP_WIDTH, 1);
  888.          ObjectSet("M_R3 line", OBJPROP_COLOR, Red);
  889.       } else ObjectMove("M_R3 line", 0, Time[40], g_price_852);
  890.    }
  891.    if (monthly == TRUE && midpivots == TRUE) {
  892.       if (ObjectFind("M_M5 label") != 0) {
  893.          ObjectCreate("M_M5 label", OBJ_TEXT, 0, Time[20], g_price_900);
  894.          ObjectSetText("M_M5 label", " M_M5 " + DoubleToStr(g_price_900, 4), 8, "Arial", CLR_NONE);
  895.       } else ObjectMove("M_M5 label", 0, Time[0], g_price_900);
  896.       if (ObjectFind("M_M4 label") != 0) {
  897.          ObjectCreate("M_M4 label", OBJ_TEXT, 0, Time[20], g_price_892);
  898.          ObjectSetText("M_M4 label", " M_M4 " + DoubleToStr(g_price_892, 4), 8, "Arial", CLR_NONE);
  899.       } else ObjectMove("M_M4 label", 0, Time[0], g_price_892);
  900.       if (ObjectFind("M_M3 label") != 0) {
  901.          ObjectCreate("M_M3 label", OBJ_TEXT, 0, Time[20], g_price_884);
  902.          ObjectSetText("M_M3 label", " M_M3 " + DoubleToStr(g_price_884, 4), 8, "Arial", CLR_NONE);
  903.       } else ObjectMove("M_M3 label", 0, Time[0], g_price_884);
  904.       if (ObjectFind("M_M2 label") != 0) {
  905.          ObjectCreate("M_M2 label", OBJ_TEXT, 0, Time[20], g_price_876);
  906.          ObjectSetText("M_M2 label", " M_M2 " + DoubleToStr(g_price_876, 4), 8, "Arial", CLR_NONE);
  907.       } else ObjectMove("M_M2 label", 0, Time[0], g_price_876);
  908.       if (ObjectFind("M_M1 label") != 0) {
  909.          ObjectCreate("M_M1 label", OBJ_TEXT, 0, Time[20], g_price_868);
  910.          ObjectSetText("M_M1 label", " M_M1 " + DoubleToStr(g_price_868, 4), 8, "Arial", CLR_NONE);
  911.       } else ObjectMove("M_M1 label", 0, Time[0], g_price_868);
  912.       if (ObjectFind("M_M0 label") != 0) {
  913.          ObjectCreate("M_M0 label", OBJ_TEXT, 0, Time[20], g_price_860);
  914.          ObjectSetText("M_M0 label", " M_M0 " + DoubleToStr(g_price_860, 4), 8, "Arial", CLR_NONE);
  915.       } else ObjectMove("M_M0 label", 0, Time[0], g_price_860);
  916.       if (ObjectFind("M_M5 line") != 0) {
  917.          ObjectCreate("M_M5 line", OBJ_HLINE, 0, Time[40], g_price_900, Time[20], g_price_900);
  918.          ObjectSet("M_M5 line", OBJPROP_STYLE, STYLE_SOLID);
  919.          ObjectSet("M_M5 line", OBJPROP_WIDTH, 1);
  920.          ObjectSet("M_M5 line", OBJPROP_COLOR, Red);
  921.       } else ObjectMove("M_M5 line", 0, Time[40], g_price_900);
  922.       if (ObjectFind("M_M4 line") != 0) {
  923.          ObjectCreate("M_M4 line", OBJ_HLINE, 0, Time[40], g_price_892);
  924.          ObjectSet("M_M4 line", OBJPROP_STYLE, STYLE_SOLID);
  925.          ObjectSet("M_M4 line", OBJPROP_WIDTH, 1);
  926.          ObjectSet("M_M4 line", OBJPROP_COLOR, Red);
  927.       } else ObjectMove("M_M4 line", 0, Time[40], g_price_892);
  928.       if (ObjectFind("M_M3 line") != 0) {
  929.          ObjectCreate("M_M3 line", OBJ_HLINE, 0, Time[40], g_price_884);
  930.          ObjectSet("M_M3 line", OBJPROP_STYLE, STYLE_SOLID);
  931.          ObjectSet("M_M3 line", OBJPROP_WIDTH, 1);
  932.          ObjectSet("M_M3 line", OBJPROP_COLOR, Red);
  933.       } else ObjectMove("M_M3 line", 0, Time[40], g_price_884);
  934.       if (ObjectFind("M_M2 line") != 0) {
  935.          ObjectCreate("M_M2 line", OBJ_HLINE, 0, Time[40], g_price_876);
  936.          ObjectSet("M_M2 line", OBJPROP_STYLE, STYLE_SOLID);
  937.          ObjectSet("M_M2 line", OBJPROP_WIDTH, 1);
  938.          ObjectSet("M_M2 line", OBJPROP_COLOR, Blue);
  939.       } else ObjectMove("M_M2 line", 0, Time[40], g_price_876);
  940.       if (ObjectFind("M_M1 line") != 0) {
  941.          ObjectCreate("M_M1 line", OBJ_HLINE, 0, Time[40], g_price_868);
  942.          ObjectSet("M_M1 line", OBJPROP_STYLE, STYLE_SOLID);
  943.          ObjectSet("M_M1 line", OBJPROP_WIDTH, 1);
  944.          ObjectSet("M_M1 line", OBJPROP_COLOR, Blue);
  945.       } else ObjectMove("M_M1 line", 0, Time[40], g_price_868);
  946.       if (ObjectFind("M_M0 line") != 0) {
  947.          ObjectCreate("M_M0 line", OBJ_HLINE, 0, Time[40], g_price_860);
  948.          ObjectSet("M_M0 line", OBJPROP_STYLE, STYLE_SOLID);
  949.          ObjectSet("M_M0 line", OBJPROP_WIDTH, 1);
  950.          ObjectSet("M_M0 line", OBJPROP_COLOR, Blue);
  951.       } else ObjectMove("M_M0 line", 0, Time[40], g_price_860);
  952.    }
  953.    return (0);
  954. }
复制代码
如何访问权限为100/255贴子：/thread-37840-1-1.html；注册后仍无法回复：/thread-23-1-1.html；微信/QQ群：/thread-262-1-1.html；网盘链接失效解决办法：/thread-93307-1-1.html

TOP

龙听

Rank: 9Rank: 9Rank: 9

UID
2 
积分
2721794 
威望
1310892 布 
龙e币
1410902 刀 
注册时间
2009-12-3 
最后登录
2024-4-27 

Medal No.1
5#
发表于 2020-6-3 08:42 | 只看该作者
Fxtrend.rar
如何访问权限为100/255贴子：/thread-37840-1-1.html；注册后仍无法回复：/thread-23-1-1.html；微信/QQ群：/thread-262-1-1.html；网盘链接失效解决办法：/thread-93307-1-1.html

TOP

龙听小虎

Rank: 10Rank: 10Rank: 10

UID
22996 
积分
4070 
威望
2035 布 
龙e币
2035 刀 
注册时间
2023-7-21 
最后登录
2024-4-25 
6#
发表于 2023-11-11 20:56 | 只看该作者

TOP

返回列表