VLS Roulette Forum

Main => Full Roulette Systems => Topic started by: rjeaton1 on July 03, 2009, 12:11:10 AM

Title: Even Chance System Except Played as Inside Bets
Post by: rjeaton1 on July 03, 2009, 12:11:10 AM
To save those of you can't play with .01 or .10 as unit value some time reading - this is a system only meant to be played with those values as units.  If you can or like to play with those unit values, then read on.

I was more or less just testing myself in terms of what I've learned about coding for RXtreme, so I was trying to put together something relatively complicated (although it only plays even chance bets, but it plays them as inside bets...I.E. - Instead of one chip on red on the outside, you put 1 chip on every red number on the inside...(don't ask me why I did this...not sure...haha)

Anyway, I've only tested it for 10k spins, but it had a decent enough result for me to put it up here so you can fool around with it.  This is more or less a just for fun testing system, but you can decide for yourself.

After 10k spins and 44,000 bets placed, it had a largest drawdown of $35 if using .01 as unit value or $350 if using .10 as unit value.  It made a profit of $138 if using .01 as unit value or $1,381 if using .10 as a unit value.

I'm sure that is just the tip of the iceburg in terms of drawdown however, so if you test it you'll probably see a much bigger one.

Anyway, for those of you who would like to fool around with this in RXtreme the code for it is below as well as a picture of the BR balance graph.

system "red/black/even/odd/high/low still working on it"



method "main"
begin
while starting a new session
begin
    set list [1,.5,.5,.5] to record "bet 2 rb progression" data
    set list [1,.5,.5,.5] to record "bet 2 eo progression" data
    set list [1,.5,.5,.5] to record "bet 2 lh progression" data
    set flag "use two numbers to determine bet rb" to false
    set flag "use two numbers to determine bet eo" to false
    set flag "use two numbers to determine bet lh" to false
    put 1 to record "bet 2 rb progression" data index
    put 1 to record "bet 2 eo progression" data index
    put 1 to record "bet 2 lh progression" data index
    put 0 to record "2 red" data
    put 0 to record "2 black" data
    put 0 to record "2 even" data
    put 0 to record "2 odd" data
    put 0 to record "2 low" data
    put 0 to record "2 high" data
    copy list [1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18] to record "low" layout
    copy list [2,4,6,8,10,12,14,16,18,20,22,24,26,28,30,32,34,36] to record "even" layout
    copy list [1,3,5,7,9,12,14,16,18,19,21,23,25,27,30,32,34,36] to record "red" layout
    copy list [19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36] to record "high" layout
    copy list [1,3,5,7,9,11,13,15,17,19,21,23,25,27,29,31,33,35] to record "odd" layout
    copy list [2,4,6,8,10,11,13,15,17,20,22,24,26,28,29,31,33,35] to record "black" layout
    set max to record "low" layout index
set max to record "even" layout index
set max to record "red" layout index
set max to record "high" layout index
set max to record "odd" layout index
set max to record "black" layout index
end

while on each spin
begin
if record "bet 2 rb progression" data count = 0
begin
call "reset rb"
end
if record "bet 2 eo progression" data count = 0
begin
call "reset eo"
end
if record "bet 2 lh progression" data count = 0
begin
call "reset lh"
end
if record "rb bet" data = 1
    begin
    call "check for win/loss rb"
    end

    if record "eo bet" data = 1
    begin
    call "check for win/loss eo"
    end

    if record "lh bet" data = 1
    begin
    call "check for win/loss lh"
    end
   
put 0 to record "rb bet" data
put 0 to record "eo bet" data
put 0 to record "lh bet" data

put 0 record "2 rb current difference" data
put 0 record "2 eo current difference" data
put 0 record "2 lh current difference" data
put 0 record "3 rb current difference" data
put 0 record "3 eo current difference" data
put 0 record "3 lh current difference" data
clear record "1 red consecutive" data
clear record "2 red consecutive" data
clear record "1 black consecutive" data
clear record "2 black consecutive" data
clear record "1 even consecutive" data
clear record "2 even consecutive" data
clear record "1 odd consecutive" data
clear record "2 odd consecutive" data
clear record "1 low consecutive" data
clear record "2 low consecutive" data
clear record "1 high consecutive" data
clear record "2 high consecutive" data
call "rb eo hl hit counters"
call "difference calculators"

if record "2 rb current difference" data = 1
begin
call "bet 2 red"
call "bet 2 black"
put 1 to record "rb bet" data
end

if record "2 rb current difference" data > 2
begin
call "reset"
end


if record "2 eo current difference" data =1
begin
call "bet 2 even"
call "bet 2 odd"
put 1 to record "eo bet" data
end

if record "2 lh current difference" data =1
begin
call "bet 2 low"
call "bet 2 high"
put 1 to record "lh bet" data
end

end


end


method "rb eo hl hit counters"
begin
if red has hit 1 time
begin
add 1 to record "1 red consecutive" data
end
if red has hit 2 time
begin
add 1 to record "2 red" data
add 1 to record "2 red consecutive" data
end
if red has hit 3 time
begin
add 1 to record "3 red" data
end

if black has hit 1 time
begin
add 1 to record "1 black consecutive" data
end
if black has hit 2 time
begin
add 1 to record "2 black" data
add 1 to record "2 black consecutive" data
end
if black has hit 3 time
begin
add 1 to record "3 black" data
end

if even has hit 1 time
begin
add 1 to record "1 even consecutive" data
end
if even has hit 2 time
begin
add 1 to record "2 even" data
add 1 to record "2 even consecutive" data
end
if even has hit 3 time
begin
add 1 to record "3 even" data
end

if odd has hit 1 time
begin
add 1 to record "1 odd consecutive" data
end
if odd has hit 2 time
begin
add 1 to record "2 odd" data
add 1 to record "2 odd consecutive" data
end
if odd has hit 3 time
begin
add 1 to record "3 odd" data
end

if low has hit 1 time
begin
add 1 to record "1 low consecutive" data
end
if low has hit 2 time
begin
add 1 to record "2 low" data
add 1 to record "2 low consecutive" data
end
if low has hit 3 time
begin
add 1 to record "3 low" data
end

if high has hit 1 time
begin
add 1 to record "1 high consecutive" data
end
if high has hit 2 time
begin
add 1 to record "2 high" data
add 1 to record "2 high consecutive" data
end
if high has hit 3 time
begin
add 1 to record "3 high" data
end
end


method "bet 2 red"
begin
if record "2 red" data = record "rb behind" data
and record "1 red consecutive" data = 1 and flag "use two numbers to determine bet rb" is false
begin
put 1 on record "bet 2 rb progression" data index
put 100% of record "bet 2 rb progression" data to record "red" layout list
put 100% of record "bet 2 rb progression" data to record "last 2 rb bet in sequence" data
end

if record "2 red" data = record "rb behind" data
and record "1 red consecutive" data = 1 and flag "use two numbers to determine bet rb" is true
and record "bet 2 rb progression" data count > 1
begin
clear record "last 2 rb bet in sequence" data
set max to record "bet 2 rb progression" data index
put 100% of last record "bet 2 rb progression" data to record "last 2 rb bet in sequence" data
put 1 to record "bet 2 rb progression" data index
add 100% of record "bet 2 rb progression" data to record "last 2 rb bet in sequence" data
put 100% of record "last 2 rb bet in sequence" data to record "red" layout list
set flag "use two numbers to determine bet rb" to true
end

if record "2 red" data = record "rb behind" data
and record "1 red consecutive" data = 1 and flag "use two numbers to determine bet rb" is true
and record "bet 2 rb progression" data count = 1
begin
clear record "last 2 rb bet in sequence" data
set max to record "bet 2 rb progression" data index
put 100% last record "bet 2 rb progression" data to record "last 2 rb bet in sequence" data
put 1 to record "bet 2 rb progression" data index
put 100% of record "last 2 rb bet in sequence" data to record "red" layout list
set flag "use two numbers to determine bet rb" to false
end
end

method "bet 2 black"
begin
if record "2 black" data = record "rb behind" data
and record "1 black consecutive" data = 1 and flag "use two numbers to determine bet rb" is false
begin
put 1 on record "bet 2 rb progression" data index
put 100% of record "bet 2 rb progression" data to record "black" layout list
put 100% of record "bet 2 rb progression" data to record "last 2 rb bet in sequence" data
end

