Бестолковый модуль VBA, для профессионалов :)

[Валерий Иванович 702]

P.S. нужно поработать ручками и головой, что бы воспользоваться


Общее впечатление от ИИ 

Это серьезный, профессионально выглядящий код для создания прогностической модели. Он не просто угадывает исход, а пытается найти валуйные ставки (ставки с завышенным коэффициентом) на основе статистики и анализа данных. Код хорошо структурирован, использует множество факторов и математических моделей (распределение Пуассона), что характерно для серьезных прогнозных систем.

Как он работает (кратко):

Сбор данных: Берет данные о командах, их последних матчах, истории личных встреч, позиции в таблице, коэффициентах букмекеров и т.д.

Анализ и расчет вероятностей: С помощью распределения Пуассона и кастомных формул рассчитывает вероятности различных исходов (П1, Х, П2), тоталов (ТБ/ТМ 2.5) и BTTS (Обе забьют - Да/Нет).

Корректировка: Корректирует базовые вероятности, учитывая более 20 различных факторов (домашнее преимущество, мотивация, карточки, форма, тип турнира и др.).

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

Ответ на ваш вопрос: Используются ли все функции для прогнозирования?

Да, абсолютно все. Более того, модуль использует гораздо больше функций, чем просто те, что считают исход, тотал и BTTS. Их можно разделить на несколько слоев:

1. Базовые математические функции (Ядро модели)

PoissonOutcomeProbabilities, PoissonProbability, PoissonCumulative — рассчитывают базовые вероятности на основе математической модели (распределение Пуассона). Это основа для расчета исходов и тоталов.

IsValueBet — ключевая функция для определения, является ли ставка валуйной.

2. Функции анализа и получения данных

GetH2HData — анализирует историю личных встреч команд.

GetTeamForm — анализирует форму команд (среднее количество забитых/пропущенных голов за последние матчи).

GetSeasonProgress, GetSeasonFactor — определяют, на какой стадии находится сезон (начало, середина, конец), что влияет на мотивацию команд.

3. Функции-корректировщики (Мозг модели)

Вот где заключается вся "магия". Эти функции берут базовые вероятности и корректируют их, учитывая контекст:

CalculateRankFactor — корректирует силу команды в зависимости от ее позиции в таблице (лидер атакует сильнее, аутсайдер защищается хуже).

CalculateMotivationFactor — увеличивает силу команды, если она борется за выживание или попадание в еврокубки (riskZone).

CalculateAttackFactor — усиливает атаку команды-фаворита.

CalculateDominanceFactor — анализирует, насколько одна команда доминирует над другой в атакующем плане.

CalculateCardsImpact — учитывает влияние дисквалификаций и усталости из-за карточек в предыдущих матчах.

GetTournamentSettings — одна из самых важных функций. Применяет разные настройки к разным типам турниров (например, в плей-офф ставка делается на низкий тотал, а в матчах "зоны вылета" — на высокую мотивацию и агрессию).

4. Функции-агрегаторы (Связующее звено)

CalculateOutcomeProbabilities — главная функция для исхода. Она собирает кучу данных (лямбды, коэффициенты, фактор ранга, мотивацию, турнир, историю встреч, форму, карточки, фактор доминирования) и на их основе вычисляет итоговые вероятности П1, Х, П2.

CalculateTotalsAndBTTS — главная функция для тоталов и BTTS. Делает то же самое, но для тотала голов и вероятности того, что обе команды забьют. Также рассчитывает ожидаемое количество голов от каждой команды.

5. Функции принятия решений и вывода

DetermineOutcomePrediction, DetermineTotalPrediction, DetermineBTTSPrediction — принимают окончательное решение по прогнозу на основе порога уверенности (CONFIDENCE_THRESHOLD).

FindValueBets — ищет валуйные ставки, сравнивая рассчитанную вероятность с коэффициентом букмекера.

DetermineBestPrediction — выбирает лучшую ставку на матч на основе приоритетов и ожидаемой ценности.

GetDetailedRecommendations — формирует текстовый отчет с рекомендациями, который видит пользователь.

Итог

Это не просто "скрипт-угадайка". Это целая аналитическая система, которая:

Строит математическую модель.

Корректирует ее с помощью множества контекстных факторов.

Сравнивает результат с рынком (коэффициентами).

Выдает не просто прогноз ("П1"), а решение ("П1, потому что это валуйная ставка с учетом мотивации и истории встреч").

