Собственно, вот!

Сейчас мы имеем лишь стандартный топорный трейлинг, а вариантов трейлинга, оказывается, вон оно сколько!!!

1. Трейлинг по теням N последних баров.
2. Трейлинг по Х-барным фракталам.
3. Трейлинг стандартный-'ступенчатый'.
4. Трейлинг стандартный-'удавка'.
5. Трейлинг по времени.
6. Трейлинг по ATR.
7. 'Храповой' трейлинг (по Баришпольцу).
8. Трейлинг по ценовому каналу.
9. Трейлинг по скользящему среднему.
10. Трейлинг "половинящий" (Fifty-fifty trailing).
11. Трейлинг "KillLoss".

Все функции в коде mql4, хорошо прокомментированы. Может, что-нибудь из этого реализуется со временем в виде кубиков ТСЛаб?

ну так API есть, все можно сделать

а я вот несогласен с таким подходом. я не программист, и кубики предназначены для широкой массы пользователей. В Ваших интересах тоже развивать стандартные функции для большей аудитории.

Но не буду учить как делать бизнес, Вам виднее.

Я за себя радею, пользуюсь тслабом давно, и ведь хочется какого то развития в части кубиков тоже..о трейле давно все жалуются, что он не удобно оптимизируем, так как приходится стаивть 2 для покупок и продаж, и он один, без всяких там удавок...

