Hello everyone
I am French I write to you with an online translator a thousand excuses if there are spelling mistakes.
I can not change this code I would like from 5 consecutive losses (gap 5) started to placed 9 numbers with a progression 111223457 because this method seems to work well.
it would be nice if you can help me.
thank you in advance.
system "Hot groups with Atila progression Modifier"
//
// Hot Group Sistem with slow progression.
//
method "main"
begin
while starting a new session
begin
call "Input";
call "initialize";
exit
end
call "Check Wins";
call "Track Spins";
call "Bet";
end
//
// Main Program Methods
//
method "Check Wins"
begin
if flag "Atila Group" is true then
begin
call "Check Atila Group Wins";
end
end
method "Track Spins"
begin
if flag "Atila Group" is true then
begin
call "Track Atila Group";
end
end
method "Bet"
begin
call "Clear All Bets";
if flag "Atila Group" is true then
begin
call "Bet Atila Group";
end
end
method "Clear all Bets"
begin
put 0 units on record "Group 1" layout list;
put 0 units on record "Group 2" layout list;
put 0 units on record "Group 3" layout list;
put 0 units on record "Group 4" layout list;
end
//
// Main Input Area
//
method "Input"
begin
put 250 to record "Starting Bankroll" data;
put 200 to record "Win Goal" data;
put 0 to record "Loss Goal" data;
group
begin
input data "Starting Bankroll" to record "Starting Bankroll" data;
input data "Win Goal" to record "Win Goal" data;
input data "Loss Goal" to record "Loss Goal" data;
input data "Spins to Track" to record "Track List Number" data;
// input checkbox "Atila Group" to flag "Atila Group";
end
set flag "Atila Group" to true;
end
//
// Main Initialization Area
//
method "Initialize"
begin
put 100% of record "Starting Bankroll" data to bankroll;
put 100% of record "Starting Bankroll" data to record "Bankroll Win Goal" data;
add 100% of record "Win Goal" data to record "Bankroll Win Goal" data;
put 100% of record "Starting Bankroll" data to record "Bankroll Loss Goal" data;
subtract 100% of record "Loss Goal" data to record "Bankroll Loss Goal" data;
if flag "Atila Group" is true then
begin
call "Init Atila Group";
end
end
method "Update Bankroll"
begin
put 100% of bankroll to record "New Win Goal" data;
add 100% of record "Win Goal" data to record "New Win Goal" data;
put 100% of bankroll to record "New Loss Goal" data;
subtract 100% of record "Loss Goal" data to record "New Loss Goal" data;
end
//--------------------------------- End Main -------------------------------//
//
// Sistema Atila Group
//
method "Check Atila Group Wins"
begin
if flag "Bet Atila Group" is true then
begin
if flag "Bet Group 1" is true then
begin
if record "Group 1" layout list has lost each time then
begin
call "Update Progression";
end
else
begin
call "Update Wins";
end
end
if flag "Bet Group 2" is true then
begin
if record "Group 2" layout list has lost each time then
begin
call "Update Progression";
end
else
begin
call "Update Wins";
end
end
if flag "Bet Group 3" is true then
begin
if record "Group 3" layout list has lost each time then
begin
call "Update Progression";
end
else
begin
call "Update Wins";
end
end
if flag "Bet Group 4" is true then
begin
if record "Group 4" layout list has lost each time then
begin
call "Update Progression";
end
else
begin
call "Update Wins";
end
end
end
end
method "Update Progression"
begin
add 1 to record "Atila Group Progression" data;
add 1 to record "Atila Group Progression" data index;
if record "Atila Group Progression" data index > 9 then
begin
put 1 to record "Atila Group Progression" data index;
end
end
method "Update Wins"
begin
if any inside bet has won each time then
begin
put 100% of record "Atila Group Progression" data index to record "Progression Pointer" data;
put 9 to record "Atila Group Progression" data index;
if record "Atila Group Progression" data > 1 then
begin
put 1 to record "Atila Group Progression" data index;
loop until record "Atila Group Progression" data index > 9
begin
subtract 1 from record "Atila Group Progression" data;
add 1 to record "Atila Group Progression" data index;
end
end
put 100% of record "Progression Pointer" data to record "Atila Group Progression" data index;
call "Reset Atila Group";
call "Reset Bet Group Flags";
if bankroll >= record "Bankroll" data then
begin
call "Reset Progression";
call "Reset Atila Group";
call "Reset Bet Group Flags";
if bankroll >= record "New Win Goal" data then
begin
put 100% of bankroll to record "Bankroll" data;
call "Update Bankroll";
add 1 to record "Sessions Won" data;
// display "Your Win Goal Has Reached, Session Will Stop."
// stop session;
end
else
begin
put 100% of bankroll to record "Bankroll" data;
end
end
end
end
method "Track Atila Group"
begin
track last number for record "Track List Number" data spins
to record "Track List" layout;
if record "Track List" layout index >=
record "Track List Number" data then
begin
if flag "Bet Atila Group" is false then
begin
Duplicate record "Track List" to record "Temp Track List";
call "Reset Atila Group";
call "Check Pivot Group";
end
end
end
method "Check Pivot Group"
begin
put 1 to record "Temp Track List" layout index;
loop until record "Temp Track List" layout index > record "Track List Number" data then
begin
if record "Temp Track List" layout is found on
record "Group 1" layout then
begin
add 1 to record "Track Group 1" data;
end
if record "Temp Track List" layout is found on
record "Group 2" layout then
begin
add 1 to record "Track Group 2" data;
end
if record "Temp Track List" layout is found on
record "Group 3" layout then
begin
add 1 to record "Track Group 3" data;
end
if record "Temp Track List" layout is found on
record "Group 4" layout then
begin
add 1 to record "Track Group 4" data;
end
add 1 to record "Temp Track List" layout index;
end
call "Reset Bet Group Flags";
call "Check Group 1 & 2";
call "Check Group 3 & 4";
if flag "Bet Group 1" is true and flag "Bet Group 4" is true then
begin
call "Check Group 1 & 4";
end
if flag "Bet Group 1" is true and flag "Bet Group 3" is true then
begin
call "Check Group 1 & 3";
end
if flag "Bet Group 2" is true and flag "Bet Group 3" is true then
begin
call "Check Group 2 & 3";
end
if flag "Bet Group 2" is true and flag "Bet Group 4" is true then
begin
call "Check Group 2 & 4";
end
end
method "Check Group 1 & 2"
begin
if record "Track Group 1" data > record "Track Group 2" data then
begin
set flag "Bet Group 1" to true;
end
else
begin
set flag "Bet Group 2" to true;
end
end
method "Check Group 3 & 4"
begin
if record "Track Group 3" data > record "Track Group 4" data then
begin
set flag "Bet Group 3" to true;
end
else
begin
set flag "Bet Group 4" to true;
end
end
method "Check Group 1 & 4"
begin
if record "Track Group 1" data > record "Track Group 4" data then
begin
call "Reset Bet Group Flags";
if record "Track Group 1" data is >= record "Min" data and
record "Track Group 1" data is <= record "Max" data then
begin
set flag "Bet Group 1" to true;
set flag "Bet Atila Group" to true;
end
end
else
begin
call "Reset Bet Group Flags";
if record "Track Group 4" data is >= record "Min" data and
record "Track Group 4" data is <= record "Max" data then
begin
set flag "Bet Group 4" to true;
set flag "Bet Atila Group" to true;
end
end
end
method "Check Group 1 & 3"
begin
if record "Track Group 1" data > record "Track Group 3" data then
begin
call "Reset Bet Group Flags";
if record "Track Group 1" data is >= record "Min" data and
record "Track Group 1" data is <= record "Max" data then
begin
set flag "Bet Group 1" to true;
set flag "Bet Atila Group" to true;
end
end
else
begin
call "Reset Bet Group Flags";
if record "Track Group 3" data is >= record "Min" data and
record "Track Group 3" data is <= record "Max" data then
begin
set flag "Bet Group 3" to true;
set flag "Bet Atila Group" to true;
end
end
end
method "Check Group 2 & 3"
begin
if record "Track Group 2" data > record "Track Group 3" data then
begin
call "Reset Bet Group Flags";
if record "Track Group 2" data is >= record "Min" data and
record "Track Group 2" data is <= record "Max" data then
begin
set flag "Bet Group 2" to true;
set flag "Bet Atila Group" to true;
end
end
else
begin
call "Reset Bet Group Flags";
if record "Track Group 3" data is >= record "Min" data and
record "Track Group 3" data is <= record "Max" data then
begin
set flag "Bet Group 3" to true;
set flag "Bet Atila Group" to true;
end
end
end
method "Check Group 2 & 4"
begin
if record "Track Group 2" data > record "Track Group 4" data then
begin
call "Reset Bet Group Flags";
if record "Track Group 2" data is >= record "Min" data and
record "Track Group 2" data is <= record "Max" data then
begin
set flag "Bet Group 2" to true;
set flag "Bet Atila Group" to true;
end
end
else
begin
call "Reset Bet Group Flags";
if record "Track Group 4" data is >= record "Min" data and
record "Track Group 4" data is <= record "Max" data then
begin
set flag "Bet Group 4" to true;
set flag "Bet Atila Group" to true;
end
end
end
method "Bet Atila Group"
begin
if flag "Bet Atila Group" is true then
begin
if flag "Bet Group 1" is true then
begin
put 100% of record "Atila Group Progression" data index record "Progression Pointer" data;
put 1 to record "Atila Group Progression" data index;
put 1 to record "Group 1" layout index;
loop until record "Atila Group Progression" data index > 9 then
begin
put 100% of record "Atila Group Progression" data to record "Group 1" layout;
add 1 to record "Atila Group Progression" data index;
add 1 to record "Group 1" layout index;
end
put 100% of record "Progression Pointer" data to record "Atila Group Progression" data index;
end
if flag "Bet Group 2" is true then
begin
put 100% of record "Atila Group Progression" data index record "Progression Pointer" data;
put 1 to record "Atila Group Progression" data index;
put 1 to record "Group 2" layout index;
loop until record "Atila Group Progression" data index > 9 then
begin
put 100% of record "Atila Group Progression" data to record "Group 2" layout;
add 1 to record "Atila Group Progression" data index;
add 1 to record "Group 2" layout index;
end
put 100% of record "Progression Pointer" data to record "Atila Group Progression" data index;
end
if flag "Bet Group 3" is true then
begin
put 100% of record "Atila Group Progression" data index record "Progression Pointer" data;
put 1 to record "Atila Group Progression" data index;
put 1 to record "Group 3" layout index;
loop until record "Atila Group Progression" data index > 9 then
begin
put 100% of record "Atila Group Progression" data to record "Group 3" layout;
add 1 to record "Atila Group Progression" data index;
add 1 to record "Group 3" layout index;
end
put 100% of record "Progression Pointer" data to record "Atila Group Progression" data index;
end
if flag "Bet Group 4" is true then
begin
put 100% of record "Atila Group Progression" data index record "Progression Pointer" data;
put 1 to record "Atila Group Progression" data index;
put 1 to record "Group 4" layout index;
loop until record "Atila Group Progression" data index > 9 then
begin
put 100% of record "Atila Group Progression" data to record "Group 4" layout;
add 1 to record "Atila Group Progression" data index;
add 1 to record "Group 4" layout index;
end
put 100% of record "Progression Pointer" data to record "Atila Group Progression" data index;
end
end
end
method "Init Atila Group"
begin
copy list [number 1, number 2, number 3, number 4, number 5, number 6,
number 7, number 8, number 9] to record "Group 1" layout;
copy list [number 10, number 11, number 12, number 13, number 14, number 15,
number 16, number 17, number 18] to record "Group 2" layout;
copy list [number 19, number 20, number 21, number 22, number 23, number 24,
number 25, number 26, number 27] to record "Group 3" layout;
copy list [number 28, number 29, number 30, number 31, number 32, number 33,
number 34, number 35, number 36] to record "Group 4" layout;
put 8 to record "Min" data;
put 9 to record "Max" data;
call "Reset Progression";
call "Reset Atila Group";
call "Reset Bet Group Flags";
end
method "Reset Atila Group"
begin
clear record "Progression Pointer" data;
clear record "Track Group 1" data;
clear record "Track Group 2" data;
clear record "Track Group 3" data;
clear record "Track Group 4" data;
set flag "Bet Atila Group" to false;
end
method "Reset Progression"
begin
set list [1,1,1,1,1,1,1,1,1] to record "Atila Group Progression" data;
put 1 to record "Atila Group Progression" data index;
end
method "Reset Bet Group Flags"
begin
set flag "Bet Group 1" to false;
set flag "Bet Group 2" to false;
set flag "Bet Group 3" to false;
set flag "Bet Group 4" to false;
end
//------------------------ End Hot group system -------------------------//
//
// Template
//
{
method "Check xxx Wins"
begin
end
method "Track xxx"
begin
end
method "Bet xxx"
begin
end
method "Init xxx"
begin
end
}
//------------------------------ End Template ------------------------------//