The Leader System v1.2

Contenuto del file

system "The Leader System v1.2"
{
*************************************
*          System by Apache         *
*         on the VIP Lounge         *
*************************************
           Rx-ed by St0rm0r

-------------------------------------
            00-c0mpatible
-------------------------------------
We wait until one number appeared 4 times.(Now this number is the leader)
We bet on this number. (flat bet)
If in this time another number (numbers) hit 4 times we bet also on
these numbers.
When one of these numbers hit ( shows 5 times) we bet only on this number
(the new leader).We remove the other numbers.
We continue betting in this mode (flat) until we have a win.
Here we have two options :
1.If we have a positive balance we stop and we begin a new session.
2.We continue betting in this mode until we obtain a satisfactory winning.
-------------------------------------
}
method "main"
begin
//do this once
while starting new session
    begin
    call "init"
    exit
    end

//do the tracking
add 100% net record"profit"data
if bankroll > record"high"data
    begin
    put 100% bankroll record"high"data
    call "reset2"
    end
if bankroll >= record"win goal"data
    begin
    put 100% bankroll record"high"data
    call "reset"
    exit
    end
if bankroll <= record"stop loss"data
    begin
    call "reset"
    exit
    end

track last number for 1 time record"last N"layout

call "update frequencies"
call "get numbers that qualified"
if record"PT"data = 2
    begin
    call "generate split list"
    end

if record"MM"data = 2
    begin
    if record"PT"data = 1
        begin
        call "determine betting unit straight numbers"
        end
    if record"PT"data = 2
        begin
        call "determine betting unit split numbers"
        end
    end

//bet
    if record"PT"data = 1
        begin
        put 100% record"bet unit"data record"numbers to play"layout list
        end
    if record"PT"data = 2
        begin
        put 1 record"split numbers to play"layout index
        loop until record"split numbers to play"layout index > record"split numbers to play"layout count
            begin
            if record"split numbers to play"layout is found in record"numbers"layout
                begin put 1 record"split bet unit"data index end
            if record"split numbers to play"layout is found in record"splits"layout
                begin put 2 record"split bet unit"data index end
            if record"split numbers to play"layout is found in record"streets"layout
                begin put 3 record"split bet unit"data index end
            if record"split numbers to play"layout is found in record"corners"layout
                begin put 4 record"split bet unit"data index end
            if record"split numbers to play"layout = Line(1-00)
                begin put 5 record"split bet unit"data index end
            if record"split numbers to play"layout is found in record"lines"layout
                begin put 6 record"split bet unit"data index end
            put 100% record"split bet unit"data record"split numbers to play"layout
            add 1 record"split numbers to play"layout index
            end
        end
end

// subroutines
method "init"
begin
group
    begin
    display "The Leader System v1"
    display "--------------------------------------"
    input dropdown "Wheel Type:
    1:= single zero
    2:= double zero" record"WT"data
    input data "Start betting when number(s) have hit x times: (e.g. 4) " record"# to start"data
    input drop down "Type of Play:
    1:= play straight up numbers only
    2:= use splits,streets,lines,corners to the maximum" record"PT"data
    input dropdown "Money Management:
    1:= always flat bet
    2:= always bet just enough to be in profit in 1 hit" record"MM"data
    input data "Starting bankroll" bankroll
    input data "Win goal" record"win"data
    input data "Stop Loss" record"lo"data
    end
if record"WT"data = 1
    begin
    load single wheel
        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] to record"numbers"layout
    put 37 record"lenght"data
    end
    else
    begin
    load double wheel
        copy list [number 00, 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] to record"numbers"layout
    put 38 record"lenght"data
    end
set list [36,18,12,9,7,6] record"return"data
set list [1,1,1,1,1,1] record"split bet unit"data
put 100% bankroll record"high"data
call "reset"
call "init splits"
end

method "reset"
begin
if record"WT"data = 1
    begin
    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"frequencies"data
    end
    else
    begin
    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,0] record"frequencies"data
    end
put 0 record"amount of numbers active"data
call"reset2"
end

method "reset2"
begin
put 100% bankroll record"win goal"data
add 100% record"win"data record"win goal"data
put 100% bankroll record"stop loss"data
subtract 100% record"lo"data record"stop loss"data
put 0 record"profit"data
put 1 record"bet unit"data
put 0 record"count"data
end

