Курсы валют
<a href="https://www.instaforex.com/ru/" target="blank">ИнстаФорекс портал"</a>
Новости от FOREXPF.RU
<a href="https://www.instaforex.com/ru/">Форекс портал</a>
Февраль 2015
Пн Вт Ср Чт Пт Сб Вс
« Янв   Мар »
 1
2345678
9101112131415
16171819202122
232425262728  
При поддержке: деньги и фен шуй.

Архивы за месяц Февраль 2015

Технический анализ 28.02.2015 (суббота) H1 / H4

2015-02-28 11-07-07 GBPUSD H1GBPUSD H1
2015-02-28 11-07-46 GBPUSD H4GBPUSD H4 Читать далее »

Торговый дневник 23.02.2015 (понедельник) Изучаю брокеров из рейтинга FxCash.ru

10:02 Вчера сделал программу для Евразии для парковки: работа со сканером ШК. Клиент вроде доволен.

Сегодня выходной, и я решил поработать над своей БД.

Буду наполнять справочник брокеров, заодно выяснять алгоритмы расчета рибейтов для новых брокеров из списка FxCash.ru (начну с них).

Начал с Exness https://www.exness.com/intl/ru/,

Fort Financial Services https://www.fortfs.com/ru,

NordFX http://ru.nordfx.com/,

Aforex http://www.aforex.ru/

10:50 Неплохие начисления у Forex Market https://www.forex-m.com/

http://cashforum.ru/showthread.php?t=941

МТП немного меньше чем у F4u по некоторым парам, начисления МГНОВЕННЫЕ. Можно попробовать поторговать у них… Правда рибейт ы начисляют только на обычных счетах, на NDDсчетах рибейтов нет – поэтому этот брокер отпадает…

2015-02-24 09-41-54 Journal_Brokers

Технический анализ 21.02.2015 (суббота) H1 / H4

2015-02-21 09-27-11 GBPUSD H1GBPUSD H1
2015-02-21 09-27-45 GBPUSD H4GBPUSD H4 Читать далее »

Торговый дневник 20.02.2015 (пятница) Создал БД для демо счетов

10:12 Вчера вечером дома полностью залил все стейты в свою БД. Осталось выяснить причину некоторых расхождений в цифрах по некоторым счетам.
Счет Инсты 8235614 медленно но верно слит, осталось на балансе 0,09$. Рибейтов выйдет 674,32$ До 6 марта на реале пока не торгую. Буду продолжать разработку аналитики по своей БД. После 6 марта вернусь скорее всего обратно к F4u. 4 недели подряд идет отличный флэтовый рынок. Если бы я не протупил с пополнением счета у Инсты через РБК, на рибейты прекрасно можно было бы торговать и дальше. Еще неизвестно, что будет с бонусами, которые я не отбил. Не спишут ли в их счет деньги с рибейтов. Надеюсь что не спишут.
Еще есть заказ и от Астрелина на доработку: работа со сканером ШК в программе Парковка. Займусь этим на выходных, которых будет 3 дня.

21:49 Весь вечер отдыхал от программирования, просто посмотрев несколько телеканалов по IPTVPlayer и попив пивка. Но надоело сидеть без дела. Решил создать новую БД со стейтами демо-счетов. На VPNторгуется демка 185039724 с 1.02.2015 г. – работает FST 1.24 по 4 парам с параметрами LockDD 40/50%, SafeEquity 50%, и OnTrade15/5
И довольно неплохо торгуется. Сегодня была разгрузка счета по просадке 50% по 2 парам: аусси и евройене.
22:12 Закачал этот счет в новую Демо БД. Нужно сделать для начала график баланса, какой он есть в исходном стейте.
Для этого нужно рассчитать баланс после закрытия каждой позиции в хронологическом порядке. Придется для этого написать функцию и добавить поля для хранения расчетных данных баланса и эквити…

Торговый дневник 19.02.2015 (четверг) Закончил создание БД по стейтам

