: | : | :期货量化学习 | :期货量化 |
返回列表 发帖

[MC源码] Supertrend 的 PowerLanguage（MultiCharts）指標範例

Rank: 9Rank: 9Rank: 9

UID
2 
积分
2946807 
威望
1423440 布 
龙e币
1523367 刀 
在线时间
13794 小时 
注册时间
2009-12-3 
最后登录
2025-4-28 

Medal No.1
1# 跳转到 » 倒序看帖
打印
tT
龙听发表于 昨天 20:57 | 只看该作者

[MC源码] Supertrend 的 PowerLanguage（MultiCharts）指標範例

  1. // Supertrend Indicator for PowerLanguage (MultiCharts)
  2. // Basic version
  3. Inputs:
  4.     ATRLength(10),
  5.     Multiplier(3.0);

  7. Variables:
  8.     ATR(0),
  9.     UpperBand(0),
  10.     LowerBand(0),
  11.     Trend(1),
  12.     Supertrend(0),
  13.     PrevSupertrend(0);

  15. // Calculate ATR
  16. ATR = AvgTrueRange(ATRLength);

  18. // Calculate Basic Bands
  19. UpperBand = (High + Low) / 2 + Multiplier * ATR;
  20. LowerBand = (High + Low) / 2 - Multiplier * ATR;

  22. // Supertrend Calculation
  23. If CurrentBar = 1 then
  24. begin
  25.     Supertrend = UpperBand;
  26. end
  27. else
  28. begin
  29.     if Close > PrevSupertrend then
  30.         Supertrend = MaxList(LowerBand, PrevSupertrend)
  31.     else
  32.         Supertrend = MinList(UpperBand, PrevSupertrend);

  34.     if Close > Supertrend then
  35.         Trend = 1
  36.     else if Close < Supertrend then
  37.         Trend = -1;
  38. end;

  40. // Save for next bar
  41. PrevSupertrend = Supertrend;

  43. // Plot
  44. Plot1(Supertrend, "Supertrend");
  45. Plot2(UpperBand, "UpperBand");
  46. Plot3(LowerBand, "LowerBand");

  48. if Trend = 1 then
  49.     SetPlotColor(1, Green)
  50. else
  51.     SetPlotColor(1, Red);
复制代码
這段程式碼會：

    計算 ATR。

    用 ATR 來生成上下帶。

    判斷超趨勢線。

    畫出 Supertrend 線並變色（綠色為多頭，紅色為空頭）。

收藏 分享
论坛官方微信、群（期货热点、量化探讨、开户与绑定实盘）
 
期货论坛 - 版权/免责声明   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 
积分
2946807 
威望
1423440 布 
龙e币
1523367 刀 
在线时间
13794 小时 
注册时间
2009-12-3 
最后登录
2025-4-28 

Medal No.1
2#
龙听发表于 昨天 20:58 | 只看该作者
Supertrend（有買賣訊號）
  1. // Supertrend Indicator with Buy/Sell Arrows for PowerLanguage (MultiCharts)
  2. // Advanced version with signals
  3. Inputs:
  4.     ATRLength(10),
  5.     Multiplier(3.0);

  7. Variables:
  8.     ATR(0),
  9.     UpperBand(0),
  10.     LowerBand(0),
  11.     Trend(1),
  12.     Supertrend(0),
  13.     PrevSupertrend(0),
  14.     PrevTrend(1);

  16. // Calculate ATR
  17. ATR = AvgTrueRange(ATRLength);

  19. // Calculate Basic Bands
  20. UpperBand = (High + Low) / 2 + Multiplier * ATR;
  21. LowerBand = (High + Low) / 2 - Multiplier * ATR;

  23. // Supertrend Calculation
  24. If CurrentBar = 1 then
  25. begin
  26.     Supertrend = UpperBand;
  27.     PrevTrend = 1;
  28. end
  29. else
  30. begin
  31.     if Close > PrevSupertrend then
  32.         Supertrend = MaxList(LowerBand, PrevSupertrend)
  33.     else
  34.         Supertrend = MinList(UpperBand, PrevSupertrend);

  36.     if Close > Supertrend then
  37.         Trend = 1
  38.     else if Close < Supertrend then
  39.         Trend = -1;
  40. end;

  42. // Detect Trend Change for Buy/Sell Signals
  43. if Trend <> PrevTrend then
  44. begin
  45.     if Trend = 1 then
  46.         Alert("Buy Signal");

  48.     if Trend = -1 then
  49.         Alert("Sell Signal");
  50. end;

  52. // Save for next bar
  53. PrevSupertrend = Supertrend;
  54. PrevTrend = Trend;

  56. // Plot Supertrend
  57. Plot1(Supertrend, "Supertrend");
  58. Plot2(UpperBand, "UpperBand");
  59. Plot3(LowerBand, "LowerBand");

  61. if Trend = 1 then
  62.     SetPlotColor(1, Green)
  63. else
  64.     SetPlotColor(1, Red);

  66. // Plot Buy/Sell Arrows
  67. if Trend <> PrevTrend then
  68. begin
  69.     if Trend = 1 then
  70.         PlotPaintBar(High, Low, Open, Close, "Buy", Green)
  71.     else if Trend = -1 then
  72.         PlotPaintBar(High, Low, Open, Close, "Sell", Red);
  73. end;
复制代码
如何访问权限为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 
积分
2946807 
威望
1423440 布 
龙e币
1523367 刀 
在线时间
13794 小时 
注册时间
2009-12-3 
最后登录
2025-4-28 