if record "2 black" data = record "rb behind" data
and record "1 black consecutive" data = 1 and flag "use two numbers to determine bet rb" is true
and record "bet 2 rb progression" data count > 1
begin
clear record "last 2 rb bet in sequence" data
set max to record "bet 2 rb progression" data index
put 100% of last record "bet 2 rb progression" data to record "last 2 rb bet in sequence" data
put 1 to record "bet 2 rb progression" data index
add 100% of record "bet 2 rb progression" data to record "last 2 rb bet in sequence" data
put 100% of record "last 2 rb bet in sequence" data to record "black" layout list
set flag "use two numbers to determine bet rb" to true
end

if record "2 black" data = record "rb behind" data
and record "1 black consecutive" data = 1 and flag "use two numbers to determine bet rb" is true
and record "bet 2 rb progression" data count = 1
begin
clear record "last 2 rb bet in sequence" data
set max to record "bet 2 rb progression" data index
put 100% last record "bet 2 rb progression" data to record "last 2 rb bet in sequence" data
put 1 to record "bet 2 rb progression" data index
put 100% of record "last 2 rb bet in sequence" data to record "black" layout list
set flag "use two numbers to determine bet rb" to false
end
end

method "bet 2 low"
begin

if record "2 low" data = record "lh behind" data
and record "1 low consecutive" data = 1 and flag "use two numbers to determine bet lh" is false
begin
put 1 on record "bet 2 lh progression" data index
put 100% of record "bet 2 lh progression" data to record "low" layout list
put 100% of record "last 2 lh bet in sequence" data to record "last 2 lh bet in sequence" data
end

if record "2 low" data = record "lh behind" data
and record "1 low consecutive" data = 1 and flag "use two numbers to determine bet lh" is true
and record "bet 2 lh progression" data count > 1
begin
clear record "last 2 lh bet in sequence" data
set max to record "bet 2 lh progression" data index
put 100% of record "last 2 lh bet in sequence" data to record "last 2 lh bet in sequence" data
put 1 to record "bet 2 lh progression" data index
add 100% of record "bet 2 lh progression" data to record "use two numbers to determine bet lh" data
put 100% of record "last 2 lh bet in sequence" data to record "low" layout list
set flag "use two numbers to determine bet lh" to true
end

if record "2 low" data = record "lh behind" data
and record "1 low consecutive" data = 1 and flag "use two numbers to determine bet lh" is true
and record "bet 2 lh progression" data count = 1
begin
clear record "last 2 lh bet in sequence" data
set max to record "bet 2 lh progression" data index
put 100% last record "bet 2 lh progression" data to record "last 2 lh bet in sequence" data
put 1 to record "bet 2 lh progression" data index
put 100% of record "last 2 lh bet in sequence" data to record "low" layout list
set flag "use two numbers to determine bet lh" to false
end
end

method "bet 2 high"
begin
if record "2 high" data = record "lh behind" data
and record "1 high consecutive" data = 1 and flag "use two numbers to determine bet lh" is false
begin
put 1 on record "bet 2 lh progression" data index
put 100% of record "bet 2 lh progression" data to record "high" layout list
put 100% of record "bet 2 lh progression" data to record "last 2 lh bet in sequence" data
end

if record "2 high" data = record "lh behind" data
and record "1 high consecutive" data = 1 and flag "use two numbers to determine bet lh" is true
and record "bet 2 lh progression" data count > 1
begin
clear record "last 2 lh bet in sequence" data
set max to record "bet 2 lh progression" data index
put 100% of last record "bet 2 lh progression" data to record "last 2 lh bet in sequence" data
put 1 to record "bet 2 lh progression" data index
add 100% of record "bet 2 lh progression" data to record "last 2 lh bet in sequence" data
put 100% of record "last 2 lh bet in sequence" data to record "high" layout list
set flag "use two numbers to determine bet lh" to true
end

if record "2 high" data = record "lh behind" data
and record "1 high consecutive" data = 1 and flag "use two numbers to determine bet lh" is true
and record "bet 2 lh progression" data count = 1
begin
clear record "last 2 lh bet in sequence" data
set max to record "bet 2 lh progression" data index
put 100% last record "bet 2 lh progression" data to record "last 2 lh bet in sequence" data
put 1 to record "bet 2 lh progression" data index
put 100% of record "last 2 lh bet in sequence" data to record "high" layout list
set flag "use two numbers to determine bet lh" to false
end
end

method "bet 2 odd"
begin
if record "2 odd" data = record "eo behind" data
and record "1 odd consecutive" data = 1 and flag "use two numbers to determine bet eo" is false
begin
put 1 on record "bet 2 eo progression" data index
put 100% of record "bet 2 eo progression" data to record "odd" layout list
put 100% of record "bet 2 eo progression" data to record "last 2 eo bet in sequence" data
end

if record "2 odd" data = record "eo behind" data
and record "1 odd consecutive" data = 1 and flag "use two numbers to determine bet eo" is true
and record "bet 2 eo progression" data count > 1
begin
clear record "last 2 eo bet in sequence" data
set max to record "bet 2 eo progression" data index
put 100% of last record "bet 2 eo progression" data to record "last 2 eo bet in sequence" data
put 1 to record "bet 2 eo progression" data index
add 100% of record "bet 2 eo progression" data to record "last 2 eo bet in sequence" data
put 100% of record "last 2 eo bet in sequence" data to record "odd" layout list
set flag "use two numbers to determine bet eo" to true
end

if record "2 odd" data = record "eo behind" data
and record "1 odd consecutive" data = 1 and flag "use two numbers to determine bet eo" is true
and record "bet 2 eo progression" data count = 1
begin
clear record "last 2 eo bet in sequence" data
set max to record "bet 2 eo progression" data index
put 100% last record "bet 2 eo progression" data to record "last 2 eo bet in sequence" data
put 1 to record "bet 2 eo progression" data index
put 100% of record "last 2 eo bet in sequence" data to record "odd" layout list
set flag "use two numbers to determine bet eo" to false
end
end

method "bet 2 even"
begin
if record "2 even" data = record "eo behind" data
and record "1 even consecutive" data = 1 and flag "use two numbers to determine bet eo" is false
begin
put 1 on record "bet 2 eo progression" data index
put 100% of record "bet 2 eo progression" data to record "even" layout list
put 100% of record "bet 2 eo progression" data to record "last 2 eo bet in sequence" data
end

if record "2 even" data = record "eo behind" data
and record "1 even consecutive" data = 1 and flag "use two numbers to determine bet eo" is true
and record "bet 2 eo progression" data count > 1
begin
clear record "last 2 eo bet in sequence" data
set max to record "bet 2 eo progression" data index
put 100% of last record "bet 2 eo progression" data to record "last 2 eo bet in sequence" data
put 1 to record "bet 2 eo progression" data index
add 100% of record "bet 2 eo progression" data to record "last 2 eo bet in sequence" data
put 100% of record "last 2 eo bet in sequence" data to record "even" layout list
set flag "use two numbers to determine bet eo" to true
end

if record "2 even" data = record "eo behind" data
and record "1 even consecutive" data = 1 and flag "use two numbers to determine bet eo" is true
and record "bet 2 eo progression" data count = 1
begin
clear record "last 2 eo bet in sequence" data
set max to record "bet 2 eo progression" data index
put 100% last record "bet 2 eo progression" data to record "last 2 eo bet in sequence" data
put 1 to record "bet 2 eo progression" data index
put 100% of record "last 2 eo bet in sequence" data to record "even" layout list
set flag "use two numbers to determine bet eo" to false
end
end


method "check for win/loss rb"
begin
if black has hit each time and record "1 black consecutive" data = 1
begin
put 1 on record "bet 2 rb progression" data index
call "cross off winning numbers rb"
set flag "use two numbers to determine bet rb" to true
add 1 to record "net 2 black bets won" data
end

if black has not hit each time and record "1 black consecutive" data = 1
begin
set flag "use two numbers to determine bet rb" to false
set max to record "bet 2 rb progression" data index
add 1 to record "bet 2 rb progression" data index
put 100% of record "last 2 rb bet in sequence" data to record "bet 2 rb progression" data
subtract 1 to record "net 2 black bets won" data
end