Все функции в коде активно используются для создания точной и адаптивной модели. Отсутствие любой из функций-корректировщиков упростило бы модель и, скорее всего, ухудшило бы ее точность.
-------------------------------------------------------------------------------------------------------
   Отсебятина: последнюю неделю думал о создании того, чего нет ни у кого, и вот собстна. Делал для LuckyBet. Программисты смогут адаптировать под свои таблицы остальные (халявщики) к сожалении мимо, ибо взять с вас нечего, потому что я зло-добро-памятный . А я работаю только с теми, которые хоть что-то могут дать взамен или уже давали когда-то.
   В макросе не все идеально, т.к. бета-версия, есть косяки и знаю об этом. Потом доработаю, но для этого нужны реальные отзывы али идеи. Макрос зависит от входящих данных, и причем от множества, включая кто выше а кто ниже в турнире, какой тип турнира идет, сколько команд в турнире, правильные лямбды для Пуассона (в большинстве таблиц не правильные), количество карт в предыдущем матче, история игр (я пользуюсь последними 20-ю пока что (текущего тура а не предыдущие) из возможных 50) + очные, коэффициенты стартовые и текущие (я беру Betfair, т.к. более точные), стадия турнира и прочие другие данные, была бы погода на flashscore (и она была бы тут, т.к. влияет на тоталы) - повторяюсь, входящие данные играют ключевую роль.
   Некоторые данные делаются простыми формулами, а не просто взять инфу из таблицы. Скоро еще добавлю кое-каких функций, но и сейчас показывает себя не плохо. Я сторонник экспрессов (от 10 событый), причем не маленьких, скрины для примера:

На одиночных, показывает себя хорошо, но я от такого не кайфую (поэтому и не ставлю). Поэтому хотел услышать в обратной связи в какую сторону дальше идти, какие котировки или сигналы использовать или на какие обратить внимание, дабы развивать дальше. 
По типу турниров настроек не много (потому что пользуюсь только этими видами турниров (Мир Европа, Сетки, Бабы, Молодежка не завлекают)):