10:27 Сегодня вышел на работу. Оформил отпуск без содержания за 2 предыдущих дня, когда болел.
Делаю  версию программы по стейтам 1.11. Пока не нашел причину неправильного расчета баланса и эквити по последним залитым вчера счетам типа Classic3. Большие расхождения вылазят…
11:27 Похоже нашел ошибку в расчетах– одинаковые тикеты на разных счетах (не исправленные, а скопированные из прошлого стейта в Excel). Но они все-равно должны закачиваться, т.к. аккаунты разные..
11:32 Исправил уникальный индекс по таблицам dbo_Statementsи dbo_BalanceOperations: Id_Account+Ticket+OpenTime

23:59 Закачал наконец-то ВСЕ ДАННЫЕ по всем стейтам за 10 лет. Почти 111 тыс. результативных трейдов – впечатляет…Теперь нужно дальше делать то, ради чего и затевалась эта программа, т.е. аналитику.

2015-02-18 18-46-31 Journal_Statements

2015-02-19 21-51-58 Journal_Accounts

Торговый дневник 18.02.2015 (среда) Создал новую пустую БД и залил данные по 2013 год

 

08:30 Сегодня я не поехал на работу – нужно долечиться и заодно доделать свою БД. С работы звонили – сказал что болею и выйду завтра на работу.
08:40 Решил создать новую версию программы 1.10 и базу данных с нуля (без данных) и залить по новой все стейты в хронологическом порядке, чтобы Id счетов были не липовые а реальные. Заодно и  протестировать работу программы с нуля, т.е. без данных (в случае коммерческой разработки — это актуально). 

2015-02-20 09-44-18 About_History 1 10

15:39 Сделал расчет количества трейдов и добавил соответствующие поля в таблицы Accounts и GrafikProfit
Function fnCalcTrades(SelectId_Account As Long,Optional strField As String = «TotalTrades») As Double

Show »

‘Расчет количества трейдов

    Dim
dblTrades As Double

    dblTrades
= 0

    Dim dbs As
Database

    Dim rst As
Recordset

    Dim strSQL
As String

    Dim
strSQLWhere As String

    Set dbs =
CurrentDb()

    Select
Case strField

    Case
«TotalTrades»


strSQLWhere = «(St.Type = ‘buy’ Or St.Type = ‘sell’) AND
[CloseTime] Is Not Null»

    Case
«ProfitTrades»


strSQLWhere = «(St.Type = ‘buy’ Or St.Type = ‘sell’) AND
[CloseTime] Is Not Null AND
nz([Commission],0)+nz([Taxes],0)+nz([Swap],0)+nz([Profit],0) > 0»

    Case
«LossTrades»


strSQLWhere = «(St.Type = ‘buy’ Or St.Type = ‘sell’) AND
[CloseTime] Is Not Null AND
nz([Commission],0)+nz([Taxes],0)+nz([Swap],0)+nz([Profit],0) < 0»

    Case
«NullTrades»


strSQLWhere = «(St.Type = ‘buy’ Or St.Type = ‘sell’) AND [CloseTime]
Is Not Null AND nz([Commission],0)+nz([Taxes],0)+nz([Swap],0)+nz([Profit],0)
= 0»

    Case
«CancelledTrades»


strSQLWhere = «(St.Type = ‘buy limit’ Or St.Type = ‘sell limit’
Or St.Type = ‘buy stop’ Or St.Type = ‘sell stop’) AND [CloseTime] Is Not
Null»

    Case
«OpenTrades»


strSQLWhere = «(St.Type = ‘buy’ Or St.Type = ‘sell’) AND
[CloseTime] Is Null»

    Case
«WorkingOrders»


strSQLWhere = «(St.Type = ‘buy limit’ Or St.Type = ‘sell limit’
Or St.Type = ‘buy stop’ Or St.Type = ‘sell stop’) AND [CloseTime] Is
Null»

    End Select

   

    strSQL =
«SELECT St.Id_Account, Count(St.Id_Statement) AS CountTrades,
Sum([Commission]+[Taxes]+[Swap]+[Profit]) AS SumProfit FROM dbo_Statements AS
St » & _

        »
WHERE » & strSQLWhere & _

        » And St.Id_Account = » &
SelectId_Account & _

        »
GROUP BY St.Id_Account;»

       

    Set rst =
