system "Apache version of 12 Numbers Covered"

method "main"
begin
while starting a new session
begin
input data "Enter stop loss amount" to record "stop loss" data
input data "Enter profit target per session" to record "profit target" data
put 100% of bankroll on record "high" data
add 100% of record "profit target" data to record "high" data
put 0 on record "bet0" data put 0 on record "bet1" data
put 0 on record "bet2" data put 0 on record "bet3" data
put 0 on record "bet4" data put 0 on record "bet5" data
put 0 on record "bet6" data put 0 on record "bet7" data
put 0 on record "bet8" data put 0 on record "bet9" data
put 0 on record "bet10" data put 0 on record "bet11" data
put 0 on record "bet12" data put 0 on record "bet13" data
put 0 on record "bet14" data put 0 on record "bet15" data
put 0 on record "bet16" data put 0 on record "bet17" data
put 0 on record "bet18" data put 0 on record "bet19" data
put 0 on record "bet20" data put 0 on record "bet21" data
put 0 on record "bet22" data put 0 on record "bet23" data
put 0 on record "bet24" data put 0 on record "bet25" data
put 0 on record "bet26" data put 0 on record "bet27" data
put 0 on record "bet28" data put 0 on record "bet29" data
put 0 on record "bet30" data put 0 on record "bet31" data
put 0 on record "bet32" data put 0 on record "bet33" data
put 0 on record "bet34" data put 0 on record "bet35" data
put 0 on record "bet36" data put 0 on record "number count" data
put 1 on record "bet amount" data
end

// Calculate the low bankroll from the stop loss entered
put 100% record "high" data to record "low bankroll" data
subtract 100% record "profit target" data from record "low bankroll" data
subtract 100% record "stop loss" data from record "low bankroll" data

set flag "reset" to false

// Reset if bankroll goes below low bankroll
if bankroll < record "low bankroll" data
begin
put 100% of bankroll on record "high" data
add 100% record "profit target" data to record "high" data
put 0 on record "bet0" data put 0 on record "bet1" data
put 0 on record "bet2" data put 0 on record "bet3" data
put 0 on record "bet4" data put 0 on record "bet5" data
put 0 on record "bet6" data put 0 on record "bet7" data
put 0 on record "bet8" data put 0 on record "bet9" data
put 0 on record "bet10" data put 0 on record "bet11" data
put 0 on record "bet12" data put 0 on record "bet13" data
put 0 on record "bet14" data put 0 on record "bet15" data
put 0 on record "bet16" data put 0 on record "bet17" data
put 0 on record "bet18" data put 0 on record "bet19" data
put 0 on record "bet20" data put 0 on record "bet21" data
put 0 on record "bet22" data put 0 on record "bet23" data
put 0 on record "bet24" data put 0 on record "bet25" data
put 0 on record "bet26" data put 0 on record "bet27" data
put 0 on record "bet28" data put 0 on record "bet29" data
put 0 on record "bet30" data put 0 on record "bet31" data
put 0 on record "bet32" data put 0 on record "bet33" data
put 0 on record "bet34" data put 0 on record "bet35" data
put 0 on record "bet36" data put 0 on record "number count" data
put 1 on record "bet amount" data
set flag "reset" to true
end

// reset on any new high balance
if bankroll > record "high" data
begin
put 100% of bankroll on record "high" data
add 100% record "profit target" data to record "high" data
put 0 on record "bet0" data put 0 on record "bet1" data
put 0 on record "bet2" data put 0 on record "bet3" data
put 0 on record "bet4" data put 0 on record "bet5" data
put 0 on record "bet6" data put 0 on record "bet7" data
put 0 on record "bet8" data put 0 on record "bet9" data
put 0 on record "bet10" data put 0 on record "bet11" data
put 0 on record "bet12" data put 0 on record "bet13" data
put 0 on record "bet14" data put 0 on record "bet15" data
put 0 on record "bet16" data put 0 on record "bet17" data
put 0 on record "bet18" data put 0 on record "bet19" data
put 0 on record "bet20" data put 0 on record "bet21" data
put 0 on record "bet22" data put 0 on record "bet23" data
put 0 on record "bet24" data put 0 on record "bet25" data
put 0 on record "bet26" data put 0 on record "bet27" data
put 0 on record "bet28" data put 0 on record "bet29" data
put 0 on record "bet30" data put 0 on record "bet31" data
put 0 on record "bet32" data put 0 on record "bet33" data
put 0 on record "bet34" data put 0 on record "bet35" data
put 0 on record "bet36" data put 0 on record "number count" data
put 1 on record "bet amount" data
set flag "reset" to true
end

