system "Double Tracking" { Autore: Manuel Rosati Xtremizzato da: lonerider Spiegazione del sistema su www.laroulette.it } method "main" begin while Starting a new Session begin Copy list [2,4,6] record "AA" Layout Copy list [20,23,24,16] record "BB" layout Copy list [29,26,28,35,31] record "CC" layout Copy list [30,36,33,18,14,22] record "BC" layout Copy list [34,27,32,25,9,12,3,7] record "AC" layout Copy list [13,15,21,17,10,11,1,8,5,19] record "AB" layout set list [1,1,1,1,1,1,1,1,1,2,2,2] record "progressionAA" data set list [1,1,1,1,1,2,2,2,2,3,3,3] record "progressionBB" data set list [1,1,1,1,1,2,2,2,3,3,4,5] record "progressionCC" data set list [1,1,1,1,1,2,2,3,3,4,5,6] record "progressionBC" data set list [1,1,1,1,2,2,3,5,5,7,9,12] record "progressionAC" data set list [1,1,1,2,3,4,6,8,11,15,21,30] record "progressionAB" data Put 0 record "BetProgression" data index end While on Each Spin begin Call "Assign" Call "Results" Add 1 record "Spin" data If record "Spin" data >7 and flag "Active" false begin Call "Verify" end if flag "Active" true begin Call "Bet" end end end method "Assign" begin Copy last number nel record "Numero" layout Track last Number for 8 spins to record "Last8" layout Track last Number for 9 spins to record "Last9" layout Track last Number for 10 spins to record"Last10" layout Track last Number for 11 spins to record"Last11" layout Track last Number for 12 spins to record"Last12" layout Track last Number for 13 spins to record"Last13" layout end method "Verify" begin // AB set flag "PlayAB" true put 1 record "AB" Layout index loop until record "AB" Layout index > record "AB" Layout count begin if record "AB" Layout found record "Last8" layout begin Set flag "PlayAB" false end add 1 record "AB" Layout index end if flag "PlayAB" true begin Copy record "AB" layout Record "BetList" Layout end // AC set flag "PlayAC" true put 1 record "AC" Layout index loop until record "AC" Layout index > record "AB" Layout count begin if record "AC" Layout found record "Last9" layout begin Set flag "PlayAC" false end add 1 record "AC" Layout index end if flag "PlayAC" true begin Copy record "AC" layout Record "BetList" Layout end // BC set flag "PlayBC" true put 1 record "BC" Layout index loop until record "BC" Layout index > record "BC" Layout count begin if record "BC" Layout found record "Last10" layout begin Set flag "PlayBC" false end add 1 record "BC" Layout index end if flag "PlayBC" true begin Copy record "BC" layout Record "BetList" Layout end // CC set flag "PlayCC" true put 1 record "CC" Layout index loop until record "CC" Layout index > record "CC" Layout count begin if record "CC" Layout found record "Last11" layout begin Set flag "PlayCC" false end add 1 record "CC" Layout index end if flag "PlayCC" true begin Copy record "CC" layout Record "BetList" Layout end // BB set flag "PlayBB" true put 1 record "BB" Layout index loop until record "BB" Layout index > record "BB" Layout count begin if record "BB" Layout found record "Last12" layout begin Set flag "PlayBB" false end add 1 record "BB" Layout index end if flag "PlayBB" true begin Copy record "BB" layout Record "BetList" Layout end // AA set flag "PlayAA" true put 1 record "AA" Layout index loop until record "AA" Layout index > record "AA" Layout count begin if record "AA" Layout found record "Last13" layout begin Set flag "PlayAA" false end add 1 record "AA" Layout index end if flag "PlayAA" true begin Copy record "AA" layout Record "BetList" Layout end If flag "PlayAA" true or flag "PlayAB" true or flag "PlayAC" true or flag "PlayBB" true or flag "PlayBC" true or flag "PlayCC" true begin If any number bet won each begin Call "GlobalCheck" if flag "Active" true begin return end end if flag "PlayAB" true and record "Spin" Data >=8 begin Duplicate record "AB" Record "BetList" Duplicate record "progressionAB" record "BetProgression" Set flag "Active" true return end if flag "PlayAC" true and record "Spin" Data >=9 begin Duplicate record "AC" Record "BetList" Duplicate record "progressionAC" record "BetProgression" Set flag "Active" true return end if flag "PlayBC" true and record "Spin" Data >=10 begin Duplicate record "BC" Record "BetList" Duplicate record "progressionBC" record "BetProgression" Set flag "Active" true return end if flag "PlayCC" true and record "Spin" Data >=11 begin Duplicate record "CC" Record "BetList" Duplicate record "progressionCC" record "BetProgression" Set flag "Active" true return end if flag "PlayBB" true and record "Spin" Data >=12 begin Duplicate record "BB" Record "BetList" Duplicate record "progressionBB" record "BetProgression" Set flag "Active" true return end if flag "PlayAA" true and record "Spin" Data >=13 begin Duplicate record "AA" Record "BetList" Duplicate record "progressionAA" record "BetProgression" Set flag "Active" true return end end end method "Bet" begin add 1 record "BetProgression" Data index if Record "BetProgression" Data index > Record "BetProgression" Data count begin Call "NewGame" put 0 record "Spin" data clear record "Last8" Layout clear record "Last9" Layout clear record "Last10" Layout clear record "Last11" Layout clear record "Last12" Layout clear record "Last13" Layout end put 100% record "BetProgression" data record "BetList" Layout list end method "Results" begin if any number bet won each begin Call "NewGame" end end method "NewGame" begin Set flag "Active" false Put 7 record "Spin" data clear record "BetList" Layout clear record "BetProgression" Layout put 0 record "BetProgression" Data index set flag "PlayAA" false set flag "PlayAB" false set flag "PlayAC" false set flag "PlayBB" false set flag "PlayBC" false set flag "PlayCC" false end method "GlobalCheck" begin if flag "PlayAB" true begin Duplicate record "AB" Record "BetList" Duplicate record "progressionAB" record "BetProgression" Set flag "Active" true return end if flag "PlayAC" true begin Duplicate record "AC" Record "BetList" Duplicate record "progressionAC" record "BetProgression" Set flag "Active" true return end if flag "PlayBC" true begin Duplicate record "BC" Record "BetList" Duplicate record "progressionBC" record "BetProgression" Set flag "Active" true return end if flag "PlayCC" true begin Duplicate record "CC" Record "BetList" Duplicate record "progressionCC" record "BetProgression" Set flag "Active" true return end if flag "PlayBB" true begin Duplicate record "BB" Record "BetList" Duplicate record "progressionBB" record "BetProgression" Set flag "Active" true return end if flag "PlayAA" true begin Duplicate record "AA" Record "BetList" Duplicate record "progressionAA" record "BetProgression" Set flag "Active" true return end end