method "update frequencies"
begin
put 1 record"numbers"layout index
loop until record"numbers"layout = record"last N"layout
    begin
    add 1 record"numbers"layout index
    end
put 100% record"numbers"layout index record"frequencies"data index
add 1 record"frequencies"data
end

method "get numbers that qualified"
begin
clear record"numbers to play"layout
// get maximum frequency
put 0 record"maximum freq"data
put 1 record"frequencies"data index
loop until record"frequencies"data index > record"frequencies"data count
    begin
    if record"frequencies"data > record"maximum freq"data
        begin
        put 100% record"frequencies"data in record"maximum freq"data
        end
    add 1 record"frequencies"data index
    end
// get all numbers with maximum frequency
if record"maximum freq"data >= record"# to start"data
    begin
    clear record"numbers to play"layout
    put 1 record"frequencies"data index
    loop until record"frequencies"data index > record"frequencies"data count
        begin
        if record"frequencies"data = record"maximum freq"data
            begin
            put 100% record"frequencies"data index in record"numbers"layout index
            copy record"numbers"layout record"numbers to play"layout
            add 1 record"numbers to play"layout index
            end
        add 1 record"frequencies"data index
        end
    end
end

method "goto end of play list"
begin
put 0 record"amount of numbers active"data
put 1 record"numbers to play"layout index
loop until record"numbers to play"layout index > record"numbers to play"layout count
    begin
    add 1 record"amount of numbers active"data
    add 1 record"numbers to play"layout index
    end
end

method "determine betting unit straight numbers"
begin
//determine amount of numbers to play
call "goto end of play list"
//calculate bet
if record"profit"data <= 0
    begin
    put 100% record"profit"data record"count"data
    put 0 record"bet unit"data
    loop until record"count"data > 0
        begin
        subtract 100% record"amount of numbers active"data record"count"data
        add 36 record"count"data
        add 1 record"bet unit"data
        end
    end
    else
    begin
    put 1 record"bet unit"data
    end
end

method "calculate total bet"
begin
put 100% record"split bet unit"data index record"save"data
put 0 record"total bet"data
put 1 record"how many of each"data index
loop until record"how many of each"data index > record"how many of each"data count
    begin
    put 100% record"how many of each"data index record"split bet unit"data index
    put 100% record"how many of each"data record"temp1"data
    multiply by 100% record"split bet unit"data record"temp1"data
    add 100% record"temp1"data record"total bet"data
    add 1 record"how many of each"data index
    end
put 100% record"save"data record"split bet unit"data index
end

method "determine betting unit split numbers"
begin
set list [1,1,1,1,1,1] record"split bet unit"data
//determine minimum needed for each type of bet
put 1 record"how many of each"data index
loop until record"how many of each"data index > record"how many of each"data count
    begin
    put 100% record"how many of each"data index record"hold"data
    call "calculate total bet"
    put 100% record"hold"data record"how many of each"data index
    put 100% record"how many of each"data index record"split bet unit"data index
    if record"how many of each"data > 0
        begin
        put 100% record"how many of each"data index record"return"data index
        put 100% record"profit"data record"count"data
        subtract 100% record"total bet"data record"count"data
        put 0 record"split bet unit"data
        loop until record"count"data > 0
            begin
            subtract 1 record"count"data
            add 100% record"return"data record"count"data
            add 1 record"split bet unit"data
            end
        end
        else
        begin
        put 0 record"split bet unit"data
        end
    add 1 record"how many of each"data index
    end
set flag "ok" false
loop until flag "ok" true
    begin
    set flag "ok" true
    put 1 record"how many of each"data index
    loop until record"how many of each"data index > record"how many of each"data count
        begin
        if record"how many of each"data > 0
            begin
            put 100% record"how many of each"data index record"split bet unit"data index
            put 100% record"how many of each"data index record"return"data index
            put 100% record"how many of each"data index record"hold"data
            call "calculate total bet"
            subtract 100% record"profit"data record"total bet"data
            add 1 record"total bet"data
            put 100% record"hold"data record"how many of each"data index
            put 100% record"split bet unit"data record"temp1"data
            multiply by 100% of record"return"data record"temp1"data
            if record"temp1"data < record"total bet"data
                begin
                add 1 record"split bet unit"data
                set flag "ok" false
                end
            end
        add 1 record"how many of each"data index
        end
    end
