system "34 Eliminator with Bonus"
// written by Turbogenius on Dec 7, 2004


method "main"

begin

// set up values

while starting a new session begin
add 1 to record "unit" data ;
add 1 to record "bonus" data ;
Input Data "Enter your starting Bankroll."
to Record "Starting Bankroll" data;
put 100% of record "Starting Bankroll" data on bankroll ;
add 100% bankroll to record "highest" data ;
end

// bonus data is for split 0 only

// set up variable to check if a number has shown yet or not

while starting a new session begin
put 0 on record "1" data ; put 0 on record "2" data ;
put 0 on record "3" data ; put 0 on record "4" data ;
put 0 on record "5" data ; put 0 on record "6" data ;
put 0 on record "7" data ; put 0 on record "8" data ;
put 0 on record "9" data ; put 0 on record "10" data ;
put 0 on record "11" data ; put 0 on record "12" data ;
put 0 on record "13" data ; put 0 on record "14" data ;
put 0 on record "15" data ; put 0 on record "16" data ;
put 0 on record "17" data ; put 0 on record "18" data ;
put 0 on record "19" data ; put 0 on record "20" data ;
put 0 on record "21" data ; put 0 on record "22" data ;
put 0 on record "23" data ; put 0 on record "24" data ;
put 0 on record "25" data ; put 0 on record "26" data ;
put 0 on record "27" data ; put 0 on record "28" data ;
put 0 on record "29" data ; put 0 on record "30" data ;
put 0 on record "31" data ; put 0 on record "32" data ;
put 0 on record "33" data ; put 0 on record "34" data ;
// put 0 on record "35" data ;
// put 0 on record "36" data ;
end

// check to see if number 0 is the only one left, if so reset others
// and add a small progression

if record "1" data >0 and record "2" data >0
and record "3" data >0 and record "4" data >0 and record "5" data >0
and record "6" data >0 and record "7" data >0 and record "8" data >0
and record "9" data >0 and record "10" data >0 and record "11" data >0
and record "12" data >0 and record "13" data >0 and record "14" data >0
and record "15" data >0 and record "16" data >0 and record "17" data >0
and record "18" data >0 and record "19" data >0 and record "20" data >0
and record "21" data >0 and record "22" data >0 and record "23" data >0
and record "24" data >0 and record "25" data >0 and record "26" data >0
and record "27" data >0 and record "28" data >0 and record "29" data >0
and record "30" data >0 and record "31" data >0 and record "32" data >0
and record "33" data >0 and record "34" data >0
// and record "35" data >0
// and record "36" data >0
begin
put 0 on record "1" data ;
put 0 on record "2" data ;
put 0 on record "3" data ;
put 0 on record "4" data ;
put 0 on record "5" data ;
put 0 on record "6" data ;
put 0 on record "7" data ;
put 0 on record "8" data ;
put 0 on record "9" data ;
put 0 on record "10" data ;
put 0 on record "11" data ;
put 0 on record "12" data ;
put 0 on record "13" data ;
put 0 on record "14" data ;
put 0 on record "15" data ;
put 0 on record "16" data ;
put 0 on record "17" data ;
put 0 on record "18" data ;
put 0 on record "19" data ;
put 0 on record "20" data ;
put 0 on record "21" data ;
put 0 on record "22" data ;
put 0 on record "23" data ;
put 0 on record "24" data ;
put 0 on record "25" data ;
put 0 on record "26" data ;
put 0 on record "27" data ;
put 0 on record "28" data ;
put 0 on record "29" data ;
put 0 on record "30" data ;
put 0 on record "31" data ;
put 0 on record "32" data ;
put 0 on record "33" data ;
put 0 on record "34" data ;
// put 0 on record "35" data ;
// put 0 on record "36" data ;
add 2 to record "unit" data ;
end

// if bonus number 0 hits, reset

if number 0 hit each time begin
put 0 on record "1" data ;
put 0 on record "2" data ;
put 0 on record "3" data ;
put 0 on record "4" data ;
put 0 on record "5" data ;
put 0 on record "6" data ;
put 0 on record "7" data ;
put 0 on record "8" data ;
put 0 on record "9" data ;
put 0 on record "10" data ;
put 0 on record "11" data ;
put 0 on record "12" data ;
put 0 on record "13" data ;
put 0 on record "14" data ;
put 0 on record "15" data ;
put 0 on record "16" data ;
put 0 on record "17" data ;
put 0 on record "18" data ;
put 0 on record "19" data ;
put 0 on record "20" data ;
put 0 on record "21" data ;
put 0 on record "22" data ;
put 0 on record "23" data ;
put 0 on record "24" data ;
put 0 on record "25" data ;
put 0 on record "26" data ;
put 0 on record "27" data ;
put 0 on record "28" data ;
put 0 on record "29" data ;
put 0 on record "30" data ;
put 0 on record "31" data ;
put 0 on record "32" data ;
put 0 on record "33" data ;
put 0 on record "34" data ;
// put 0 on record "35" data ;
// put 0 on record "36" data ;
put 1 on record "bonus" data ;
put 1 on record "unit" data ;
put 100% of bankroll on record "lastwin" data ;
end