With TOURNAMENT_FACTORS
.Add "2", Array(1.05, "Регулярный чемпионат", 1.1, 0.95, 1#, 1#)
.Add "11", Array(0.85, "Плей-офф (Финал)", 0.8, 1.2, 1.3, 1#)
.Add "23", Array(1.1, "Апертура (Старт сезона)", 1.15, 0.9, 1#, 1#)
.Add "24", Array(1.15, "Клаусура (Финиш сезона)", 1.25, 0.85, 1#, 1.2)
.Add "29", Array(1.1, "Серия C Бразилии", 1.2, 0.8, 1.15, 1#)
.Add "40", Array(0.9, "Плей-офф чемпионшипа", 0.85, 1.15, 1.4, 1#)
.Add "47", Array(1.1, "Групповой этап (Зона повышения)", 1.15, 1.05, 1.7, 1.3)
.Add "48", Array(1.15, "Групповой этап (Зона вылета)", 1.15, 1.05, 1.7, 1.3)
.Add "67", Array(0.85, "Финальная группа", 0.8, 1.25, 1.5, 1#)
.Add "73", Array(1.1, "Группа вылета", 1.3, 0.75, 1.8, 1#)
.Add "94", Array(0.8, "Группа повышения", 0.7, 1.3, 1#, 1.4)
.Add "106", Array(1.05, "Первая стадия", 1.15, 0.95, 1#, 1#)
.Add "152", Array(1.2, "Второй дивизион", 1.4, 0.7, 1#, 1.3)
End With

Формат массива прост: Усиление, Комментарий, Атака, Защита, Карточки, Угловые. Корректировки для типа турниров и всего остального, взяты от ИИ, но это корректируются. Короче, даю модуль, делаете свои таблицы, подстраиваетесь под модуль или наоборот, жду ответа (не сразу, т.к мало кто разберется).

Кстати, вот че делает модуль окно можно выводить и можно не выводить, можно просто писать информацию из модуля на лист, типо так:
wsList.Range("DM" & rw).value = finalPrediction
wsList.Range("DN" & rw).value = homeForm(0) 
wsList.Range("DO" & rw).value = awayForm(0)



Спасибо, что дочитали, мне писать по поводу настройки не нужно (не отвечу) 

Тут сам модуль:
g_9_Assess.bas

[red_star 235]

Вы пишете - с любой таблицей. Подразумевается - с любым парсером?

[Валерий Иванович 702]

8 часов назад, red_star сказал:

Вы пишете - с любой таблицей. Подразумевается - с любым парсером?

Да, если сможете адаптировать модуль под входящие данные , либо модуль под ваши данные.

Комменты переменных и листов для ясности:

'=== Инициализация листов ===
Dim wsList As Worksheet: Set wsList = ThisWorkbook.Sheets("Список") 'страница список с прогнозами обычных формул
Dim wsAnalysis As Worksheet: Set wsAnalysis = ThisWorkbook.Sheets("Анализ") 'страница анализ в LuckyBet
Dim wsHome As Worksheet: Set wsHome = ThisWorkbook.Sheets("Home") 'страница истории встреч хозяев
Dim wsAway As Worksheet: Set wsAway = ThisWorkbook.Sheets("Away") 'страница истории встреч гостей
Dim wsJoint As Worksheet: Set wsJoint = ThisWorkbook.Sheets("Joint") 'страница очных
'=== Получение данных ===
Dim rw As Long: rw = wsAnalysis.Range("E1").value 'строка с основного листа
'страница анализ
With wsAnalysis
Dim lambdaHome As Double: lambdaHome = .Range("G14").value 'лямбда хозяев
Dim lambdaAway As Double: lambdaAway = .Range("P14").value 'лямбда гостей
Dim favorite As String: favorite = .Range("H31").value 'блок из формул, которые определяет фаворита, используется турнирная таблица
Dim riskZone As String: riskZone = .Range("I35").value 'блок из формул, которые определяет кто находится в зоне вылета в турнирной таблице
Dim totalTeams As Integer: totalTeams = .Range("D18").value 'количество команд в турнире
Dim homePosition As Integer: homePosition = .Range("AA3").value 'позиция в турнире хозяев
Dim awayPosition As Integer: awayPosition = .Range("AA4").value 'позиция гостей в турнире
Dim tournamentType As String: tournamentType = .Range("D22").value 'тип турнира Case "ZJ": tournament_type = fs_row_parts(1)
End With
'список с прогнозами
With wsList
Dim homeTeam As String: homeTeam = .Cells(rw, "C").value 'имя хозяев
Dim awayTeam As String: awayTeam = .Cells(rw, "D").value 'имя гостей
Dim homeRedCards As Integer: homeRedCards = val(.Cells(rw, "AA").value) 'в прошлом матче красные хозяев (Александр делал кому-то)
Dim homeYellowCards As Integer: homeYellowCards = val(.Cells(rw, "AC").value) 'в прошлом матче желтые хозяев (Александр делал кому-то)
Dim awayRedCards As Integer: awayRedCards = val(.Cells(rw, "AF").value) 'в прошлом матче красные гостей (Александр делал кому-то)
Dim awayYellowCards As Integer: awayYellowCards = val(.Cells(rw, "AH").value) 'в прошлом матче желтые гостей (Александр делал кому-то)
Dim kHome As Double: kHome = GetCoefficient(.Cells(rw, "AK").value) 'стартовые исходы п1
Dim kDraw As Double: kDraw = GetCoefficient(.Cells(rw, "AL").value) 'стартовые исходы х
Dim kAway As Double: kAway = GetCoefficient(.Cells(rw, "AM").value) 'стартовые исходы п2
Dim kTB As Double: kTB = GetCoefficient(.Cells(rw, "BA").value) 'стартовые ТБ 2.5
Dim kTM As Double: kTM = GetCoefficient(.Cells(rw, "BB").value) 'стартовые ТМ 2.5
Dim kBttsY As Double: kBttsY = GetCoefficient(.Cells(rw, "BI").value) 'стартовые ОЗ да
Dim kBttsN As Double: kBttsN = GetCoefficient(.Cells(rw, "BJ").value) 'стартовые ОЗ нет
Dim kHomeCurrent As Double: kHomeCurrent = GetCoefficient(.Cells(rw, "AN").value) 'текущие исходы п1
Dim kDrawCurrent As Double: kDrawCurrent = GetCoefficient(.Cells(rw, "AO").value) 'текущие исходы х
Dim kAwayCurrent As Double: kAwayCurrent = GetCoefficient(.Cells(rw, "AP").value) 'текущие исходы п2
Dim kTBCurrent As Double: kTBCurrent = GetCoefficient(.Cells(rw, "BC").value) 'текущие тб 2.5
Dim kTMCurrent As Double: kTMCurrent = GetCoefficient(.Cells(rw, "BD").value) 'текущие тм 2.5
Dim kBttsYCurrent As Double: kBttsYCurrent = GetCoefficient(.Cells(rw, "BK").value) 'текущие оз да
Dim kBttsNCurrent As Double: kBttsNCurrent = GetCoefficient(.Cells(rw, "BL").value) 'текущие оз нет
End With
Dim nBook As String, cellBook As Long: cellBook = Sheets("Settings").Range("J1").value 'тут понятно все

Типо так:


Нащупываю варианты отбора таким способом, что бы более менее отсеять что сомнительно:

wsList.Range("DM" & rw).value = finalPrediction
wsList.Range("DN" & rw).value = IIf(homeForm(0) > awayForm(1) * 1.5, "П1", "") 
wsList.Range("DO" & rw).value = IIf(homeForm(0) < awayForm(1) * 1.5, "П2", "")

'Это из рекомендаций:
'- Хозяева или в гости в хорошей атакующей форме.

Ручками просеивать не удобно, пишу что считаю интересным в отдельные столбцы, жду результаты, а там уже видно че да как.   

+ обновленный модуль, с исправленными косячками и чистка мелочей (обнова так сказать, прогнозы точнее стали вроде):
g_9_Assess.bas

Изменено 25 августа, 2025 пользователем Валерий Иванович

[good_bye 689]

Ок, ты крутой, дальше то что?)

[Валерий Иванович 702]

13 минут назад, hostmas сказал:

Ок, ты крутой, дальше то что?)

Дальше для тебя - интуиция подсказывает, ничего 

Изменено 25 августа, 2025 пользователем Валерий Иванович

[good_bye 689]

1 час назад, Валерий Иванович сказал:

Дальше для тебя - интуиция подсказывает, ничего 

а мне зачем твои понты? если бы ты на этом зарабатывал, ты бы это не выносил на публику)

[good_bye 689]

скажи честно, алгоритм минусовой, давайте думать) 

[Валерий Иванович 702]

50 минут назад, hostmas сказал:

скажи честно, алгоритм минусовой, давайте думать) 

Прежде чем начать зарабатывать, нужно сначала протестировать что-либо, ведь для этого форум нужен, не правда ли? Или ты сначала зарабатываешь а потом думаешь, правильно ли ты зарабатываешь? 

 

Ты хоть читал что там написано в теме?

[red_star 235]

14 часов назад, Валерий Иванович сказал:

Да, если сможете адаптировать модуль под входящие данные , либо модуль под ваши данные.

Комменты переменных и листов для ясности:

'=== Инициализация листов ===
Dim wsList As Worksheet: Set wsList = ThisWorkbook.Sheets("Список") 'страница список с прогнозами обычных формул
Dim wsAnalysis As Worksheet: Set wsAnalysis = ThisWorkbook.Sheets("Анализ") 'страница анализ в LuckyBet
Dim wsHome As Worksheet: Set wsHome = ThisWorkbook.Sheets("Home") 'страница истории встреч хозяев
Dim wsAway As Worksheet: Set wsAway = ThisWorkbook.Sheets("Away") 'страница истории встреч гостей
Dim wsJoint As Worksheet: Set wsJoint = ThisWorkbook.Sheets("Joint") 'страница очных
'=== Получение данных ===
Dim rw As Long: rw = wsAnalysis.Range("E1").value 'строка с основного листа
'страница анализ
With wsAnalysis
Dim lambdaHome As Double: lambdaHome = .Range("G14").value 'лямбда хозяев
Dim lambdaAway As Double: lambdaAway = .Range("P14").value 'лямбда гостей
Dim favorite As String: favorite = .Range("H31").value 'блок из формул, которые определяет фаворита, используется турнирная таблица
Dim riskZone As String: riskZone = .Range("I35").value 'блок из формул, которые определяет кто находится в зоне вылета в турнирной таблице
Dim totalTeams As Integer: totalTeams = .Range("D18").value 'количество команд в турнире
Dim homePosition As Integer: homePosition = .Range("AA3").value 'позиция в турнире хозяев
Dim awayPosition As Integer: awayPosition = .Range("AA4").value 'позиция гостей в турнире
Dim tournamentType As String: tournamentType = .Range("D22").value 'тип турнира Case "ZJ": tournament_type = fs_row_parts(1)
End With
'список с прогнозами
With wsList
Dim homeTeam As String: homeTeam = .Cells(rw, "C").value 'имя хозяев
Dim awayTeam As String: awayTeam = .Cells(rw, "D").value 'имя гостей
Dim homeRedCards As Integer: homeRedCards = val(.Cells(rw, "AA").value) 'в прошлом матче красные хозяев (Александр делал кому-то)
Dim homeYellowCards As Integer: homeYellowCards = val(.Cells(rw, "AC").value) 'в прошлом матче желтые хозяев (Александр делал кому-то)
Dim awayRedCards As Integer: awayRedCards = val(.Cells(rw, "AF").value) 'в прошлом матче красные гостей (Александр делал кому-то)
Dim awayYellowCards As Integer: awayYellowCards = val(.Cells(rw, "AH").value) 'в прошлом матче желтые гостей (Александр делал кому-то)
Dim kHome As Double: kHome = GetCoefficient(.Cells(rw, "AK").value) 'стартовые исходы п1
Dim kDraw As Double: kDraw = GetCoefficient(.Cells(rw, "AL").value) 'стартовые исходы х
Dim kAway As Double: kAway = GetCoefficient(.Cells(rw, "AM").value) 'стартовые исходы п2
Dim kTB As Double: kTB = GetCoefficient(.Cells(rw, "BA").value) 'стартовые ТБ 2.5
Dim kTM As Double: kTM = GetCoefficient(.Cells(rw, "BB").value) 'стартовые ТМ 2.5
Dim kBttsY As Double: kBttsY = GetCoefficient(.Cells(rw, "BI").value) 'стартовые ОЗ да
Dim kBttsN As Double: kBttsN = GetCoefficient(.Cells(rw, "BJ").value) 'стартовые ОЗ нет
Dim kHomeCurrent As Double: kHomeCurrent = GetCoefficient(.Cells(rw, "AN").value) 'текущие исходы п1
Dim kDrawCurrent As Double: kDrawCurrent = GetCoefficient(.Cells(rw, "AO").value) 'текущие исходы х
Dim kAwayCurrent As Double: kAwayCurrent = GetCoefficient(.Cells(rw, "AP").value) 'текущие исходы п2
Dim kTBCurrent As Double: kTBCurrent = GetCoefficient(.Cells(rw, "BC").value) 'текущие тб 2.5
Dim kTMCurrent As Double: kTMCurrent = GetCoefficient(.Cells(rw, "BD").value) 'текущие тм 2.5
Dim kBttsYCurrent As Double: kBttsYCurrent = GetCoefficient(.Cells(rw, "BK").value) 'текущие оз да
Dim kBttsNCurrent As Double: kBttsNCurrent = GetCoefficient(.Cells(rw, "BL").value) 'текущие оз нет
End With
Dim nBook As String, cellBook As Long: cellBook = Sheets("Settings").Range("J1").value 'тут понятно все

Типо так:


Нащупываю варианты отбора таким способом, что бы более менее отсеять что сомнительно:

wsList.Range("DM" & rw).value = finalPrediction
wsList.Range("DN" & rw).value = IIf(homeForm(0) > awayForm(1) * 1.5, "П1", "") 
wsList.Range("DO" & rw).value = IIf(homeForm(0) < awayForm(1) * 1.5, "П2", "")

'Это из рекомендаций:
'- Хозяева или в гости в хорошей атакующей форме.

Ручками просеивать не удобно, пишу что считаю интересным в отдельные столбцы, жду результаты, а там уже видно че да как.   

+ обновленный модуль, с исправленными косячками и чистка мелочей (обнова так сказать, прогнозы точнее стали вроде):
g_9_Assess.bas

В Вашей публичной версии LuckyBet отсутствует парсинг желтых и красных карточек, а также забитых и пропущенных голов. Надо дописывать? Кстати ЖКК - это "двойная желтая"?

[Валерий Иванович 702]

28 минут назад, red_star сказал:

В Вашей публичной версии LuckyBet отсутствует парсинг желтых и красных карточек, а также забитых и пропущенных голов. Надо дописывать? Кстати ЖКК - это "двойная желтая"?

Моя публичная версия была опубликована давным-давно. Я тоже не стою на месте, и постоянно совершенствую свои инструменты и код - это я считаю адекватным поведением любого человека. Даже этот базовый модуль с момента вчерашней публикации, был уже изменен не единожды, и в голове висит уже идея использовать словарь по странам, базу только не собрал еще в формате: (страна + ID), а не только по типу тура.

Александр делал карточки кому-то, с тех таблиц можно взять этот модуль (при том, что он пишет довольно так и универсально) и засунуть с переделкой в какой либо другой парсер. Так же и с коэффициентами. Я только беру не код, а саму идею. 

Изменено 26 августа, 2025 пользователем Валерий Иванович

[red_star 235]

1 час назад, Валерий Иванович сказал:

Моя публичная версия была опубликована давным-давно. Я тоже не стою на месте, и постоянно совершенствую свои инструменты и код - это я считаю адекватным поведением любого человека. Даже этот базовый модуль с момента вчерашней публикации, был уже изменен не единожды, и в голове висит уже идея использовать словарь по странам, базу только не собрал еще в формате: (страна + ID), а не только по типу тура.

Александр делал карточки кому-то, с тех таблиц можно взять этот модуль (при том, что он пишет довольно так и универсально) и засунуть с переделкой в какой либо другой парсер. Так же и с коэффициентами. Я только беру не код, а саму идею. 

То что все постоянно модифицируется, это , конечно, правильно. У меня все скаченные таблицы доделаны "под себя". Но работы тут довольно много, а своих замыслов хватает. Так что вряд ли у меня дойдут до этого руки. Но в любом случае, за модуль спасибо. Вдруг и дойдут.)))

[Валерий Иванович 702]

   Я считаю самым совершенным кодом тот, который прошедшие матчи анализирует с верностью до 85-95%, после этого о предстоящих уже говорить не о чем, ибо прошлое говорит за себя.
   Это просто макрос VBA (даже не Python, или C++), хоть и сложный - если у буков есть сотни аналитических человек, персонал который пол жизни этим занимаются, мощные многоуровневые вычислительные алгоритмы, гораздо больше данных для анализа и учета - и они ошибаются в таком случае, что ждать от простой таблички с скромным кодом? ))
 
Знаете ли вы такого человека, который это учитывает?   
 

[red_star 235]

1 час назад, Валерий Иванович сказал:

   Я считаю самым совершенным кодом тот, который прошедшие матчи анализирует с верностью до 85-95%, после этого о предстоящих уже говорить не о чем, ибо прошлое говорит за себя.
   Это просто макрос VBA (даже не Python, или C++), хоть и сложный - если у буков есть сотни аналитических человек, персонал который пол жизни этим занимаются, мощные многоуровневые вычислительные алгоритмы, гораздо больше данных для анализа и учета - и они ошибаются в таком случае, что ждать от простой таблички с скромным кодом? ))
 