end

method "generate split list"
begin
//convert "numbers to play" into 1)streets 2) lines 3) corners 4) splits in record"split numbers to play"layout
//Special: line (1-00)
if record"special1"layout is found in record"split numbers to play"layout and
record"special2"layout is found in record"split numbers to play"layout and
record"special3"layout is found in record"split numbers to play"layout and
record"special4"layout is found in record"split numbers to play"layout and
record"special5"layout is found in record"split numbers to play"layout
    begin
    clear record"temp"layout
    put 1 record"split numbers to play"layout index
    loop until record"split numbers to play"layout index > record"split numbers to play"layout count
        begin
        if record"split numbers to play"layout not = number 0 and
        record"split numbers to play"layout not = number 00 and
        record"split numbers to play"layout not = number 1 and
        record"split numbers to play"layout not = number 2 and
        record"split numbers to play"layout not = number 3
            begin
            copy record"split numbers to play"layout record"temp"layout
            add 1 record"temp"layout index
            end
        add 1 record"split numbers to play"layout index
        end
    copy Line(1-00) record"temp"layout
    duplicate record"temp" record"split numbers to play"
    end
//streets
duplicate record"numbers to play" record"split numbers to play"
put 1 record"streets"layout index
loop until record"streets"layout index > record"streets"layout count
    begin
    put 100% record"streets"layout index record"streets1"layout index
    put 100% record"streets"layout index record"streets2"layout index
    put 100% record"streets"layout index record"streets3"layout index
    if record"streets1"layout is found in record"split numbers to play"layout and
    record"streets2"layout is found in record"split numbers to play"layout and
    record"streets3"layout is found in record"split numbers to play"layout
        begin
        clear record"temp"layout
        put 1 record"split numbers to play"layout index
        loop until record"split numbers to play"layout index > record"split numbers to play"layout count
            begin
            if record"split numbers to play"layout not = record"streets1"layout and
            record"split numbers to play"layout not = record"streets2"layout and
            record"split numbers to play"layout not = record"streets3"layout
                begin
                copy record"split numbers to play"layout record"temp"layout
                add 1 record"temp"layout index
                end
            add 1 record"split numbers to play"layout index
            end
        copy record"streets"layout record"temp"layout
        duplicate record"temp" record"split numbers to play"
        end
    add 1 record"streets"layout index
    end
//lines
put 1 record"lines"layout index
loop until record"lines"layout index > record"lines"layout count
    begin
    put 100% record"lines"layout index record"lines1"layout index
    put 100% record"lines"layout index record"lines2"layout index
    if record"lines1"layout is found in record"split numbers to play"layout and
    record"lines2"layout is found in record"split numbers to play"layout
        begin
        clear record"temp"layout
        put 1 record"split numbers to play"layout index
        loop until record"split numbers to play"layout index > record"split numbers to play"layout count
            begin
            if record"split numbers to play"layout not = record"lines1"layout and
            record"split numbers to play"layout not = record"lines2"layout
                begin
                copy record"split numbers to play"layout record"temp"layout
                add 1 record"temp"layout index
                end
            add 1 record"split numbers to play"layout index
            end
        copy record"lines"layout record"temp"layout
        duplicate record"temp" record"split numbers to play"
        end
    add 1 record"lines"layout index
    end
//corners
put 1 record"corners"layout index
loop until record"corners"layout index > record"corners"layout count
    begin
    put 100% record"corners"layout index record"corners1"layout index
    put 100% record"corners"layout index record"corners2"layout index
    put 100% record"corners"layout index record"corners3"layout index
    put 100% record"corners"layout index record"corners4"layout index
    if record"corners1"layout is found in record"split numbers to play"layout and
    record"corners2"layout is found in record"split numbers to play"layout and
    record"corners3"layout is found in record"split numbers to play"layout and
    record"corners4"layout is found in record"split numbers to play"layout
        begin
        clear record"temp"layout
        put 1 record"split numbers to play"layout index
        loop until record"split numbers to play"layout index > record"split numbers to play"layout count
            begin
            if record"split numbers to play"layout not = record"corners1"layout and
            record"split numbers to play"layout not = record"corners2"layout and
            record"split numbers to play"layout not = record"corners3"layout and
            record"split numbers to play"layout not = record"corners4"layout
                begin
                copy record"split numbers to play"layout record"temp"layout
                add 1 record"temp"layout index
                end
            add 1 record"split numbers to play"layout index
            end
        copy record"corners"layout record"temp"layout
        duplicate record"temp" record"split numbers to play"
        end
    add 1 record"corners"layout index
    end