// if a number won and its amount was greater than 2 then subtract 2
// from the betting amount. If the amount was one then keep it at that
// level. If it was two then subtract one.
if net > 0
and flag "reset" is false
and bankroll < record "high" data
begin
if record "bet amount" data > 2
begin
subtract 2 from record "bet amount" data
end
else
begin
if record "bet amount" data = 2
begin
put 1 to record "bet amount" data
end
end
end

// If numbers did not win and 12 numbers are being played then add
// 1 unit to each number played.
if net < 0
and flag "reset" is false
and record "number count" data >= 12
begin
add 1 to record "bet amount" data
end

// track spins
if number 0 hit each time and record "number count" data < 12
begin
if record "bet0" data = 0
begin
put 100% record "bet amount" data on record "bet0" data add 1 record "number count" data
end
end
if number 1 hit each time and record "number count" data < 12
begin
if record "bet1" data = 0
begin
put 100% record "bet amount" data on record "bet1" data add 1 record "number count" data
end
end
if number 2 hit each time and record "number count" data < 12
begin
if record "bet2" data = 0
begin
put 100% record "bet amount" data on record "bet2" data add 1 record "number count" data
end
end
if number 3 hit each time and record "number count" data < 12
begin
if record "bet3" data = 0
begin
put 100% record "bet amount" data on record "bet3" data add 1 record "number count" data
end
end
if number 4 hit each time and record "number count" data < 12
begin
if record "bet4" data = 0
begin put 100% record "bet amount" data on record "bet4" data add 1 record "number count" data
end
end
if number 5 hit each time and record "number count" data < 12
begin
if record "bet5" data = 0
begin
put 100% record "bet amount" data on record "bet5" data add 1 record "number count" data
end
end
if number 6 hit each time and record "number count" data < 12
begin
if record "bet6" data = 0
begin
put 100% record "bet amount" data on record "bet6" data add 1 record "number count" data
end
end
if number 7 hit each time and record "number count" data < 12
begin
if record "bet7" data = 0
begin
put 100% record "bet amount" data on record "bet7" data add 1 record "number count" data
end
end
if number 8 hit each time and record "number count" data < 12
begin
if record "bet8" data = 0
begin
put 100% record "bet amount" data on record "bet8" data add 1 record "number count" data
end
end
if number 9 hit each time and record "number count" data < 12
begin
if record "bet9" data = 0
begin
put 100% record "bet amount" data on record "bet9" data add 1 record "number count" data
end
end
if number 10 hit each time and record "number count" data < 12
begin
if record "bet10" data = 0
begin
put 100% record "bet amount" data on record "bet10" data add 1 record "number count" data
end
end
if number 11 hit each time and record "number count" data < 12
begin
if record "bet11" data = 0
begin
put 100% record "bet amount" data on record "bet11" data add 1 record "number count" data
end
end
if number 12 hit each time and record "number count" data < 12
begin
if record "bet12" data = 0
begin
put 100% record "bet amount" data on record "bet12" data add 1 record "number count" data
end
end
if number 13 hit each time and record "number count" data < 12
begin
if record "bet13" data = 0
begin
put 100% record "bet amount" data on record "bet13" data add 1 record "number count" data
end
end
if number 14 hit each time and record "number count" data < 12
begin
if record "bet14" data = 0
begin
put 100% record "bet amount" data on record "bet14" data add 1 record "number count" data
end
end
if number 15 hit each time and record "number count" data < 12
begin
if record "bet15" data = 0
begin
put 100% record "bet amount" data on record "bet15" data add 1 record "number count" data
end
end
if number 16 hit each time and record "number count" data < 12
begin
if record "bet16" data = 0
begin
put 100% record "bet amount" data on record "bet16" data add 1 record "number count" data
end
end
if number 17 hit each time and record "number count" data < 12
begin
if record "bet17" data = 0
begin
put 100% record "bet amount" data on record "bet17" data add 1 record "number count" data
end
end
if number 18 hit each time and record "number count" data < 12
begin
if record "bet18" data = 0
begin
put 100% record "bet amount" data on record "bet18" data add 1 record "number count" data
end
end
if number 19 hit each time and record "number count" data < 12
begin
if record "bet19" data = 0
begin
put 100% record "bet amount" data on record "bet19" data add 1 record "number count" data
end
end
if number 20 hit each time and record "number count" data < 12
begin
if record "bet20" data = 0
begin
put 100% record "bet amount" data on record "bet20" data add 1 record "number count" data
end
end
if number 21 hit each time and record "number count" data < 12
begin
if record "bet21" data = 0
begin
put 100% record "bet amount" data on record "bet21" data add 1 record "number count" data
end
end
if number 22 hit each time and record "number count" data < 12
begin
if record "bet22" data = 0
begin
put 100% record "bet amount" data on record "bet22" data add 1 record "number count" data
end
end
if number 23 hit each time and record "number count" data < 12
begin
if record "bet23" data = 0
begin
put 100% record "bet amount" data on record "bet23" data add 1 record "number count" data
end
end
if number 24 hit each time and record "number count" data < 12
begin
if record "bet24" data = 0
begin
put 100% record "bet amount" data on record "bet24" data add 1 record "number count" data
end
end
if number 25 hit each time and record "number count" data < 12
begin
if record "bet25" data = 0
begin
put 100% record "bet amount" data on record "bet25" data add 1 record "number count" data
end
end
if number 26 hit each time and record "number count" data < 12
begin
if record "bet26" data = 0
begin
put 100% record "bet amount" data on record "bet26" data add 1 record "number count" data
end
end
if number 27 hit each time and record "number count" data < 12
begin
if record "bet27" data = 0
begin
put 100% record "bet amount" data on record "bet27" data add 1 record "number count" data
end
end
if number 28 hit each time and record "number count" data < 12
begin
if record "bet28" data = 0
begin
put 100% record "bet amount" data on record "bet28" data add 1 record "number count" data
end
end
if number 29 hit each time and record "number count" data < 12
begin
if record "bet29" data = 0
begin
put 100% record "bet amount" data on record "bet29" data add 1 record "number count" data
end
end
if number 30 hit each time and record "number count" data < 12
begin
if record "bet30" data = 0
begin
put 100% record "bet amount" data on record "bet30" data add 1 record "number count" data
end
end
if number 31 hit each time and record "number count" data < 12
begin
if record "bet31" data = 0
begin
put 100% record "bet amount" data on record "bet31" data add 1 record "number count" data
end
end
if number 32 hit each time and record "number count" data < 12
begin
if record "bet32" data = 0
begin
put 100% record "bet amount" data on record "bet32" data add 1 record "number count" data
end
end
if number 33 hit each time and record "number count" data < 12
begin
if record "bet33" data = 0
begin
put 100% record "bet amount" data on record "bet33" data add 1 record "number count" data
end
end
if number 34 hit each time and record "number count" data < 12
begin
if record "bet34" data = 0
begin
put 100% record "bet amount" data on record "bet34" data add 1 record "number count" data
end
end
if number 35 hit each time and record "number count" data < 12
begin
if record "bet35" data = 0
begin
put 100% record "bet amount" data on record "bet35" data add 1 record "number count" data
end
end
if number 36 hit each time and record "number count" data < 12
begin
if record "bet36" data = 0
begin
put 100% record "bet amount" data on record "bet36" data add 1 record "number count" data
end
end

