Last Line system

Contenuto del file

system "cazbah's last line system"

// written by TurboGenius
// June 5th, 2005

// when all lines have been accounted for but one,
// bet that line with the following progression
// 1,1,1,1,1,2,2,2,3,3,4,5,6,7,8,10,12,14,17,21,25,30,
// 36,43,52,62,75,90


method "main"
begin
while starting a new session begin
put 0 on record "line1-6" data
put 0 on record "line7-12" data
put 0 on record "line13-18" data
put 0 on record "line19-24" data
put 0 on record "line25-30" data
put 0 on record "line31-36" data
put 0 on record "spin" data
put 0 on record "qualified" data end
// track locations that show
if line(1-6) hit each time begin
put 1 on record "line1-6" data end
if line(7-12) hit each time begin
put 1 on record "line7-12" data end
if line(13-18) hit each time begin
put 1 on record "line13-18" data end
if line(19-24) hit each time begin
put 1 on record "line19-24" data end
if line(25-30) hit each time begin
put 1 on record "line25-30" data end
if line(31-36) hit each time begin
put 1 on record "line31-36" data end
// check count of remaining lines
put 0 on record "count" data
add 100% of record "line1-6" data to record "count" data
add 100% of record "line7-12" data to record "count" data
add 100% of record "line13-18" data to record "count" data
add 100% of record "line19-24" data to record "count" data
add 100% of record "line25-30" data to record "count" data
add 100% of record "line31-36" data to record "count" data
// reset when no locations are left to play
if record "count" data = 6 begin
put 0 on record "line1-6" data
put 0 on record "line7-12" data
put 0 on record "line13-18" data
put 0 on record "line19-24" data
put 0 on record "line25-30" data
put 0 on record "line31-36" data
put 0 on record "spin" data
put 0 on record "qualified" data end
// check for qualification
if record "count" data = 5 begin
put 1 on record "qualified" data end
// place bets using progression
if record "qualified" data = 1 begin
add 1 to record "spin" data
if record "spin" data = 1 begin put 1 on record "bet" data ; end
if record "spin" data = 2 begin put 1 on record "bet" data ; end
if record "spin" data = 3 begin put 1 on record "bet" data ; end
if record "spin" data = 4 begin put 1 on record "bet" data ; end
if record "spin" data = 5 begin put 1 on record "bet" data ; end
if record "spin" data = 6 begin put 2 on record "bet" data ; end
if record "spin" data = 7 begin put 2 on record "bet" data ; end
if record "spin" data = 8 begin put 2 on record "bet" data ; end
if record "spin" data = 9 begin put 3 on record "bet" data ; end
if record "spin" data = 10 begin put 3 on record "bet" data ; end
if record "spin" data = 11 begin put 4 on record "bet" data ; end
if record "spin" data = 12 begin put 5 on record "bet" data ; end
if record "spin" data = 13 begin put 6 on record "bet" data ; end
if record "spin" data = 14 begin put 7 on record "bet" data ; end
if record "spin" data = 15 begin put 8 on record "bet" data ; end
if record "spin" data = 16 begin put 10 on record "bet" data ; end
if record "spin" data = 17 begin put 12 on record "bet" data ; end
if record "spin" data = 18 begin put 14 on record "bet" data ; end
if record "spin" data = 19 begin put 17 on record "bet" data ; end
if record "spin" data = 20 begin put 21 on record "bet" data ; end
if record "spin" data = 21 begin put 25 on record "bet" data ; end
if record "spin" data = 22 begin put 30 on record "bet" data ; end
if record "spin" data = 23 begin put 36 on record "bet" data ; end
if record "spin" data = 24 begin put 43 on record "bet" data ; end
if record "spin" data = 25 begin put 52 on record "bet" data ; end
if record "spin" data = 26 begin put 62 on record "bet" data ; end
if record "spin" data = 27 begin put 75 on record "bet" data ; end
if record "spin" data = 28 begin put 90 on record "bet" data ; end
if record "line1-6" data = 0 begin
put 100% of record "bet" data on line(1-6) end
if record "line7-12" data = 0 begin
put 100% of record "bet" data on line(7-12) end
if record "line13-18" data = 0 begin
put 100% of record "bet" data on line(13-18) end
if record "line19-24" data = 0 begin
put 100% of record "bet" data on line(19-24) end
if record "line25-30" data = 0 begin
put 100% of record "bet" data on line(25-30) end
if record "line31-36" data = 0 begin
put 100% of record "bet" data on line(31-36) end
// reset when progression busts out ?
if record "spin" data = 29 begin
put 0 on record "line1-6" data
put 0 on record "line7-12" data
put 0 on record "line13-18" data
put 0 on record "line19-24" data
put 0 on record "line25-30" data
put 0 on record "line31-36" data
put 0 on record "spin" data
put 0 on record "qualified" data end
end
end