Знаете ли вы такого человека, который это учитывает?   
 

Считаю совершенно бессмысленным пытаться соревноваться с буками, а точнее с аналитиками, профессионально рассчитывающими вероятности исхода матча. Именно поэтому работаю только в направлении анализа матча по архивам. Не поиск фильтров - это, по моему мнению, пустое занятие. А поиск по архиву матчей с близкими рассчитанными критериями.  К примеру 23 августа по одному из архивов для матча Согндал-Мосс было найдено 7 похожих матчей  и во всех был исход П1. Поставил смело на этот исход. Результат 3-1.  Кэф был 1.88.  К сожалению, такое происходит редко. Прежде всего, конечно, архивы маловаты. Желательно иметь не менее ста тысяч, а лучше больше. Впрочем и с меньшими архивами работаю. Семь матчей с одним исходом, конечно, редкость, но 4 из 5 или 5 из шести бывают регулярно.

[Валерий Иванович 702]

10 минут назад, red_star сказал:

Считаю совершенно бессмысленным пытаться соревноваться с буками, а точнее с аналитиками, профессионально рассчитывающими вероятности исхода матча. Именно поэтому работаю только в направлении анализа матча по архивам. Не поиск фильтров - это, по моему мнению, пустое занятие. А поиск по архиву матчей с близкими рассчитанными критериями.  К примеру 23 августа по одному из архивов для матча Согндал-Мосс было найдено 7 похожих матчей  и во всех был исход П1. Поставил смело на этот исход. Результат 3-1.  Кэф был 1.88.  К сожалению, такое происходит редко. Прежде всего, конечно, архивы маловаты. Желательно иметь не менее ста тысяч, а лучше больше. Впрочем и с меньшими архивами работаю. Семь матчей с одним исходом, конечно, редкость, но 4 из 5 или 5 из шести бывают регулярно.