if red has hit each time and record "1 red consecutive" data = 1
begin
put 1 on record "bet 2 rb progression" data index
call "cross off winning numbers rb"
set flag "use two numbers to determine bet rb" to true
add 1 to record "net 2 red bets won" data
end

if red has not hit each time and record "1 red consecutive" data = 1
begin
set flag "use two numbers to determine bet rb" to false
set max to record "bet 2 rb progression" data index
add 1 to record "bet 2 rb progression" data index
put 100% of record "last 2 rb bet in sequence" data to record "bet 2 rb progression" data
subtract 1 to record "net 2 red bets won" data
end
end

method "check for win/loss lh"
begin
if low has hit each time and record "1 low consecutive" data = 1
begin
put 1 on record "bet 2 lh progression" data index
call "cross off winning numbers lh"
set flag "use two numbers to determine bet lh" to true
add 1 to record "net 2 low bets won" data
end

if low has not hit each time and record "1 low consecutive" data = 1
begin
set flag "use two numbers to determine bet lh" to false
set max to record "bet 2 lh progression" data index
add 1 to record "bet 2 lh progression" data index
put 100% of record "last 2 lh bet in sequence" data to record "bet 2 lh progression" data
subtract 1 to record "net 2 low bets won" data
end

if high has hit each time and record "1 high consecutive" data = 1
begin
put 1 on record "bet 2 lh progression" data index
call "cross off winning numbers lh"
set flag "use two numbers to determine bet lh" to true
add 1 to record "net 2 high bets won" data
end

if high has not hit each time and record "1 high consecutive" data = 1
begin
set flag "use two numbers to determine bet lh" to false
set max to record "bet 2 lh progression" data index
add 1 to record "bet 2 lh progression" data index
put 100% of record "last 2 lh bet in sequence" data to record "bet 2 lh progression" data
subtract 1 to record "net 2 high bets won" data
end
end

method "check for win/loss eo"
begin
if even has hit each time and record "1 even consecutive" data = 1
begin
put 1 on record "bet 2 eo progression" data index
call "cross off winning numbers eo"
set flag "use two numbers to determine bet eo" to true
add 1 to record "net 2 even bets won" data
end

if even has not hit each time and record "1 even consecutive" data = 1
begin
set flag "use two numbers to determine bet eo" to false
set max to record "bet 2 eo progression" data index
add 1 to record "bet 2 eo progression" data index
put 100% of record "last 2 eo bet in sequence" data to record "bet 2 eo progression" data
subtract 1 to record "net 2 even bets won" data
end

if odd has hit each time and record "1 odd consecutive" data = 1
begin
put 1 on record "bet 2 eo progression" data index
call "cross off winning numbers eo"
set flag "use two numbers to determine bet eo" to true
add 1 to record "net 2 odd bets won" data
end

if odd has not hit each time and record "1 odd consecutive" data = 1
begin
set flag "use two numbers to determine bet eo" to false
set max to record "bet 2 eo progression" data index
add 1 to record "bet 2 eo progression" data index
put 100% of record "last 2 eo bet in sequence" data to record "bet 2 eo progression" data
subtract 1 to record "net 2 odd bets won" data
end
end


method "cross off winning numbers rb"
begin
put 1 on record "bet 2 rb progression" data index
while flag "use two numbers to determine bet rb" is true
begin
move list down by 1 on record "bet 2 rb progression" data
move list up by 1 on record "bet 2 rb progression" data
end

if record "bet 2 rb progression" data count > 0
begin
move list up by 1 on record "bet 2 rb progression" data
end
end

method "cross off winning numbers eo"
begin
put 1 on record "bet 2 eo progression" data index
while flag "use two numbers to determine bet eo" is true
begin
move list down by 1 on record "bet 2 eo progression" data
move list up by 1 on record "bet 2 eo progression" data
end

if record "bet 2 eo progression" data count > 0
begin
move list up by 1 on record "bet 2 eo progression" data
end
end

method "cross off winning numbers lh"
begin
put 1 on record "bet 2 lh progression" data index
while flag "use two numbers to determine bet lh" is true
begin
move list down by 1 on record "bet 2 lh progression" data
move list up by 1 on record "bet 2 lh progression" data
end

if record "bet 2 lh progression" data count > 0
begin
move list up by 1 on record "bet 2 lh progression" data
end
end






method "difference calculators"
begin
if record "2 red" data > record "2 black" data
begin
put 100% of record "2 red" data to record "2 rb current difference" data
put 100% of record "2 black" data to record "rb behind" data
end
if record "2 black" data > record "2 red" data
begin
put 100% of record "2 black" data to record "2 rb current difference" data
put 100% of record "2 red" data to record "rb behind" data
end
if record "2 red" data > record "2 black" data
begin
subtract 100% of record "2 black" data to record "2 rb current difference" data
end
if record "2 black" data > record "2 red" data
begin
subtract 100% of record "2 red" data to record "2 rb current difference" data
end
if record "2 even" data > record "2 odd" data
begin
put 100% of record "2 even" data to record "2 eo current difference" data
put 100% of record "2 odd" data to record "eo behind" data
end
if record "2 odd" data > record "2 even" data
begin
put 100% of record "2 odd" data to record "2 eo current difference" data
put 100% of record "2 even" data to record "eo behind" data
end
if record "2 even" data > record "2 odd" data
begin
subtract 100% of record "2 odd" data to record "2 eo current difference" data
end
if record "2 odd" data > record "2 even" data
begin
subtract 100% of record "2 even" data to record "2 eo current difference" data
end
if record "2 low" data > record "2 high" data
begin
put 100% of record "2 low" data to record "2 lh current difference" data
put 100% of record "2 high" data to record "lh behind" data
end
if record "2 high" data > record "2 low" data
begin
put 100% of record "2 high" data to record "2 lh current difference" data
put 100% of record "2 low" data to record "lh behind" data
end
if record "2 low" data > record "2 high" data
begin
subtract 100% of record "2 high" data to record "2 lh current difference" data
end
if record "2 high" data > record "2 low" data
begin
subtract 100% of record "2 low" data to record "2 lh current difference" data
end
if record "3 red" data > record "3 black" data
begin
put 100% of record "3 red" data to record "3 rb current difference" data
end
if record "3 black" data > record "3 red" data
begin
put 100% of record "3 black" data to record "3 rb current difference" data
end
if record "3 red" data > record "3 black" data
begin
subtract 100% of record "3 black" data to record "3 rb current difference" data
end
if record "3 black" data > record "3 red" data
begin
subtract 100% of record "3 red" data to record "3 rb current difference" data
end
if record "3 even" data > record "3 odd" data
begin
put 100% of record "3 even" data to record "3 eo current difference" data
end
if record "3 odd" data > record "3 even" data
begin
put 100% of record "3 odd" data to record "3 eo current difference" data
end
if record "3 even" data > record "3 odd" data
begin
subtract 100% of record "3 odd" data to record "3 eo current difference" data
end
if record "3 odd" data > record "3 even" data
begin
subtract 100% of record "3 even" data to record "3 eo current difference" data
end
if record "3 low" data > record "3 high" data
begin
put 100% of record "3 low" data to record "3 lh current difference" data
end
if record "3 high" data > record "3 low" data
begin
put 100% of record "3 high" data to record "3 lh current difference" data
end
if record "3 low" data > record "3 high" data
begin
subtract 100% of record "3 high" data to record "3 lh current difference" data
end
if record "3 high" data > record "3 low" data
begin
subtract 100% of record "3 low" data to record "3 lh current difference" data
end
end


method "reset"
begin
put 0 to record "rb bet" data
put 0 to record "eo bet" data
put 0 to record "lh bet" data
put 0 to record "2 red" data
    put 0 to record "2 black" data
    put 0 to record "2 even" data
    put 0 to record "2 odd" data
    put 0 to record "2 low" data
    put 0 to record "2 high" data