if bankroll > record "highest" data begin
put 100% of bankroll on record "highest" data ;
put 0 on record "1" data ;
put 0 on record "2" data ;
put 0 on record "3" data ;
put 0 on record "4" data ;
put 0 on record "5" data ;
put 0 on record "6" data ;
put 0 on record "7" data ;
put 0 on record "8" data ;
put 0 on record "9" data ;
put 0 on record "10" data ;
put 0 on record "11" data ;
put 0 on record "12" data ;
put 0 on record "13" data ;
put 0 on record "14" data ;
put 0 on record "15" data ;
put 0 on record "16" data ;
put 0 on record "17" data ;
put 0 on record "18" data ;
put 0 on record "19" data ;
put 0 on record "20" data ;
put 0 on record "21" data ;
put 0 on record "22" data ;
put 0 on record "23" data ;
put 0 on record "24" data ;
put 0 on record "25" data ;
put 0 on record "26" data ;
put 0 on record "27" data ;
put 0 on record "28" data ;
put 0 on record "29" data ;
put 0 on record "30" data ;
put 0 on record "31" data ;
put 0 on record "32" data ;
put 0 on record "33" data ;
put 0 on record "34" data ;
// put 0 on record "35" data ;
// put 0 on record "36" data ;
subtract 100% of record "bonus" data from record "bonus" data ;
add 1 to record "bonus" data ;
subtract 100% of record "unit" data from record "unit" data ;
add 1 to record "unit" data ;
end

// place bets if number hasn't shown yet

if record "1" data <1 begin put 100% record "unit" data on number 1 ; end
if record "2" data <1 begin put 100% record "unit" data on number 2 ; end
if record "3" data <1 begin put 100% record "unit" data on number 3 ; end
if record "4" data <1 begin put 100% record "unit" data on number 4 ; end
if record "5" data <1 begin put 100% record "unit" data on number 5 ; end
if record "6" data <1 begin
put 100% record "unit" data on number 6 ;
end
if record "7" data <1 begin
put 100% record "unit" data on number 7 ;
end
if record "8" data <1 begin
put 100% record "unit" data on number 8 ;
end
if record "9" data <1 begin
put 100% record "unit" data on number 9 ;
end
if record "10" data <1 begin
put 100% record "unit" data on number 10 ;
end
if record "11" data <1 begin
put 100% record "unit" data on number 11 ;
end
if record "12" data <1 begin
put 100% record "unit" data on number 12 ;
end
if record "13" data <1 begin
put 100% record "unit" data on number 13 ;
end
if record "14" data <1 begin
put 100% record "unit" data on number 14 ;
end
if record "15" data <1 begin
put 100% record "unit" data on number 15 ;
end
if record "16" data <1 begin
put 100% record "unit" data on number 16 ;
end
if record "17" data <1 begin
put 100% record "unit" data on number 17 ;
end
if record "18" data <1 begin
put 100% record "unit" data on number 18 ;
end
if record "19" data <1 begin
put 100% record "unit" data on number 19 ;
end
if record "20" data <1 begin
put 100% record "unit" data on number 20 ;
end
if record "21" data <1 begin
put 100% record "unit" data on number 21 ;
end
if record "22" data <1 begin
put 100% record "unit" data on number 22 ;
end
if record "23" data <1 begin
put 100% record "unit" data on number 23 ;
end
if record "24" data <1 begin
put 100% record "unit" data on number 24 ;
end
if record "25" data <1 begin
put 100% record "unit" data on number 25 ;
end
if record "26" data <1 begin
put 100% record "unit" data on number 26 ;
end
if record "27" data <1 begin
put 100% record "unit" data on number 27 ;
end
if record "28" data <1 begin
put 100% record "unit" data on number 28 ;
end
if record "29" data <1 begin
put 100% record "unit" data on number 29 ;
end
if record "30" data <1 begin
put 100% record "unit" data on number 30 ;
end
if record "31" data <1 begin
put 100% record "unit" data on number 31 ;
end
if record "32" data <1 begin
put 100% record "unit" data on number 32 ;
end
if record "33" data <1 begin
put 100% record "unit" data on number 33 ;
end
if record "34" data <1 begin
put 100% record "unit" data on number 34 ;
end
// if record "35" data <1 begin
// put 100% record "unit" data on number 35 ;
// end
// if record "36" data <1 begin
// put 100% record "unit" data on number 36 ;
// end

