Автор Тема: интересная системка  (Прочитано 10054 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн TommiАвтор темы

  • Thank You
  • -Given:
  • -Receive:
  • Сообщений: 1
  • +0/-0
    • Просмотр профиля
интересная системка
« : 22.11.2005 09:08 »
Берем %R (100) и RSI (13).
If  %R>RSI to open buy on close price. Sl = 50, TP=150.
If  %R< RSI  to open sell on close price. Sl = 50, TP= 150. (параметры для графика фунта)

Тоесть торгуем просто на пересечениях этих индикаторов. Главное условие здесь, чтоб отношение профита к стопу было 3/1, и тогда системка демонстрирует на часовых графиках вроде как неплохие результаты....

Оффлайн persistrader

  • Thank You
  • -Given:
  • -Receive:
  • Сообщений: 4
  • +1/-1
    • Просмотр профиля
Re:интересная системка
« Ответ #1 : 22.11.2005 15:48 »
Вот ВелсЛаб код который я написал для этого.  Результаты до 2001 года сосут - до этого более не менее нормальные. Приглашаю всех к обсуждению.

var Bar, pane: integer;

HideVolume;

{ Plotting Indicators }

pane := CreatePane( 75, false, true );
PlotSeries( WilliamsRSeries( 100 ), pane, #Red, #Thick );
PlotSeries( RSISeries( #Close, 13 ), pane, #Lime, #Thick );
DrawLabel( '% R = Red, RSI = Green', pane );

{ Stops and Targets }

SetAutoStopMode (#AsPoint);
InstallStopLoss ( 0.0050 );
InstallProfitTarget ( 0.0150 );

{ Main Loop }

for Bar := 20 to BarCount - 1 do
begin
  if not LastPositionActive then
{ Entry Rules }
  begin

    if CrossOver ( Bar, WilliamsRSeries( 100 ), RSISeries( #Close, 13 )) then
    BuyAtClose ( Bar, '')
    else if CrossUnder ( Bar, WilliamsRSeries( 100 ), RSISeries( #Close, 13 )) then
    ShortAtClose ( Bar, '');

  end
  else
{ Exit Rules }
  begin
 
  ApplyAutoStops (Bar);

  end;
end;