put 0 record "2 rb current difference" data
put 0 record "2 eo current difference" data
put 0 record "2 lh current difference" data
put 0 record "3 rb current difference" data
put 0 record "3 eo current difference" data
put 0 record "3 lh current difference" data
clear record "1 red consecutive" data
clear record "2 red consecutive" data
clear record "1 black consecutive" data
clear record "2 black consecutive" data
clear record "1 even consecutive" data
clear record "2 even consecutive" data
clear record "1 odd consecutive" data
clear record "2 odd consecutive" data
clear record "1 low consecutive" data
clear record "2 low consecutive" data
clear record "1 high consecutive" data
clear record "2 high consecutive" data
end






method "reset rb"
begin
set list of [1,.5,.5,.5] to record "bet 2 rb progression" data
set flag "use two numbers to determine bet rb" to false
put 0 to record "1 red" data
put 0 to record "1 black" data
put 0 to record "1 red consecutive" data
put 0 to record "1 black consectuive" data
put 0 to record "2 rb current difference" data
end

method "reset eo"
begin
set list of [1,.5,.5,.5] to record "bet 2 eo progression" data
set flag "use two numbers to determine bet eo" to false
put 0 to record "1 even" data
put 0 to record "1 odd" data
put 0 to record "1 even consecutive" data
put 0 to record "1 odd consectuive" data
put 0 to record "2 eo current difference" data
end

method "reset lh"
begin
set list of [1,.5,.5,.5] to record "bet 2 lh progression" data
set flag "use two numbers to determine bet lh" to false
put 0 to record "1 low" data
put 0 to record "1 high" data
put 0 to record "1 low consecutive" data
put 0 to record "1 high consectuive" data
put 0 to record "2 lh current difference" data
end
Title: Re: Even Chance System Except Played as Inside Bets
Post by: rjeaton1 on July 03, 2009, 12:15:32 AM
Oh, and just to forewarn you, their may be a few bugs in it.  I'm still working on it a bit.
Title: Re: Even Chance System Except Played as Inside Bets
Post by: Proofreaders2000 on July 03, 2009, 01:22:12 AM
I'm trying to understand.  Did you bet say (i.e. black continuously, all inside bet numbers) for 10,000 spins -or- did you wait for an event to happen before betting each time?
Title: Re: Even Chance System Except Played as Inside Bets
Post by: rjeaton1 on July 03, 2009, 01:32:17 AM
The coding basically sets it up to bet based on what the table is doing...kind of...

So, to answer your question, it bets on something different pretty much everytime a bet is placed.
Title: Re: Even Chance System Except Played as Inside Bets
Post by: hideseek on July 03, 2009, 02:14:44 AM
Hi RJ,
        You are an expert system developer. Still I am trying to recover some useful data from your post on "what happens in 37 spins". There is something not right with this system. All of a sudden the BR jumps to 100% up or down (see the chart). See my testing. Explain how to play the system.
Thanks
HS
Title: Re: Even Chance System Except Played as Inside Bets
Post by: rjeaton1 on July 03, 2009, 02:22:24 AM
@ hideseek>> Thank you very much!  ;D  Very nice to hear kind words, much appreciated.

As for the strange jumping up and down...part of that can be attributed to the progression this system uses (the midas touch), however, I did find a bug in the programming.  It is screwing up part of the progression when it gets to a certain point.

I'll explain more shortly, I'm just trying to get everything fixed with the coding...  I can take awhile to get certain things done, I'm a bit of a "jump from project to project person" but I always get back to where I started from.

Oh, I don't know if you've checked that thread recently Hideseek (what happens in 37 spins) but you can download the program and analyze your own spins now too.  That way you don't have just that one file to rely on.
Title: Re: Even Chance System Except Played as Inside Bets
Post by: rjeaton1 on July 03, 2009, 02:38:13 AM
Here is an updated version...I think there is all but one pesky bug fixed in this...I'm still getting random zeros thrown in my progression calculations for some reason...I'll figure it out.  Anyway, as I'm never happy, I've added another thing to the original code.  It now varys the way it bets even more

[aeva]system "red/black/even/odd/high/low"



method "main"
begin
while starting a new session
begin
    set list [1,.5,.5,.5] to record "bet 2 rb progression" data
    set list [1,.5,.5,.5] to record "bet 2 eo progression" data
    set list [1,.5,.5,.5] to record "bet 2 lh progression" data
    set flag "use two numbers to determine bet rb" to false
    set flag "use two numbers to determine bet eo" to false
    set flag "use two numbers to determine bet lh" to false
    put 1 to record "bet 2 rb progression" data index
    put 1 to record "bet 2 eo progression" data index
    put 1 to record "bet 2 lh progression" data index
    put 0 to record "2 red" data
    put 0 to record "2 black" data
    put 0 to record "2 even" data
    put 0 to record "2 odd" data
    put 0 to record "2 low" data
    put 0 to record "2 high" data
    copy list [1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18] to record "low" layout
    copy list [2,4,6,8,10,12,14,16,18,20,22,24,26,28,30,32,34,36] to record "even" layout
    copy list [1,3,5,7,9,12,14,16,18,19,21,23,25,27,30,32,34,36] to record "red" layout
    copy list [19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36] to record "high" layout
    copy list [1,3,5,7,9,11,13,15,17,19,21,23,25,27,29,31,33,35] to record "odd" layout
    copy list [2,4,6,8,10,11,13,15,17,20,22,24,26,28,29,31,33,35] to record "black" layout
    set max to record "low" layout index
set max to record "even" layout index
set max to record "red" layout index
set max to record "high" layout index
set max to record "odd" layout index
set max to record "black" layout index
end

while on each spin
begin
put 100% of record "net 2 red bets won" data to record "total bets won/lost" data
add 100% of record "net 2 black bets won" data to record "total bets won/lost" data
add 100% of record "net 2 even bets won" data to record "total bets won/lost" data
add 100% of record "net 2 odd bets won" data to record "total bets won/lost" data
add 100% of record "net 2 high bets won" data to record "total bets won/lost" data
add 100% of record "net 2 low bets won" data to record "total bets won/lost" data

if record "total bets won/lost" data > 3 or record "total bets won/lost" data < -3
begin
call "reset"
end

if record "bet 2 rb progression" data count = 0
begin
call "reset rb"
end
if record "bet 2 eo progression" data count = 0
begin
call "reset eo"
end
if record "bet 2 lh progression" data count = 0
begin
call "reset lh"
end
if record "rb bet" data = 1
    begin
    call "check for win/loss rb"
    end

    if record "eo bet" data = 1
    begin
    call "check for win/loss eo"
    end

    if record "lh bet" data = 1
    begin
    call "check for win/loss lh"
    end
   
put 0 to record "rb bet" data
put 0 to record "eo bet" data
put 0 to record "lh bet" data

put 0 record "2 rb current difference" data
put 0 record "2 eo current difference" data
put 0 record "2 lh current difference" data
put 0 record "3 rb current difference" data
put 0 record "3 eo current difference" data
put 0 record "3 lh current difference" data
clear record "1 red consecutive" data
clear record "2 red consecutive" data
clear record "1 black consecutive" data
clear record "2 black consecutive" data
clear record "1 even consecutive" data
clear record "2 even consecutive" data
clear record "1 odd consecutive" data
clear record "2 odd consecutive" data
clear record "1 low consecutive" data
clear record "2 low consecutive" data
clear record "1 high consecutive" data
clear record "2 high consecutive" data
call "rb eo hl hit counters"
call "difference calculators"


if record "2 rb current difference" data > 4
begin
if record "net 2 red bets won" data >= -3
begin
call "bet 2 red"
put 1 to record "rb bet" data
end


if record "net 2 red bets won" data < -3
begin
call "bet 2 red opposite"
put 1 to record "rb bet" data
end

if record "net 2 black bets won" data >= -3
begin
call "bet 2 black"
put 1 to record "rb bet" data
end

if record "net 2 black bets won" data < -3
begin
call "bet 2 black opposite"
put 1 to record "rb bet" data
end
end

if record "2 eo current difference" data > 4
begin
if record "net 2 even bets won" data >=-3
begin
call "bet 2 even"
put 1 to record "eo bet" data
end

if record "net 2 even bets won" data < -3
begin
call "bet 2 even opposite"
put 1 to record "eo bet" data
end

if record "net 2 odd bets won" data >=-3
begin
call "bet 2 odd"
put 1 to record "eo bet" data
end

