Западные эксперты утверждают, что (пассивный) инвестор всегда должен быть в рынке, быть вне рынка — самый главный инвесторский риск. Есть даже на первый взгляд бредовая теория, что за десятилетия роста индекса основной результат дают всего 10-20 дней. Можно даже найти исследование.

Если лень читать, суть исследования такова. За 20 лет (1995-2014) индекс S&P 500 вырос в 6,5 раз, принося 9,85% годовых. Если из него убрать всего 10 лучших дней, то сумма вложений вырастет всего в 3,2 раза (6,1%). Далее ещё хуже, если интересно, пройдите по ссылке и посмотрите картинку. На минутку, 10 дней из 20 лет (~5000 рабочих дней) — это всего 0,2% времени.


Но тема не была бы интересна, если бы я её не переложил на российские реалии. У меня сразу две таблички — на индексе полной доходности и на обычном. Из-за того, что ИПД у нас считается всего 8 лет.

Поехали.

ММВБ полной доходности (01.2009 — 07.2017)

Данные были взяты с сайта Мосбиржи, на каждый день был высчитан прирост в пунктах/рублях и процентах. Потом строки были отсортированы по этому приросту по убыванию.

( Читать дальше )

Всем доброго торгового дня, коллеги!
Сегодня у меня день рождения, поэтому есть формальный повод вставить свое скромное слово в диалоги смартлабовской аристократии.
Кроме этого, достигнутый возраст уже позволяет озвучивать кое-какие итоги.
Оглядываясь назад, обнаруживаю, что уже без малого шесть лет занимаюсь трейдингом. Годы, проведенные на форекс, не считаю потерянными. Хотя денег я там не заработал, но приобрел свой мотивированный взгляд на биржевую деятельность. Удивляюсь, как же я был наивен и чист в намерениях, открывая свой первый торговый счет! Сегодня все не так, конечно… Сегодня я не трейдер, и становится им не желаю. Я и не спекулянт и не инвестор — я участник фондового рынка. Покупаю и продаю акции российского фондового рынка, имея четкий план и цель. Сделки совершаю редко...
Помню в книге И.Окишева про рынок форекс (названия не помню уже) были такие слова — "… идеально, это не когда нечего добавить, это когда отнять уже ничего нельзя". Золотые, надо сказать, слова! Вот из своей деятельности на РФР я и отнял следующее:

( Читать дальше )

Некто гражданин Евтушенков прихватизирует квартиру в хрущевке в 90х и начинает ее сдавать.
В десятых рыночек порешал, что «бабушкин ремонт» не позволяет сдавать квартиру за хорошую цену.
Закупается мебель из Икеи, выбрасывается чехословацкая стенка, квартира сдается за полную цену.

ВНЕЗАПНО государство в лице мэра Мухосранска спохватилось, что прихватизация прошла с нарушениями. Квартиру отбирают и продают на муниципальном аукционе приближенным к мэру местным бандитам.

Новый хозяин пишет заяву полицию, что пропала Чехословацкая стенка и бесценная коллекция хрусталя. Предварительно мэр, бандюк, следак и местная судья все это обсудили в баньке в один субботний вечер, конечно. Прямо как в фильме «Дурак» дело было. 

Поскольку чехословацкую стенку сейчас не купишь, неплохо бы ее оценить как «бесценную реликвию», ну, скажем в 170 условных единиц.
Что эти бесценные реликвии пропали, должен отвечать не предыдущий хозяин, а предпредыдущий (не по закону, а по понятиям, конечно же).

( Читать дальше )

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

Предназначается для новичков в алготрейдинге, что-то типа болванки.

Важно: выставление заявок я закомментировал, поэтому можете смело запускать этот скрит, он не натворит ужаса по счету.

require"QL"

log = "sbrf.log"
seccode = "SRM6"
lots_in_trade = 80
accnt = ""
better = -5
chart = "sberbankxxx"
is_run = true
prev_datetime = {}
len = 100
basis = 9
k_bal = {0,1,2,3}
sell = false
buy = false
id = 0
first = true

function trade_signal(shift)
        number_of_candles = getNumCandles(chart)
        bars_temp,res,legend = getCandlesByIndex(chart,0,number_of_candles-2*len-shift,2*len)
        bars={}

        i=len
        j=2*len
        while i>=1 do
                if bars_temp[j-1].datetime.hour>=10 then
                        sk=true
                        if bars_temp[j-1].datetime.hour==18 and bars_temp[j-1].datetime.min==45 then
                                sk=false
                        end
                        if sk then
                                bars[i]=bars_temp[j-1]
                                i=i-1
                        end
                end
                j=j-1
        end

        t = len+1

        do_sell = false
        do_buy = true

        value = 0
        if do_sell then value = 1 end
        if do_buy then value = -1 end
        toLog(log,"value="..value.." on candle: "..bars[len].datetime.year.."-"..bars[len].datetime.month.."-"..bars[len].datetime.day.." "..bars[len].datetime.hour..":"..bars[len].datetime.min.."   O="..bars[len].open.." H="..bars[len].high.." L="..bars[len].low.." C="..bars[len].close.." V="..bars[len].volume)
        return value