Medal No.1
3#
龙听发表于 昨天 20:59 | 只看该作者
Supertrend 自動下單策略（PowerLanguage / MultiCharts）
  1. // Supertrend Auto-Trading Strategy for PowerLanguage (MultiCharts)
  2. Inputs:
  3.     ATRLength(10),
  4.     Multiplier(3.0);

  6. Variables:
  7.     ATR(0),
  8.     UpperBand(0),
  9.     LowerBand(0),
  10.     Trend(1),
  11.     Supertrend(0),
  12.     PrevSupertrend(0),
  13.     PrevTrend(1);

  15. // Calculate ATR
  16. ATR = AvgTrueRange(ATRLength);

  18. // Calculate Basic Bands
  19. UpperBand = (High + Low) / 2 + Multiplier * ATR;
  20. LowerBand = (High + Low) / 2 - Multiplier * ATR;

  22. // Supertrend Calculation
  23. If CurrentBar = 1 then
  24. begin
  25.     Supertrend = UpperBand;
  26.     PrevTrend = 1;
  27. end
  28. else
  29. begin
  30.     if Close > PrevSupertrend then
  31.         Supertrend = MaxList(LowerBand, PrevSupertrend)
  32.     else
  33.         Supertrend = MinList(UpperBand, PrevSupertrend);

  35.     if Close > Supertrend then
  36.         Trend = 1
  37.     else if Close < Supertrend then
  38.         Trend = -1;
  39. end;

  41. // --- Auto Trading Logic ---
  42. // When trend changes to up, buy
  43. If Trend = 1 and PrevTrend = -1 then
  44. begin
  45.     Buy ("SupertrendBuy") Next Bar at Market;
  46. end;

  48. // When trend changes to down, sell short
  49. If Trend = -1 and PrevTrend = 1 then
  50. begin
  51.     SellShort ("SupertrendSell") Next Bar at Market;
  52. end;

  54. // Optional: Exit rules (simple)
  55. // Exit long if trend turns down
  56. If MarketPosition = 1 and Trend = -1 then
  57. begin
  58.     Sell ("SupertrendExitLong") Next Bar at Market;
  59. end;

  61. // Exit short if trend turns up
  62. If MarketPosition = -1 and Trend = 1 then
  63. begin
  64.     BuyToCover ("SupertrendExitShort") Next Bar at Market;
  65. end;

  67. // Save for next bar
  68. PrevSupertrend = Supertrend;
  69. PrevTrend = 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 
积分
2946807 
威望
1423440 布 
龙e币
1523367 刀 
在线时间
13794 小时 
注册时间
2009-12-3 
最后登录
2025-4-28 

Medal No.1
4#
龙听发表于 昨天 21:00 | 只看该作者
Supertrend 自動交易策略版 (PowerLanguage / MultiCharts)
  1. // Supertrend Strategy for Auto Trading (MultiCharts PowerLanguage)
  2. // Version: Entry + Exit rules
  3. Inputs:
  4.     ATRLength(10),
  5.     Multiplier(3.0);

  7. Variables:
  8.     ATR(0),
  9.     UpperBand(0),
  10.     LowerBand(0),
  11.     Trend(1),
  12.     Supertrend(0),
  13.     PrevSupertrend(0),
  14.     PrevTrend(1);

  16. // Calculate ATR
  17. ATR = AvgTrueRange(ATRLength);

  19. // Calculate Bands
  20. UpperBand = (High + Low) / 2 + Multiplier * ATR;
  21. LowerBand = (High + Low) / 2 - Multiplier * ATR;

  23. // Supertrend Calculation
  24. If CurrentBar = 1 then
  25. begin
  26.     Supertrend = UpperBand;
  27.     PrevTrend = 1;
  28. end
  29. else
  30. begin
  31.     if Close > PrevSupertrend then
  32.         Supertrend = MaxList(LowerBand, PrevSupertrend)
  33.     else
  34.         Supertrend = MinList(UpperBand, PrevSupertrend);

  36.     if Close > Supertrend then
  37.         Trend = 1
  38.     else if Close < Supertrend then
  39.         Trend = -1;
  40. end;

  42. // --- Entry and Exit Rules ---
  43. // Trend Change -> Entry Signals
  44. if Trend <> PrevTrend then
  45. begin
  46.     if Trend = 1 then
  47.     begin
  48.         // Close Short Position first
  49.         if MarketPosition < 0 then
  50.             BuyToCover ("ExitShort") next bar at market;
  51.         // Open Long Position
  52.         Buy ("LongEntry") next bar at market;
  53.     end
  54.     else if Trend = -1 then
  55.     begin
  56.         // Close Long Position first
  57.         if MarketPosition > 0 then
  58.             Sell ("ExitLong") next bar at market;
  59.         // Open Short Position
  60.         SellShort ("ShortEntry") next bar at market;
  61.     end;
  62. end;

  64. // Save for next bar
  65. PrevSupertrend = Supertrend;
  66. PrevTrend = Trend;

  68. // --- Optional: Plot Supertrend Line ---
  69. Plot1(Supertrend, "Supertrend");

  71. if Trend = 1 then
  72.     SetPlotColor(1, Green)
  73. else
  74.     SetPlotColor(1, Red);
复制代码
  1. 趨勢變多（Trend從-1變1）：平空單 ➔ 做多進場

  3. 趨勢變空（Trend從1變-1）：平多單 ➔ 做空進場

  5. 進場用 next bar at market（下一根直接市價單）

  7. 自動畫 Supertrend 線，顏色隨趨勢變
复制代码
如何访问权限为100/255贴子：/thread-37840-1-1.html；注册后仍无法回复：/thread-23-1-1.html；微信/QQ群：/thread-262-1-1.html；网盘链接失效解决办法：/thread-93307-1-1.html

TOP

返回列表