if record "net 2 odd bets won" data < -3
begin
call "bet 2 odd opposite"
put 1 to record "eo bet" data
end
end


if record "2 lh current difference" data > 4
begin
if record "net 2 low bets won" data >=-3
begin
call "bet 2 low"
put 1 to record "lh bet" data
end

if record "net 2 low bets won" data < -3
begin
call "bet 2 low opposite"
put 1 to record "lh bet" data
end

if record "net 2 high bets won" data >=-3
begin
call "bet 2 high"
put 1 to record "lh bet" data
end

if record "net 2 high bets won" data < -3
begin
call "bet 2 high opposite"
put 1 to record "lh bet" data
end
end
end
end



method "rb eo hl hit counters"
begin
if red has hit 1 time
begin
add 1 to record "1 red consecutive" data
end
if red has hit 2 time
begin
add 1 to record "2 red" data
add 1 to record "2 red consecutive" data
end
if red has hit 3 time
begin
add 1 to record "3 red" data
end

if black has hit 1 time
begin
add 1 to record "1 black consecutive" data
end
if black has hit 2 time
begin
add 1 to record "2 black" data
add 1 to record "2 black consecutive" data
end
if black has hit 3 time
begin
add 1 to record "3 black" data
end

if even has hit 1 time
begin
add 1 to record "1 even consecutive" data
end
if even has hit 2 time
begin
add 1 to record "2 even" data
add 1 to record "2 even consecutive" data
end
if even has hit 3 time
begin
add 1 to record "3 even" data
end

if odd has hit 1 time
begin
add 1 to record "1 odd consecutive" data
end
if odd has hit 2 time
begin
add 1 to record "2 odd" data
add 1 to record "2 odd consecutive" data
end
if odd has hit 3 time
begin
add 1 to record "3 odd" data
end

if low has hit 1 time
begin
add 1 to record "1 low consecutive" data
end
if low has hit 2 time
begin
add 1 to record "2 low" data
add 1 to record "2 low consecutive" data
end
if low has hit 3 time
begin
add 1 to record "3 low" data
end

if high has hit 1 time
begin
add 1 to record "1 high consecutive" data
end
if high has hit 2 time
begin
add 1 to record "2 high" data
add 1 to record "2 high consecutive" data
end
if high has hit 3 time
begin
add 1 to record "3 high" data
end
end


method "bet 2 red"
begin
if record "2 red" data = record "rb behind" data
and record "1 red consecutive" data = 1 and flag "use two numbers to determine bet rb" is false
begin
put 1 on record "bet 2 rb progression" data index
put 100% of record "bet 2 rb progression" data to record "red" layout list
put 100% of record "bet 2 rb progression" data to record "last 2 rb bet in sequence" data
end

if record "2 red" data = record "rb behind" data
and record "1 red consecutive" data = 1 and flag "use two numbers to determine bet rb" is true
and record "bet 2 rb progression" data count > 1
begin
clear record "last 2 rb bet in sequence" data
set max to record "bet 2 rb progression" data index
put 100% of last record "bet 2 rb progression" data to record "last 2 rb bet in sequence" data
put 1 to record "bet 2 rb progression" data index
add 100% of record "bet 2 rb progression" data to record "last 2 rb bet in sequence" data
put 100% of record "last 2 rb bet in sequence" data to record "red" layout list
set flag "use two numbers to determine bet rb" to true
end

if record "2 red" data = record "rb behind" data
and record "1 red consecutive" data = 1 and flag "use two numbers to determine bet rb" is true
and record "bet 2 rb progression" data count = 1
begin
clear record "last 2 rb bet in sequence" data
set max to record "bet 2 rb progression" data index
put 100% last record "bet 2 rb progression" data to record "last 2 rb bet in sequence" data
put 1 to record "bet 2 rb progression" data index
put 100% of record "last 2 rb bet in sequence" data to record "red" layout list
set flag "use two numbers to determine bet rb" to false
end
end


method "bet 2 red opposite"
begin
if record "2 red" data = record "rb behind" data
and record "1 red consecutive" data = 1 and flag "use two numbers to determine bet rb" is false
begin
put 1 on record "bet 2 rb progression" data index
put 100% of record "bet 2 rb progression" data to record "black" layout list
put 100% of record "bet 2 rb progression" data to record "last 2 rb bet in sequence" data
end

if record "2 red" data = record "rb behind" data
and record "1 red consecutive" data = 1 and flag "use two numbers to determine bet rb" is true
and record "bet 2 rb progression" data count > 1
begin
clear record "last 2 rb bet in sequence" data
set max to record "bet 2 rb progression" data index
put 100% of last record "bet 2 rb progression" data to record "last 2 rb bet in sequence" data
put 1 to record "bet 2 rb progression" data index
add 100% of record "bet 2 rb progression" data to record "last 2 rb bet in sequence" data
put 100% of record "last 2 rb bet in sequence" data to record "black" layout list
set flag "use two numbers to determine bet rb" to true
end

if record "2 red" data = record "rb behind" data
and record "1 red consecutive" data = 1 and flag "use two numbers to determine bet rb" is true
and record "bet 2 rb progression" data count = 1
begin
clear record "last 2 rb bet in sequence" data
set max to record "bet 2 rb progression" data index
put 100% last record "bet 2 rb progression" data to record "last 2 rb bet in sequence" data
put 1 to record "bet 2 rb progression" data index
put 100% of record "last 2 rb bet in sequence" data to record "black" layout list
set flag "use two numbers to determine bet rb" to false
end
end


method "bet 2 black"
begin
if record "2 black" data = record "rb behind" data
and record "1 black consecutive" data = 1 and flag "use two numbers to determine bet rb" is false
begin
put 1 on record "bet 2 rb progression" data index
put 100% of record "bet 2 rb progression" data to record "black" layout list
put 100% of record "bet 2 rb progression" data to record "last 2 rb bet in sequence" data
end

if record "2 black" data = record "rb behind" data
and record "1 black consecutive" data = 1 and flag "use two numbers to determine bet rb" is true
and record "bet 2 rb progression" data count > 1
begin
clear record "last 2 rb bet in sequence" data
set max to record "bet 2 rb progression" data index
put 100% of last record "bet 2 rb progression" data to record "last 2 rb bet in sequence" data
put 1 to record "bet 2 rb progression" data index
add 100% of record "bet 2 rb progression" data to record "last 2 rb bet in sequence" data
put 100% of record "last 2 rb bet in sequence" data to record "black" layout list
set flag "use two numbers to determine bet rb" to true
end

if record "2 black" data = record "rb behind" data
and record "1 black consecutive" data = 1 and flag "use two numbers to determine bet rb" is true
and record "bet 2 rb progression" data count = 1
begin
clear record "last 2 rb bet in sequence" data
set max to record "bet 2 rb progression" data index
put 100% last record "bet 2 rb progression" data to record "last 2 rb bet in sequence" data
put 1 to record "bet 2 rb progression" data index
put 100% of record "last 2 rb bet in sequence" data to record "black" layout list
set flag "use two numbers to determine bet rb" to false
end
end

method "bet 2 black opposite"
begin
if record "2 black" data = record "rb behind" data
and record "1 black consecutive" data = 1 and flag "use two numbers to determine bet rb" is false
begin
put 1 on record "bet 2 rb progression" data index
put 100% of record "bet 2 rb progression" data to record "red" layout list
put 100% of record "bet 2 rb progression" data to record "last 2 rb bet in sequence" data
end

if record "2 black" data = record "rb behind" data
and record "1 black consecutive" data = 1 and flag "use two numbers to determine bet rb" is true
and record "bet 2 rb progression" data count > 1
begin
clear record "last 2 rb bet in sequence" data
set max to record "bet 2 rb progression" data index
put 100% of last record "bet 2 rb progression" data to record "last 2 rb bet in sequence" data
put 1 to record "bet 2 rb progression" data index
add 100% of record "bet 2 rb progression" data to record "last 2 rb bet in sequence" data
put 100% of record "last 2 rb bet in sequence" data to record "red" layout list
set flag "use two numbers to determine bet rb" to true
end