end

function mysplit(inputstr, sep)
        if sep == nil then
                sep = "%s"
        end
        local t={} ; i=1
        for str in string.gmatch(inputstr, "([^"..sep.."]+)") do
                t[i] = str
                i = i + 1
        end
        return t
end

function OnInit(path)
        log=getScriptPath()..'\\'..log
        toLog(log,"==========OnInit: START")
        toLog(log,"==========OnInit: FINISH")
end

function OnStop()
        is_run = false
        toLog(log,"==========OnStop: script finished manually")
end

function CheckBit(flags, bit)
   -- Проверяет, что переданные аргументы являются числами
   if type(flags) ~= "number" then error("Ошибка!!! Checkbit: 1-й аргумент не число!"); end;
   if type(bit) ~= "number" then error("Ошибка!!! Checkbit: 2-й аргумент не число!"); end;
   local RevBitsStr  = ""; -- Перевернутое (задом наперед) строковое представление двоичного представления переданного десятичного числа (flags)
   local Fmod = 0; -- Остаток от деления
   local Go = true; -- Флаг работы цикла
   while Go do
      Fmod = math.fmod(flags, 2); -- Остаток от деления
      flags = math.floor(flags/2); -- Оставляет для следующей итерации цикла только целую часть от деления
      RevBitsStr = RevBitsStr ..tostring(Fmod); -- Добавляет справа остаток от деления
      if flags == 0 then Go = false; end; -- Если был последний бит, завершает цикл
   end;
   -- Возвращает значение бита
   local Result = RevBitsStr :sub(bit+1,bit+1);
   if Result == "0" then return 0;
   elseif Result == "1" then return 1;
   else return nil;
   end;
end;

function killorders(ccode,scode)
    for i=0,getNumberOf("orders")-1,1 do
        local t=getItem("orders", i)
        if t ~= nil and type(t) == "table" then
            if( t.seccode == scode and CheckBit(t.flags, 0) == 1) then
                local transaction={
                    ["TRANS_ID"]=tostring(math.random(2000000000)),
                    ["ACTION"]="KILL_ORDER",
                    ["CLASSCODE"]=ccode,
                    ["SECCODE"]=scode,
                                        ["ACCOUNT"] = accnt,
                    ["ORDER_KEY"]=tostring(t.ordernum),
                }
                                res=sendTransaction(transaction)
            end
        end
    end
end

function killstoporders(ccode,scode)
    for i=0,getNumberOf("stop_orders")-1,1 do
        local t=getItem("stop_orders", i)
        if t ~= nil and type(t) == "table" then
            if( t.seccode == scode and CheckBit(t.flags, 0) == 1) then
                local transaction={
                    ["TRANS_ID"]=tostring(math.random(2000000000)),
                    ["ACTION"]="KILL_STOP_ORDER",
                    ["CLASSCODE"]=ccode,
                    ["SECCODE"]=scode,
                                        ["ACCOUNT"] = accnt,
                    ["STOP_ORDER_KEY"]=tostring(t.ordernum),
                }
                                res=sendTransaction(transaction)
            end
        end
    end
end


