绝对反对 - 页 6

 
Ivan Vagin:
发表的先决条件是,必须有人对算法进行编码,并在这里发布代码,而我在医院里,但都是口号级别的。

这个故事有一个续集,但可能没有人会知道......。包括那些为自己悄悄编码的人 :-)
人总是有希望的,也许,这一次,啊......。好了,下回吧!
 
Boris:
总是有希望的,如果,嗯,这次,啊......。好了,下回吧!
这是一个自然法则,甚至那些学习冲浪的人也这么认为,有些人放弃了,有些人成功了。
 
Ivan Vagin:
这是一个自然法则,甚至那些学习冲浪的人也这么认为,有些人放弃了,有些人成功了。

在冲浪运动中,只有你的无能才会阻碍你的冲浪!

但在这里,当你确实知道如何做时,系统就会发挥作用!"。

 
Boris:

在冲浪运动中,唯一阻碍你的是你的无能!

但在这里,当你知道如何去做时,系统就会以自己的方式来统治你!"。

你知道怎么做吗?

我不认为市场比大海更难。
 
Ivan Vagin:
你能做什么?

我不认为市场比大海更难。
正是如此,但有很多东西都与金融犯罪接轨!。
 
Dmitry Fedoseev:
结果在哪里?

我很快就会公布。

问题撤销,信息删除。

---- 轮盘赌的颜色

https://otvet.mail.ru/question/9344746

 

以下是脚本

这里是剧本,如约而至。结果正如预期。脚本附在帖子的底部。

伊万,当零点而不是我们的颜色出来时,该如何处理库房?在改变之前,我从仓库中减去了最后的批量大小。

//+------------------------------------------------------------------+
//|                                                     Roulette.mq4 |
//|                               Copyright 2015, Alexey Volchanskiy |
//|                                          https://mql.gnomio.com/ |
//| Autor of idea is Ivan Vagin at 2015.12.07 04:40                  |
//| see https://www.mql5.com/ru/forum/68328                          | 
//+------------------------------------------------------------------+
#property copyright "Copyright 2015, Alexey Volchanskiy"
#property link      "https://mql.gnomio.com/"
#property version   "1.00"
#property strict
#property script_show_inputs

enum EFields {EZero, EBlack, ERed};

extern EFields  StartField  = EBlack;   //Цвет первой ставки    
extern double   MinLot      = 1;      //Минимальный лот
extern double   StartDepo   = 1000;     //Стартовый депозит
extern uint     Iterations  = 1000;     //Количество итераций
extern bool     PrintEnable = true;     //Печатать итерации

const int ARed[] = {1, 3, 5, 7, 9, 12, 14, 16, 18, 19, 21, 23, 25, 27, 30, 32, 34, 36};
double MaxLot = 0, MaxDepo = 0, MinDepo = 1 e99;
uint NZero = 0, Nred = 0, Nblack = 0;

/*-----------------------------
Поскольку одна ячейка - это примерно 2,7% колеса рулетки, именно такой процент хозяева казино 
кладут себе в карман в среднем с каждой сделки, медленно выкачивая деньги из клиентов.
----------

Алгоритм ставок в том виде, как написал Ivan Vagin 2015.12.07 04:40 

1 Ставим минимальную ставку на цвет из настроек
2 Запускаем рулетку
(Если) выпал наш цвет то 3 если не наш то 4 если выпал 0 то 5
3 Забираем удвоенную прибыль и ставим минимальную ставку на другой цвет
4 Удваиваем ставку на тот же цвет
5 Удваиваем ставку и меняем цвет ставки

Далее 2 пока не кончится количество итераций
Если кончилось количество итераций то конец
----------
Что хотелось бы видеть на выходе.... ну кроме прироста депозита, соотношение прибыльных и убыточных, самые длинные последовательности красного/черного/нуля в последней серии итераций,
показательна была бы кривая эквити

-----------------------------*/
#define  PRINT if(PrintEnable) Print("iteration=", iter, "  result=",  result, "  lastField=", lastField,  "  depo=", depo, "  lot=", lot);
#define  PRINTEND Print("iteration=", (iter-1), "  depo=", depo, "  MinDepo=", MinDepo, "  MaxDepo=", MaxDepo, "  MaxLot=", MaxLot, "  NZero=", NZero, "  Nred=", Nred, "  Nblack=", Nblack);