if record "2 black" data = record "rb behind" data
and record "1 black consecutive" data = 1 and flag "use two numbers to determine bet rb" is true
and record "bet 2 rb progression" data count = 1
begin
clear record "last 2 rb bet in sequence" data
set max to record "bet 2 rb progression" data index
put 100% last record "bet 2 rb progression" data to record "last 2 rb bet in sequence" data
put 1 to record "bet 2 rb progression" data index
put 100% of record "last 2 rb bet in sequence" data to record "red" layout list
set flag "use two numbers to determine bet rb" to false
end
end



method "bet 2 low"
begin

if record "2 low" data = record "lh behind" data
and record "1 low consecutive" data = 1 and flag "use two numbers to determine bet lh" is false
begin
put 1 on record "bet 2 lh progression" data index
put 100% of record "bet 2 lh progression" data to record "low" layout list
put 100% of record "bet 2 lh progression" data to record "last 2 lh bet in sequence" data
end

if record "2 low" data = record "lh behind" data
and record "1 low consecutive" data = 1 and flag "use two numbers to determine bet lh" is true
and record "bet 2 lh progression" data count > 1
begin
clear record "last 2 lh bet in sequence" data
set max to record "bet 2 lh progression" data index
put 100% of record "last 2 lh bet in sequence" data to record "last 2 lh bet in sequence" data
put 1 to record "bet 2 lh progression" data index
add 100% of record "bet 2 lh progression" data to record "use two numbers to determine bet lh" data
put 100% of record "last 2 lh bet in sequence" data to record "low" layout list
set flag "use two numbers to determine bet lh" to true
end

if record "2 low" data = record "lh behind" data
and record "1 low consecutive" data = 1 and flag "use two numbers to determine bet lh" is true
and record "bet 2 lh progression" data count = 1
begin
clear record "last 2 lh bet in sequence" data
set max to record "bet 2 lh progression" data index
put 100% last record "bet 2 lh progression" data to record "last 2 lh bet in sequence" data
put 1 to record "bet 2 lh progression" data index
put 100% of record "last 2 lh bet in sequence" data to record "low" layout list
set flag "use two numbers to determine bet lh" to false
end
end

method "bet 2 low opposite"
begin

if record "2 low" data = record "lh behind" data
and record "1 low consecutive" data = 1 and flag "use two numbers to determine bet lh" is false
begin
put 1 on record "bet 2 lh progression" data index
put 100% of record "bet 2 lh progression" data to record "high" layout list
put 100% of record "bet 2 lh progression" data to record "last 2 lh bet in sequence" data
end

if record "2 low" data = record "lh behind" data
and record "1 low consecutive" data = 1 and flag "use two numbers to determine bet lh" is true
and record "bet 2 lh progression" data count > 1
begin
clear record "last 2 lh bet in sequence" data
set max to record "bet 2 lh progression" data index
put 100% of record "last 2 lh bet in sequence" data to record "last 2 lh bet in sequence" data
put 1 to record "bet 2 lh progression" data index
add 100% of record "bet 2 lh progression" data to record "use two numbers to determine bet lh" data
put 100% of record "last 2 lh bet in sequence" data to record "high" layout list
set flag "use two numbers to determine bet lh" to true
end

if record "2 low" data = record "lh behind" data
and record "1 low consecutive" data = 1 and flag "use two numbers to determine bet lh" is true
and record "bet 2 lh progression" data count = 1
begin
clear record "last 2 lh bet in sequence" data
set max to record "bet 2 lh progression" data index
put 100% last record "bet 2 lh progression" data to record "last 2 lh bet in sequence" data
put 1 to record "bet 2 lh progression" data index
put 100% of record "last 2 lh bet in sequence" data to record "high" layout list
set flag "use two numbers to determine bet lh" to false
end
end

method "bet 2 high"
begin
if record "2 high" data = record "lh behind" data
and record "1 high consecutive" data = 1 and flag "use two numbers to determine bet lh" is false
begin
put 1 on record "bet 2 lh progression" data index
put 100% of record "bet 2 lh progression" data to record "high" layout list
put 100% of record "bet 2 lh progression" data to record "last 2 lh bet in sequence" data
end

if record "2 high" data = record "lh behind" data
and record "1 high consecutive" data = 1 and flag "use two numbers to determine bet lh" is true
and record "bet 2 lh progression" data count > 1
begin
clear record "last 2 lh bet in sequence" data
set max to record "bet 2 lh progression" data index
put 100% of last record "bet 2 lh progression" data to record "last 2 lh bet in sequence" data
put 1 to record "bet 2 lh progression" data index
add 100% of record "bet 2 lh progression" data to record "last 2 lh bet in sequence" data
put 100% of record "last 2 lh bet in sequence" data to record "high" layout list
set flag "use two numbers to determine bet lh" to true
end

if record "2 high" data = record "lh behind" data
and record "1 high consecutive" data = 1 and flag "use two numbers to determine bet lh" is true
and record "bet 2 lh progression" data count = 1
begin
clear record "last 2 lh bet in sequence" data
set max to record "bet 2 lh progression" data index
put 100% last record "bet 2 lh progression" data to record "last 2 lh bet in sequence" data
put 1 to record "bet 2 lh progression" data index
put 100% of record "last 2 lh bet in sequence" data to record "high" layout list
set flag "use two numbers to determine bet lh" to false
end
end


method "bet 2 high opposite"
begin
if record "2 high" data = record "lh behind" data
and record "1 high consecutive" data = 1 and flag "use two numbers to determine bet lh" is false
begin
put 1 on record "bet 2 lh progression" data index
put 100% of record "bet 2 lh progression" data to record "low" layout list
put 100% of record "bet 2 lh progression" data to record "last 2 lh bet in sequence" data
end

if record "2 high" data = record "lh behind" data
and record "1 high consecutive" data = 1 and flag "use two numbers to determine bet lh" is true
and record "bet 2 lh progression" data count > 1
begin
clear record "last 2 lh bet in sequence" data
set max to record "bet 2 lh progression" data index
put 100% of last record "bet 2 lh progression" data to record "last 2 lh bet in sequence" data
put 1 to record "bet 2 lh progression" data index
add 100% of record "bet 2 lh progression" data to record "last 2 lh bet in sequence" data
put 100% of record "last 2 lh bet in sequence" data to record "low" layout list
set flag "use two numbers to determine bet lh" to true
end

if record "2 high" data = record "lh behind" data
and record "1 high consecutive" data = 1 and flag "use two numbers to determine bet lh" is true
and record "bet 2 lh progression" data count = 1
begin
clear record "last 2 lh bet in sequence" data
set max to record "bet 2 lh progression" data index
put 100% last record "bet 2 lh progression" data to record "last 2 lh bet in sequence" data
put 1 to record "bet 2 lh progression" data index
put 100% of record "last 2 lh bet in sequence" data to record "low" layout list
set flag "use two numbers to determine bet lh" to false
end
end





method "bet 2 odd"
begin
if record "2 odd" data = record "eo behind" data
and record "1 odd consecutive" data = 1 and flag "use two numbers to determine bet eo" is false
begin
put 1 on record "bet 2 eo progression" data index
put 100% of record "bet 2 eo progression" data to record "odd" layout list
put 100% of record "bet 2 eo progression" data to record "last 2 eo bet in sequence" data
end

if record "2 odd" data = record "eo behind" data
and record "1 odd consecutive" data = 1 and flag "use two numbers to determine bet eo" is true
and record "bet 2 eo progression" data count > 1
begin
clear record "last 2 eo bet in sequence" data
set max to record "bet 2 eo progression" data index
put 100% of last record "bet 2 eo progression" data to record "last 2 eo bet in sequence" data
put 1 to record "bet 2 eo progression" data index
add 100% of record "bet 2 eo progression" data to record "last 2 eo bet in sequence" data
put 100% of record "last 2 eo bet in sequence" data to record "odd" layout list
set flag "use two numbers to determine bet eo" to true
end

if record "2 odd" data = record "eo behind" data
and record "1 odd consecutive" data = 1 and flag "use two numbers to determine bet eo" is true
and record "bet 2 eo progression" data count = 1
begin
clear record "last 2 eo bet in sequence" data
set max to record "bet 2 eo progression" data index
put 100% last record "bet 2 eo progression" data to record "last 2 eo bet in sequence" data
put 1 to record "bet 2 eo progression" data index
put 100% of record "last 2 eo bet in sequence" data to record "odd" layout list
set flag "use two numbers to determine bet eo" to false
end
end


