Hi!
Can anyone tell me how i code something like 1 unit on 26 and 1 unit first doz.
If lose,
1 unit 26 2 units first doz.
Lose again?
1 unit 26 , 3 units first dozen.
If win any or 26 hits restart.
If lose 3 steps reset.
Thanks in advance!
Here Robbert 8)
[reveal]
system "Robbert26"
// Coded by nOeMy2o0o
method "main"
begin
while starting a new session
begin
call "Init"
end
call "win/loss"
call "place bets"
end
//***********************************************************************
method "win/loss"
begin
if record "dummy" data = 0
begin
put 1 to record "dummy" data
return
end
if net > 0
begin // "Won"
put 1 to record "Progression" data index
end
else // "Lost"
begin
if record "Progression" data index < record "Progression" data count
begin
add 1 to record "Progression" data index;
end
else
begin
put 1 to record "Progression" data index;
end
end
end
//***********************************************************************
method "place bets"
begin
put 100% of record "Progression" data on 1st dozen
put 1 on number 26
end
//***********************************************************************
method "Init"
begin
put 0 to record "dummy" data
put 1 to record "Progression" data index
set list of [1,2,3] to record "Progression" data
end
[/reveal]
Thanks!
Can you please code 1 more thing for me?
I do really appreciate it.
Alright,
So, 4 steps.
- 1 unit on 26, 1 unit black.
- 1 unit on 26, 3 units black
- 1 unit 26, 7 units black
-1 unit 26, 15 units black
If you win any of those steps you begin at step 1, so if black hits you break even, if 26 hits you are in profit.
If you lose those 4 steps, just curse at the table and begin again.
So, anyone want to code it?
:thumbsup: :thumbsup: :thumbsup: :thumbsup: :thumbsup: :thumbsup:
Here 8)
[reveal]
system "Robbert26"
// Coded by nOeMy2o0o
method "main"
begin
while starting a new session
begin
call "Init"
end
call "win/loss"
call "place bets"
end
//***********************************************************************
method "win/loss"
begin
if record "dummy" data = 0
begin
put 1 to record "dummy" data
return
end
if net > 0
begin // "Won"
put 1 to record "Progression" data index
end
else // "Lost"
begin
if record "Progression" data index < record "Progression" data count
begin
add 1 to record "Progression" data index;
end
else
begin
put 1 to record "Progression" data index;
end
end
end
//***********************************************************************
method "place bets"
begin
put 100% of record "Progression" data on black
put 1 on number 26
end
//***********************************************************************
method "Init"
begin
put 0 to record "dummy" data
put 1 to record "Progression" data index
set list of [1,3,7,15] to record "Progression" data
end
[/reveal]
Normy, you are the best. Many thanks.
When testing the code.
When 1 unit on black for the first step.
And you win on black, you dont stay on the 1 unit. But you go to the 3 units on black.
Is that possible to fix in the code?
Many thanks again!
Hello,
Line 21, replace if net > 0 by if net >= 0, it should work. 8)
system "easytiger dozens"
method "main"
begin
while starting a new session
begin
set list [1,1,1,1,2,3,5,8,13,20,70,45,70,105,155,240,60,540] to record "prog" data
put 1 to record "prog" data index
end
while on each spin
begin
call "place bets"
call "results"
end
end
method "place bets"
begin
if 1st dozen not hit more 6
begin
put 100% record "prog" data to 1st dozen
end
if 2nd dozen not hit more 6
begin
put 100% record "prog" data to 2nd dozen
end
if 3rd dozen not hit more 6
begin
put 100% record "prog" data to 3rd dozen
end
end
method "results"
begin
if any dozen bet won each or record "prog" data index > 6
begin
put 1 to record "prog" data index
end
if any dozen bet lost each
begin
add 1 to record "prog" data index
end
end
pls hlp me
i want bet after **virtual win