dbs.OpenRecordset(strSQL)

    With rst

        If
.RecordCount = 0 Then


dblTrades = 0

        Else


.MoveFirst

            dblTrades
= Nz(!Trades, 0)

        End If

        .Close

    End With

    Set dbs = Nothing


fnCalcTrades = dblTrades

Exit_fnCalcTrades:

End Function

18:00 По счету 15223 AM не сходится баланс -52.10  — не могу найти причину… И одна сумма 190 баксов депозитов никак не закачивается в автомате …
23:24 Завязываю на сегодня с закачкой. Остановился на начале 2013 года. Последние 3 счета неправильно считается баланс и эквити А также нужно сделать закачку транферов депозитов и выводов. Ни у найти  причину неправильных расчетов итогов …

Торговый дневник 17.02.2015 (вторник) Залил все стейты в БД до 2012 года

 

09:52 Сегодня я не поехал на работу, т.к. утром была температура 39. Сейчас немного оклимался, напившись всяких таблеток, и начал править программу по стейтам.

SELECT Acc.Id_Account, Acc.AccountNumber, Acc.AccountName, BS.BrokerServerName, BST.BrokerServerTypeName FROM dbo_BrokerServerTypes AS BST INNER JOIN (dbo_BrokerServers AS BS INNER JOIN dbo_Accounts AS Acc ON BS.Id_BrokerServer = Acc.Id_BrokerServer) ON BST.Id_BrokerServerType = BS.Id_BrokerServerType UNION SELECT 0 as Id_Account, ‘(All)’ as AccountNumber, «All accounts» as AccountName, » as BrokerServerName, » as BrokerServerTypeName FROM dbo_Accounts
ORDER BY Acc.AccountNumber;  

2015-02-20 09-42-56 About_History 1 09

23:00 Кое-как залил все стейты до 2012 года, заодно дорабатывая структуру таблицы Accounts.
Есть небольшие расхождения по адмиралу и броко. На сегодня хватит…

Торговый дневник 16.02.2015 (понедельник) Подхватил ОРВИ …

08:18 Вчера похоже простыл, т.к всю ночь кашлял и кое-как встал утром. Вначале не хотел ехать на работу, но потом помылся горячей водой и все-таки поехал. С утра решил установить Яндекс-браузер и ЯД, т.к. вчера очень понравилось с ними работать. 8:27 Сейчас он синхронизируется, трафика сожрал уже 200 метров на модеме МТС…

14:30 Решил все-таки свалить домой, т.к. очень плохо себя чувствую. Попросил Славу Баранова отвезти домой, что он и сделал. Зашел в аптеку и накупил всяких таблеток, температура 38,8 была.
В итоге отлеживался почти сутки до утра вторника.

Торговый дневник 15.02.2015 (воскресенье) Сделал закачку стейтов в программу

17:54 Сегодня целый день занимаюсь разработкой программы. В
основном сделал закачку данных из стейтов. Исходные файлы подменяются в зависимости от активного счета. Сейчас тестирую правильность цифр и устраняю мелкие недочеты.

20:23 Сделал навороченную форму журнала стейтов со всеми данными по счетам. Осталось сделать разнесение итогов в таблицу Accountsи можно приступать к аналитике – графикам и отчетам…

2015-02-14 12-06-46 ABB Statements Journal_Statements

Добавлены фильтры в журналах 

Show »

If Me.grpFilterTrades = 0 Then

ElseIf Me.grpFilterTrades = 1 Then ‘Open trades

    If
strFilter <> «» Then strFilter = strFilter & » AND
«

    strFilter
= strFilter & » (Type = ‘buy’ Or Type = ‘sell’) And
nz(CloseTime,0)=0 «

    If
strFilterNote <> «» Then strFilterNote = strFilterNote +
» + «


strFilterNote = strFilterNote + «Open trades»

ElseIf Me.grpFilterTrades = 2 Then ‘Closed trades

    If
strFilter <> «» Then strFilter = strFilter & » AND
«

    strFilter
= strFilter & » (Type = ‘buy’ Or Type = ‘sell’) And
nz(CloseTime,0)<>0 «

    If