method "bet 2 odd opposite"
begin
if record "2 odd" data = record "eo behind" data
and record "1 odd consecutive" data = 1 and flag "use two numbers to determine bet eo" is false
begin
put 1 on record "bet 2 eo progression" data index
put 100% of record "bet 2 eo progression" data to record "even" layout list
put 100% of record "bet 2 eo progression" data to record "last 2 eo bet in sequence" data
end

if record "2 odd" data = record "eo behind" data
and record "1 odd consecutive" data = 1 and flag "use two numbers to determine bet eo" is true
and record "bet 2 eo progression" data count > 1
begin
clear record "last 2 eo bet in sequence" data
set max to record "bet 2 eo progression" data index
put 100% of last record "bet 2 eo progression" data to record "last 2 eo bet in sequence" data
put 1 to record "bet 2 eo progression" data index
add 100% of record "bet 2 eo progression" data to record "last 2 eo bet in sequence" data
put 100% of record "last 2 eo bet in sequence" data to record "even" layout list
set flag "use two numbers to determine bet eo" to true
end

if record "2 odd" data = record "eo behind" data
and record "1 odd consecutive" data = 1 and flag "use two numbers to determine bet eo" is true
and record "bet 2 eo progression" data count = 1
begin
clear record "last 2 eo bet in sequence" data
set max to record "bet 2 eo progression" data index
put 100% last record "bet 2 eo progression" data to record "last 2 eo bet in sequence" data
put 1 to record "bet 2 eo progression" data index
put 100% of record "last 2 eo bet in sequence" data to record "even" layout list
set flag "use two numbers to determine bet eo" to false
end
end








method "bet 2 even"
begin
if record "2 even" data = record "eo behind" data
and record "1 even consecutive" data = 1 and flag "use two numbers to determine bet eo" is false
begin
put 1 on record "bet 2 eo progression" data index
put 100% of record "bet 2 eo progression" data to record "even" layout list
put 100% of record "bet 2 eo progression" data to record "last 2 eo bet in sequence" data
end

if record "2 even" data = record "eo behind" data
and record "1 even consecutive" data = 1 and flag "use two numbers to determine bet eo" is true
and record "bet 2 eo progression" data count > 1
begin
clear record "last 2 eo bet in sequence" data
set max to record "bet 2 eo progression" data index
put 100% of last record "bet 2 eo progression" data to record "last 2 eo bet in sequence" data
put 1 to record "bet 2 eo progression" data index
add 100% of record "bet 2 eo progression" data to record "last 2 eo bet in sequence" data
put 100% of record "last 2 eo bet in sequence" data to record "even" layout list
set flag "use two numbers to determine bet eo" to true
end

if record "2 even" data = record "eo behind" data
and record "1 even consecutive" data = 1 and flag "use two numbers to determine bet eo" is true
and record "bet 2 eo progression" data count = 1
begin
clear record "last 2 eo bet in sequence" data
set max to record "bet 2 eo progression" data index
put 100% last record "bet 2 eo progression" data to record "last 2 eo bet in sequence" data
put 1 to record "bet 2 eo progression" data index
put 100% of record "last 2 eo bet in sequence" data to record "even" layout list
set flag "use two numbers to determine bet eo" to false
end
end



method "bet 2 even opposite"
begin
if record "2 even" data = record "eo behind" data
and record "1 even consecutive" data = 1 and flag "use two numbers to determine bet eo" is false
begin
put 1 on record "bet 2 eo progression" data index
put 100% of record "bet 2 eo progression" data to record "odd" layout list
put 100% of record "bet 2 eo progression" data to record "last 2 eo bet in sequence" data
end

if record "2 even" data = record "eo behind" data
and record "1 even consecutive" data = 1 and flag "use two numbers to determine bet eo" is true
and record "bet 2 eo progression" data count > 1
begin
clear record "last 2 eo bet in sequence" data
set max to record "bet 2 eo progression" data index
put 100% of last record "bet 2 eo progression" data to record "last 2 eo bet in sequence" data
put 1 to record "bet 2 eo progression" data index
add 100% of record "bet 2 eo progression" data to record "last 2 eo bet in sequence" data
put 100% of record "last 2 eo bet in sequence" data to record "odd" layout list
set flag "use two numbers to determine bet eo" to true
end

if record "2 even" data = record "eo behind" data
and record "1 even consecutive" data = 1 and flag "use two numbers to determine bet eo" is true
and record "bet 2 eo progression" data count = 1
begin
clear record "last 2 eo bet in sequence" data
set max to record "bet 2 eo progression" data index
put 100% last record "bet 2 eo progression" data to record "last 2 eo bet in sequence" data
put 1 to record "bet 2 eo progression" data index
put 100% of record "last 2 eo bet in sequence" data to record "odd" layout list
set flag "use two numbers to determine bet eo" to false
end
end


method "check for win/loss rb"
begin
if black has hit each time and record "1 black consecutive" data = 1
begin
put 1 on record "bet 2 rb progression" data index
call "cross off winning numbers rb"
set flag "use two numbers to determine bet rb" to true
add 1 to record "net 2 black bets won" data
add 1 to record "gross bets won" data
end

if black has not hit each time and record "1 black consecutive" data = 1
begin
set flag "use two numbers to determine bet rb" to false
set max to record "bet 2 rb progression" data index
add 1 to record "bet 2 rb progression" data index
put 100% of record "last 2 rb bet in sequence" data to record "bet 2 rb progression" data
subtract 1 to record "net 2 black bets won" data
subtract 1 to record "gross bets won" data
end

if red has hit each time and record "1 red consecutive" data = 1
begin
put 1 on record "bet 2 rb progression" data index
call "cross off winning numbers rb"
set flag "use two numbers to determine bet rb" to true
add 1 to record "net 2 red bets won" data
add 1 to record "gross bets won" data
end

if red has not hit each time and record "1 red consecutive" data = 1
begin
set flag "use two numbers to determine bet rb" to false
set max to record "bet 2 rb progression" data index
add 1 to record "bet 2 rb progression" data index
put 100% of record "last 2 rb bet in sequence" data to record "bet 2 rb progression" data
subtract 1 to record "net 2 red bets won" data
subtract 1 to record "gross bets won" data
end
end

method "check for win/loss lh"
begin
if low has hit each time and record "1 low consecutive" data = 1
begin
put 1 on record "bet 2 lh progression" data index
call "cross off winning numbers lh"
set flag "use two numbers to determine bet lh" to true
add 1 to record "net 2 low bets won" data
add 1 to record "gross bets won" data
end

if low has not hit each time and record "1 low consecutive" data = 1
begin
set flag "use two numbers to determine bet lh" to false
set max to record "bet 2 lh progression" data index
add 1 to record "bet 2 lh progression" data index
put 100% of record "last 2 lh bet in sequence" data to record "bet 2 lh progression" data
subtract 1 to record "net 2 low bets won" data
subtract 1 to record "gross bets won" data
end

if high has hit each time and record "1 high consecutive" data = 1
begin
put 1 on record "bet 2 lh progression" data index
call "cross off winning numbers lh"
set flag "use two numbers to determine bet lh" to true
add 1 to record "net 2 high bets won" data
add 1 to record "gross bets won" data
end

if high has not hit each time and record "1 high consecutive" data = 1
begin
set flag "use two numbers to determine bet lh" to false
set max to record "bet 2 lh progression" data index
add 1 to record "bet 2 lh progression" data index
put 100% of record "last 2 lh bet in sequence" data to record "bet 2 lh progression" data
subtract 1 to record "net 2 high bets won" data
subtract 1 to record "gross bets won" data
end
end

method "check for win/loss eo"
begin
if even has hit each time and record "1 even consecutive" data = 1
begin
put 1 on record "bet 2 eo progression" data index
call "cross off winning numbers eo"
set flag "use two numbers to determine bet eo" to true
add 1 to record "net 2 even bets won" data
add 1 to record "gross bets won" data
end

if even has not hit each time and record "1 even consecutive" data = 1
begin
set flag "use two numbers to determine bet eo" to false
set max to record "bet 2 eo progression" data index
add 1 to record "bet 2 eo progression" data index
put 100% of record "last 2 eo bet in sequence" data to record "bet 2 eo progression" data
subtract 1 to record "net 2 even bets won" data
subtract 1 to record "gross bets won" data
end