function main()
        toLog(log,"==========main: START")
        while is_run do
                if isConnected() == 1 then
                        ss = getInfoParam("SERVERTIME")
                        if string.len(ss) >= 5 then
                                hh = mysplit(ss,":")
                                str=hh[1]..hh[2]
                                h = tonumber(str)
                                if (h>=1000 and h<1400) or (h>=1405 and h<1845) or (h>=1905 and h<2350) then
                                        if first then
                                                for ti = 50,2,-1 do     trade_signal(ti) end
                                                if buy and not sell then message(seccode.." Current state: green and buy",1) end
                                                if sell and not buy then message(seccode.." Current state: red and sell",1) end
                                                if buy and sell then message(seccode.." ERROR: green and red",1) end
                                                if not buy and not sell then message(seccode.." WARNING: nothing",1) end
                                                first = false
                                        end
                                        prev_candle = getPrevCandle(chart,0)
                                        if not isEqual(prev_candle.datetime,prev_datetime) then
                                                current_value = trade_signal(1)

                                                if current_value ~= 0 then
                                                        optn = "B"
                                                        if current_value==1 then optn = "S" end
                                                        curvol=0
                                                        no=getNumberOf("FUTURES_CLIENT_HOLDING")
                                                        if no>0 then
                                                                for i=0,no-1,1 do
                                                                        im=getItem("FUTURES_CLIENT_HOLDING", i)
                                                                        if im.sec_code==seccode then
                                                                        curvol=im.totalnet
                                                                        end
                                                                end
                                                        end
                                                        trvol = -current_value*lots_in_trade-curvol
                                                        if trvol ~= 0 then
                                                                killorders("SPBFUT",seccode)
                                                                killstoporders("SPBFUT",seccode)
                                                                f = io.open(getScriptPath().."\\sbrf2_pos.txt","r")
                                                                sbrf2_pos=f:read("*n")
                                                                f:close()
                                                                f = io.open(getScriptPath().."\\sbrf3_pos.txt","r")
                                                                sbrf3_pos=f:read("*n")
                                                                f:close()
                                                                pr,n,l = getCandlesByIndex ("futsber", 0, getNumCandles("futsber")-1, 1)
                                                                local trans =
                                                                {
                                                                        ["ACTION"] = "NEW_ORDER",
                                                                        ["CLASSCODE"] = "SPBFUT",
                                                                        ["SECCODE"] = seccode,
                                                                        ["ACCOUNT"] = accnt,
                                                                        ["OPERATION"] = optn,
                                                                        ["PRICE"] = toPrice(seccode,pr[0].close+current_value*better),
                                                                        ["QUANTITY"] = tostring(math.abs(curvol-sbrf2_pos-sbrf3_pos)),
                                                                        ["TRANS_ID"] = tostring(getTradeDate().month*100+getTradeDate().day+id)
                                                                }
                                                                id = id+1
                                                                --res = sendTransaction(trans)
                                                                message(seccode.." Send : " .. res, 2)
                                                                toLog(log,"Send: ".. res)
                                                                for btr=0,200,5 do
                                                                        local trans =
                                                                        {
                                                                                ["ACTION"] = "NEW_STOP_ORDER",
                                                                                ["CLASSCODE"] = "SPBFUT",
                                                                                ["SECCODE"] = seccode,
                                                                                ["ACCOUNT"] = accnt,
                                                                                ["OPERATION"] = optn,
                                                                                ["PRICE"] = toPrice(seccode,pr[0].close-current_value*btr),
                                                                                ["STOPPRICE"] = toPrice(seccode,pr[0].close-current_value*(btr+better)),
                                                                                ["QUANTITY"] = tostring(6),
                                                                                ["TRANS_ID"] = tostring(getTradeDate().month*100+getTradeDate().day+id),
                                                                                ["EXPIRY_DATE"] = "GTC"
                                                                        }
                                                                        id = id+1
                                                                        --res = sendTransaction(trans)
                                                                        message(seccode.." Send : " .. res, 2)
                                                                        toLog(log,"Send: ".. res)
                                                                end
                                                                if current_value == 1 then
                                                                        message(seccode..' RED: buy->sell',1)
                                                                        toLog(log,"RED signal")
                                                                else
                                                                        message(seccode..' GREEN: sell->buy',1)
                                                                        toLog(log,"GREEN signal")
                                                                end
                                                        else
                                                                if current_value == 1 then
                                                                        message(seccode..' RED: buy->sell',1)
                                                                        toLog(log,"RED signal, but nothing to do")
                                                                else
                                                                        message(seccode..' GREEN: sell->buy',1)
                                                                        toLog(log,"GREEN signal, but nothing to do")
                                                                end
                                                        end
                                                else
                                                        if buy and not sell then toLog(log,"Nothing to do. Current state: green and buy",1) end
                                                        if sell and not buy then toLog(log,"Nothing to do. Current state: red and sell",1) end
                                                        if buy and sell then toLog(log,"Nothing to do. ERROR: green and red",1) end
                                                        if not buy and not sell then toLog(log,"Nothing to do. WARNING: nothing",1) end
                                                end
                                                prev_datetime = prev_candle.datetime
                                        end
                                end
                        end
                end
                sleep(5*1000)
        end
        toLog(log,"==========main: FINISH")
end

Программа Экономика на телеканале Крым-24.