strFilterNote <> «» Then strFilterNote = strFilterNote +
» + «


strFilterNote = strFilterNote + «Closed trades»

ElseIf Me.grpFilterTrades = 3 Then ‘Working orders

    If
strFilter <> «» Then strFilter = strFilter & » AND
«

    strFilter
= strFilter & » (Type = ‘buy limit’ Or Type = ‘sell limit’ or Type =
‘buy stop’ Or Type = ‘sell stop’) And nz(CloseTime,0)=0 «

    If
strFilterNote <> «» Then strFilterNote = strFilterNote +
» + «


strFilterNote = strFilterNote + «Working orders»

ElseIf Me.grpFilterTrades = 4 Then ‘Cancelled orders

    If
strFilter <> «» Then strFilter = strFilter & » AND
«

    strFilter
= strFilter & » (Type = ‘buy limit’ Or Type = ‘sell limit’ or Type =
‘buy stop’ Or Type = ‘sell stop’) And nz(CloseTime,0)<>0 «

    If
strFilterNote <> «» Then strFilterNote = strFilterNote +
» + «


strFilterNote = strFilterNote + «Cancelled orders»

ElseIf Me.grpFilterTrades = 5 Then ‘Deposits

    If
strFilter <> «» Then strFilter = strFilter & » AND
«

    strFilter = strFilter & » Type =
‘balance’ And Note Not Like ‘*BONUS*’ And Profit > 0″

    If
strFilterNote <> «» Then strFilterNote = strFilterNote +
» + «


strFilterNote = strFilterNote + «Deposits»

ElseIf Me.grpFilterTrades = 6 Then ‘Withdrawals

    If strFilter <> «» Then
strFilter = strFilter & » AND «

    strFilter
= strFilter & » (Type = ‘balance’) And Note Not Like ‘*BONUS*’ And
Profit < 0″

    If
strFilterNote <> «» Then strFilterNote = strFilterNote +
» + «


strFilterNote = strFilterNote + «Withdrawals»

ElseIf Me.grpFilterTrades = 7 Then ‘All credits

    If
strFilter <> «» Then strFilter = strFilter & » AND
«

    strFilter
= strFilter & » (Type = ‘credit’) «

    If
strFilterNote <> «» Then strFilterNote = strFilterNote +
» + «

    strFilterNote
= strFilterNote + «All credits»

ElseIf Me.grpFilterTrades = 8 Then ‘Credits In

    If
strFilter <> «» Then strFilter = strFilter & » AND
«

    strFilter
= strFilter & » (Type = ‘credit’) And Note Like ‘*In*’ «

    If
strFilterNote <> «» Then strFilterNote = strFilterNote +
» + «


strFilterNote = strFilterNote + «Credits In»

ElseIf Me.grpFilterTrades = 9 Then ‘ Credits Out

    If
strFilter <> «» Then strFilter = strFilter & » AND
«

    strFilter
= strFilter & » (Type = ‘credit’) And Note Like ‘* Out*’ «

    If
strFilterNote <> «» Then strFilterNote = strFilterNote +
» + «


strFilterNote = strFilterNote + «Credits Out»

ElseIf Me.grpFilterTrades = 10 Then ‘ Credits
Cancelled

    If
strFilter <> «» Then strFilter = strFilter & » AND
«

    strFilter
= strFilter & » (Type = ‘credit’) And Note Like ‘*Cancelled*’ «

    If
strFilterNote <> «» Then strFilterNote = strFilterNote +
» + «


strFilterNote = strFilterNote + «Credits Cancelled»

ElseIf Me.grpFilterTrades = 11 Then ‘ Credits
StopOut

    If
strFilter <> «» Then strFilter = strFilter & » AND
«

    strFilter
= strFilter & » (Type = ‘credit’) And Note Like ‘*StopOut*’ «

    If
strFilterNote <> «» Then strFilterNote = strFilterNote +
» + «


strFilterNote = strFilterNote + «Credits StopOut»

ElseIf Me.grpFilterTrades = 12 Then ‘Bonuses

    If
strFilter <> «» Then strFilter = strFilter & » AND
«

    strFilter