if odd has hit each time and record "1 odd consecutive" data = 1
begin
put 1 on record "bet 2 eo progression" data index
call "cross off winning numbers eo"
set flag "use two numbers to determine bet eo" to true
add 1 to record "net 2 odd bets won" data
add 1 to record "gross bets won" data
end

if odd has not hit each time and record "1 odd consecutive" data = 1
begin
set flag "use two numbers to determine bet eo" to false
set max to record "bet 2 eo progression" data index
add 1 to record "bet 2 eo progression" data index
put 100% of record "last 2 eo bet in sequence" data to record "bet 2 eo progression" data
subtract 1 to record "net 2 odd bets won" data
subtract 1 to record "gross bets won" data
end
end


method "cross off winning numbers rb"
begin
put 1 on record "bet 2 rb progression" data index
while flag "use two numbers to determine bet rb" is true
begin
move list down by 1 on record "bet 2 rb progression" data
move list up by 1 on record "bet 2 rb progression" data
end

if record "bet 2 rb progression" data count > 0
begin
move list up by 1 on record "bet 2 rb progression" data
end
end

method "cross off winning numbers eo"
begin
put 1 on record "bet 2 eo progression" data index
while flag "use two numbers to determine bet eo" is true
begin
move list down by 1 on record "bet 2 eo progression" data
move list up by 1 on record "bet 2 eo progression" data
end

if record "bet 2 eo progression" data count > 0
begin
move list up by 1 on record "bet 2 eo progression" data
end
end

method "cross off winning numbers lh"
begin
put 1 on record "bet 2 lh progression" data index
while flag "use two numbers to determine bet lh" is true
begin
move list down by 1 on record "bet 2 lh progression" data
move list up by 1 on record "bet 2 lh progression" data
end

if record "bet 2 lh progression" data count > 0
begin
move list up by 1 on record "bet 2 lh progression" data
end
end






method "difference calculators"
begin
if record "2 red" data > record "2 black" data
begin
put 100% of record "2 red" data to record "2 rb current difference" data
put 100% of record "2 black" data to record "rb behind" data
end
if record "2 black" data > record "2 red" data
begin
put 100% of record "2 black" data to record "2 rb current difference" data
put 100% of record "2 red" data to record "rb behind" data
end
if record "2 red" data > record "2 black" data
begin
subtract 100% of record "2 black" data to record "2 rb current difference" data
end
if record "2 black" data > record "2 red" data
begin
subtract 100% of record "2 red" data to record "2 rb current difference" data
end
if record "2 even" data > record "2 odd" data
begin
put 100% of record "2 even" data to record "2 eo current difference" data
put 100% of record "2 odd" data to record "eo behind" data
end
if record "2 odd" data > record "2 even" data
begin
put 100% of record "2 odd" data to record "2 eo current difference" data
put 100% of record "2 even" data to record "eo behind" data
end
if record "2 even" data > record "2 odd" data
begin
subtract 100% of record "2 odd" data to record "2 eo current difference" data
end
if record "2 odd" data > record "2 even" data
begin
subtract 100% of record "2 even" data to record "2 eo current difference" data
end
if record "2 low" data > record "2 high" data
begin
put 100% of record "2 low" data to record "2 lh current difference" data
put 100% of record "2 high" data to record "lh behind" data
end
if record "2 high" data > record "2 low" data
begin
put 100% of record "2 high" data to record "2 lh current difference" data
put 100% of record "2 low" data to record "lh behind" data
end
if record "2 low" data > record "2 high" data
begin
subtract 100% of record "2 high" data to record "2 lh current difference" data
end
if record "2 high" data > record "2 low" data
begin
subtract 100% of record "2 low" data to record "2 lh current difference" data
end
if record "3 red" data > record "3 black" data
begin
put 100% of record "3 red" data to record "3 rb current difference" data
end
if record "3 black" data > record "3 red" data
begin
put 100% of record "3 black" data to record "3 rb current difference" data
end
if record "3 red" data > record "3 black" data
begin
subtract 100% of record "3 black" data to record "3 rb current difference" data
end
if record "3 black" data > record "3 red" data
begin
subtract 100% of record "3 red" data to record "3 rb current difference" data
end
if record "3 even" data > record "3 odd" data
begin
put 100% of record "3 even" data to record "3 eo current difference" data
end
if record "3 odd" data > record "3 even" data
begin
put 100% of record "3 odd" data to record "3 eo current difference" data
end
if record "3 even" data > record "3 odd" data
begin
subtract 100% of record "3 odd" data to record "3 eo current difference" data
end
if record "3 odd" data > record "3 even" data
begin
subtract 100% of record "3 even" data to record "3 eo current difference" data
end
if record "3 low" data > record "3 high" data
begin
put 100% of record "3 low" data to record "3 lh current difference" data
end
if record "3 high" data > record "3 low" data
begin
put 100% of record "3 high" data to record "3 lh current difference" data
end
if record "3 low" data > record "3 high" data
begin
subtract 100% of record "3 high" data to record "3 lh current difference" data
end
if record "3 high" data > record "3 low" data
begin
subtract 100% of record "3 low" data to record "3 lh current difference" data
end
end


method "reset"
begin
put 0 to record "net 2 red bets won" data
put 0 to record "net 2 black bets won" data
put 0 to record "net 2 even bets won" data
put 0 to record "net 2 odd bets won" data
put 0 to record "net 2 high bets won" data
put 0 to record "net 2 low bets won" data
put 0 to record "rb bet" data
put 0 to record "eo bet" data
put 0 to record "lh bet" data
put 0 to record "2 red" data
    put 0 to record "2 black" data
    put 0 to record "2 even" data
    put 0 to record "2 odd" data
    put 0 to record "2 low" data
    put 0 to record "2 high" data
put 0 record "2 rb current difference" data
put 0 record "2 eo current difference" data
put 0 record "2 lh current difference" data
put 0 record "3 rb current difference" data
put 0 record "3 eo current difference" data
put 0 record "3 lh current difference" data
clear record "1 red consecutive" data
clear record "2 red consecutive" data
clear record "1 black consecutive" data
clear record "2 black consecutive" data
clear record "1 even consecutive" data
clear record "2 even consecutive" data
clear record "1 odd consecutive" data
clear record "2 odd consecutive" data
clear record "1 low consecutive" data
clear record "2 low consecutive" data
clear record "1 high consecutive" data
clear record "2 high consecutive" data
end






method "reset rb"
begin
set list of [1,.5,.5,.5] to record "bet 2 rb progression" data
set flag "use two numbers to determine bet rb" to false
put 0 to record "1 red" data
put 0 to record "1 black" data
put 0 to record "1 red consecutive" data
put 0 to record "1 black consectuive" data
put 0 to record "2 rb current difference" data
end

method "reset eo"
begin
set list of [1,.5,.5,.5] to record "bet 2 eo progression" data
set flag "use two numbers to determine bet eo" to false
put 0 to record "1 even" data
put 0 to record "1 odd" data
put 0 to record "1 even consecutive" data
put 0 to record "1 odd consectuive" data
put 0 to record "2 eo current difference" data
end

method "reset lh"
begin
set list of [1,.5,.5,.5] to record "bet 2 lh progression" data
set flag "use two numbers to determine bet lh" to false
put 0 to record "1 low" data
put 0 to record "1 high" data
put 0 to record "1 low consecutive" data
put 0 to record "1 high consectuive" data
put 0 to record "2 lh current difference" data
end
[/aeva]
Title: Re: Even Chance System Except Played as Inside Bets
Post by: rjeaton1 on July 03, 2009, 02:47:50 AM
Unfortunately, even with the modification, I'm afraid after (in my test anyway) 13k spins, it all seems to start going downhill....oh well.

But, it's interesting to play around with anyway.
Title: Re: Even Chance System Except Played as Inside Bets
Post by: lucky_strike on July 03, 2009, 05:48:31 AM
rjeaton1 when you make a RX chart then change settings so bankroll are at 0
then you can easy see what you gain and what kind of drawdown you have
i could see that you did so with the last chart but not with the first one

Cheers