if record "bet0" data > 0 begin put 100% record "bet amount" data to record "bet0" data end
if record "bet1" data > 0 begin put 100% record "bet amount" data to record "bet1" data end
if record "bet2" data > 0 begin put 100% record "bet amount" data to record "bet2" data end
if record "bet3" data > 0 begin put 100% record "bet amount" data to record "bet3" data end
if record "bet4" data > 0 begin put 100% record "bet amount" data to record "bet4" data end
if record "bet5" data > 0 begin put 100% record "bet amount" data to record "bet5" data end
if record "bet6" data > 0 begin put 100% record "bet amount" data to record "bet6" data end
if record "bet7" data > 0 begin put 100% record "bet amount" data to record "bet7" data end
if record "bet8" data > 0 begin put 100% record "bet amount" data to record "bet8" data end
if record "bet9" data > 0 begin put 100% record "bet amount" data to record "bet9" data end
if record "bet10" data > 0 begin put 100% record "bet amount" data to record "bet10" data end
if record "bet11" data > 0 begin put 100% record "bet amount" data to record "bet11" data end
if record "bet12" data > 0 begin put 100% record "bet amount" data to record "bet12" data end
if record "bet13" data > 0 begin put 100% record "bet amount" data to record "bet13" data end
if record "bet14" data > 0 begin put 100% record "bet amount" data to record "bet14" data end
if record "bet15" data > 0 begin put 100% record "bet amount" data to record "bet15" data end
if record "bet16" data > 0 begin put 100% record "bet amount" data to record "bet16" data end
if record "bet17" data > 0 begin put 100% record "bet amount" data to record "bet17" data end
if record "bet18" data > 0 begin put 100% record "bet amount" data to record "bet18" data end
if record "bet19" data > 0 begin put 100% record "bet amount" data to record "bet19" data end
if record "bet20" data > 0 begin put 100% record "bet amount" data to record "bet20" data end
if record "bet21" data > 0 begin put 100% record "bet amount" data to record "bet21" data end
if record "bet22" data > 0 begin put 100% record "bet amount" data to record "bet22" data end
if record "bet23" data > 0 begin put 100% record "bet amount" data to record "bet23" data end
if record "bet24" data > 0 begin put 100% record "bet amount" data to record "bet24" data end
if record "bet25" data > 0 begin put 100% record "bet amount" data to record "bet25" data end
if record "bet26" data > 0 begin put 100% record "bet amount" data to record "bet26" data end
if record "bet27" data > 0 begin put 100% record "bet amount" data to record "bet27" data end
if record "bet28" data > 0 begin put 100% record "bet amount" data to record "bet28" data end
if record "bet29" data > 0 begin put 100% record "bet amount" data to record "bet29" data end
if record "bet30" data > 0 begin put 100% record "bet amount" data to record "bet30" data end
if record "bet31" data > 0 begin put 100% record "bet amount" data to record "bet31" data end
if record "bet32" data > 0 begin put 100% record "bet amount" data to record "bet32" data end
if record "bet33" data > 0 begin put 100% record "bet amount" data to record "bet33" data end
if record "bet34" data > 0 begin put 100% record "bet amount" data to record "bet34" data end
if record "bet35" data > 0 begin put 100% record "bet amount" data to record "bet35" data end
if record "bet36" data > 0 begin put 100% record "bet amount" data to record "bet36" data end