//splits
put 1 record"splits"layout index
loop until record"splits"layout index > record"splits"layout count
    begin
    put 100% record"splits"layout index record"splits1"layout index
    put 100% record"splits"layout index record"splits2"layout index
    if record"splits1"layout is found in record"split numbers to play"layout and
    record"splits2"layout is found in record"split numbers to play"layout
        begin
        clear record"temp"layout
        put 1 record"split numbers to play"layout index
        loop until record"split numbers to play"layout index > record"split numbers to play"layout count
            begin
            if record"split numbers to play"layout not = record"splits1"layout and
            record"split numbers to play"layout not = record"splits2"layout
                begin
                copy record"split numbers to play"layout record"temp"layout
                add 1 record"temp"layout index
                end
            add 1 record"split numbers to play"layout index
            end
        copy record"splits"layout record"temp"layout
        duplicate record"temp" record"split numbers to play"
        end
    add 1 record"splits"layout index
    end
set list [0,0,0,0,0,0] record"how many of each"data
put 1 record"split numbers to play"layout index
loop until record"split numbers to play"layout index > record"split numbers to play"layout count
    begin
    if record"split numbers to play"layout is found in record"numbers"layout
        begin
        put 1 record"how many of each"data index
        add 1 record"how many of each"data
        end
    if record"split numbers to play"layout is found in record"splits"layout
        begin
        put 2 record"how many of each"data index
        add 1 record"how many of each"data
        end
    if record"split numbers to play"layout is found in record"streets"layout
        begin
        put 3 record"how many of each"data index
        add 1 record"how many of each"data
        end
    if record"split numbers to play"layout is found in record"corners"layout
        begin
        put 4 record"how many of each"data index
        add 1 record"how many of each"data
        end
    if record"split numbers to play"layout = Line(1-00)
        begin
        put 5 record"how many of each"data index
        add 1 record"how many of each"data
        end
    if record"split numbers to play"layout is found in record"lines"layout
        begin
        put 6 record"how many of each"data index
        add 1 record"how many of each"data
        end
    add 1 record"split numbers to play"layout index
    end
end

