MiM for streets

Contenuto del file

system "MiM for streets"

////////////////////////////\
// coded by Turbogenius \
// turbogenius@verizon.net /
// September 25th 2005 /
// updated Dec 31st 2005 /
///////////////////////////

{system description :
we are playing streets once they show.
adding 1 unit per spin to each street being
played until a new high is reached.
winners are removed}

method "main"

begin
// set initial values
while starting a new session begin
put 0 on record "s1-3" data put 0 on record "s19-21" data
put 0 on record "s4-6" data put 0 on record "s22-24" data
put 0 on record "s7-9" data put 0 on record "s25-27" data
put 0 on record "s10-12" data put 0 on record "s28-30" data
put 0 on record "s13-15" data put 0 on record "s31-33" data
put 0 on record "s16-18" data put 0 on record "s34-36" data
put 100% of bankroll on record "highest" data end

// reset on any new high balance
if bankroll > record "highest" data begin
put 0 on record "s1-3" data put 0 on record "s19-21" data
put 0 on record "s4-6" data put 0 on record "s22-24" data
put 0 on record "s7-9" data put 0 on record "s25-27" data
put 0 on record "s10-12" data put 0 on record "s28-30" data
put 0 on record "s13-15" data put 0 on record "s31-33" data
put 0 on record "s16-18" data put 0 on record "s34-36" data
put 100% of bankroll on record "highest" data end

// remove winners as they show
if street(1-3) hit each time begin
if record "s1-3" data > 0 begin
put -1 on record "s1-3" data end end
if street(4-6) hit each time begin
if record "s4-6" data > 0 begin
put -1 on record "s4-6" data end end
if street(7-9) hit each time begin
if record "s7-9" data > 0 begin
put -1 on record "s7-9" data end end
if street(10-12) hit each time begin
if record "s10-12" data > 0 begin
put -1 on record "s10-12" data end end
if street(13-15) hit each time begin
if record "s13-15" data > 0 begin
put -1 on record "s13-15" data end end
if street(16-18) hit each time begin
if record "s16-18" data > 0 begin
put -1 on record "s16-18" data end end
if street(19-21) hit each time begin
if record "s19-21" data > 0 begin
put -1 on record "s19-21" data end end
if street(22-24) hit each time begin
if record "s22-24" data > 0 begin
put -1 on record "s22-24" data end end
if street(25-27) hit each time begin
if record "s25-27" data > 0 begin
put -1 on record "s25-27" data end end
if street(28-30) hit each time begin
if record "s28-30" data > 0 begin
put -1 on record "s28-30" data end end
if street(31-33) hit each time begin
if record "s31-33" data > 0 begin
put -1 on record "s31-33" data end end
if street(34-36) hit each time begin
if record "s34-36" data > 0 begin
put -1 on record "s34-36" data end end
// track streets as they show
if street(1-3) hit each time begin add 1 to record "s1-3" data end
if street(4-6) hit each time begin add 1 to record "s4-6" data end
if street(7-9) hit each time begin add 1 to record "s7-9" data end
if street(10-12) hit each time begin add 1 to record "s10-12" data end
if street(13-15) hit each time begin add 1 to record "s13-15" data end
if street(16-18) hit each time begin add 1 to record "s16-18" data end
if street(19-21) hit each time begin add 1 to record "s19-21" data end
if street(22-24) hit each time begin add 1 to record "s22-24" data end
if street(25-27) hit each time begin add 1 to record "s25-27" data end
if street(28-30) hit each time begin add 1 to record "s28-30" data end
if street(31-33) hit each time begin add 1 to record "s31-33" data end
if street(34-36) hit each time begin add 1 to record "s34-36" data end
// place bets
if record "s1-3" data > 0 begin
put 100% of record "s1-3" data on street(1-3) end
if record "s4-6" data > 0 begin
put 100% of record "s4-6" data on street(4-6) end
if record "s7-9" data > 0 begin
put 100% of record "s7-9" data on street(7-9) end
if record "s10-12" data > 0 begin
put 100% of record "s10-12" data on street(10-12) end
if record "s13-15" data > 0 begin
put 100% of record "s13-15" data on street(13-15) end
if record "s16-18" data > 0 begin
put 100% of record "s16-18" data on street(16-18) end
if record "s19-21" data > 0 begin
put 100% of record "s19-21" data on street(19-21) end
if record "s22-24" data > 0 begin
put 100% of record "s22-24" data on street(22-24) end
if record "s25-27" data > 0 begin
put 100% of record "s25-27" data on street(25-27) end
if record "s28-30" data > 0 begin
put 100% of record "s28-30" data on street(28-30) end
if record "s31-33" data > 0 begin
put 100% of record "s31-33" data on street(31-33) end
if record "s34-36" data > 0 begin
put 100% of record "s34-36" data on street(34-36) end
// add progression on streets being played
if record "s1-3" data > 0 begin add 1 to record "s1-3" data end
if record "s4-6" data > 0 begin add 1 to record "s4-6" data end
if record "s7-9" data > 0 begin add 1 to record "s7-9" data end
if record "s10-12" data > 0 begin add 1 to record "s10-12" data end
if record "s13-15" data > 0 begin add 1 to record "s13-15" data end
if record "s16-18" data > 0 begin add 1 to record "s16-18" data end
if record "s19-21" data > 0 begin add 1 to record "s19-21" data end
if record "s22-24" data > 0 begin add 1 to record "s22-24" data end
if record "s25-27" data > 0 begin add 1 to record "s25-27" data end
if record "s28-30" data > 0 begin add 1 to record "s28-30" data end
if record "s31-33" data > 0 begin add 1 to record "s31-33" data end
if record "s34-36" data > 0 begin add 1 to record "s34-36" data end
// finished
end