// place bets if the number of tracked numbers is 6 or more
if record "number count" data > 5
begin
if record "bet0" data > 0 begin put 100% of record "bet0" data on number 0 end
if record "bet1" data > 0 begin put 100% of record "bet1" data on number 1 end
if record "bet2" data > 0 begin put 100% of record "bet2" data on number 2 end
if record "bet3" data > 0 begin put 100% of record "bet3" data on number 3 end
if record "bet4" data > 0 begin put 100% of record "bet4" data on number 4 end
if record "bet5" data > 0 begin put 100% of record "bet5" data on number 5 end
if record "bet6" data > 0 begin put 100% of record "bet6" data on number 6 end
if record "bet7" data > 0 begin put 100% of record "bet7" data on number 7 end
if record "bet8" data > 0 begin put 100% of record "bet8" data on number 8 end
if record "bet9" data > 0 begin put 100% of record "bet9" data on number 9 end
if record "bet10" data > 0 begin put 100% of record "bet10" data on number 10 end
if record "bet11" data > 0 begin put 100% of record "bet11" data on number 11 end
if record "bet12" data > 0 begin put 100% of record "bet12" data on number 12 end
if record "bet13" data > 0 begin put 100% of record "bet13" data on number 13 end
if record "bet14" data > 0 begin put 100% of record "bet14" data on number 14 end
if record "bet15" data > 0 begin put 100% of record "bet15" data on number 15 end
if record "bet16" data > 0 begin put 100% of record "bet16" data on number 16 end
if record "bet17" data > 0 begin put 100% of record "bet17" data on number 17 end
if record "bet18" data > 0 begin put 100% of record "bet18" data on number 18 end
if record "bet19" data > 0 begin put 100% of record "bet19" data on number 19 end
if record "bet20" data > 0 begin put 100% of record "bet20" data on number 20 end
if record "bet21" data > 0 begin put 100% of record "bet21" data on number 21 end
if record "bet22" data > 0 begin put 100% of record "bet22" data on number 22 end
if record "bet23" data > 0 begin put 100% of record "bet23" data on number 23 end
if record "bet24" data > 0 begin put 100% of record "bet24" data on number 24 end
if record "bet25" data > 0 begin put 100% of record "bet25" data on number 25 end
if record "bet26" data > 0 begin put 100% of record "bet26" data on number 26 end
if record "bet27" data > 0 begin put 100% of record "bet27" data on number 27 end
if record "bet28" data > 0 begin put 100% of record "bet28" data on number 28 end
if record "bet29" data > 0 begin put 100% of record "bet29" data on number 29 end
if record "bet30" data > 0 begin put 100% of record "bet30" data on number 30 end
if record "bet31" data > 0 begin put 100% of record "bet31" data on number 31 end
if record "bet32" data > 0 begin put 100% of record "bet32" data on number 32 end
if record "bet33" data > 0 begin put 100% of record "bet33" data on number 33 end
if record "bet34" data > 0 begin put 100% of record "bet34" data on number 34 end
if record "bet35" data > 0 begin put 100% of record "bet35" data on number 35 end
if record "bet36" data > 0 begin put 100% of record "bet36" data on number 36 end
end
end