= strFilter & » (Type = ‘balance’) And Note Like ‘*BONUS*’ «

    If
strFilterNote <> «» Then strFilterNote = strFilterNote +
» + «

    strFilterNote = strFilterNote +
«Bonuses»

End If

 

2015-02-20 09-40-04 About_History 1 07

23:11
Добил наконец-то обновление данных в таблице
Accounts – сделал через функцию fnUpdate_dboAccount_Itogs()

Show »

Function
fnUpdate_dboAccount_Itogs() As Boolean

    Dim lFlag As Boolean

    lFlag = True

    Dim dbs As Database

    Dim rst As Recordset

    Dim rstStItog As Recordset

    Dim strSQL As String

    Dim iField As Integer, i As Integer

    Set dbs = CurrentDb()

    Set rstStItog =
dbs.OpenRecordset(«SELECT * From dbo_Accounts WHERE flagActive =
true;»)

    rstStItog.MoveFirst

    strSQL = «SELECT * FROM
qry_ItogAll;»

    Set rst = dbs.OpenRecordset(strSQL)

    If rst.RecordCount = 0 Then

        lFlag = False

    Else

        rst.MoveFirst

        ‘Do While Not rst.EOF

            With rstStItog

                .Edit

                !DateBegin =
rst![Min-OpenTime]

                !DateEnd =
rst![Max-CloseTime]

                !Balance = rst![Balance]

                !Equity = rst![Equity]

                !Deposits = rst![Deposits]

                !DepositsCount =
rst![DepositsCount]

                !Credits = rst![Credits]

                !CreditsCount =
rst![CreditsCount]

                !CreditsIn = rst![CreditsIn]

                !CreditsInCount =
rst![CreditsInCount]

                !CreditsOut =
rst![CreditsOut]

                !CreditsOutCount =
rst![CreditsOutCount]

                !CreditsCancelled =
rst![CreditsCancelled]

                !CreditsCancelledCount =
rst![CreditsCancelledCount]

                !CreditsStopOut =
rst![CreditsStopOut]

                !CreditsStopOutCount =
rst![CreditsStopOutCount]

                !Bonuses = rst![Bonuses]

                !BonusesCount =
rst![BonusesCount]

                !Withdrawals =
rst![Withdrawals]

                !WithdrawalsCount =
rst![WithdrawalsCount]

                .Update

            End With

            ‘rst.MoveNext

        ‘Loop

    End If

    rst.Close

    rstStItog.Close

    Set dbs = Nothing

    fnUpdate_dbo_Account_Itogs = lFlag

End Function

Торговый дневник 14.02.2015 (суббота) Начало работы с Яндекс-браузером и Яндекс-диском

08:55 Ночью сетка по еврику закрыла 2 позиции по тралу и 3 лока в минус по -10 п. Эквити осталось 44,43, баланс 471,09, просадка 90,56% — все равно дикая. Нужно выяснить, вроде-бы можно рибейты Инсты перекинуть обратно на торговый счет. Если это так, то тогда на следующей неделе можно продолжить торговлю. Если нет, то буду завязывать с
торговлей на реале в феврале и вплотную заниматься разработкой своей БД. Рибейтов заработал около 640 баксов – хватит на нормальный депозит. Занимаюсь сегодня разработкой импорта итогов из стейта. Пока непонятно почему, но функция
IIFнеправильно работает с прилинкованными таблицами…
09:40 Подбил Итог торговли в Пятницу 13 февраля 2015 г. Убыток за неделю по деньгам получился -64$ Всего рибейтов на Инсте заработал 642,70$а вложил 931,28$т.е. отбил всего 69% депозита. У F4u на таком рынке, какой был на прошлой неделе, я бы отбил 100% депозита рибейтами железно. Буду в марте возвращаться к F4u. К этому времени нужно в  основном отладить и оттестировать программу по стейтам.
10:33 Написал письмо на счет информера календаря на сайте:
Здравствуйте, Софья! Код информера восстановил, а он все равно не работает, проверьте пожалуйста и восстановите работу.
Заранее спасибо.
13.02.2015, 21:09, «SofyaB» <sofya.b@investing.com>:
Здравствуйте! Спасибо за Ваше сообщение.
Наша система автоматически блокирует информеры в случае изменения оригинального кода.
Чтобы разблокировать информер на странице http://abbforexexperts.ru/kalendari/ekonomicheskij-kalendar-ot-investing-com, пожалуйста, восстановите код информеров также на странице http://abbforexexperts.ru/?page_id=10968&preview=true и сообщите нам. После перепроверки кода, информер будет разблокирован.