Уже выпрашивал - послали...:-((
http://www.tslab.ru/ubb/ubbthreads.php?ubb=showflat&Number=34299#Post34299

вопрос интересный

дайте код стандартного трейла,а? и доработаем

using System;
using System.Linq;
using TSLab.Script.Realtime;

// ReSharper disable UnusedAutoPropertyAccessor.Global
// ReSharper disable MemberCanBePrivate.Global
// ReSharper disable UnusedMember.Global
namespace TSLab.Script.Handlers
{
[HandlerName("Entry Price")]
[HandlerCategory("Position")]
[HandlerName("Trail Stop")]
[HandlerCategory("Position")]
public class TrailStop : IPosition2Double
{
[HandlerParameter(true, "1.5", Min = "0.1", Max = "5", Step = "0.1", Name = "Stop Loss")]
public double StopLoss { get; set; }

[HandlerParameter(true, "0.5", Min = "0.1", Max = "3", Step = "0.1", Name = "Trail Enable")]
public double TrailEnable { get; set; }

[HandlerParameter(true, "0.5", Min = "0.1", Max = "3", Step = "0.1", Name = "Trail Loss")]
public double TrailLoss { get; set; }

public double Execute(IPosition pos, int barNum)
{
if (pos == null)
{
return 0;
}
double stop;
var curProfit = pos.OpenMFEPct(barNum);
if (curProfit > TrailEnable)
{
double shift = (curProfit - TrailLoss) / 100;
stop = pos.EntryPrice * (1 + (pos.IsLong ? shift : -shift));
}
else
{
double shift = (0 - StopLoss) / 100;
stop = pos.EntryPrice * (1 + (pos.IsLong ? shift : -shift));
}
var lastStop = pos.GetStop(barNum);
if(lastStop == 0)
{
return stop;
}
return pos.IsLong ? Math.Max(stop, lastStop) : Math.Min(stop, lastStop);
}
}

[HandlerName("Trail Stop Abs")]
[HandlerCategory("Position")]
public class TrailStopAbs : IPosition2Double
{
[HandlerParameter(true, "150", Min = "10", Max = "500", Step = "5")]
public double StopLoss { get; set; }

[HandlerParameter(true, "50", Min = "10", Max = "500", Step = "5")]
public double TrailEnable { get; set; }

[HandlerParameter(true, "50", Min = "10", Max = "500", Step = "5")]
public double TrailLoss { get; set; }

public double Execute(IPosition pos, int barNum)
{
if (pos == null)
{
return 0;
}
double stop;
var curProfit = pos.OpenMFE(barNum) / pos.Shares;
if (curProfit > TrailEnable)
{
double shift = curProfit - TrailLoss;
stop = pos.EntryPrice + (pos.IsLong ? shift : -shift);
}
else
{
double shift = -StopLoss;
stop = pos.EntryPrice + (pos.IsLong ? shift : -shift);
}
var lastStop = pos.GetStop(barNum);
if (lastStop == 0)
{
return stop;
}
return pos.IsLong ? Math.Max(stop, lastStop) : Math.Min(stop, lastStop);
}
}

для тех, кто наткнётся на ветку - часть трейлов реализована, смотрите тут:
http://www.tslab.ru/ubb/ubbthreads.php?ubb=showflat&Number=39833#Post39833

Может кто сгрузит кодик стопа типа:
TrailStop P1000A - начинает работать как обычный трейл, но по достижении определённого профита (ProfitLimit) начинает трейлить с другим размером трейлинга (TrailLoss2).
TrailStop P1000A-2 - то же, но с двумя доп. уровнями профита-трейлинга.
TrailStop P1000R и TrailStop P1000R-2 - то же, что предыдущие два, но параметры в %%
Чтоб через API можно было подцепить, особенно два выделенных интересуют.

переделал немного P1000R, возьми последний сборник, попробуй и отпишись

Добавил в конце ; и }
В Handles бросил dll от 06/06/2012 и пробовал с предыдущей размером 343 КБ и 341 КБ соответст.
В ссылки-добавить ссылку в SharpDevel добавил vvTSLtools.dll
При запуске:
'TSLab.MySystems.TrailStopP1000r' does not implement interface member 'TSLab.Script.Handlers.IPosition2Double.Execute(TSLab.Script.IPosition, int)' (CS0535) - C:\Documents and Settings\....cs:137,14
'TSLab.MySystems.TrailStopP1000r.GenTrailStopP1000r(TSLab.Script.IPosition, int, double, double, double, double, double)' must declare a body because it is not marked abstract, extern, or partial (CS0501) - C:\Documents and Settings\....cs:151,24

Вася, ты не понял
вызывай метод GenTrailStopP1000r класса TrailStopP1000r с приведёнными параметрами
я тебе просто всё подготовил и показал, чтобы из сборника прямо подключать этот трейл, типа var stop = TrailStopP1000r.GenTrailStopP1000r(параметры);

Вообщем сделал так:
В "ссылки"-"добавить ссылку" в SharpDevel добавил vvTSLtools.dll
//
using vvTSLtools; // стр. 30
//
public OptimProperty TrailEnable = new OptimProperty(1.5, 0.1, 5, 0.2);
public OptimProperty TrailLoss = new OptimProperty(0.5, 0.1, 5, 0.2);
public OptimProperty StopLoss = new OptimProperty(0.5, 0.1, 5, 0.2);
public OptimProperty ProfitLimit = new OptimProperty(0, 0.1, 0.6, 0.2);
public OptimProperty TrailLoss2 = new OptimProperty(0, 0.1, 0.6, 0.2);
//
readonly TrailStopP1000r _trailp1000r = new TrailStopP1000r(); // стр 191
//
_trailp1000r.StopLoss = StopLoss;
_trailp1000r.TrailEnable = TrailEnable;
_trailp1000r.TrailLoss = TrailLoss;
_trailp1000r.ProfitLimit = ProfitLimit;
_trailp1000r.TrailLoss2 = TrailLoss2;
//

На это SharpDevelop не ругается, а вот TSLab гневно рисует:

13:29:04.98 120 Элемент 'ВнешнСкрипт' содержит ошибку:
c:\Documents and Settings\.....cs(30,7) : error CS0246: Не удалось найти имя типа или пространства имен 'vvTSLtools' (возможно, пропущена используемая директива или ссылка на сборку)
c:\Documents and Settings\.....cs(191,23) : error CS0246: Не удалось найти имя типа или пространства имен 'TrailStopP1000r' (возможно, пропущена используемая директива или ссылка на сборку)

vvTSLtools не подключилась ...

О, а GenTrailStopP1000r я так и не вызывал, заигрался, забыл про него.

выкладываю в ветке сборника исходник трейла P1000R, делай с ним что хочешь

Спасибо.

смотри код, там статичный метод
можешь поправить сам

вызывать как стандартный трейл ТСЛаб не нужно

Отписываюсь: результаты на одной из систем очень близки при стопе P1000R и при TrailStopStd, попробую позже на другой системе.

работает - и хорошо

Vito, выложи сорцы какие-нить.
мне трейлинги позарез нужны
как внешний скрипт либа с vvtsltools на 64бит не пашет к тому же