Согласно сентябрьскому отчету ОПЕК, по итогам второго квартала 2017 г. профицит нефти в мире опустился до 100 тыс. баррелей в день.

По расчетам картеля, во втором квартале 2017 г. мировое потребление нефти составило 96 млн баррелей, что на 300 тыс. больше, чем ОПЕК считала в августе. В то же самое время объем предложения составил 96,1 млн баррелей в сутки, таким образом, профицит сырья практически сошел на нет.


По итогам первого квартала 2017 г. производство “черного золота” превышало спрос на него на 700 тыс. бочек, теперь лишь на 100 тыс.

По прогнозу ОПЕК, по итогам всего текущего года потребление сырья составит в среднем 96,8 млн баррелей в день, тогда как не члены картеля обеспечат добычу в 64,1 млн. То есть, для картеля останется 32,7 млн. Напомним, что по итогам августа среднесуточное производство стран ОПЕК держалось на уровне в 32,8 млн.

Но это в среднем по году, а так в третьем квартале у ОПЕК будет возможность поднять добычу до 33,7 млн баррелей, а в четвертом до 33,3 млн.

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

Разберёмся почему у США дефицит внешней торговли, а у России профицит.

Финансовая устойчивость США у многих людей не вызывает сомнения. Облигации этой страны – так называемые трежерис — пользуются огромной популярностью у инвесторов. Это говорит о высоком доверии к ним. В то же время, Штаты почти каждый год балансируют на грани дефолта. Это происходит потому, что в этой стране устанавливается потолок государственного долга. Долгов больше, чем эта цифра, набирать нельзя. Потолок устанавливается конгрессом. США регулярно подбираются к этой планке, и конгресс ее повышает. Если этого не делать, Америка не сможет занять дополнительные деньги, чтобы покрыть старые долги.

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

Собрал все призовые места (то есть 1-3 места), которые заняла Россия, на тему добычи сырья всех мастей в век борьбы за ресурсы и нехватки с/х земель:
2-е место по объему добычи нефти (2014) после Саудовской Аравии;
2-е место по объему добычи товарного природного газа (2014) после США;
2-е место по объему добычи золота (2014) после Китая;
1-е место по объему добычи алмазов (2013) уступая по стоимостным объемам только Ботсване;
2-е место по объему добычи калийных солей (2010);
2-е место по объему производства алюминия (2011);
2-е место по объему производства никеля (2010);
3-е место по объему производства аммиака (2010);
1-е место в мире по разведанным запасам природного газа (32% мировых запасов газа);
1-е место в мире по добыче и экспорту природного газа (35% мировой добычи газа);
1-е место в мире по добыче нефти и второе место по её экспорту;
1-е место в мире по разведанным запасам каменного угля (23% мировых запасов углей);
1-е место в мире по запасам торфа (47% мировых запасов торфа);
1-е место в мире по запасам лесных ресурсов (23% мировых запасов леса);

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

Решился наконец-то обнародовать индикаторы, на которые я ориентируюсь для определения состояния экономики и курса рубля.
Первый — отношение золотовалютных резервов ЦБ к курсу рубля (синий график) показывает динамику изменения ЗВР при текущем курсе рубля. Индикатор ЗВР*ЗВР/М2 (красный график) еще более информативен. Шкала логарифмическая.


Про Currency Board (отношение денежной массы М2 к золотовалютным резервам) уже писали тут и до меня, это довольно простой и очень качественный индикатор определения курса нац.валюты развивающихся экономик.


Следующий — отношение рублевых депозитов в кредитных организациях к золотовалютным резервам (синий график). На сегодняшний день этот показатель у исторических максимумов и равен 0,81, т.е. при текущем курсе рубля надо будет отдать 81% всех ЗВР, если граждане закроют свои депозиты и решат выйти в более безрисковые активы типа СКВ, золото и т.п.
Отношение рублевых депозитов к М2 (красный график) показывает какой процент денежной массы лежит на депозитах и видно, что этот показатель за последние 10 лет вырос с 0,35 до 0,5. С одной стороны это показывает рост уровня доверия к банковской системе, но с другой показывает, что растет процент денежной массы, который лежит «мертвым грузом» вместо того, чтобы развивать экономику.

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

Давно не писал ничего. Причины были банальны — аудитория не всегда, а точнее никогда не может оценить по достоинству ту или иную работу.
В связи с этим на смартлабе тонут в гуще «я же говорил» какие-то полезные работы.

Итак, вчера часов этак в 2 ночи, сталкиваюсь с Тимофеем Мартыновым подсчитывающем свободный денежный поток в Газпроме вот здесь - https://docs.google.com/spreadsheets/d/1mjDy3LykWtJB2QapEZnS37DBACpvVGuD838YTKX7o60/edit#gid=0