10:40 Обновил программу PuntoSwitcher – начал работать нормально (переключает раскладку клавиатуры автоматически при наборе текста). Одновременно с ним установил Яндекс-браузер. Поюзаю его, может быть он менее ресурсоемкий для редактирования страниц.
10:57 Поюзал ЯБ – работает нормально, памяти относительно немного берет, на  каждую страницу выделяется отдельный процесс, как у Хрома. Редактирование страниц так же ОК. Можно его использовать по умолчанию. На работе поставлю…
11:01 Запустил синхронизацию с Яндекс диском, чтобы сохранять настройки браузера и восстанавливать на любом устройстве. 11:21 Подготовил стейт на новую неделю.

11:29 Очень понравилось работать со скриншотами Яндекса.
Быстро сделал графики для теханализа и они сразу ушли на Яндекс-диск, т.е.
будут доступны везде и всегда! Быстро можно выделить нужную область экрана – Яндекс сам определяет границы выделенной области и автоматически создаетнужные файлы с именем: дата и время создания + Скриншот экрана.
11:32 Теперь попробую сделать ТА. Сделал быстро и хорошо. Технический анализ 14.02.2015 (суббота) H1 / H4
Файлы яндекс браузером создаются PNG, которые НАМНОГО МЕНЬШЕ чем JPGвсего 88 кб один файл с графиком ТА вместо старых 300-400 КБ, и качество лучше! Век живи век учись. Все новые возможности, которые узнаю, нужно использовать для ускорения рутинных процессов. Теперь установлю на работе ЯБ и ЯД и буду активно их использовать.

2015-02-14 11-48-26 ЯД - Скриншоты

12:13 Сделал скриншоты некоторых форм из разрабатываемой программы на ЯД. Вот например журнал стейтментов, который находится в разработке, поэтому не все цифры правильные. Сегодня буду дальше делать версию 1.06

2015-02-15 13-16-05 Скриншот экрана

2015-02-15 09-03-02 About_History

2015-02-15 09-01-44 Journal_Tables_Statements 2015-02-15 00-54-55 ABB Statements Journal_Accounts

2015-02-15 00-06-24 ABB Statements Journal_Brokers

19:43 Разработка идет полным ходом. Сделал импорт счетов из прилинкованных стейтов. Теперь нужно выяснить ВСЕ сервера брокеров, с которыми работал когда-либо. Начну с Фрешфорекса…
23:18 Проверил все ссылки на брокеров, с которыми работал. Все сайты присутствуют, кроме трех контор: утюгов (нет сайта http://www.utgfx.com/), FxProfithttp://www.fxprofit.ru/ — сайт есть но фирма не работает как брокер, и http://www.nwbroker.ru/ — так же сайт не рабочий, только картинка висит.
02:16 Продолжаю забивать в базу сервера брокеров. Вообще если делать коммерческую программу, нужно выяснить ВСЕХ брокеров с платформой МТ4 и их сервера, возможно открыть демки и всех и поторговать на них, чтобы попробовать закачать стейты из разных источников, чтобы они обрабатывались корректно любые, даже иноязычные. Для начала попробую взять у MyFxBook.com список4 брокеров…
04:27 Сделал скриншоты списка брокеров у MyFxBook.com – 47 * 20 = 940 всего…

Теперь ищу списки и рейтинги: http://forex-ratings.ru/brokers_archive/
http://www.gurutrade.ru/brokers/mt4-forex-brokers/
http://forex-ratings.ru/forex-brokers/mt4-forex-brokers.php
http://ru.forexbrokerz.com/page/mt4-брокеры
04:35 На сегодня достаточно … В общем нужно спать и пока не заморачиваться на счет всех брокеров…