Author Topic: Lets keep Sp1N_B1zZy  (Read 3293 times)

december

  • Veteran Member
  • ****
  • Posts: 375
  • Thanked: 39 times
  • Gender: Male
Lets keep Sp1N_B1zZy
« on: August 19, 2015, 01:27:07 PM »
Hey Spin, show me some magic, so that I can see where this one is going:

We wait for any number to repeat itself in 2 spins (...,7,11,13,13) and then we keep betting on it. Every spin we add +1. Reset on new high.
If next one(s) qualify - they are welcome to join us, meaning we place chips and add +1 also on them.
How many of them? Let us choose.
Thank you!!
« Last Edit: August 20, 2015, 10:24:20 AM by december »


 

Sp1N-D1zZy

  • Moderator
  • New
  • *****
  • Posts: 75
  • Thanked: 1 times
  • Gender: Male
Re: Lets keep Sp1n_B1zzy
« Reply #1 on: August 19, 2015, 11:16:34 PM »
This one is quite good. Just use 1 number, but sometimes drawdown kicks you.

Happy experimenting,
Spin.

system "Two in a Row"
{
*************************************
*         System by december        *
*           on roulette30           *
*************************************
         Rx-ed by Sp1N-D1zZy
-------------------------------------
           00-c0mpatible
-------------------------------------
We wait for any number to repeat itself in 2 spins (...,7,11,13,13)
and then we keep betting on it. Every spin we add +1. Reset on new high.
If next one(s) qualify - they are welcome to join us, meaning we place
chips and add +1 also on them. How many of them? Let us choose.
-------------------------------------
}
method "main"
begin
while starting new session
    begin
    call "Init"
    exit
    end
add 1 record"Count"data
call "Reset"
if record"Count"data < 1
    begin end else begin
    call "Eval"
    call "Place Bets"
    end
end

method "Reset"
begin
if bankroll > record"Bank"data
    begin
    put 100% bankroll record"Bank"data
    put 1 record"Unit"data
    clear all records except ["Qual", "Unit", "Bank"] data
    clear all records except ["Dummy"] layout
    exit
    end
end

method"Place Bets"
begin
put 100% record"Unit"data record"Bet this"layout list
if record"Bet this"layout count > 0
    begin
    add 1 record"Unit"data
    end
end

method "eval"
begin
track last number for 1 record"LastN"layout
track last number for 2 record"LastT"layout
put 1 record"LastT"layout index
copy record"LastT"layout record"Temp"layout
add 1 record"LastT"layout index
copy record"LastT"layout record"Temp2"layout
if record"Temp"layout list pattern match record"Temp2"layout
    begin
    set max record"Bet this"layout index
    if record"Bet this"layout index < record"Qual"data
        begin
        set max record"Bet this"layout index
        add 1 record"Bet this"layout index
        copy record"LastN"layout record"Bet this"layout
        end
    end
end

method "Init"
begin
put 1 record"Unit"data
put 100% bankroll record"Bank"data
group
    begin
    input dropdown
    "What table layout do you wish to use?
    1:=Single Zero
    2:=Double Zero" record"Layout"data
    end
if record"Layout"data = 1
    begin
    load single wheel
    end else begin
    load double wheel
    end
group
    begin
    display "Two in a Row - By december"
    display "-----------------------------------------------------------------"
    display ""
    input data "Maximum number of qualifiers for betting?" record"Qual"data
    end
end
 

Reyth

  • Global Moderator
  • Hero Member
  • *****
  • Posts: 3318
  • Thanked: 980 times
Re: Lets keep Sp1n_B1zzy
« Reply #2 on: August 19, 2015, 11:25:49 PM »
Nice! : D
 

december

  • Veteran Member
  • ****
  • Posts: 375
  • Thanked: 39 times
  • Gender: Male
Re: Lets keep Sp1n_B1zzy
« Reply #3 on: August 20, 2015, 06:04:16 AM »
Good job, again!
Thanks for effort!

 

december

  • Veteran Member
  • ****
  • Posts: 375
  • Thanked: 39 times
  • Gender: Male
Re: Lets keep Sp1n_B1zzy
« Reply #4 on: August 20, 2015, 06:11:07 AM »
 

december

  • Veteran Member
  • ****
  • Posts: 375
  • Thanked: 39 times
  • Gender: Male
Re: Lets keep Sp1N_B1zZy
« Reply #5 on: August 20, 2015, 03:28:29 PM »
If you can tell him to start new qualifier from 1 unit, it would make a difference, I think.

And on some new level I will ask you if it is possible to modify it in a way that when we have our number of qualifiers, say 6, and when he (system) finds a new one, than he drops the oldest and add the newest one to our 6....
 

Sp1N-D1zZy

  • Moderator
  • New
  • *****
  • Posts: 75
  • Thanked: 1 times
  • Gender: Male
Re: Lets keep Sp1N_B1zZy
« Reply #6 on: August 20, 2015, 09:36:56 PM »
If you can tell him to start new qualifier from 1 unit, it would make a difference, I think.

Can you explain more....
 