method "init splits"
begin
//special line(1-00)
copy number 0 record"special1"layout
copy number 00 record"special2"layout
copy number 1 record"special3"layout
copy number 2 record"special4"layout
copy number 3 record"special5"layout
//splits
if record"WT"data = 1
    begin
    copy list [Split(1-0),Split(2-0),Split(3-0),Split(1-2),Split(1-4),Split(2-3),
    Split(2-5),Split(3-6),Split(4-5),Split(4-7),Split(5-6),Split(5-8),Split(6-9),Split(7-8),
    Split(7-10),Split(8-9),Split(8-11),Split(9-12),Split(10-11),Split(10-13),Split(10-13),Split(11-12),
    Split(11-14),Split(12-15),Split(13-14),Split(13-16),Split(14-15),Split(14-17),Split(15-18),Split(16-17),
    Split(16-19),Split(17-18),Split(17-20),Split(18-21),Split(19-20),Split(19-22),
    Split(20-21),Split(20-23),Split(21-24),Split(22-23),Split(22-25),Split(23-24),Split(23-26),
    Split(24-27),Split(25-26),Split(25-28),Split(26-27),Split(26-29),Split(27-30),Split(28-29),
    Split(28-31),Split(29-30),Split(29-30),Split(29-32),Split(30-33),Split(31-32),Split(31-34),
    Split(32-33),Split(32-35),Split(33-36),Split(34-35),Split(35-36),Split(0-00),Split(3-00)] record"splits"layout
    copy list [number 1,number 2,number 3,number 1,number 1,number 2,
    number 2,number 3,number 4,number 4,number 5,number 5,number 6,number 7,
    number 7,number 8,number 8,number 9,number 10,number 10,number 10,number 11,
    number 11,number 12,number 13,number 13,number 14,number 14,number 15,number 16,
    number 16,number 17,number 17,number 18,number 19,number 19,
    number 20,number 20,number 21,number 22,number 22,number 23,number 23,
    number 24,number 25,number 25,number 26,number 26,number 27,number 28,
    number 28,number 29,number 29,number 29,number 30,number 31,number 31,
    number 32,number 32,number 33,number 34,number 35,number 0,number 3] record"splits1"layout
    copy list [number 0,number 0,number 0,number 2,number 4,number 3,
    number 5,number 6,number 5,number 7,number 6,number 8,number 9,number 8,
    number 10,number 9,number 11,number 12,number 11,number 13,number 13,number 12,
    number 14,number 15,number 14,number 16,number 15,number 17,number 18,number 17,
    number 19,number 18,number 20,number 21,number 20,number 22,
    number 21,number 23,number 24,number 23,number 25,number 24,number 26,
    number 27,number 26,number 28,number 27,number 29,number 30,number 29,
    number 31,number 30,number 30,number 32,number 33,number 32,number 34,
    number 33,number 35,number 36,number 35,number 36,number 00,number 00] record"splits2"layout
    end
    else
    begin
    copy list [Split(1-0),Split(1-2),Split(1-4),Split(2-3),
    Split(2-5),Split(3-6),Split(4-5),Split(4-7),Split(5-6),Split(5-8),Split(6-9),Split(7-8),
    Split(7-10),Split(8-9),Split(8-11),Split(9-12),Split(10-11),Split(10-13),Split(10-13),Split(11-12),
    Split(11-14),Split(12-15),Split(13-14),Split(13-16),Split(14-15),Split(14-17),Split(15-18),Split(16-17),
    Split(16-19),Split(17-18),Split(17-20),Split(18-21),Split(19-20),Split(19-22),
    Split(20-21),Split(20-23),Split(21-24),Split(22-23),Split(22-25),Split(23-24),Split(23-26),
    Split(24-27),Split(25-26),Split(25-28),Split(26-27),Split(26-29),Split(27-30),Split(28-29),
    Split(28-31),Split(29-30),Split(29-30),Split(29-32),Split(30-33),Split(31-32),Split(31-34),
    Split(32-33),Split(32-35),Split(33-36),Split(34-35),Split(35-36),Split(0-00),Split(3-00)] record"splits"layout
    copy list [number 1,number 1,number 1,number 2,
    number 2,number 3,number 4,number 4,number 5,number 5,number 6,number 7,
    number 7,number 8,number 8,number 9,number 10,number 10,number 10,number 11,
    number 11,number 12,number 13,number 13,number 14,number 14,number 15,number 16,
    number 16,number 17,number 17,number 18,number 19,number 19,
    number 20,number 20,number 21,number 22,number 22,number 23,number 23,
    number 24,number 25,number 25,number 26,number 26,number 27,number 28,
    number 28,number 29,number 29,number 29,number 30,number 31,number 31,
    number 32,number 32,number 33,number 34,number 35,number 0,number 3] record"splits1"layout
    copy list [number 0,number 2,number 4,number 3,
    number 5,number 6,number 5,number 7,number 6,number 8,number 9,number 8,
    number 10,number 9,number 11,number 12,number 11,number 13,number 13,number 12,
    number 14,number 15,number 14,number 16,number 15,number 17,number 18,number 17,
    number 19,number 18,number 20,number 21,number 20,number 22,
    number 21,number 23,number 24,number 23,number 25,number 24,number 26,
    number 27,number 26,number 28,number 27,number 29,number 30,number 29,
    number 31,number 30,number 30,number 32,number 33,number 32,number 34,
    number 33,number 35,number 36,number 35,number 36,number 00,number 00] record"splits2"layout
    end