Здорово! Приятно был удивлен)))) Да и методика расчета у него интересная. О правильности или неправильности её судить не буду, так как математика — на самом деле наука неточная и зависимая и все зависит от того как считать, и главное во сколько и в каком состоянии.))))

Тем не менее заметил, что Сообщество инвесторов, трейдеров, никоим образом не пытаются вступить в спор с Тимофеем в этом блоге - https://smart-lab.ru/blog/417574.php
Один лишь Григорий высказывается в комментах приводя данные не учитывающие Депозиты Газпрома.

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

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

Недавно Росстат сообщил свежие данные о среднем уровне заработной платы в России. По состоянию на июль она составила 39 355 рублей. За год выросла на 7,5% и при этом обогнала инфляцию на 3%.


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

    Представляю таблицу для портфельных инвестиций. В квике до сих пор такого нет. Цвет строки меняется если Прибыль%<>5%. Обновление каждые 5 сек.


Для её создания необходимо:
1. Создать файл «tablePortfolio.txt» в папке «C:\QUIK\Scripts». Если папки нет, создать её.
2. Скопировать туда код скрипта
3. Сохранить, выбрав кодировку «ANSI», иначе вместо русских букв могут быть кракозябры.
4. Сменить расширение файла с ".txt" на ".lua"
5. Запустить скрипт командой Сервисы->Lua  скрипты->Добавить (выбрать файл tablePortfolio.lua) ->Запустить

Код скрипта:

IsRun = true
class_code="TQBR"

function main()
   -- Получает доступный id для создания
   t_id = AllocTable()   
   
   -- добавить столбцы
   AddColumn(t_id, 1, "Бумага",       true, QTABLE_STRING_TYPE, 20)
   AddColumn(t_id, 2, "Кол-во",       true, QTABLE_INT_TYPE,     7)
   AddColumn(t_id, 3, "Цена покупки", true, QTABLE_DOUBLE_TYPE, 14)
   AddColumn(t_id, 4, "Цена текущая", true, QTABLE_DOUBLE_TYPE,   14)
   AddColumn(t_id, 5, "Прибыль, р",   true, QTABLE_DOUBLE_TYPE,   14)
   AddColumn(t_id, 6, "Прибыль, %",   true, QTABLE_DOUBLE_TYPE, 14)
   t = CreateWindow(t_id)

   for iRow=1, getNumberOf("depo_limits")-1, 1 do
      rowInPortfolioTable = getItem("depo_limits", iRow) -- получить текущую строку из таблицы "Лимиты по бумагам"            
      qtyBoughtLots  = tonumber(rowInPortfolioTable.currentbal)         
      limitKind = rowInPortfolioTable.limit_kind          
      if qtyBoughtLots>0 and limitKind<1 then      
         InsertRow(t_id, iRow)-- добавить новую строку вниз таблицы   
      end
   end
   local rows, columns = GetTableSize (t_id)
   InsertRow(t_id, rows+1) -- добавить новую строку вниз таблицы для "Итого"
   
   SetWindowCaption(t_id, "Портфель: прибыли и убытки    © ramirzaev@mail.ru") 

   -- исполнять цикл, пока пользователь не остановит скрипт или не закроет окно таблицы
   while IsRun do 
      if IsWindowClosed(t_id)==true then
         IsRun=false
      end

      local currentPrice=0
      local qtyBoughtLots=0
      local profitAbs = 0
      local profitPerc = 0
      local currentSecCode= ""
      local fullNameOfInstrument = ""
      local limitKind = 0
      local rowInPortfolioTable = {}    -- строка из таблицы "Лимиты по бумагам"
      local tableInstrument = {}    -- данные "Таблицы текущих торгов"
      local iRowInOutTable = 1
	  local totalInvest = 0
	  local totalPortfolio = 0
	  local totalProfit = 0
	  local totalPercent = 0

      for iRow=0, getNumberOf("depo_limits")-1, 1 do
         rowInPortfolioTable = getItem("depo_limits", iRow) -- получить текущую строку из таблицы "Лимиты по бумагам"         
         
         qtyBoughtLots  = tonumber(rowInPortfolioTable.currentbal)
         
         limitKind = rowInPortfolioTable.limit_kind 
         
         if qtyBoughtLots>0 and limitKind<1    then      -- если кол-во лотов >0 и тип лимита T0
            currentSecCode = rowInPortfolioTable.sec_code
            fullNameOfInstrument =  tostring(getParamEx(class_code, currentSecCode, "SHORTNAME").param_image or "0") --"LONGNAME"
            avgPrice       = tonumber(rowInPortfolioTable.awg_position_price)                  
            currentPrice = GetAskPrice(currentSecCode)   
            profitAbs = (currentPrice-avgPrice)*qtyBoughtLots      
            profitPerc    = 100*currentPrice/avgPrice   - 100
			
			totalInvest = totalInvest + avgPrice*qtyBoughtLots  
			totalPortfolio = totalPortfolio + currentPrice*qtyBoughtLots   
            
            SetCell(t_id, iRowInOutTable, 1, fullNameOfInstrument) -- "Бумага"
            SetCell(t_id, iRowInOutTable, 2, tostring(qtyBoughtLots)) -- "Кол-во"RemoveZero(tostring(qtyBoughtLots)))
            SetCell(t_id, iRowInOutTable, 3, tostring( math_round(avgPrice, 3) ))  -- tostring(avgPrice))   -- "Цена покупки"
            SetCell(t_id, iRowInOutTable, 4, RemoveZero(tostring(currentPrice)))   -- "Цена текущая"
            SetCell(t_id, iRowInOutTable, 5, tostring( math_round( profitAbs, 0)) ) -- "Прибыль, р"
            SetCell(t_id, iRowInOutTable, 6, tostring(math_round(profitPerc, 1)) .."%") -- "Прибыль, %"
            
            if profitPerc >5 then       -- окрашиваем
               ColourRowInGreen(iRowInOutTable)
            elseif profitPerc<-5 then 
               ColourRowInRed(iRowInOutTable)
            else 
               ColourRowInYellow(iRowInOutTable)
            end   
            iRowInOutTable = iRowInOutTable+1
         end
      end
      totalProfit = totalPortfolio - totalInvest 
      totalPercent   = 100*totalProfit/totalInvest  
	  SetCell(t_id, iRowInOutTable, 1, "Итого") 
      SetCell(t_id, iRowInOutTable, 3, tostring( math_round(totalInvest, 0) ))  
      SetCell(t_id, iRowInOutTable, 4, tostring( math_round(totalPortfolio, 0)))  
      SetCell(t_id, iRowInOutTable, 5, tostring( math_round( totalProfit, 0)) ) 
      SetCell(t_id, iRowInOutTable, 6, tostring(math_round(totalPercent, 1)) .."%") 
	  
	  if profitPerc >5 then       -- окрашиваем
               ColourRowInGreen(iRowInOutTable)
            elseif profitPerc<-5 then 
               ColourRowInRed(iRowInOutTable)
            else 
               ColourRowInYellow(iRowInOutTable)
            end   
            iRowInOutTable = iRowInOutTable+1
      sleep(5000) -- пауза 5 сек.
      end
   --message("script table portfolio finished")