void OnStart()
{
    Print(0 % 36, "  ", 1 % 36, "  ", 37 % 36);
    uint iter = 0;
    EFields lastField = StartField;
    double lot = MinLot, depo = StartDepo;
    
    MathSrand(GetTickCount()); 
    while(iter++ < Iterations && depo > 0)
    {
        EFields result = Spin();

        if(result == EZero) //5 Удваиваем ставку и меняем цвет ставки
        {
            depo += lot*1; //??????? что тут делать с прибылью? 
            lot *= 2;
            PRINT
            if(MaxLot < lot)
                MaxLot = lot;
            if(MaxDepo < depo)
                MaxDepo = depo;
            NZero++;            
            lastField = (lastField == ERed)? EBlack: ERed;  
            continue;
        }    
        if(result == lastField) // 3 Забираем удвоенную прибыль и ставим минимальную ставку на другой цвет
        {
            depo += lot*2; 
            lot = MinLot;
            if(MaxDepo < depo)
                MaxDepo = depo;
           
            PRINT
            if(lastField == ERed)
            {
                lastField = EBlack;
                Nred++;    
            }    
            else
            {
                lastField = ERed;
                Nblack++;
            }    
            continue;
        }    
        else
        {
            depo -= lot; 
            if(MinDepo > depo)
                MinDepo = depo;
            lot *= 2;
            if(MaxLot < lot)
                MaxLot = lot;
            uint n = (lastField == ERed)? ++Nred: ++Nblack;    
            PRINT
        }
    }
    PRINTEND   
}

EFields Spin()
{
    int result = MathRand() % 36;
    if(result == 0)
        return EZero;
    for(int n = 0; n < 18; n++)    
        if(result == ARed[n]) 
            return ERed; 
    return EBlack;
}
附加的文件:
Roulette.ex4  10 kb
Roulette.mq4  5 kb
 
Alexey Volchanskiy:

以下是剧本。

谁想在除夕夜吃面团?以下是其中一项测试的结果 ))

2015.12.09 00:55:46.757 Roulette EURUSD.e,M5: iteration=10000 depo=66927.0 MinDepo=1001.0 MaxDepo=66927.0 MaxLot=16384.0 NZero=260 Nred=4969 Nblack=4771

MinLot = 1; //最小手数
StartDepo = 1000; //开始存款
迭代次数 = 10000; //迭代次数

-----------------

我不得不把红色数字放入一个数组中,因为颜色和偶数不匹配,数据来自这里 https://otvet.mail.ru/question/9344746

const int ARed[] = {1, 3, 5, 7, 9, 12, 14, 16, 18, 19, 21, 23, 25, 27, 30, 32, 34, 36};
 
Alexey Volchanskiy:

以下是剧本。

伊万,当零点滚动而不是我们的颜色时,该如何处理仓库?在改变之前,我从仓库中减去了最后的批量大小。

当然是 "回馈赌场",我现在只能在电脑上查一下,如果我理解的话

一般来说,如果赌注为零或不是我们的颜色,就会被 "烧掉"。

你有一个共同的黑色和红色计数。

你可以计算出黑色和红色的最长序列
 
对于那些吃亏的人,我将再次强调,大多数交易者使用的马汀的形式不可避免地会导致损失,主要原因有三个

过大的初始地段

过高的马汀比率

小额存款


尽管从不同的角度来看,这可能都是同一件事--不恰当的资金管理