// place bet on the bonus #0

if record "0" data <1 begin
put 100% of record "bonus" data on number 0 ;
end

// remove numbers as they show

if number 1 hit each time and record "1" data =0 begin
add 1 to record "1" data ; add 1 to record "bonus" data ; end
if number 2 hit each time and record "2" data =0 begin
add 1 to record "2" data ; add 1 to record "bonus" data ; end
if number 3 hit each time and record "3" data =0 begin
add 1 to record "3" data ; add 1 to record "bonus" data ; end
if number 4 hit each time and record "4" data =0 begin
add 1 to record "4" data ; add 1 to record "bonus" data ; end
if number 5 hit each time and record "5" data =0 begin
add 1 to record "5" data ; add 1 to record "bonus" data ; end
if number 6 hit each time and record "6" data =0 begin
add 1 to record "6" data ; add 1 to record "bonus" data ; end
if number 7 hit each time and record "7" data =0 begin
add 1 to record "7" data ; add 1 to record "bonus" data ; end
if number 8 hit each time and record "8" data =0 begin
add 1 to record "8" data ; add 1 to record "bonus" data ; end
if number 9 hit each time and record "9" data =0 begin
add 1 to record "9" data ; add 1 to record "bonus" data ; end
if number 10 hit each time and record "10" data =0 begin
add 1 to record "10" data ; add 1 to record "bonus" data ; end
if number 11 hit each time and record "11" data =0 begin
add 1 to record "11" data ; add 1 to record "bonus" data ; end
if number 12 hit each time and record "12" data =0 begin
add 1 to record "12" data ; add 1 to record "bonus" data ; end
if number 13 hit each time and record "13" data =0 begin
add 1 to record "13" data ; add 1 to record "bonus" data ; end
if number 14 hit each time and record "14" data =0 begin
add 1 to record "14" data ; add 1 to record "bonus" data ; end
if number 15 hit each time and record "15" data =0 begin
add 1 to record "15" data ; add 1 to record "bonus" data ; end
if number 16 hit each time and record "16" data =0 begin
add 1 to record "16" data ; add 1 to record "bonus" data ; end
if number 17 hit each time and record "17" data =0 begin
add 1 to record "17" data ; add 1 to record "bonus" data ; end
if number 18 hit each time and record "18" data =0 begin
add 1 to record "18" data ; add 1 to record "bonus" data ; end
if number 19 hit each time and record "19" data =0 begin
add 1 to record "19" data ; add 1 to record "bonus" data ; end
if number 20 hit each time and record "20" data =0 begin
add 1 to record "20" data ; add 1 to record "bonus" data ; end
if number 21 hit each time and record "21" data =0 begin
add 1 to record "21" data ; add 1 to record "bonus" data ; end
if number 22 hit each time and record "22" data =0 begin
add 1 to record "22" data ; add 1 to record "bonus" data ; end
if number 23 hit each time and record "23" data =0 begin
add 1 to record "23" data ; add 1 to record "bonus" data ; end
if number 24 hit each time and record "24" data =0 begin
add 1 to record "24" data ; add 1 to record "bonus" data ; end
if number 25 hit each time and record "25" data =0 begin
add 1 to record "25" data ; add 1 to record "bonus" data ; end
if number 26 hit each time and record "26" data =0 begin
add 1 to record "26" data ; add 1 to record "bonus" data ; end
if number 27 hit each time and record "27" data =0 begin
add 1 to record "27" data ; add 1 to record "bonus" data ; end
if number 28 hit each time and record "28" data =0 begin
add 1 to record "28" data ; add 1 to record "bonus" data ; end
if number 29 hit each time and record "29" data =0 begin
add 1 to record "29" data ; add 1 to record "bonus" data ; end
if number 30 hit each time and record "30" data =0 begin
add 1 to record "30" data ; add 1 to record "bonus" data ; end
if number 31 hit each time and record "31" data =0 begin
add 1 to record "31" data ; add 1 to record "bonus" data ; end
if number 32 hit each time and record "32" data =0 begin
add 1 to record "32" data ; add 1 to record "bonus" data ; end
if number 33 hit each time and record "33" data =0 begin
add 1 to record "33" data ; add 1 to record "bonus" data ; end
if number 34 hit each time and record "34" data =0 begin
add 1 to record "34" data ; add 1 to record "bonus" data ; end
if number 35 hit each time and record "35" data =0 begin
add 1 to record "35" data ; add 1 to record "bonus" data ; end
// if number 36 hit each time and record "36" data =0 begin
// add 1 to record "36" data ; add 1 to record "bonus" data ; end

// done

end