Архив в 100к или даже 50к - excel отрубится ))))
С 10к уже тяжко работать, че уш там говорить о большем )
Благо оставил данные за субботу и воскресенье, щас сделаю анализатор на vba, гляну результаты че модуль на них прогнозировал

[red_star 235]

2 минуты назад, Валерий Иванович сказал:

Архив в 100к или даже 50к - excel отрубится ))))
С 10к уже тяжко работать, че уш там говорить о большем )
Благо оставил данные за субботу и воскресенье, щас сделаю анализатор на vba, гляну результаты че модуль на них прогнозировал

Архив Фарела - порядка 100 тыс. матчей занимает 546 Мб, архив Delux Platinum - порядка 200 тыс. матчей занимает 112 Мб. Все зависит от того сколько всяких критериев считается в таблице. Конечно поиск по архиву занимает определенное время. Но результат, по моему мнению, гораздо надежней, чем расчет вероятностей исхода матча "в моменте". Надо еще учитывать, что матчи вычисленные с высокими вероятностями также хорошо вычислены и у бука, так что еще и кэфы у таки матчей будут маленькими.

[Валерий Иванович 702]

4 минуты назад, red_star сказал:

Архив Фарела - порядка 100 тыс. матчей занимает 546 Мб, архив Delux Platinum - порядка 200 тыс. матчей занимает 112 Мб. Все зависит от того сколько всяких критериев считается в таблице. Конечно поиск по архиву занимает определенное время. Но результат, по моему мнению, гораздо надежней, чем расчет вероятностей исхода матча "в моменте". Надо еще учитывать, что матчи вычисленные с высокими вероятностями также хорошо вычислены и у бука, так что еще и кэфы у таки матчей будут маленькими.