//streets
copy list [Street(1-3),Street(4-6),Street(7-9),Street(10-12),Street(13-15),
Street(16-18),Street(19-21),Street(22-24),Street(25-27),Street(28-30),
Street(31-33),Street(34-36),Corner(2:00),Street(00-3),Street(0-2)] record"streets"layout
copy list [number 1,number 4,number 7,number 10,number 13,number 16,
number 19,number 22,number 25,number 28,number 31,number 34,number 0,number 00,number 0] record"streets1"layout
copy list [number 2,number 5,number 8,number 11,number 14,number 17,
number 20,number 23,number 26,number 29,number 32,number 35,number 00,number 2,number 1] record"streets2"layout
copy list [number 3,number 6,number 9,number 12,number 15,number 18,
number 21,number 24,number 27,number 30,number 33,number 36,number 2,number 3,number 2] record"streets3"layout
//corners
if record"WT"data = 1
    begin
    copy list [Corner(1:5),Corner(2:6),Corner(4:8),Corner(5:9),Corner(7:11),
    Corner(8:12),Corner(10:14),Corner(11:15),Corner(13:17),Corner(14:18),
    Corner(16:20),Corner(17:21),Corner(19:23),Corner(20:24),Corner(22:26),
    Corner(23:27),Corner(25:29),Corner(26:30),Corner(28:32),Corner(29:33),
    Corner(31:35),Corner(32:36),Line(1-0)] record"corners"layout
    copy list [number 1,number 2,number 4,number 5,number 7,number 8,number 10,
    number 11,number 13,number 14,number 16,number 17,number 19,number 20,number 22,
    number 23,number 25,number 26,number 28,number 29,number 31,number 32,number 0] record"corners1"layout
    copy list [number 2,number 3,number 5,number 6,number 8,number 9,number 11,
    number 12,number 14,number 15,number 17,number 18,number 20,number 21,number 23,
    number 24,number 26,number 27,number 29,number 30,number 32,number 33,number 1] record"corners2"layout
    copy list [number 4,number 5,number 7,number 8,number 10,number 11,number 13,
    number 14,number 16,number 17,number 19,number 20,number 22,number 23,number 25,
    number 26,number 28,number 29,number 31,number 32,number 34,number 35,number 2] record"corners3"layout
    copy list [number 5,number 6,number 8,number 9,number 11,number 12,number 14,
    number 15,number 17,number 18,number 20,number 21,number 23,number 24,number 26,
    number 27,number 29,number 30,number 32,number 33,number 35,number 36,number 3] record"corners4"layout
    end
    else
    begin
    copy list [Corner(1:5),Corner(2:6),Corner(4:8),Corner(5:9),Corner(7:11),
    Corner(8:12),Corner(10:14),Corner(11:15),Corner(13:17),Corner(14:18),
    Corner(16:20),Corner(17:21),Corner(19:23),Corner(20:24),Corner(22:26),
    Corner(23:27),Corner(25:29),Corner(26:30),Corner(28:32),Corner(29:33),
    Corner(31:35),Corner(32:36)] record"corners"layout
    copy list [number 1,number 2,number 4,number 5,number 7,number 8,number 10,
    number 11,number 13,number 14,number 16,number 17,number 19,number 20,number 22,
    number 23,number 25,number 26,number 28,number 29,number 31,number 32] record"corners1"layout
    copy list [number 2,number 3,number 5,number 6,number 8,number 9,number 11,
    number 12,number 14,number 15,number 17,number 18,number 20,number 21,number 23,
    number 24,number 26,number 27,number 29,number 30,number 32,number 33] record"corners2"layout
    copy list [number 4,number 5,number 7,number 8,number 10,number 11,number 13,
    number 14,number 16,number 17,number 19,number 20,number 22,number 23,number 25,
    number 26,number 28,number 29,number 31,number 32,number 34,number 35] record"corners3"layout
    copy list [number 5,number 6,number 8,number 9,number 11,number 12,number 14,
    number 15,number 17,number 18,number 20,number 21,number 23,number 24,number 26,
    number 27,number 29,number 30,number 32,number 33,number 35,number 36] record"corners4"layout
    end
//Lines
copy list [Line(1-6),Line(4-9),Line(7-12),Line(10-15),Line(13-18),Line(16-21),
Line(19-24),Line(22-27),Line(25-30),Line(28-33),Line(31-36)] record"lines"layout
copy list [Street(1-3),Street(4-6),Street(7-9),Street(10-12),Street(13-15),Street(16-18),
Street(19-21),Street(22-24),Street(25-27),Street(28-30),Street(31-33)] record"lines1"layout
copy list [Street(4-6),Street(7-9),Street(10-12),Street(13-15),Street(16-18),Street(19-21),
Street(22-24),Street(25-27),Street(28-30),Street(31-33),Street(34-36)] record"lines2"layout
end