Недавно Институт Международных финансов опубликовал статистику по закредитованности мировой экономики. Посчитаны все долги на планете Земля, государственные и частные. Они составили 217 триллионов долларов. Много это или мало? Для ответа на вопрос, возьмём мировой Валовый Внутренний Продукт и сравним его с размером долга. В результате получается 327%. Мировая экономика набрала обязательств в три раза больше, чем производит за год материальных благ.
Таким образом, нынешний мировой долг – это очень внушительная сумма. Более того, она растёт. Страны, которые нарастили займы за последний год – это США и Китай. Две экономики, которые неразрывно связаны друг с другом. США – это эталонное общество потребления, а Китай — страна производитель. Они находятся друг с другом в очень плотной связке. 

( Читать дальше )

 

Сначала рассмотрим данные из отчётности за 2016 год 
 


 
 
 
 

( Читать дальше )

Ликвидность в еврооблигациях, если сравнить с любой ходовой бумагой, очень низкая. Объем торгов нестабильный. Бывает 2 месяца объем за день от 0 до 10 штук, а потом в один день 40'000 штук, причем цена не практически не сдвинулась:

Имхо, все сделки большого объема совершаются по предварительной договоренности по телефону, так как заявки объемом в 50 лотов стоят неделями без исполнения, а бОльшие исчезают очень быстро.

Могу дать следующие рекомендации:

1)   Чем ближе к закрытию (18:40) тем полнее стаканы на еврооблигациях и уже спреды. Поэтому для ознакомления открываем стаканы после 18. Вы можете увидеть там как пустоту, так и некоторое количество заявок (см. нестабильность), но те что ближе к спреду редко объемом больше 50, чаще 10-30.

Вот некоторые вечерние стаканы:

 

( Читать дальше )

Сложные проценты — это самая могущественная сила во вселенной.

© Альберт Эйнштейн.



Именно эта сила не позволяет бесконечно надуваться финансовым пузырям. Представьте себе, что некий миллионер триста лет назад положил большую денежку под сложный процент в один из крупных и надёжных мировых банков. Сейчас в 2017 году его пра-пра-пра-правнуки смогли бы купить всю планету на корню, ЕСЛИ БЫ этим деньгам разрешили все эти триста лет «оборачиваться». А теперь представьте, что тоже самое сделали другие десятки тысяч миллионеров и миллиардеров триста-двести, да хотя бы сто лет назад. Ни одна банковская система мира не сможет обслуживать такой чудовищный долг!

Поэтому с определённой периодичностью «пускают кровь» экономикам разных стран посредством войн, «кризисов», массовых заболеваний, убийств конкретных влиятельных лиц и т.п. Даже не мечтайте зарабатывать долго и много на сложных процентах, Вам просто не дадут этого сделать. Найдётся тысяча и один способ опустошить Ваш счёт. Примеров тому масса. Многомиллиардные счета граждан СССР просто обнулили за ОДНУ НОЧЬ в конце прошлого века. Думаю, у каждого из Вас есть родственник, который пострадал от этого произвола.

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

( Читать дальше )

Хoчу прeдставить вaм 5 обучающих видео пo основам LEVEL2 (стакан и лента принтов)

Эти видeo прoсмoтрeли и пoлучили лaйков мaксимальнoе кoличество зa всю истoрию кaнaла, в сyммe 24674 прoсмoтрoв и 831 лайк, кучу кoмeнтoв, и всeго лишь 11 дизлaйкoв.

Пoсле прoсмoтра этих видeo, вы бyдeтe имeть чeткoе прeдстaвлeниe, чтo прoисхoдит в стaкaнe. В этих видeo я пoкaзaл свoй oпыт зa 8 лeт тoргoвли.

Нe пoлeнитeсь, дoбaвьтe или сoхрaнитe кудa-нибудь сeбe эти ссылки, чтo-бы пoсмoтрeть пoтoм.

( Читать дальше )

Проще всего объяснить, как ловить непредсказуемую кошку, если сократить количество дверей
Давайте представим, что у нас есть только три двери
Тогда в первый день мы открываем среднюю дверь (№2)
Если кошки там нет, значит она была за дверью №1 или №3
Тогда на следующий день мы снова открываем среднюю дверь и гарантированно ловим кошку, так как из-за дверей №1 и №3 она могла передвинуться только за дверь №2

Теперь давайте представим, что у нас четыре двери. Проще всего понять стратегию ловли кошки, если все визуализировать


В первый день мы открываем дверь №2. Если кошка там – мы выиграли

Если кошки там нет, во второй день мы открываем дверь №3
На рисунке мы отмечаем – за какой дверью могла быть кошка на второй день. Понятно, что если мы в первый день не угадали, что кошка сидит за дверью №2, то на второй день она никак не может очутиться за дверью №1, так как попасть туда она смогла бы только из-за двери №2 – и мы не рисуем кошку за дверью №1

( Читать дальше )