За сегодня

Топиков: 130

форум акций: 223

остальные форумы: 90

комментариев: 1020

за месяц

 

Блог им. NektoFinkelmaer |Скрипт для расчета планируемых дивидендов (VBScript)

Дивидендный сезон в разгаре, пора рассчитать планируемые дивиденды.
Держите скрипт для Excel.

1. Укажите тикер
2. Укажите количество
3. Вставьте формулу "=Dividend(Тикер)"
4. Перемножьте одно на другое
5. Ваш портфель великолепен.

Скрипт для расчета планируемых дивидендов (VBScript)


Function Dividend(Ticker) As Double

    Dim xmlHttp As Object
    Set xmlHttp = CreateObject("MSXML2.ServerXMLHTTP.6.0")

    myurl = "https://www.dohod.ru/ik/analytics/dividend/" + StrConv(Ticker, vbLowerCase)
    
    xmlHttp.Open "GET", myurl, False
    xmlHttp.Send
    
    Text = xmlHttp.responseText
    
    Pos = InStr(1, Text, "<p>Совокупные дивиденды в следующие 12m:", vbTextCompare)
    
    Text = Mid(Text, Pos)
    Pos = InStr(1, Text, "</span>", vbTextCompare)
    Text = Left(Text, Pos - 1)
    
    Pos = InStr(1, Text, """>", vbTextCompare)
    Text = Mid(Text, Pos + 2)
    Text = Replace(Text, " ", "")
    
    Dividend = Val(Text)
    
End Function
PS: Все права на расчет дивидендов принадлежат www.dohod.ru/

Блог им. NektoFinkelmaer |График влево

Гуру рынка говорят — график цены акции может идти иногда вверх, иногда вниз и всегда вправо.
Как же они ошибались!
Держи график влево, да еще и не один, добавь сколько хочешь инструментов с фондовой секции ММВБ.
Скрипт стягивает данные с iss.moex.com/ рисует график и зиг-заг. (интервал час)

График влево

Пользуйся — и твой трейдинг выйдет на новый уровень.

<!DOCTYPE html>
<html>
<head>
    <meta charset="utf-8" />
</head>
<body>

<form name="search">
    <input type="text" name="key" placeholder="Тикер" id="key"/>
    <input type="button" name="buttonChart" value="График" />
</form>
<div id="printBlock"></div>
<canvas id="chart" width="4000" height="300"></canvas>
<script>
const keyBox = document.search.key;
const keyButton = document.search.buttonChart;
 
 function DrawChart(prices,minPrice,maxPrice,maxVolume,ZZ){

	var chart = document.getElementById("chart");
	
	
	if (chart.getContext) {
		var ctx = chart.


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

полезные записи за 24 часа

★17 41 😈Злые капиталисты накручивают цены!
★8 2 Топ-10 валютных облигаций с наибольшей доходностью от РБК Инвестиций
★6 5 Мой первый и неудачный опыт поиска торговой стратегии для Московской биржи
★5 10 Составил подписчику дивидендный портфель стоимостью 1.5 млн рублей
★5 3 🟡Шестнадцатимиллионная претензия на 5-процентную когорту в трейдинге! День 31-й.(пост за понедельник)
★3 22 Сергей Караханян (Альфа): Доходность LQDT может упасть сильно ниже ставки при падении кредитования
★3 3 Экспоненциальный рост дивидендов
★3 2 Мой портфель акций на 17 ноября 2024
★3 24 Пугалки "заморозкой" вкладов и крахом LQDT.
★3 53 Как банкомат стырил 300 тысяч, и что было дальше
+173 50 Ситуация на текущий момент
+152 27 Что делал в выходные?
+151 41 😈Злые капиталисты накручивают цены!
+135 60 Риск использования брокера Тинькофф, часть 2
+106 171 Очень тревожные новости.....
+102 24 Пугалки "заморозкой" вкладов и крахом LQDT.
+93 38 УФСБ задержало очередных Лжеброкеров...
+91 15 Интepecы poccиян в интepнeтe
+77 51 Азия. Понедельник.
+76 45 По 100й паровоз, не стучите колёса

самые обсуждаемые сегодня

51к Азия. Понедельник.
50к Ситуация на текущий момент
41к 😈Злые капиталисты накручивают цены!
27к Вы верите этому заявлению?
23к Почему вы не можете заработать на рынке
22к А в случае использования ТЯО , крипта как себя поведёт?
18к ⚡️ Чёрный лебедь, здравствуй!
13к Доходности облигаций прервали рост. Мы покупаем
15к Метод Геллы. Бегом. (Gella)
10к Составил подписчику дивидендный портфель стоимостью 1.5 млн рублей
....все тэги
UPDONW
Новый дизайн