My Way The Leader System v1
My Way The Leader System Version 1.dgt
—
Xtreme,
6 KB (6721 bytes)
Contenuto del file
system "My Way The Leader System Version 1"
{
*************************************
* System by bobco *
* on the VIP Lounge *
*************************************
Rx-ed by Sp1N-D1zZy
-------------------------------------
not 00-c0mpatible
-------------------------------------
Goal on a long run 82 units
Stop Loss �250 units
Back 1 number that has arrived the most. If 2 numbers are
equal the number that arrived last is backed.
Rules.
After 150 spins or there abouts with any profit or being level
then stop.
At anytime the profit is more than 37 units for less than 37 spins
then stop. Eg spin 26 profit 56 units.
At any time after 37 spins the profit is more than the total spins
then stop. Eg spin 52 profit 68 units.
Progression.
After every 72 spins the unit stake is increased by 1. It is reduced
back to 1 if the profit reaches a new high.
-------------------------------------
}
method "main"
begin
while starting new session
begin
call "Init"
end
call "Track"
call "Get Highest Show"
call "Get Bets"
call "Get Number to Bet"
call "Place Bets"
end
method "Place Bets"
begin
add 1 record"Spins"data
add 1 record"Progression"data
if record"Spins"data >= 150 and bankroll >= record"Starting Bankroll"data
begin
call "Reset"
end
put 100% bankroll record"Profit"data
subtract 100% record"Starting Bankroll"data record"Profit"data
if record"Profit"data >= 82 or record"Profit"data <= -250
begin
call "Reset"
end
if record"Profit"data > 37 and record"Spins"data < 37
begin
call "Reset"
end
if record"Spins"data > 37 and record"Profit"data > record"Spins"data
begin
Call "Reset"
end
if record"Progression"data = 72
begin
add 1 record"Unit Size"data
put 0 record"Progression"data
end
if bankroll > record"New High"data
begin
put 100% bankroll record"New High"data
put 1 record"Unit Size"data
put 0 record"Progression"data
end
put 100% record"Unit Size"data record"Bet this"layout
end
method "Get Number to Bet"
begin
if record"Highest Show"layout count = 1
begin
put 1 record"Highest Show"layout index
copy record"Highest Show"layout record"Bet this"layout
end
else
begin
put 1 record"Highest Show"layout index
clear record"Last Appeared"data
clear record"Last Appeared Lowest"data
put 1 record"Last Appeared"data index
loop until record"Highest Show"layout index > record"Highest Show"layout count
begin
calculate last appeared record"Highest Show"layout record"Last Appeared"data
add 1 record"Last Appeared"data index
add 1 record"Highest Show"layout index
end
put 1 record"Last Appeared"data index
put 1 record"Last Appeared Lowest"data index
set list [1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1]
record"Last Appeared Lowest"data
duplicate record"Last Appeared" record"Duplicate Last Appeared"
loop until record"Last Appeared"data index > record"Last Appeared"data count
begin
put 1 record"Duplicate Last Appeared"data index
loop until record"Duplicate Last Appeared"data index > record"Duplicate Last Appeared"data count
begin
if record"Duplicate Last Appeared"data < record"Last Appeared"data
begin
put 0 record"Last Appeared Lowest"data
end
add 1 record"Duplicate Last Appeared"data index
end
add 1 record"Last Appeared"data index
add 1 record"Last Appeared Lowest"data index
end
put 1 record"Last Appeared Lowest"data index
loop until record"Last Appeared Lowest"data index = 99
begin
if record"Last Appeared Lowest"data = 1
begin
put 100% record"Last Appeared Lowest"data index record"Highest Show"layout index
clear record"Bet this"layout
copy record"Highest Show"layout record"Bet this"layout
put 98 record"Last Appeared Lowest"data index
end
add 1 record"Last Appeared Lowest"data index
end
end
end
method "Get Bets"
begin
put 1 record"Number Layout"layout index
put 1 record"Highest"data index
clear record"Highest Show"layout
put 1 record"Highest Show"layout index
loop until record"Highest"data index > record"Highest"data count
begin
if record"Highest"data = 1
begin
copy record"Number Layout"layout record"Highest Show"layout
add 1 record"Highest Show"layout index
end
add 1 record"Highest"data index
add 1 record"Number Layout"layout index
end
end
method "Get Highest Show"
begin
put 1 record"Outcome"data index
put 1 record"Highest"data index
duplicate record"Outcome" record"Duplicate Outcome"
set list [1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1]
record"Highest"data
loop until record"Outcome"data index > record"Outcome"data count
begin
put 1 record"Duplicate Outcome"data index
loop until record"Duplicate Outcome"data index > record"Duplicate Outcome"data count
begin
if record"Duplicate Outcome"data > record"Outcome"data
begin
put 0 record"Highest"data
end
add 1 record"Duplicate Outcome"data index
end
add 1 record"Outcome"data index
add 1 record"Highest"data index
end
end
method "Reset"
begin
clear all records
call "Init"
end
method "Track"
begin
track last number for 1 spins record"Last Number"layout
put 1 record"Number Layout"layout index
put 1 record"Outcome"data index
loop until record"Number Layout"layout index > record"Number Layout"layout count
begin
if record"Last Number"layout = record"Number Layout"layout
begin
add 1 record"Outcome"data
end
add 1 record"Outcome"data index
add 1 record"Number Layout"layout index
end
end
method "Init"
begin
copy list [number 0, number 1, number 2, number 3, number 4, number 5, number 6, number 7,
number 8, number 9, number 10, number 11, number 12, number 13, number 14,
number 15, number 16, number 17, number 18, number 19, number 20, number 21,
number 22, number 23, number 24, number 25, number 26, number 27, number 28,
number 29, number 30, number 31, number 32, number 33, number 34, number 35,
number 36] record"Number Layout"layout
set list [0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]
record"Outcome"data
put 1 record"Unit Size"data
put 100% bankroll record"Starting Bankroll"data
exit
end