Честно, сугубо мое мнение, и на подходы к делу других не претендую (это как 50 оттенков серого, каждый новый делает так, как общепринято, но не так как хочется).

Архив - в прям смысле его назначения, по-моему мнению - это исторически устаревший нюанс, который мало какую роль может дать при принятии решения. И отнимает слишком много времени. Достаточно того, что дает flashscore, актуальную историю в 50 матчей, из которых используются лишь 25.

Каждый делает так, как делает. Я же делаю так, как не делают: зашел в таблицу, загрузил, выставил фильтры под настроение, посмотрел прогноз, скопировал игру, открыл бк, нашел - поставил )) и будь что будет - я так работаю, просто, легко, быстро. Зайдет - норм, не зайдет - пойду ломать макрос дальше )))))) У меня не то положение, что бы годами пялиться в монитор и молиться зайдет или нет, ставки для меня это развлечение, одна из хобби - вот и все )) 

[red_star 235]

Дык,))) я и не претендую на абсолютную истину))). Просто говорю о том, что сиюминутный подход характерен для абсолютного большинства людей, приходящих в ставки.  А может все-таки "задуматься о вечном")))

[Валерий Иванович 702]

2 минуты назад, red_star сказал:

Дык,))) я и не претендую на абсолютную истину))). Просто говорю о том, что сиюминутный подход характерен для абсолютного большинства людей, приходящих в ставки.  А может все-таки "задуматься о вечном")))

