Ruleta

ruleta.m

function [ bankrolls ] = ruleta(bankrollI, stakeI,apostes)
    %bankrollI: diners amb els que comences a jugar
    %stakeI: valor de l'aposta mínima
    %apostes: número d'apostes a fer
    close all
    bankrolls = [bankrollI];
    stake = stakeI;
    for i = 1:apostes
        bankrollI = bankrollI - stake;
        bankrolls = [bankrolls bankrollI];
        num = randi(37)-1;
        if bankrolls(end) < 0
            break
        end
        if num == 0
            stake = 2*stake;
        elseif mod(num,2) == 1
            stake = 2*stake;
        else
            bankrollI = bankrollI + 2*stake;
            stake = stakeI;
        end
    end
    plot(bankrolls)
end