december

  • Veteran Member
  • ****
  • Posts: 375
  • Thanked: 39 times
  • Gender: Male
Re: Lets keep Sp1N_B1zZy
« Reply #7 on: August 21, 2015, 04:56:08 AM »
If we have 1 number with, say 4 units on it, and we get new qualifier, it puts in next spin 5 units on both, instead 5 on old number and 1 on newbie.
When next qualifier come it should begin with 1 unit, until it get some experience.
 

Sp1N-D1zZy

  • Moderator
  • New
  • *****
  • Posts: 75
  • Thanked: 1 times
  • Gender: Male
Re: Lets keep Sp1N_B1zZy
« Reply #8 on: August 21, 2015, 10:24:18 AM »
Try this, my friend.

Spin.

system "Two in a Row ver 2"
{
*************************************
*         System by december        *
*           on roulette30           *
*************************************
         Rx-ed by Sp1N-D1zZy
-------------------------------------
           00-c0mpatible
-------------------------------------
We wait for any number to repeat itself in 2 spins (...,7,11,13,13)
and then we keep betting on it. Every spin we add +1. Reset on new high.
If next one(s) qualify - they are welcome to join us, meaning we place
chips and add +1 also on them. How many of them? Let us choose.
-------------------------------------
}
method "main"
begin
while starting new session
    begin
    call "Init"
    exit
    end
add 1 record"Count"data
call "Reset"
if record"Count"data < 1
    begin end else begin
    call "Eval"
    call "Place Bets"
    end
end

method "Reset"
begin
if bankroll > record"Bank"data
    begin
    put 100% bankroll record"Bank"data
    put 1 record"Unit"data
    clear all records except ["Qual", "Unit", "Bank"] data
    clear all records except ["Dummy"] layout
    exit
    end
end

method"Place Bets"
begin
put 1 record"Bet unit"data index
put 1 record"Bet this"layout index
loop until record"Bet this"layout index > record"Bet this"layout count
    begin
    put 100% record"Bet unit"data record"Bet this"layout
    add 1 record"Bet this"layout index
    add 1 record"Bet unit"data index
    end
if record"Bet this"layout count > 0
    begin
    put 1 record"Bet unit"data index
    loop until record"Bet unit"data index > record"Bet unit"data count
        begin
        add 1 record"Bet unit"data
        add 1 record"Bet unit"data index
        end
    end
end

method "eval"
begin
track last number for 1 record"LastN"layout
track last number for 2 record"LastT"layout
put 1 record"LastT"layout index
copy record"LastT"layout record"Temp"layout
add 1 record"LastT"layout index
copy record"LastT"layout record"Temp2"layout
if record"Temp"layout list pattern match record"Temp2"layout
    begin
    set max record"Bet this"layout index
    if record"Bet this"layout index < record"Qual"data
        begin
        set max record"Bet unit"data index
        add 1 record"Bet unit"data index
        add 1 record"Bet unit"data
        add 1 record"Bet this"layout index
        copy record"LastN"layout record"Bet this"layout
        end
    end
end

method "Init"
begin
put 1 record"Unit"data
put 100% bankroll record"Bank"data
group
    begin
    input dropdown
    "What table layout do you wish to use?
    1:=Single Zero
    2:=Double Zero" record"Layout"data
    end
if record"Layout"data = 1
    begin
    load single wheel
    end else begin
    load double wheel
    end
group
    begin
    display "Two in a Row - By december"
    display "-----------------------------------------------------------------"
    display ""
    input data "Maximum number of qualifiers for betting?" record"Qual"data
    end
end
 

december

  • Veteran Member
  • ****
  • Posts: 375
  • Thanked: 39 times
  • Gender: Male
Re: Lets keep Sp1N_B1zZy
« Reply #9 on: August 21, 2015, 02:42:54 PM »
It is working, and it is pretty scary in some points...
 

december

  • Veteran Member
  • ****
  • Posts: 375
  • Thanked: 39 times
  • Gender: Male
Re: Lets keep Sp1N_B1zZy
« Reply #10 on: August 21, 2015, 02:44:40 PM »
As for you and your work, if I were a Queen, I would promote you in Rx Knight !
 

Sp1N-D1zZy

  • Moderator
  • New
  • *****
  • Posts: 75
  • Thanked: 1 times
  • Gender: Male
Re: Lets keep Sp1N_B1zZy
« Reply #11 on: August 21, 2015, 08:41:35 PM »
You're very kind, but I'm just doing what I love. When you do what you love, happiness is there in abundance.

Sending you my best wishes as always, my friend, december.

Sp1N-D1zZy
 

december

  • Veteran Member
  • ****
  • Posts: 375
  • Thanked: 39 times
  • Gender: Male
Re: Lets keep Sp1N_B1zZy
« Reply #12 on: August 22, 2015, 08:00:59 AM »
That is nice to hear Spin.
Then lets do some exercise not to get rusty !

http://rouletteforum.roulette30.com/index.php?topic=553.new#new
« Last Edit: August 22, 2015, 08:03:30 AM by december »