Фильм "Вечные" прекрасно иллюстрирует, что в вечности нет ничего хорошего )))
Да и ИИ спросили о законах, которые она внесла бы обязательно для человечества, во благо вторых, и один из низ гласит, что человек должен каждые 7 лет менять свою профессию или род занятий.  Так есть ли смысл в вечном, не знаю

И вот, статистика за прошедшие субботу и воскресенье по обновленному на тот момент модулю (с дисперсией):
Прогнозы были до начала матча (матчи все с кефами и необходимой для прогноза статистикой):

ОБЩАЯ СТАТИСТИКА:
Всего прогнозов: 1013
Верных прогнозов: 709 (70%)
Неверных прогнозов: 304 (30%)
-----------------------------------------------------------------------

ДЕТАЛЬНАЯ СТАТИСТИКА ПО КАТЕГОРИЯМ:

 П1 (всего: 382, верных: 273 (71,5%), не верных: 109 (28,5%))
 ТБ 2.5 (всего: 198, верных: 131 (66,2%), не верных: 67 (33,8%))
 П2 (всего: 134, верных: 110 (82,1%), не верных: 24 (17,9%))
 ОЗ Нет (всего: 131, верных: 88 (67,2%), не верных: 43 (32,8%))
 ОЗ Нет (!) (всего: 37, верных: 14 (37,8%), не верных: 23 (62,2%))
 ОЗ Да (всего: 37, верных: 29 (78,4%), не верных: 8 (21,6%))
 ТМ 2.5 (всего: 36, верных: 27 (75%), не верных: 9 (25%))
 ТБ 2.5 (!) (всего: 23, верных: 13 (56,5%), не верных: 10 (43,5%))
 Ничья (всего: 14, верных: 11 (78,6%), не верных: 3 (21,4%))
 П1 (!) (всего: 8, верных: 4 (50%), не верных: 4 (50%))
 ТМ 2.5 (!) (всего: 6, верных: 5 (83,3%), не верных: 1 (16,7%))
 П2 (!) (всего: 4, верных: 1 (25%), не верных: 3 (75%))
 ОЗ Да (!) (всего: 3, верных: 3 (100%), не верных: 0 (0%))

 

[Валерий Иванович 702]

Только что, Валерий Иванович сказал:

Фильм "Вечные" прекрасно иллюстрирует, что в вечности нет ничего хорошего )))
Да и ИИ спросили о законах, которые она внесла бы обязательно для человечества, во благо вторых, и один из низ гласит, что человек должен каждые 7 лет менять свою профессию или род занятий.  Так есть ли смысл в вечном, не знаю

И вот, статистика за прошедшие субботу и воскресенье по обновленному на тот момент модулю (с дисперсией):
Прогнозы были до начала матча (матчи все с кефами и необходимой для прогноза статистикой):

ОБЩАЯ СТАТИСТИКА:
Всего прогнозов: 1013
Верных прогнозов: 709 (70%)
Неверных прогнозов: 304 (30%)
-----------------------------------------------------------------------

ДЕТАЛЬНАЯ СТАТИСТИКА ПО КАТЕГОРИЯМ:

 П1 (всего: 382, верных: 273 (71,5%), не верных: 109 (28,5%))
 ТБ 2.5 (всего: 198, верных: 131 (66,2%), не верных: 67 (33,8%))
 П2 (всего: 134, верных: 110 (82,1%), не верных: 24 (17,9%))
 ОЗ Нет (всего: 131, верных: 88 (67,2%), не верных: 43 (32,8%))
 ОЗ Нет (!) (всего: 37, верных: 14 (37,8%), не верных: 23 (62,2%))
 ОЗ Да (всего: 37, верных: 29 (78,4%), не верных: 8 (21,6%))
 ТМ 2.5 (всего: 36, верных: 27 (75%), не верных: 9 (25%))
 ТБ 2.5 (!) (всего: 23, верных: 13 (56,5%), не верных: 10 (43,5%))
 Ничья (всего: 14, верных: 11 (78,6%), не верных: 3 (21,4%))
 П1 (!) (всего: 8, верных: 4 (50%), не верных: 4 (50%))
 ТМ 2.5 (!) (всего: 6, верных: 5 (83,3%), не верных: 1 (16,7%))
 П2 (!) (всего: 4, верных: 1 (25%), не верных: 3 (75%))
 ОЗ Да (!) (всего: 3, верных: 3 (100%), не верных: 0 (0%))

 

Думаю внести (!) - не уверенные прогнозы вместе с общими, т.к. тоже не плохо себя ведут.

[red_star 235]

27 минут назад, Валерий Иванович сказал:

Фильм "Вечные" прекрасно иллюстрирует, что в вечности нет ничего хорошего )))
Да и ИИ спросили о законах, которые она внесла бы обязательно для человечества, во благо вторых, и один из низ гласит, что человек должен каждые 7 лет менять свою профессию или род занятий.  Так есть ли смысл в вечном, не знаю

И вот, статистика за прошедшие субботу и воскресенье по обновленному на тот момент модулю (с дисперсией):
Прогнозы были до начала матча (матчи все с кефами и необходимой для прогноза статистикой):

ОБЩАЯ СТАТИСТИКА:
Всего прогнозов: 1013
Верных прогнозов: 709 (70%)
Неверных прогнозов: 304 (30%)
-----------------------------------------------------------------------

ДЕТАЛЬНАЯ СТАТИСТИКА ПО КАТЕГОРИЯМ:

 П1 (всего: 382, верных: 273 (71,5%), не верных: 109 (28,5%))
 ТБ 2.5 (всего: 198, верных: 131 (66,2%), не верных: 67 (33,8%))
 П2 (всего: 134, верных: 110 (82,1%), не верных: 24 (17,9%))
 ОЗ Нет (всего: 131, верных: 88 (67,2%), не верных: 43 (32,8%))
 ОЗ Нет (!) (всего: 37, верных: 14 (37,8%), не верных: 23 (62,2%))
 ОЗ Да (всего: 37, верных: 29 (78,4%), не верных: 8 (21,6%))
 ТМ 2.5 (всего: 36, верных: 27 (75%), не верных: 9 (25%))
 ТБ 2.5 (!) (всего: 23, верных: 13 (56,5%), не верных: 10 (43,5%))
 Ничья (всего: 14, верных: 11 (78,6%), не верных: 3 (21,4%))
 П1 (!) (всего: 8, верных: 4 (50%), не верных: 4 (50%))
 ТМ 2.5 (!) (всего: 6, верных: 5 (83,3%), не верных: 1 (16,7%))
 П2 (!) (всего: 4, верных: 1 (25%), не верных: 3 (75%))
 ОЗ Да (!) (всего: 3, верных: 3 (100%), не верных: 0 (0%))

 

Результат весьма неплох! Правда без соответствующих кэфов трудно оценить эффективность. В любом случае - желаю удачи!