end


function ColourRowInRed(num_row)
   SetColor(t_id, num_row, QTABLE_NO_INDEX, RGB(255,150,150), RGB(0,0,0), RGB(255,150,150), RGB(0,0,0))
end
function ColourRowInYellow(num_row)
   SetColor(t_id, num_row, QTABLE_NO_INDEX, RGB(255,255,200), RGB(0,0,0), RGB(255,255,200), RGB(0,0,0))
end
function ColourRowInGreen(num_row)
   SetColor(t_id, num_row, QTABLE_NO_INDEX, RGB(150,255,150), RGB(0,0,0), RGB(150,255,150), RGB(0,0,0))
end
function GetAskPrice(inp_Sec_Code )
   local ask = tostring(getParamEx(class_code, inp_Sec_Code, "OFFER").param_value or 0)
   return ask
end
-- Округляет число до указанной точности
function math_round (num, idp)
   local mult = 10^(idp or 0)
   return math.floor(num * mult + 0.5) / mult
end
-- удаление точки и нулей после нее
function RemoveZero(str)
   while (string.sub(str,-1) == "0" and str ~= "0") do
      str = string.sub(str,1,-2)
   end
   if (string.sub(str,-1) == ".") then 
      str = string.sub(str,1,-2)
   end   
   return str
end
function OnStop()
   DestroyTable(t_id)
   IsRun = false   
end

Если те, кто инвестирует в акции, заглянут в учебник, то могут увидеть презабавные вещи, типа портфельной теории Марковица, CAPM.

Хотя вроде бы теория должна помогать зарабатывать, но по факту её привлечение может быть контрпродуктивно. Наверно, поэтому тот же У.Баффет так скептически относится к CAPM.  

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

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

Вот разве отказались бы вы купить гос. компанию, которая раньше платила дивы в 7%, а после падения цены акций в два раза доходность стала уже 14%, причём сам бизнес компании и подход к выплате дивидендов не изменился?! Я бы не отказался.

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