Tested now again "Dealers Signature" (IT will bet two 7+7 sectors 11 pockets away on each side of the current number on the wheel, for each spin)...14 Numbers bet (progression Fibonacci Negative)
This code can also Calculate a new distace for each spin (it took me over 2 weeks to code this). But for now, it will use a static Distance of 11 pockets. I had about a 70% winrate now from a short test. (WG+1000 /SL-1000)
IF you have ideas to improve this bet, let me know....
Dealers Signature version 1
system "Dealers Signature v.1"
// © ignatus 2020 ©
method "main"
begin
while starting a new session
begin
Set List[1,1,2,3,5,8,13,21,32,55,89,144,233,377,610,987]
to Record "progression" Data
Set List[1,2,3,4,5,6,7] to Record "spin" Data
Set List [0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,
37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73]
to Record "Matrix" Data
Set List [0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,
37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73]
to Record "Matrix2" Data
Set List [0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,
37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73]
to Record "Matrix3" Data
Set List [0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,
37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73]
to Record "Matrix4" Data
Set List [0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,
37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73]
to Record "Matrix9" Data
copy List[number 0,number 32,number 15,number 19,number 4,number 21,number 2,
number 25,number 17,number 34,number 6,number 27,number 13,number 36,
number 11,number 30,number 8,number 23,number 10,number 5,number 24,
number 16,number 33,number 1,number 20,number 14,number 31,number 9,
number 22,number 18,number 29,number 7,number 28,number 12,number 35,
number 3,number 26]
to Record "Wheel" Layout
{ Set List [0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,
37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73]
to Record "DistData" Data
}
end
put 0 to Record "Highest Bankroll" Data
while on each spin
begin
Track last Number for 4 spins to Record "track" layout
IF Record "track" layout index >= 5 each
begin
clear Record "track" layout
set flag "loop" false
end
IF any inside bet lost each
begin
add 1 on Record "progression" Data Index
clear Record "Bet" Layout
clear Record "Bet2" Layout
clear Record "Bet3" Layout
clear Record "Bet4" Layout
// Put 100% of Record "progression" data to Record "Bet" Layout list
// Put 100% of Record "progression" data to Record "Bet2" Layout list
// Put 100% of Record "progression" data to Record "Bet3" Layout list
// Put 100% of Record "progression" data to Record "Bet4" Layout list
end
// Put 100% of Record "progression" data to Record "Bet" Layout list
// Put 100% of Record "progression" data to Record "Bet2" Layout list
If any inside bet won each
begin
// set flag "loop" false
clear Record "DistData" Layout
clear Record "Bet" Layout
clear Record "Bet2" Layout
clear Record "Bet3" Layout
clear Record "Bet4" Layout
clear Record "secondlast" Layout
clear Record "last" Layout
clear Record "secondlast" Layout
clear Record "Matrix" Layout
clear Record "Matrix1" Layout
clear Record "Matrix2" Layout
clear Record "Matrix3" Layout
clear Record "Matrix4" Layout
clear Record "Matrix5" Layout
clear Record "Matrix6" Layout
clear Record "Matrix7" Layout
clear Record "Matrix8" Layout
clear Record "Matrix9" Layout
clear Record "Matrix10" Layout
clear Record "Matrix11" Layout
clear Record "Matrix12" Layout
clear Record "Matrix13" Layout
clear Record "LastBetMatrix" Layout
clear Record "LastBetMatrix2" Layout
Put 1 on Record "spin" Data Index
put 1 on Record "progression" Data Index
if Bankroll >= Record "Highest Bankroll" Data
begin
clear Record "Highest Bankroll" Data
put 100% Bankroll to Record "Highest Bankroll" Data
put 1 on Record "progression" Data Index
end
end
if Record "spin" Data Index = 6 each
begin
Put 1 on Record "spin" Data Index
end
Set Max to Record "last" Layout Index
Add 1 to Record "last" Layout Index
copy last Number to Record "last" Layout
Set Max to Record "LastBetMatrix" Layout Index
Add 1 to Record "LastBetMatrix" Layout Index
copy last Number to Record "LastBetMatrix" Layout
Set Max to Record "LastBetMatrix2" Layout Index
Add 1 to Record "LastBetMatrix2" Layout Index
copy last Number to Record "LastBetMatrix2" Layout
Set Max to Record "current" Layout Index
Add 1 to Record "current" Layout Index
copy last number to Record "current" Layout
//===============================================================
IF Record "LastBetMatrix" Layout index >= 2
begin
//duplicate Record "DistData" to Record "DistDataTEMP"
//loop until Record "last" Layout index = 1
//begin
//set max to Record "LastBetMatrix2" Layout index
//set max to Record "LastBetMatrix" Layout index
//set max to Record "secondlast" Layout index
//set flag "loop" true
//duplicate Record "DistData" to Record "DistData2"
//loop until Record "LastBetMatrix2" Layout index = 0
//begin
duplicate Record "Matrix9" to Record "Matrix7"
if Record "LastBetMatrix" Layout = number 0 each
begin
put 1 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 1 each
begin
put 21 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 2 each
begin
put 7 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 3 each
begin
put 36 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 4 each
begin
put 5 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 5 each
begin
put 20 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 6 each
begin
put 11 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 7 each
begin
put 32 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 8 each
begin
put 17 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 9 each
begin
put 28 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 10 each
begin
put 19 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 11 each
begin
put 15 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 12 each
begin
put 34 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 13 each
begin
put 13 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 14 each
begin
put 26 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 15 each
begin
put 3 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 16 each
begin
put 22 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 17 each
begin
put 9 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 18 each
begin
put 30 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 19 each
begin
put 4 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 20 each
begin
put 25 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 21 each
begin
put 6 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 22 each
begin
put 29 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 23 each
begin
put 18 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 24 each
begin
put 21 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 25 each
begin
put 8 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 26 each
begin
put 37 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 27 each
begin
put 12 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 28 each
begin
put 33 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 29 each
begin
put 31 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 30 each
begin
put 16 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 31 each
begin
put 27 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 32 each
begin
put 2 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 33 each
begin
put 23 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 34 each
begin
put 10 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 35 each
begin
put 35 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 36 each
begin
put 14 to Record "Matrix7" Data index
end
duplicate Record "Matrix7" to Record "Matrix8"
duplicate Record "Matrix7" to Record "Matrix"
duplicate Record "Matrix7" to Record "Matrix2"
duplicate Record "Matrix7" to Record "Matrix5"
//duplicate Record "Matrix7" to Record "last"
//==========
duplicate Record "Matrix9" to Record "Matrix10"
if Record "secondlast" Layout = number 0 each
begin
put 1 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 1 each
begin
put 21 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 2 each
begin
put 7 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 3 each
begin
put 36 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 4 each
begin
put 5 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 5 each
begin
put 20 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 6 each
begin
put 11 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 7 each
begin
put 32 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 8 each
begin
put 17 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 9 each
begin
put 28 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 10 each
begin
put 19 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 11 each
begin
put 15 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 12 each
begin
put 34 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 13 each
begin
put 13 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 14 each
begin
put 26 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 15 each
begin
put 3 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 16 each
begin
put 22 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 17 each
begin
put 9 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 18 each
begin
put 30 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 19 each
begin
put 4 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 20 each
begin
put 25 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 21 each
begin
put 6 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 22 each
begin
put 29 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 23 each
begin
put 18 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 24 each
begin
put 21 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 25 each
begin
put 8 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 26 each
begin
put 37 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 27 each
begin
put 12 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 28 each
begin
put 33 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 29 each
begin
put 31 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 30 each
begin
put 16 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 31 each
begin
put 27 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 32 each
begin
put 2 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 33 each
begin
put 23 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 34 each
begin
put 10 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 35 each
begin
put 35 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 36 each
begin
put 14 to Record "Matrix10" Data index
end
duplicate Record "Matrix10" to Record "Matrix11"
duplicate Record "Matrix10" to Record "Matrix3"
duplicate Record "Matrix10" to Record "Matrix4"
duplicate Record "Matrix10" to Record "Matrix6"
IF flag "loop" false each
begin
//==Dist Calc===
if Record "spin" Data index = 1 each
begin
duplicate Record "last" to Record "temp"
// duplicate Record "LastBetMatrix" to Record "last"
duplicate Record "Matrix7" to Record "Matrix"
duplicate Record "Matrix10" to Record "Matrix3"
if Record "Matrix" Data index < Record "Matrix3" Data index each
begin
if Record "last" Layout = number 0 each
begin
subtract 1 from Record "Matrix3" Data index
end
if Record "last" Layout = number 1 each
begin
subtract 21 from Record "Matrix3" Data index
end
if Record "last" Layout = number 2 each
begin
subtract 7 from Record "Matrix3" Data index
end
if Record "last" Layout = number 3 each
begin
subtract 36 from Record "Matrix3" Data index
end
if Record "last" Layout = number 4 each
begin
subtract 5 from Record "Matrix3" Data index
end
if Record "last" Layout = number 5 each
begin
subtract 20 from Record "Matrix3" Data index
end
if Record "last" Layout = number 6 each
begin
subtract 11 from Record "Matrix3" Data index
end
if Record "last" Layout = number 7 each
begin
subtract 32 from Record "Matrix3" Data index
end
if Record "last" Layout = number 8 each
begin
subtract 17 from Record "Matrix3" Data index
end
if Record "last" Layout = number 9 each
begin
subtract 28 from Record "Matrix3" Data index
end
if Record "last" Layout = number 10 each
begin
subtract 19 from Record "Matrix3" Data index
end
if Record "last" Layout = number 11 each
begin
subtract 15 from Record "Matrix3" Data index
end
if Record "last" Layout = number 12 each
begin
subtract 34 from Record "Matrix3" Data index
end
if Record "last" Layout = number 13 each
begin
subtract 13 from Record "Matrix3" Data index
end
if Record "last" Layout = number 14 each
begin
subtract 26 from Record "Matrix3" Data index
end
if Record "last" Layout = number 15 each
begin
subtract 3 from Record "Matrix3" Data index
end
if Record "last" Layout = number 16 each
begin
subtract 22 from Record "Matrix3" Data index
end
if Record "last" Layout = number 17 each
begin
subtract 9 from Record "Matrix3" Data index
end
if Record "last" Layout = number 18 each
begin
subtract 30 from Record "Matrix3" Data index
end
if Record "last" Layout = number 19 each
begin
subtract 4 from Record "Matrix3" Data index
end
if Record "last" Layout = number 20 each
begin
subtract 25 from Record "Matrix3" Data index
end
if Record "last" Layout = number 21 each
begin
subtract 6 from Record "Matrix3" Data index
end
if Record "last" Layout = number 22 each
begin
subtract 29 from Record "Matrix3" Data index
end
if Record "last" Layout = number 23 each
begin
subtract 18 from Record "Matrix3" Data index
end
if Record "last" Layout = number 24 each
begin
subtract 21 from Record "Matrix3" Data index
end
if Record "last" Layout = number 25 each
begin
subtract 8 from Record "Matrix3" Data index
end
if Record "last" Layout = number 26 each
begin
subtract 37 from Record "Matrix3" Data index
end
if Record "last" Layout = number 27 each
begin
subtract 12 from Record "Matrix3" Data index
end
if Record "last" Layout = number 28 each
begin
subtract 33 from Record "Matrix3" Data index
end
if Record "last" Layout = number 29 each
begin
subtract 31 from Record "Matrix3" Data index
end
if Record "last" Layout = number 30 each
begin
subtract 16 from Record "Matrix3" Data index
end
if Record "last" Layout = number 31 each
begin
subtract 27 from Record "Matrix3" Data index
end
if Record "last" Layout = number 32 each
begin
subtract 2 from Record "Matrix3" Data index
end
if Record "last" Layout = number 33 each
begin
subtract 23 from Record "Matrix3" Data index
end
if Record "last" Layout = number 34 each
begin
subtract 10 from Record "Matrix3" Data index
end
if Record "last" Layout = number 35 each
begin
subtract 35 from Record "Matrix3" Data index
end
if Record "last" Layout = number 36 each
begin
subtract 14 from Record "Matrix3" Data index
end
// if flag "loop" false each
// begin
Set Max to Record "DistData" Data Index
Add 1 to Record "DistData" Data Index
// end
IF Record "Matrix3" Data index = 1 each
begin
put 1 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 2 each
begin
put 2 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 3 each
begin
put 3 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 4 each
begin
put 4 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 5 each
begin
put 5 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 6 each
begin
put 6 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 7 each
begin
put 7 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 8 each
begin
put 8 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 9 each
begin
put 9 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 10 each
begin
put 10 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 11 each
begin
put 11 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 12 each
begin
put 12 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 13 each
begin
put 13 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 14 each
begin
put 14 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 15 each
begin
put 15 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 16 each
begin
put 16 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 17 each
begin
put 17 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 18 each
begin
put 18 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 19 each
begin
put 19 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 20 each
begin
put 20 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 21 each
begin
put 21 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 23 each
begin
put 23 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 24 each
begin
put 24 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 25 each
begin
put 25 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 26 each
begin
put 26 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 27 each
begin
put 27 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 28 each
begin
put 28 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 29 each
begin
put 29 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 30 each
begin
put 30 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 31 each
begin
put 31 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 32 each
begin
put 32 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 33 each
begin
put 33 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 34 each
begin
put 34 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 35 each
begin
put 35 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 36 each
begin
put 36 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 37 each
begin
put 37 to Record "DistData" Data
end
end
else
begin
//****
if Record "Matrix" Data index > Record "Matrix3" Data index each
begin
if Record "secondlast" Layout = number 0 each
begin
subtract 1 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 1 each
begin
subtract 21 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 2 each
begin
subtract 7 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 3 each
begin
subtract 36 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 4 each
begin
subtract 5 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 5 each
begin
subtract 20 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 6 each
begin
subtract 11 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 7 each
begin
subtract 32 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 8 each
begin
subtract 17 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 9 each
begin
subtract 28 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 10 each
begin
subtract 19 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 11 each
begin
subtract 15 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 12 each
begin
subtract 34 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 13 each
begin
subtract 13 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 14 each
begin
subtract 26 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 15 each
begin
subtract 3 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 16 each
begin
subtract 22 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 17 each
begin
subtract 9 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 18 each
begin
subtract 30 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 19 each
begin
subtract 4 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 20 each
begin
subtract 25 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 21 each
begin
subtract 6 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 22 each
begin
subtract 29 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 23 each
begin
subtract 18 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 24 each
begin
subtract 21 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 25 each
begin
subtract 8 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 26 each
begin
subtract 37 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 27 each
begin
subtract 12 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 28 each
begin
subtract 33 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 29 each
begin
subtract 31 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 30 each
begin
subtract 16 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 31 each
begin
subtract 27 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 32 each
begin
subtract 23 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 33 each
begin
subtract 34 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 34 each
begin
subtract 10 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 35 each
begin
subtract 35 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 36 each
begin
subtract 14 from Record "Matrix" Data index
end
// if flag "loop" false each
// begin
Set Max to Record "DistData" Data Index
Add 1 to Record "DistData" Data Index
// end
IF Record "Matrix" Data index = 1 each
begin
put 1 to Record "DistData" Data
end
IF Record "Matrix" Data index = 2 each
begin
put 2 to Record "DistData" Data
end
IF Record "Matrix" Data index = 3 each
begin
put 3 to Record "DistData" Data
end
IF Record "Matrix" Data index = 4 each
begin
put 4 to Record "DistData" Data
end
IF Record "Matrix" Data index = 5 each
begin
put 5 to Record "DistData" Data
end
IF Record "Matrix" Data index = 6 each
begin
put 6 to Record "DistData" Data
end
IF Record "Matrix" Data index = 7 each
begin
put 7 to Record "DistData" Data
end
IF Record "Matrix" Data index = 8 each
begin
put 8 to Record "DistData" Data
end
IF Record "Matrix" Data index = 9 each
begin
put 9 to Record "DistData" Data
end
IF Record "Matrix" Data index = 10 each
begin
put 10 to Record "DistData" Data
end
IF Record "Matrix" Data index = 11 each
begin
put 11 to Record "DistData" Data
end
IF Record "Matrix" Data index = 12 each
begin
put 12 to Record "DistData" Data
end
IF Record "Matrix" Data index = 13 each
begin
put 13 to Record "DistData" Data
end
IF Record "Matrix" Data index = 14 each
begin
put 14 to Record "DistData" Data
end
IF Record "Matrix" Data index = 15 each
begin
put 15 to Record "DistData" Data
end
IF Record "Matrix" Data index = 16 each
begin
put 16 to Record "DistData" Data
end
IF Record "Matrix" Data index = 17 each
begin
put 17 to Record "DistData" Data
end
IF Record "Matrix" Data index = 18 each
begin
put 18 to Record "DistData" Data
end
IF Record "Matrix" Data index = 19 each
begin
put 19 to Record "DistData" Data
end
IF Record "Matrix" Data index = 20 each
begin
put 20 to Record "DistData" Data
end
IF Record "Matrix" Data index = 21 each
begin
put 21 to Record "DistData" Data
end
IF Record "Matrix" Data index = 23 each
begin
put 23 to Record "DistData" Data
end
IF Record "Matrix" Data index = 24 each
begin
put 24 to Record "DistData" Data
end
IF Record "Matrix" Data index = 25 each
begin
put 25 to Record "DistData" Data
end
IF Record "Matrix" Data index = 26 each
begin
put 26 to Record "DistData" Data
end
IF Record "Matrix" Data index = 27 each
begin
put 27 to Record "DistData" Data
end
IF Record "Matrix" Data index = 28 each
begin
put 28 to Record "DistData" Data
end
IF Record "Matrix" Data index = 29 each
begin
put 29 to Record "DistData" Data
end
IF Record "Matrix" Data index = 30 each
begin
put 30 to Record "DistData" Data
end
IF Record "Matrix" Data index = 31 each
begin
put 31 to Record "DistData" Data
end
IF Record "Matrix" Data index = 32 each
begin
put 32 to Record "DistData" Data
end
IF Record "Matrix" Data index = 33 each
begin
put 33 to Record "DistData" Data
end
IF Record "Matrix" Data index = 34 each
begin
put 34 to Record "DistData" Data
end
IF Record "Matrix" Data index = 35 each
begin
put 35 to Record "DistData" Data
end
IF Record "Matrix" Data index = 36 each
begin
put 36 to Record "DistData" Data
end
IF Record "Matrix" Data index = 37 each
begin
put 37 to Record "DistData" Data
end
end
end
end
end
add 1 to Record "spin" Data index
put 11 to Record "DistData" Data
IF Record "DistData" Data = 1 each
begin
subtract 1 from Record "Matrix7" Data index
add 1 on Record "Matrix8" Data index
subtract 1 from Record "Matrix10" Data index
add 1 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 2 each
begin
subtract 2 from Record "Matrix7" Data index
add 2 on Record "Matrix8" Data index
subtract 2 from Record "Matrix10" Data index
add 2 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 3 each
begin
subtract 3 from Record "Matrix7" Data index
add 3 on Record "Matrix8" Data index
subtract 3 from Record "Matrix10" Data index
add 3 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 4 each
begin
subtract 4 from Record "Matrix7" Data
add 4 on Record "Matrix8" Data index
subtract 4 from Record "Matrix10" Data index
add 4 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 5 each
begin
subtract 5 from Record "Matrix7" Data index
add 5 on Record "Matrix8" Data index
subtract 5 from Record "Matrix10" Data index
add 5 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 6 each
begin
subtract 6 from Record "Matrix7" Data index
add 6 on Record "Matrix8" Data index
subtract 6 from Record "Matrix10" Data index
add 6 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 7 each
begin
subtract 7 from Record "Matrix7" Data index
add 7 on Record "Matrix8" Data index
subtract 7 from Record "Matrix10" Data index
add 7 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 8 each
begin
subtract 8 from Record "Matrix7" Data index
add 8 on Record "Matrix8" Data index
subtract 8 from Record "Matrix10" Data index
add 8 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 9 each
begin
subtract 9 from Record "Matrix7" Data index
add 9 on Record "Matrix8" Data index
subtract 9 from Record "Matrix10" Data index
add 9 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 10 each
begin
subtract 10 from Record "Matrix7" Data index
add 10 on Record "Matrix8" Data index
subtract 10 from Record "Matrix10" Data index
add 10 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 11 each
begin
subtract 11 from Record "Matrix7" Data index
add 11 on Record "Matrix8" Data index
subtract 11 from Record "Matrix10" Data index
add 11 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 12 each
begin
subtract 12 from Record "Matrix7" Data index
add 12 on Record "Matrix8" Data index
subtract 12 from Record "Matrix10" Data index
add 12 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 13 each
begin
subtract 13 from Record "Matrix7" Data index
add 13 on Record "Matrix8" Data index
subtract 13 from Record "Matrix10" Data index
add 13 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 14 each
begin
subtract 14 from Record "Matrix7" Data index
add 14 on Record "Matrix8" Data index
subtract 14 from Record "Matrix10" Data index
add 14 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 15 each
begin
subtract 15 from Record "Matrix7" Data index
add 15 on Record "Matrix8" Data index
subtract 15 from Record "Matrix10" Data index
add 15 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 16 each
begin
subtract 16 from Record "Matrix7" Data index
add 16 on Record "Matrix8" Data index
subtract 16 from Record "Matrix10" Data index
add 16 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 17 each
begin
subtract 17 from Record "Matrix7" Data index
add 17 on Record "Matrix8" Data index
subtract 17 from Record "Matrix10" Data index
add 17 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 18 each
begin
subtract 18 from Record "Matrix7" Data index
add 18 on Record "Matrix8" Data index
subtract 18 from Record "Matrix10" Data index
add 18 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 19 each
begin
subtract 19 from Record "Matrix7" Data index
add 19 on Record "Matrix8" Data index
subtract 19 from Record "Matrix10" Data index
add 19 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 20 each
begin
subtract 20 from Record "Matrix7" Data index
add 20 on Record "Matrix8" Data index
subtract 20 from Record "Matrix10" Data index
add 20 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 21 each
begin
subtract 21 from Record "Matrix7" Data index
add 21 on Record "Matrix8" Data index
subtract 21 from Record "Matrix10" Data index
add 21 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 22 each
begin
subtract 22 from Record "Matrix7" Data index
add 22 on Record "Matrix8" Data index
subtract 22 from Record "Matrix10" Data index
add 22 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 23 each
begin
subtract 23 from Record "Matrix7" Data index
add 23 on Record "Matrix8" Data index
subtract 23 from Record "Matrix10" Data index
add 23 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 24 each
begin
subtract 24 from Record "Matrix7" Data index
add 24 on Record "Matrix8" Data index
subtract 24 from Record "Matrix10" Data index
add 24 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 25 each
begin
subtract 25 from Record "Matrix7" Data index
add 25 on Record "Matrix8" Data index
subtract 25 from Record "Matrix10" Data index
add 25 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 26 each
begin
subtract 26 from Record "Matrix7" Data index
add 26 on Record "Matrix8" Data index
subtract 26 from Record "Matrix10" Data index
add 26 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 27 each
begin
subtract 27 from Record "Matrix7" Data index
add 27 on Record "Matrix8" Data index
subtract 27 from Record "Matrix10" Data index
add 27 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 28 each
begin
subtract 28 from Record "Matrix7" Data index
add 28 on Record "Matrix8" Data index
subtract 28 from Record "Matrix10" Data index
add 28 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 29 each
begin
subtract 29 from Record "Matrix7" Data index
add 29 on Record "Matrix8" Data index
subtract 29 from Record "Matrix10" Data index
add 29 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 30 each
begin
subtract 30 from Record "Matrix7" Data index
add 30 on Record "Matrix8" Data index
subtract 30 from Record "Matrix10" Data index
add 30 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 31 each
begin
subtract 31 from Record "Matrix7" Data index
add 31 on Record "Matrix8" Data index
subtract 31 from Record "Matrix10" Data index
add 31 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 32 each
begin
subtract 32 from Record "Matrix7" Data index
add 32 on Record "Matrix8" Data index
subtract 32 from Record "Matrix10" Data index
add 32 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 33 each
begin
subtract 33 from Record "Matrix7" Data index
add 33 on Record "Matrix8" Data index
subtract 33 from Record "Matrix10" Data index
add 33 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 34 each
begin
subtract 34 from Record "Matrix7" Data index
add 34 on Record "Matrix8" Data index
subtract 34 from Record "Matrix10" Data index
add 34 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 35 each
begin
subtract 35 from Record "Matrix7" Data index
add 35 on Record "Matrix8" Data index
subtract 35 from Record "Matrix10" Data index
add 35 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 36 each
begin
subtract 36 from Record "Matrix7" Data index
add 36 on Record "Matrix8" Data index
subtract 36 from Record "Matrix10" Data index
add 36 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 37 each
begin
subtract 37 from Record "Matrix7" Data index
add 37 on Record "Matrix8" Data index
subtract 37 from Record "Matrix10" Data index
add 37 on Record "Matrix11" Data index
end
Set Max to Record "Bet2" Layout Index
Add 1 to Record "Bet2" Layout Index
Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
if Record "Matrix7" Data index > 37 each
begin
subtract 37 from Record "Matrix7" data index
end
if Record "Matrix8" Data index > 37 each
begin
subtract 37 from Record "Matrix8" data index
end
if Record "Matrix10" Data index > 37 each
begin
subtract 37 from Record "Matrix10" data index
end
if Record "Matrix11" Data index > 37 each
begin
subtract 37 from Record "Matrix11" data index
end
if Record "Matrix7" Data index < 0 each
begin
add 37 to Record "Matrix7" data index
end
if Record "Matrix8" Data index < 0 each
begin
add 37 to Record "Matrix8" data index
end
if Record "Matrix10" Data index < 0 each
begin
add 37 to Record "Matrix10" data index
end
if Record "Matrix11" Data index < 0 each
begin
add 37 to Record "Matrix11" data index
end
if Record "Matrix7" Data index = 0 each
begin
put 1 to Record "Matrix7" data index
end
if Record "Matrix8" Data index = 0 each
begin
put 1 to Record "Matrix8" data index
end
if Record "Matrix10" Data index = 0 each
begin
put 1 to Record "Matrix10" data index
end
if Record "Matrix11" Data index = 0 each
begin
put 1 to Record "Matrix11" data index
end
Set Max to Record "Bet2" Layout Index
Add 1 to Record "Bet2" Layout Index
Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
IF Record "Matrix7" Data index = 1 each
begin
copy number 0 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 2 each
begin
copy number 32 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 3 each
begin
copy number 15 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 4 each
begin
copy number 19 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 5 each
begin
copy number 4 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 6 each
begin
copy number 21 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 7 each
begin
copy number 2 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 8 each
begin
copy number 25 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 9 each
begin
copy number 17 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 10 each
begin
copy number 34 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 11 each
begin
copy number 6 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 12 each
begin
copy number 27 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 13 each
begin
copy number 13 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 14 each
begin
copy number 36 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 15 each
begin
copy number 11 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 16 each
begin
copy number 30 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 17 each
begin
copy number 8 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 18 each
begin
copy number 23 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 19 each
begin
copy number 10 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 20 each
begin
copy number 5 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 21 each
begin
copy number 24 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 22 each
begin
copy number 16 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 23 each
begin
copy number 33 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 24 each
begin
copy number 1 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 25 each
begin
copy number 20 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 26 each
begin
copy number 14 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 27 each
begin
copy number 31 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 28 each
begin
copy number 9 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 29 each
begin
copy number 22 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 30 each
begin
copy number 18 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 31 each
begin
copy number 29 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 32 each
begin
copy number 7 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 33 each
begin
copy number 28 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 34 each
begin
copy number 12 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 35 each
begin
copy number 35 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 36 each
begin
copy number 3 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 37 each
begin
copy number 26 to Record "Bet" Layout
end
Put 3 on Neighbor Count
Copy Neighbors of Record "Bet" layout
to Record "Bet2" Layout
Put 100% of Record "progression" data to Record "Bet2" Layout list
Put 100% of Record "progression" data to Record "Bet" Layout list
Set Max to Record "Bet2" Layout Index
Add 1 to Record "Bet2" Layout Index
Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
IF Record "Matrix8" Data index = 1 each
begin
copy number 0 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 2 each
begin
copy number 32 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 3 each
begin
copy number 15 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 4 each
begin
copy number 19 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 5 each
begin
copy number 4 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 6 each
begin
copy number 21 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 7 each
begin
copy number 2 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 8 each
begin
copy number 25 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 9 each
begin
copy number 17 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 10 each
begin
copy number 34 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 11 each
begin
copy number 6 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 12 each
begin
copy number 27 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 13 each
begin
copy number 13 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 14 each
begin
copy number 36 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 15 each
begin
copy number 11 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 16 each
begin
copy number 30 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 17 each
begin
copy number 8 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 18 each
begin
copy number 23 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 19 each
begin
copy number 10 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 20 each
begin
copy number 5 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 21 each
begin
copy number 24 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 22 each
begin
copy number 16 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 23 each
begin
copy number 33 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 24 each
begin
copy number 1 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 25 each
begin
copy number 20 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 26 each
begin
copy number 14 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 27 each
begin
copy number 31 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 28 each
begin
copy number 9 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 29 each
begin
copy number 22 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 30 each
begin
copy number 18 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 31 each
begin
copy number 29 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 32 each
begin
copy number 7 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 33 each
begin
copy number 28 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 34 each
begin
copy number 12 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 35 each
begin
copy number 35 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 36 each
begin
copy number 3 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 37 each
begin
copy number 26 to Record "Bet" Layout
end
Put 3 on Neighbor Count
Copy Neighbors of Record "Bet" layout
to Record "Bet2" Layout
Put 100% of Record "progression" data to Record "Bet" Layout list
Put 100% of Record "progression" data to Record "Bet2" Layout list
{ Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
IF Record "Matrix10" Data index = 1 each
begin
copy number 0 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 2 each
begin
copy number 1 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 3 each
begin
copy number 2 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 4 each
begin
copy number 3 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 5 each
begin
copy number 4 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 6 each
begin
copy number 5 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 7 each
begin
copy number 6 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 8 each
begin
copy number 7 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 9 each
begin
copy number 8 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 10 each
begin
copy number 9 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 11 each
begin
copy number 10 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 12 each
begin
copy number 11 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 13 each
begin
copy number 12 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 14 each
begin
copy number 13 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 15 each
begin
copy number 14 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 16 each
begin
copy number 15 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 17 each
begin
copy number 16 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 18 each
begin
copy number 17 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 19 each
begin
copy number 18 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 20 each
begin
copy number 19 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 21 each
begin
copy number 20 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 22 each
begin
copy number 21 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 23 each
begin
copy number 22 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 24 each
begin
copy number 23 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 25 each
begin
copy number 24 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 26 each
begin
copy number 25 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 27 each
begin
copy number 26 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 28 each
begin
copy number 27 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 29 each
begin
copy number 28 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 30 each
begin
copy number 29 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 31 each
begin
copy number 30 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 32 each
begin
copy number 31 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 33 each
begin
copy number 32 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 34 each
begin
copy number 33 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 35 each
begin
copy number 34 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 36 each
begin
copy number 35 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 37 each
begin
copy number 36 to Record "Bet" Layout
end
Put 2 on Neighbor Count
Copy Neighbors of Record "Bet" layout
to Record "Bet2" Layout
Put 100% of Record "progression" data to Record "Bet2" Layout list
Put 100% of Record "progression" data to Record "Bet" Layout list
Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
IF Record "Matrix11" Data index = 1 each
begin
copy number 0 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 2 each
begin
copy number 1 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 3 each
begin
copy number 2 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 4 each
begin
copy number 3 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 5 each
begin
copy number 4 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 6 each
begin
copy number 5 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 7 each
begin
copy number 6 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 8 each
begin
copy number 7 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 9 each
begin
copy number 8 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 10 each
begin
copy number 9 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 11 each
begin
copy number 10 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 12 each
begin
copy number 11 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 13 each
begin
copy number 12 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 14 each
begin
copy number 13 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 15 each
begin
copy number 14 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 16 each
begin
copy number 15 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 17 each
begin
copy number 16 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 18 each
begin
copy number 17 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 19 each
begin
copy number 18 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 20 each
begin
copy number 19 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 21 each
begin
copy number 20 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 22 each
begin
copy number 21 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 23 each
begin
copy number 22 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 24 each
begin
copy number 23 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 25 each
begin
copy number 24 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 26 each
begin
copy number 25 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 27 each
begin
copy number 26 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 28 each
begin
copy number 27 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 29 each
begin
copy number 28 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 30 each
begin
copy number 29 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 31 each
begin
copy number 30 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 32 each
begin
copy number 31 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 33 each
begin
copy number 32 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 34 each
begin
copy number 33 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 35 each
begin
copy number 34 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 36 each
begin
copy number 35 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 37 each
begin
copy number 36 to Record "Bet" Layout
end
}
set flag "loop" true
{ Put 2 on Neighbor Count
Copy Neighbors of Record "Bet" layout
to Record "Bet2" Layout
Put 100% of Record "progression" data to Record "Bet2" Layout list
Put 100% of Record "progression" data to Record "Bet" Layout list
}
// subtract 1 to Record "last" Layout index
// subtract 1 to Record "DistData" Data index
//subtract 1 to Record "secondlast" Layout index
end
end
{
IF Record "LastBetMatrix" Layout index >= 4
begin
//duplicate Record "DistData" to Record "DistDataTEMP"
loop until Record "last" Layout index = 1
begin
//set max to Record "LastBetMatrix2" Layout index
//set max to Record "LastBetMatrix" Layout index
//set max to Record "secondlast" Layout index
//set flag "loop" true
//duplicate Record "DistData" to Record "DistData2"
//loop until Record "LastBetMatrix2" Layout index = 0
//begin
duplicate Record "Matrix9" to Record "Matrix7"
if Record "LastBetMatrix" Layout = number 0 each
begin
put 1 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 1 each
begin
put 21 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 2 each
begin
put 7 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 3 each
begin
put 36 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 4 each
begin
put 5 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 5 each
begin
put 20 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 6 each
begin
put 11 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 7 each
begin
put 32 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 8 each
begin
put 17 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 9 each
begin
put 28 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 10 each
begin
put 19 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 11 each
begin
put 15 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 12 each
begin
put 34 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 13 each
begin
put 13 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 14 each
begin
put 26 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 15 each
begin
put 3 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 16 each
begin
put 22 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 17 each
begin
put 9 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 18 each
begin
put 30 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 19 each
begin
put 4 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 20 each
begin
put 25 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 21 each
begin
put 6 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 22 each
begin
put 29 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 23 each
begin
put 18 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 24 each
begin
put 21 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 25 each
begin
put 8 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 26 each
begin
put 37 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 27 each
begin
put 12 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 28 each
begin
put 33 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 29 each
begin
put 31 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 30 each
begin
put 16 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 31 each
begin
put 27 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 32 each
begin
put 2 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 33 each
begin
put 23 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 34 each
begin
put 10 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 35 each
begin
put 35 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 36 each
begin
put 14 to Record "Matrix7" Data index
end
duplicate Record "Matrix7" to Record "Matrix8"
duplicate Record "Matrix7" to Record "Matrix"
duplicate Record "Matrix7" to Record "Matrix2"
duplicate Record "Matrix7" to Record "Matrix5"
//duplicate Record "Matrix7" to Record "last"
//==========
duplicate Record "Matrix9" to Record "Matrix10"
if Record "secondlast" Layout = number 0 each
begin
put 1 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 1 each
begin
put 21 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 2 each
begin
put 7 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 3 each
begin
put 36 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 4 each
begin
put 5 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 5 each
begin
put 20 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 6 each
begin
put 11 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 7 each
begin
put 32 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 8 each
begin
put 17 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 9 each
begin
put 28 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 10 each
begin
put 19 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 11 each
begin
put 15 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 12 each
begin
put 34 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 13 each
begin
put 13 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 14 each
begin
put 26 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 15 each
begin
put 3 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 16 each
begin
put 22 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 17 each
begin
put 9 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 18 each
begin
put 30 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 19 each
begin
put 4 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 20 each
begin
put 25 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 21 each
begin
put 6 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 22 each
begin
put 29 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 23 each
begin
put 18 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 24 each
begin
put 21 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 25 each
begin
put 8 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 26 each
begin
put 37 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 27 each
begin
put 12 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 28 each
begin
put 33 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 29 each
begin
put 31 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 30 each
begin
put 16 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 31 each
begin
put 27 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 32 each
begin
put 2 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 33 each
begin
put 23 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 34 each
begin
put 10 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 35 each
begin
put 35 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 36 each
begin
put 14 to Record "Matrix10" Data index
end
duplicate Record "Matrix10" to Record "Matrix11"
duplicate Record "Matrix10" to Record "Matrix3"
duplicate Record "Matrix10" to Record "Matrix4"
duplicate Record "Matrix10" to Record "Matrix6"
IF flag "loop" false each
begin
//==Dist Calc===
duplicate Record "last" to Record "temp"
// duplicate Record "LastBetMatrix" to Record "last"
duplicate Record "Matrix7" to Record "Matrix"
duplicate Record "Matrix10" to Record "Matrix3"
if Record "Matrix" Data index < Record "Matrix3" Data index each
begin
if Record "last" Layout = number 0 each
begin
subtract 1 from Record "Matrix3" Data index
end
if Record "last" Layout = number 1 each
begin
subtract 21 from Record "Matrix3" Data index
end
if Record "last" Layout = number 2 each
begin
subtract 7 from Record "Matrix3" Data index
end
if Record "last" Layout = number 3 each
begin
subtract 36 from Record "Matrix3" Data index
end
if Record "last" Layout = number 4 each
begin
subtract 5 from Record "Matrix3" Data index
end
if Record "last" Layout = number 5 each
begin
subtract 20 from Record "Matrix3" Data index
end
if Record "last" Layout = number 6 each
begin
subtract 11 from Record "Matrix3" Data index
end
if Record "last" Layout = number 7 each
begin
subtract 32 from Record "Matrix3" Data index
end
if Record "last" Layout = number 8 each
begin
subtract 17 from Record "Matrix3" Data index
end
if Record "last" Layout = number 9 each
begin
subtract 28 from Record "Matrix3" Data index
end
if Record "last" Layout = number 10 each
begin
subtract 19 from Record "Matrix3" Data index
end
if Record "last" Layout = number 11 each
begin
subtract 15 from Record "Matrix3" Data index
end
if Record "last" Layout = number 12 each
begin
subtract 34 from Record "Matrix3" Data index
end
if Record "last" Layout = number 13 each
begin
subtract 13 from Record "Matrix3" Data index
end
if Record "last" Layout = number 14 each
begin
subtract 26 from Record "Matrix3" Data index
end
if Record "last" Layout = number 15 each
begin
subtract 3 from Record "Matrix3" Data index
end
if Record "last" Layout = number 16 each
begin
subtract 22 from Record "Matrix3" Data index
end
if Record "last" Layout = number 17 each
begin
subtract 9 from Record "Matrix3" Data index
end
if Record "last" Layout = number 18 each
begin
subtract 30 from Record "Matrix3" Data index
end
if Record "last" Layout = number 19 each
begin
subtract 4 from Record "Matrix3" Data index
end
if Record "last" Layout = number 20 each
begin
subtract 25 from Record "Matrix3" Data index
end
if Record "last" Layout = number 21 each
begin
subtract 6 from Record "Matrix3" Data index
end
if Record "last" Layout = number 22 each
begin
subtract 29 from Record "Matrix3" Data index
end
if Record "last" Layout = number 23 each
begin
subtract 18 from Record "Matrix3" Data index
end
if Record "last" Layout = number 24 each
begin
subtract 21 from Record "Matrix3" Data index
end
if Record "last" Layout = number 25 each
begin
subtract 8 from Record "Matrix3" Data index
end
if Record "last" Layout = number 26 each
begin
subtract 37 from Record "Matrix3" Data index
end
if Record "last" Layout = number 27 each
begin
subtract 12 from Record "Matrix3" Data index
end
if Record "last" Layout = number 28 each
begin
subtract 33 from Record "Matrix3" Data index
end
if Record "last" Layout = number 29 each
begin
subtract 31 from Record "Matrix3" Data index
end
if Record "last" Layout = number 30 each
begin
subtract 16 from Record "Matrix3" Data index
end
if Record "last" Layout = number 31 each
begin
subtract 27 from Record "Matrix3" Data index
end
if Record "last" Layout = number 32 each
begin
subtract 2 from Record "Matrix3" Data index
end
if Record "last" Layout = number 33 each
begin
subtract 23 from Record "Matrix3" Data index
end
if Record "last" Layout = number 34 each
begin
subtract 10 from Record "Matrix3" Data index
end
if Record "last" Layout = number 35 each
begin
subtract 35 from Record "Matrix3" Data index
end
if Record "last" Layout = number 36 each
begin
subtract 14 from Record "Matrix3" Data index
end
// if flag "loop" false each
// begin
Set Max to Record "DistData" Data Index
Add 1 to Record "DistData" Data Index
// end
IF Record "Matrix3" Data index = 1 each
begin
put 1 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 2 each
begin
put 2 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 3 each
begin
put 3 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 4 each
begin
put 4 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 5 each
begin
put 5 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 6 each
begin
put 6 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 7 each
begin
put 7 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 8 each
begin
put 8 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 9 each
begin
put 9 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 10 each
begin
put 10 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 11 each
begin
put 11 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 12 each
begin
put 12 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 13 each
begin
put 13 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 14 each
begin
put 14 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 15 each
begin
put 15 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 16 each
begin
put 16 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 17 each
begin
put 17 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 18 each
begin
put 18 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 19 each
begin
put 19 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 20 each
begin
put 20 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 21 each
begin
put 21 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 23 each
begin
put 23 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 24 each
begin
put 24 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 25 each
begin
put 25 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 26 each
begin
put 26 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 27 each
begin
put 27 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 28 each
begin
put 28 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 29 each
begin
put 29 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 30 each
begin
put 30 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 31 each
begin
put 31 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 32 each
begin
put 32 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 33 each
begin
put 33 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 34 each
begin
put 34 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 35 each
begin
put 35 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 36 each
begin
put 36 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 37 each
begin
put 37 to Record "DistData" Data
end
end
else
begin
//****
if Record "Matrix" Data index > Record "Matrix3" Data index each
begin
if Record "secondlast" Layout = number 0 each
begin
subtract 1 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 1 each
begin
subtract 21 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 2 each
begin
subtract 7 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 3 each
begin
subtract 36 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 4 each
begin
subtract 5 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 5 each
begin
subtract 20 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 6 each
begin
subtract 11 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 7 each
begin
subtract 32 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 8 each
begin
subtract 17 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 9 each
begin
subtract 28 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 10 each
begin
subtract 19 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 11 each
begin
subtract 15 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 12 each
begin
subtract 34 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 13 each
begin
subtract 13 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 14 each
begin
subtract 26 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 15 each
begin
subtract 3 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 16 each
begin
subtract 22 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 17 each
begin
subtract 9 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 18 each
begin
subtract 30 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 19 each
begin
subtract 4 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 20 each
begin
subtract 25 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 21 each
begin
subtract 6 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 22 each
begin
subtract 29 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 23 each
begin
subtract 18 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 24 each
begin
subtract 21 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 25 each
begin
subtract 8 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 26 each
begin
subtract 37 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 27 each
begin
subtract 12 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 28 each
begin
subtract 33 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 29 each
begin
subtract 31 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 30 each
begin
subtract 16 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 31 each
begin
subtract 27 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 32 each
begin
subtract 23 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 33 each
begin
subtract 34 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 34 each
begin
subtract 10 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 35 each
begin
subtract 35 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 36 each
begin
subtract 14 from Record "Matrix" Data index
end
// if flag "loop" false each
// begin
Set Max to Record "DistData" Data Index
Add 1 to Record "DistData" Data Index
// end
IF Record "Matrix" Data index = 1 each
begin
put 1 to Record "DistData" Data
end
IF Record "Matrix" Data index = 2 each
begin
put 2 to Record "DistData" Data
end
IF Record "Matrix" Data index = 3 each
begin
put 3 to Record "DistData" Data
end
IF Record "Matrix" Data index = 4 each
begin
put 4 to Record "DistData" Data
end
IF Record "Matrix" Data index = 5 each
begin
put 5 to Record "DistData" Data
end
IF Record "Matrix" Data index = 6 each
begin
put 6 to Record "DistData" Data
end
IF Record "Matrix" Data index = 7 each
begin
put 7 to Record "DistData" Data
end
IF Record "Matrix" Data index = 8 each
begin
put 8 to Record "DistData" Data
end
IF Record "Matrix" Data index = 9 each
begin
put 9 to Record "DistData" Data
end
IF Record "Matrix" Data index = 10 each
begin
put 10 to Record "DistData" Data
end
IF Record "Matrix" Data index = 11 each
begin
put 11 to Record "DistData" Data
end
IF Record "Matrix" Data index = 12 each
begin
put 12 to Record "DistData" Data
end
IF Record "Matrix" Data index = 13 each
begin
put 13 to Record "DistData" Data
end
IF Record "Matrix" Data index = 14 each
begin
put 14 to Record "DistData" Data
end
IF Record "Matrix" Data index = 15 each
begin
put 15 to Record "DistData" Data
end
IF Record "Matrix" Data index = 16 each
begin
put 16 to Record "DistData" Data
end
IF Record "Matrix" Data index = 17 each
begin
put 17 to Record "DistData" Data
end
IF Record "Matrix" Data index = 18 each
begin
put 18 to Record "DistData" Data
end
IF Record "Matrix" Data index = 19 each
begin
put 19 to Record "DistData" Data
end
IF Record "Matrix" Data index = 20 each
begin
put 20 to Record "DistData" Data
end
IF Record "Matrix" Data index = 21 each
begin
put 21 to Record "DistData" Data
end
IF Record "Matrix" Data index = 23 each
begin
put 23 to Record "DistData" Data
end
IF Record "Matrix" Data index = 24 each
begin
put 24 to Record "DistData" Data
end
IF Record "Matrix" Data index = 25 each
begin
put 25 to Record "DistData" Data
end
IF Record "Matrix" Data index = 26 each
begin
put 26 to Record "DistData" Data
end
IF Record "Matrix" Data index = 27 each
begin
put 27 to Record "DistData" Data
end
IF Record "Matrix" Data index = 28 each
begin
put 28 to Record "DistData" Data
end
IF Record "Matrix" Data index = 29 each
begin
put 29 to Record "DistData" Data
end
IF Record "Matrix" Data index = 30 each
begin
put 30 to Record "DistData" Data
end
IF Record "Matrix" Data index = 31 each
begin
put 31 to Record "DistData" Data
end
IF Record "Matrix" Data index = 32 each
begin
put 32 to Record "DistData" Data
end
IF Record "Matrix" Data index = 33 each
begin
put 33 to Record "DistData" Data
end
IF Record "Matrix" Data index = 34 each
begin
put 34 to Record "DistData" Data
end
IF Record "Matrix" Data index = 35 each
begin
put 35 to Record "DistData" Data
end
IF Record "Matrix" Data index = 36 each
begin
put 36 to Record "DistData" Data
end
IF Record "Matrix" Data index = 37 each
begin
put 37 to Record "DistData" Data
end
end
end
end
IF Record "DistData" Data = 1 each
begin
subtract 1 from Record "Matrix7" Data index
add 1 on Record "Matrix8" Data index
subtract 1 from Record "Matrix10" Data index
add 1 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 2 each
begin
subtract 2 from Record "Matrix7" Data index
add 2 on Record "Matrix8" Data index
subtract 2 from Record "Matrix10" Data index
add 2 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 3 each
begin
subtract 3 from Record "Matrix7" Data index
add 3 on Record "Matrix8" Data index
subtract 3 from Record "Matrix10" Data index
add 3 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 4 each
begin
subtract 4 from Record "Matrix7" Data
add 4 on Record "Matrix8" Data index
subtract 4 from Record "Matrix10" Data index
add 4 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 5 each
begin
subtract 5 from Record "Matrix7" Data index
add 5 on Record "Matrix8" Data index
subtract 5 from Record "Matrix10" Data index
add 5 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 6 each
begin
subtract 6 from Record "Matrix7" Data index
add 6 on Record "Matrix8" Data index
subtract 6 from Record "Matrix10" Data index
add 6 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 7 each
begin
subtract 7 from Record "Matrix7" Data index
add 7 on Record "Matrix8" Data index
subtract 7 from Record "Matrix10" Data index
add 7 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 8 each
begin
subtract 8 from Record "Matrix7" Data index
add 8 on Record "Matrix8" Data index
subtract 8 from Record "Matrix10" Data index
add 8 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 9 each
begin
subtract 9 from Record "Matrix7" Data index
add 9 on Record "Matrix8" Data index
subtract 9 from Record "Matrix10" Data index
add 9 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 10 each
begin
subtract 10 from Record "Matrix7" Data index
add 10 on Record "Matrix8" Data index
subtract 10 from Record "Matrix10" Data index
add 10 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 11 each
begin
subtract 11 from Record "Matrix7" Data index
add 11 on Record "Matrix8" Data index
subtract 11 from Record "Matrix10" Data index
add 11 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 12 each
begin
subtract 12 from Record "Matrix7" Data index
add 12 on Record "Matrix8" Data index
subtract 12 from Record "Matrix10" Data index
add 12 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 13 each
begin
subtract 13 from Record "Matrix7" Data index
add 13 on Record "Matrix8" Data index
subtract 13 from Record "Matrix10" Data index
add 13 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 14 each
begin
subtract 14 from Record "Matrix7" Data index
add 14 on Record "Matrix8" Data index
subtract 14 from Record "Matrix10" Data index
add 14 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 15 each
begin
subtract 15 from Record "Matrix7" Data index
add 15 on Record "Matrix8" Data index
subtract 15 from Record "Matrix10" Data index
add 15 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 16 each
begin
subtract 16 from Record "Matrix7" Data index
add 16 on Record "Matrix8" Data index
subtract 16 from Record "Matrix10" Data index
add 16 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 17 each
begin
subtract 17 from Record "Matrix7" Data index
add 17 on Record "Matrix8" Data index
subtract 17 from Record "Matrix10" Data index
add 17 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 18 each
begin
subtract 18 from Record "Matrix7" Data index
add 18 on Record "Matrix8" Data index
subtract 18 from Record "Matrix10" Data index
add 18 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 19 each
begin
subtract 19 from Record "Matrix7" Data index
add 19 on Record "Matrix8" Data index
subtract 19 from Record "Matrix10" Data index
add 19 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 20 each
begin
subtract 20 from Record "Matrix7" Data index
add 20 on Record "Matrix8" Data index
subtract 20 from Record "Matrix10" Data index
add 20 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 21 each
begin
subtract 21 from Record "Matrix7" Data index
add 21 on Record "Matrix8" Data index
subtract 21 from Record "Matrix10" Data index
add 21 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 22 each
begin
subtract 22 from Record "Matrix7" Data index
add 22 on Record "Matrix8" Data index
subtract 22 from Record "Matrix10" Data index
add 22 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 23 each
begin
subtract 23 from Record "Matrix7" Data index
add 23 on Record "Matrix8" Data index
subtract 23 from Record "Matrix10" Data index
add 23 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 24 each
begin
subtract 24 from Record "Matrix7" Data index
add 24 on Record "Matrix8" Data index
subtract 24 from Record "Matrix10" Data index
add 24 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 25 each
begin
subtract 25 from Record "Matrix7" Data index
add 25 on Record "Matrix8" Data index
subtract 25 from Record "Matrix10" Data index
add 25 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 26 each
begin
subtract 26 from Record "Matrix7" Data index
add 26 on Record "Matrix8" Data index
subtract 26 from Record "Matrix10" Data index
add 26 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 27 each
begin
subtract 27 from Record "Matrix7" Data index
add 27 on Record "Matrix8" Data index
subtract 27 from Record "Matrix10" Data index
add 27 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 28 each
begin
subtract 28 from Record "Matrix7" Data index
add 28 on Record "Matrix8" Data index
subtract 28 from Record "Matrix10" Data index
add 28 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 29 each
begin
subtract 29 from Record "Matrix7" Data index
add 29 on Record "Matrix8" Data index
subtract 29 from Record "Matrix10" Data index
add 29 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 30 each
begin
subtract 30 from Record "Matrix7" Data index
add 30 on Record "Matrix8" Data index
subtract 30 from Record "Matrix10" Data index
add 30 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 31 each
begin
subtract 31 from Record "Matrix7" Data index
add 31 on Record "Matrix8" Data index
subtract 31 from Record "Matrix10" Data index
add 31 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 32 each
begin
subtract 32 from Record "Matrix7" Data index
add 32 on Record "Matrix8" Data index
subtract 32 from Record "Matrix10" Data index
add 32 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 33 each
begin
subtract 33 from Record "Matrix7" Data index
add 33 on Record "Matrix8" Data index
subtract 33 from Record "Matrix10" Data index
add 33 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 34 each
begin
subtract 34 from Record "Matrix7" Data index
add 34 on Record "Matrix8" Data index
subtract 34 from Record "Matrix10" Data index
add 34 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 35 each
begin
subtract 35 from Record "Matrix7" Data index
add 35 on Record "Matrix8" Data index
subtract 35 from Record "Matrix10" Data index
add 35 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 36 each
begin
subtract 36 from Record "Matrix7" Data index
add 36 on Record "Matrix8" Data index
subtract 36 from Record "Matrix10" Data index
add 36 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 37 each
begin
subtract 37 from Record "Matrix7" Data index
add 37 on Record "Matrix8" Data index
subtract 37 from Record "Matrix10" Data index
add 37 on Record "Matrix11" Data index
end
Set Max to Record "Bet2" Layout Index
Add 1 to Record "Bet2" Layout Index
Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
if Record "Matrix7" Data index > 37 each
begin
subtract 37 from Record "Matrix7" data index
end
if Record "Matrix8" Data index > 37 each
begin
subtract 37 from Record "Matrix8" data index
end
if Record "Matrix10" Data index > 37 each
begin
subtract 37 from Record "Matrix10" data index
end
if Record "Matrix11" Data index > 37 each
begin
subtract 37 from Record "Matrix11" data index
end
if Record "Matrix7" Data index < 0 each
begin
add 37 to Record "Matrix7" data index
end
if Record "Matrix8" Data index < 0 each
begin
add 37 to Record "Matrix8" data index
end
if Record "Matrix10" Data index < 0 each
begin
add 37 to Record "Matrix10" data index
end
if Record "Matrix11" Data index < 0 each
begin
add 37 to Record "Matrix11" data index
end
if Record "Matrix7" Data index = 0 each
begin
put 1 to Record "Matrix7" data index
end
if Record "Matrix8" Data index = 0 each
begin
put 1 to Record "Matrix8" data index
end
if Record "Matrix10" Data index = 0 each
begin
put 1 to Record "Matrix10" data index
end
if Record "Matrix11" Data index = 0 each
begin
put 1 to Record "Matrix11" data index
end
{
Set Max to Record "Bet2" Layout Index
Add 1 to Record "Bet2" Layout Index
Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
IF Record "Matrix7" Data index = 1 each
begin
copy number 0 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 2 each
begin
copy number 32 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 3 each
begin
copy number 15 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 4 each
begin
copy number 19 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 5 each
begin
copy number 4 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 6 each
begin
copy number 21 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 7 each
begin
copy number 2 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 8 each
begin
copy number 25 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 9 each
begin
copy number 17 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 10 each
begin
copy number 34 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 11 each
begin
copy number 6 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 12 each
begin
copy number 27 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 13 each
begin
copy number 13 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 14 each
begin
copy number 36 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 15 each
begin
copy number 11 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 16 each
begin
copy number 30 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 17 each
begin
copy number 8 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 18 each
begin
copy number 23 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 19 each
begin
copy number 10 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 20 each
begin
copy number 5 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 21 each
begin
copy number 24 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 22 each
begin
copy number 16 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 23 each
begin
copy number 33 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 24 each
begin
copy number 1 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 25 each
begin
copy number 20 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 26 each
begin
copy number 14 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 27 each
begin
copy number 31 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 28 each
begin
copy number 9 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 29 each
begin
copy number 22 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 30 each
begin
copy number 18 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 31 each
begin
copy number 29 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 32 each
begin
copy number 7 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 33 each
begin
copy number 28 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 34 each
begin
copy number 12 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 35 each
begin
copy number 35 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 36 each
begin
copy number 3 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 37 each
begin
copy number 26 to Record "Bet" Layout
end
{Put 1 on Neighbor Count
Copy Neighbors of Record "Bet" layout
to Record "Bet2" Layout
Put 100% of Record "progression" data to Record "Bet2" Layout list
Put 100% of Record "progression" data to Record "Bet" Layout list
Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
{ Set Max to Record "Bet2" Layout Index
Add 1 to Record "Bet2" Layout Index
IF Record "Matrix8" Data index = 1 each
begin
copy number 0 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 2 each
begin
copy number 32 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 3 each
begin
copy number 15 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 4 each
begin
copy number 19 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 5 each
begin
copy number 4 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 6 each
begin
copy number 21 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 7 each
begin
copy number 2 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 8 each
begin
copy number 25 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 9 each
begin
copy number 17 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 10 each
begin
copy number 34 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 11 each
begin
copy number 6 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 12 each
begin
copy number 27 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 13 each
begin
copy number 13 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 14 each
begin
copy number 36 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 15 each
begin
copy number 11 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 16 each
begin
copy number 30 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 17 each
begin
copy number 8 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 18 each
begin
copy number 23 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 19 each
begin
copy number 10 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 20 each
begin
copy number 5 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 21 each
begin
copy number 24 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 22 each
begin
copy number 16 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 23 each
begin
copy number 33 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 24 each
begin
copy number 1 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 25 each
begin
copy number 20 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 26 each
begin
copy number 14 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 27 each
begin
copy number 31 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 28 each
begin
copy number 9 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 29 each
begin
copy number 22 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 30 each
begin
copy number 18 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 31 each
begin
copy number 29 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 32 each
begin
copy number 7 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 33 each
begin
copy number 28 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 34 each
begin
copy number 12 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 35 each
begin
copy number 35 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 36 each
begin
copy number 3 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 37 each
begin
copy number 26 to Record "Bet" Layout
end
{ Put 1 on Neighbor Count
Copy Neighbors of Record "Bet" layout
to Record "Bet2" Layout
Put 100% of Record "progression" data to Record "Bet" Layout list
Put 100% of Record "progression" data to Record "Bet" Layout list }
{ Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
IF Record "Matrix10" Data index = 1 each
begin
copy number 0 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 2 each
begin
copy number 1 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 3 each
begin
copy number 2 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 4 each
begin
copy number 3 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 5 each
begin
copy number 4 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 6 each
begin
copy number 5 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 7 each
begin
copy number 6 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 8 each
begin
copy number 7 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 9 each
begin
copy number 8 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 10 each
begin
copy number 9 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 11 each
begin
copy number 10 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 12 each
begin
copy number 11 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 13 each
begin
copy number 12 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 14 each
begin
copy number 13 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 15 each
begin
copy number 14 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 16 each
begin
copy number 15 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 17 each
begin
copy number 16 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 18 each
begin
copy number 17 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 19 each
begin
copy number 18 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 20 each
begin
copy number 19 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 21 each
begin
copy number 20 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 22 each
begin
copy number 21 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 23 each
begin
copy number 22 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 24 each
begin
copy number 23 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 25 each
begin
copy number 24 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 26 each
begin
copy number 25 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 27 each
begin
copy number 26 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 28 each
begin
copy number 27 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 29 each
begin
copy number 28 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 30 each
begin
copy number 29 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 31 each
begin
copy number 30 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 32 each
begin
copy number 31 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 33 each
begin
copy number 32 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 34 each
begin
copy number 33 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 35 each
begin
copy number 34 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 36 each
begin
copy number 35 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 37 each
begin
copy number 36 to Record "Bet" Layout
end
Put 100% of Record "progression" data to Record "Bet" Layout list
Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
IF Record "Matrix11" Data index = 1 each
begin
copy number 0 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 2 each
begin
copy number 1 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 3 each
begin
copy number 2 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 4 each
begin
copy number 3 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 5 each
begin
copy number 4 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 6 each
begin
copy number 5 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 7 each
begin
copy number 6 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 8 each
begin
copy number 7 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 9 each
begin
copy number 8 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 10 each
begin
copy number 9 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 11 each
begin
copy number 10 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 12 each
begin
copy number 11 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 13 each
begin
copy number 12 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 14 each
begin
copy number 13 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 15 each
begin
copy number 14 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 16 each
begin
copy number 15 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 17 each
begin
copy number 16 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 18 each
begin
copy number 17 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 19 each
begin
copy number 18 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 20 each
begin
copy number 19 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 21 each
begin
copy number 20 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 22 each
begin
copy number 21 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 23 each
begin
copy number 22 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 24 each
begin
copy number 23 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 25 each
begin
copy number 24 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 26 each
begin
copy number 25 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 27 each
begin
copy number 26 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 28 each
begin
copy number 27 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 29 each
begin
copy number 28 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 30 each
begin
copy number 29 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 31 each
begin
copy number 30 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 32 each
begin
copy number 31 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 33 each
begin
copy number 32 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 34 each
begin
copy number 33 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 35 each
begin
copy number 34 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 36 each
begin
copy number 35 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 37 each
begin
copy number 36 to Record "Bet" Layout
end
]
set flag "loop" true
Put 100% of Record "progression" data to Record "Bet" Layout list
subtract 1 to Record "last" Layout index
subtract 1 to Record "DistData" Data index
//subtract 1 to Record "secondlast" Layout index
end
end }
{
set max to Record "DistData" Data index
set max to Record "last" Layout index
set max to Record "secondlast" Layout index
set max to Record "LastBetMatrix" Layout index
set max to Record "LastBetMatrix2" Layout index
}
{ if total spin count >= 300 each
begin
stop session
end
}
if total bankroll <= -1000 each
begin
{ add 1 to record "lost sessions" data index
put 0 on total bankroll
put 1 on Record "progression" Data Index
}
stop session
end
if total bankroll >= 1000 each
begin
{ add 1 to record "won sessions" data index
put 0 on total bankroll
put 1 on Record "progression" Data Index
}
stop session
end
If Record "progression" Data Index >
Record "progression" Data Count each
Begin
Put 1 on Record "progression" Data Index
clear Record "DistData" Layout
clear Record "Bet" Layout
clear Record "secondlast" Layout
clear Record "last" Layout
clear Record "Matrix" Layout
clear Record "Matrix1" Layout
clear Record "Matrix2" Layout
clear Record "Matrix3" Layout
clear Record "Matrix4" Layout
clear Record "Matrix5" Layout
clear Record "Matrix6" Layout
clear Record "Matrix7" Layout
clear Record "Matrix8" Layout
clear Record "Matrix9" Layout
clear Record "Matrix10" Layout
clear Record "Matrix11" Layout
clear Record "Matrix12" Layout
clear Record "Matrix13" Layout
clear Record "LastBetMatrix" Layout
End
Set Max to Record "secondlast" Layout Index
Add 1 to Record "secondlast" Layout Index
copy last Number to Record "secondlast" Layout
{ clear Record "Matrix" Layout
clear Record "Matrix1" Layout
clear Record "Matrix2" Layout
clear Record "Matrix3" Layout
clear Record "Matrix4" Layout
clear Record "Matrix5" Layout
clear Record "Matrix6" Layout
clear Record "Matrix7" Layout
clear Record "Matrix8" Layout }
// clear Record "last" Layout
set flag "loop" false
//
// clear Record "temp" layout
END
What do you mean 'can calculate a new distance'? Sometimes can bet let's say 12 or 16 numbers? It auto calibrates the number of neighbors? Ok, I will try to read and understand the code
Quote from: Serendipity on Feb 01, 06:24 AM 2020
:question:What do you mean 'can calculate a new distance'? Sometimes can bet let's say 12 or 16 numbers? It auto calibrates the number of neighbors?
its coded to bet same distance as previous spins distance, i tried that but had no good results, so i now use a static distance of 11 pockets away on each side (for each spin)... General said 11 pockets was the most common distance (from statistics).... neigbours is 3+3+1 numbers 7 numbers on each side bet. total bet 14 numbers.
Why would it be any specific distance for all wheels and in all conditions?
In what conditions exactly is there an edge?
What are the exact causes and effects?
How are you verifying the edge? Whats the statistical analysis?
How are you dealing with variable changes?
How are you ensuring accuracy is maintained as variables constantly change?
You missed a whole lot.
Quote from: Steve on Feb 01, 07:00 AM 2020In what conditions exactly is there an edge?
This is the only question i can answer,... and? that must be to find some kind of "trigger" i haven´t figured out yet... or else that must be to compare different distances and see how/If they Relate...
The code can calculate for each spin and it tracks the amount 11 pockets not to hit at x spins then bet?
That is no difference to balvinder system.
The idea is like a sleeper isnt or am I wrong?
Quote from: Macro on Feb 01, 07:48 AM 2020
The code can calculate for each spin and it tracks the amount 11 pockets not to hit at x spins then bet?
That is no difference to balvinder system.
The idea is like a sleeper isnt or am I wrong?
yes it can...i can make that code.
now, i just changed somethings (dont know if it made any difference winrate still about 70-80%).
But i changed the code so it *wont* make a bet UNTIL the Virtual Sector (non-bet) sector has hit. THEN it will only BET for 2 spins, then STOP. (and wait for a new trigger, a new hit of the virtual sector etc..)
Test, and also if you have other ideas of a trigger...
Version 2system "Dealers Signature v.2"
// © ignatus 2019 ©
method "main"
begin
while starting a new session
begin
Set List[1,1,2,3,5,8,13,21,32,55,89,144,233,377,610,987]
to Record "progression" Data
Set List[1,2,3,4,5,6,7,8] to Record "spin" Data
Set List[1,2,3,4,5,6,7,8,9,10,11,12] to Record "spin2" Data
Set List [0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,
37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73]
to Record "Matrix" Data
Set List [0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,
37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73]
to Record "Matrix2" Data
Set List [0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,
37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73]
to Record "Matrix3" Data
Set List [0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,
37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73]
to Record "Matrix4" Data
Set List [0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,
37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73]
to Record "Matrix9" Data
copy List[number 0,number 32,number 15,number 19,number 4,number 21,number 2,
number 25,number 17,number 34,number 6,number 27,number 13,number 36,
number 11,number 30,number 8,number 23,number 10,number 5,number 24,
number 16,number 33,number 1,number 20,number 14,number 31,number 9,
number 22,number 18,number 29,number 7,number 28,number 12,number 35,
number 3,number 26]
to Record "Wheel" Layout
{ Set List [0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,
37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73]
to Record "DistData" Data
}
end
put 0 to Record "Highest Bankroll" Data
while on each spin
begin
Track last Number for 4 spins to Record "track" layout
Track last Number for 1 spins to Record "current" layout
IF Record "track" layout index >= 5 each
begin
clear Record "track" layout
set flag "loop" false
end
IF any inside bet lost each
begin
add 1 on Record "progression" Data Index
clear Record "Bet" Layout
clear Record "Bet2" Layout
clear Record "Bet3" Layout
clear Record "Bet4" Layout
// Put 100% of Record "progression" data to Record "Bet" Layout list
// Put 100% of Record "progression" data to Record "Bet2" Layout list
// Put 100% of Record "progression" data to Record "Bet3" Layout list
// Put 100% of Record "progression" data to Record "Bet4" Layout list
end
// Put 100% of Record "progression" data to Record "Bet" Layout list
// Put 100% of Record "progression" data to Record "Bet2" Layout list
If any inside bet won each
begin
set flag "hit" false
// set flag "loop" false
clear Record "DistData" Layout
clear Record "Bet" Layout
clear Record "Bet2" Layout
clear Record "Bet3" Layout
clear Record "Bet4" Layout
clear Record "secondlast" Layout
clear Record "last" Layout
clear Record "secondlast" Layout
clear Record "Matrix" Layout
clear Record "Matrix1" Layout
clear Record "Matrix2" Layout
clear Record "Matrix3" Layout
clear Record "Matrix4" Layout
clear Record "Matrix5" Layout
clear Record "Matrix6" Layout
clear Record "Matrix7" Layout
clear Record "Matrix8" Layout
clear Record "Matrix9" Layout
clear Record "Matrix10" Layout
clear Record "Matrix11" Layout
clear Record "Matrix12" Layout
clear Record "Matrix13" Layout
clear Record "LastBetMatrix" Layout
clear Record "LastBetMatrix2" Layout
Put 1 on Record "spin" Data Index
Put 1 on Record "spin2" Data Index
put 1 on Record "progression" Data Index
if Bankroll >= Record "Highest Bankroll" Data
begin
clear Record "Highest Bankroll" Data
put 100% Bankroll to Record "Highest Bankroll" Data
put 1 on Record "progression" Data Index
end
end
if Record "spin" Data Index = 6 each
begin
Put 1 on Record "spin" Data Index
end
Set Max to Record "last" Layout Index
Add 1 to Record "last" Layout Index
copy last Number to Record "last" Layout
Set Max to Record "LastBetMatrix" Layout Index
Add 1 to Record "LastBetMatrix" Layout Index
copy last Number to Record "LastBetMatrix" Layout
Set Max to Record "LastBetMatrix2" Layout Index
Add 1 to Record "LastBetMatrix2" Layout Index
copy last Number to Record "LastBetMatrix2" Layout
Set Max to Record "current" Layout Index
Add 1 to Record "current" Layout Index
copy last number to Record "current" Layout
//===============================================================
IF Record "LastBetMatrix" Layout index >= 2
begin
//duplicate Record "DistData" to Record "DistDataTEMP"
//loop until Record "last" Layout index = 1
//begin
//set max to Record "LastBetMatrix2" Layout index
//set max to Record "LastBetMatrix" Layout index
//set max to Record "secondlast" Layout index
//set flag "loop" true
//duplicate Record "DistData" to Record "DistData2"
//loop until Record "LastBetMatrix2" Layout index = 0
//begin
duplicate Record "Matrix9" to Record "Matrix7"
if Record "LastBetMatrix" Layout = number 0 each
begin
put 1 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 1 each
begin
put 21 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 2 each
begin
put 7 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 3 each
begin
put 36 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 4 each
begin
put 5 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 5 each
begin
put 20 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 6 each
begin
put 11 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 7 each
begin
put 32 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 8 each
begin
put 17 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 9 each
begin
put 28 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 10 each
begin
put 19 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 11 each
begin
put 15 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 12 each
begin
put 34 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 13 each
begin
put 13 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 14 each
begin
put 26 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 15 each
begin
put 3 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 16 each
begin
put 22 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 17 each
begin
put 9 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 18 each
begin
put 30 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 19 each
begin
put 4 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 20 each
begin
put 25 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 21 each
begin
put 6 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 22 each
begin
put 29 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 23 each
begin
put 18 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 24 each
begin
put 21 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 25 each
begin
put 8 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 26 each
begin
put 37 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 27 each
begin
put 12 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 28 each
begin
put 33 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 29 each
begin
put 31 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 30 each
begin
put 16 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 31 each
begin
put 27 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 32 each
begin
put 2 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 33 each
begin
put 23 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 34 each
begin
put 10 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 35 each
begin
put 35 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 36 each
begin
put 14 to Record "Matrix7" Data index
end
duplicate Record "Matrix7" to Record "Matrix8"
duplicate Record "Matrix7" to Record "Matrix"
duplicate Record "Matrix7" to Record "Matrix2"
duplicate Record "Matrix7" to Record "Matrix5"
//duplicate Record "Matrix7" to Record "last"
//==========
duplicate Record "Matrix9" to Record "Matrix10"
if Record "secondlast" Layout = number 0 each
begin
put 1 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 1 each
begin
put 21 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 2 each
begin
put 7 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 3 each
begin
put 36 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 4 each
begin
put 5 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 5 each
begin
put 20 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 6 each
begin
put 11 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 7 each
begin
put 32 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 8 each
begin
put 17 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 9 each
begin
put 28 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 10 each
begin
put 19 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 11 each
begin
put 15 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 12 each
begin
put 34 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 13 each
begin
put 13 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 14 each
begin
put 26 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 15 each
begin
put 3 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 16 each
begin
put 22 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 17 each
begin
put 9 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 18 each
begin
put 30 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 19 each
begin
put 4 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 20 each
begin
put 25 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 21 each
begin
put 6 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 22 each
begin
put 29 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 23 each
begin
put 18 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 24 each
begin
put 21 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 25 each
begin
put 8 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 26 each
begin
put 37 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 27 each
begin
put 12 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 28 each
begin
put 33 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 29 each
begin
put 31 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 30 each
begin
put 16 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 31 each
begin
put 27 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 32 each
begin
put 2 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 33 each
begin
put 23 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 34 each
begin
put 10 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 35 each
begin
put 35 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 36 each
begin
put 14 to Record "Matrix10" Data index
end
duplicate Record "Matrix10" to Record "Matrix11"
duplicate Record "Matrix10" to Record "Matrix3"
duplicate Record "Matrix10" to Record "Matrix4"
duplicate Record "Matrix10" to Record "Matrix6"
IF flag "loop" false each
begin
//==Dist Calc===
if Record "spin" Data index = 1 each
begin
duplicate Record "last" to Record "temp"
// duplicate Record "LastBetMatrix" to Record "last"
duplicate Record "Matrix7" to Record "Matrix"
duplicate Record "Matrix10" to Record "Matrix3"
if Record "Matrix" Data index < Record "Matrix3" Data index each
begin
if Record "last" Layout = number 0 each
begin
subtract 1 from Record "Matrix3" Data index
end
if Record "last" Layout = number 1 each
begin
subtract 21 from Record "Matrix3" Data index
end
if Record "last" Layout = number 2 each
begin
subtract 7 from Record "Matrix3" Data index
end
if Record "last" Layout = number 3 each
begin
subtract 36 from Record "Matrix3" Data index
end
if Record "last" Layout = number 4 each
begin
subtract 5 from Record "Matrix3" Data index
end
if Record "last" Layout = number 5 each
begin
subtract 20 from Record "Matrix3" Data index
end
if Record "last" Layout = number 6 each
begin
subtract 11 from Record "Matrix3" Data index
end
if Record "last" Layout = number 7 each
begin
subtract 32 from Record "Matrix3" Data index
end
if Record "last" Layout = number 8 each
begin
subtract 17 from Record "Matrix3" Data index
end
if Record "last" Layout = number 9 each
begin
subtract 28 from Record "Matrix3" Data index
end
if Record "last" Layout = number 10 each
begin
subtract 19 from Record "Matrix3" Data index
end
if Record "last" Layout = number 11 each
begin
subtract 15 from Record "Matrix3" Data index
end
if Record "last" Layout = number 12 each
begin
subtract 34 from Record "Matrix3" Data index
end
if Record "last" Layout = number 13 each
begin
subtract 13 from Record "Matrix3" Data index
end
if Record "last" Layout = number 14 each
begin
subtract 26 from Record "Matrix3" Data index
end
if Record "last" Layout = number 15 each
begin
subtract 3 from Record "Matrix3" Data index
end
if Record "last" Layout = number 16 each
begin
subtract 22 from Record "Matrix3" Data index
end
if Record "last" Layout = number 17 each
begin
subtract 9 from Record "Matrix3" Data index
end
if Record "last" Layout = number 18 each
begin
subtract 30 from Record "Matrix3" Data index
end
if Record "last" Layout = number 19 each
begin
subtract 4 from Record "Matrix3" Data index
end
if Record "last" Layout = number 20 each
begin
subtract 25 from Record "Matrix3" Data index
end
if Record "last" Layout = number 21 each
begin
subtract 6 from Record "Matrix3" Data index
end
if Record "last" Layout = number 22 each
begin
subtract 29 from Record "Matrix3" Data index
end
if Record "last" Layout = number 23 each
begin
subtract 18 from Record "Matrix3" Data index
end
if Record "last" Layout = number 24 each
begin
subtract 21 from Record "Matrix3" Data index
end
if Record "last" Layout = number 25 each
begin
subtract 8 from Record "Matrix3" Data index
end
if Record "last" Layout = number 26 each
begin
subtract 37 from Record "Matrix3" Data index
end
if Record "last" Layout = number 27 each
begin
subtract 12 from Record "Matrix3" Data index
end
if Record "last" Layout = number 28 each
begin
subtract 33 from Record "Matrix3" Data index
end
if Record "last" Layout = number 29 each
begin
subtract 31 from Record "Matrix3" Data index
end
if Record "last" Layout = number 30 each
begin
subtract 16 from Record "Matrix3" Data index
end
if Record "last" Layout = number 31 each
begin
subtract 27 from Record "Matrix3" Data index
end
if Record "last" Layout = number 32 each
begin
subtract 2 from Record "Matrix3" Data index
end
if Record "last" Layout = number 33 each
begin
subtract 23 from Record "Matrix3" Data index
end
if Record "last" Layout = number 34 each
begin
subtract 10 from Record "Matrix3" Data index
end
if Record "last" Layout = number 35 each
begin
subtract 35 from Record "Matrix3" Data index
end
if Record "last" Layout = number 36 each
begin
subtract 14 from Record "Matrix3" Data index
end
// if flag "loop" false each
// begin
Set Max to Record "DistData" Data Index
Add 1 to Record "DistData" Data Index
// end
IF Record "Matrix3" Data index = 1 each
begin
put 1 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 2 each
begin
put 2 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 3 each
begin
put 3 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 4 each
begin
put 4 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 5 each
begin
put 5 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 6 each
begin
put 6 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 7 each
begin
put 7 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 8 each
begin
put 8 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 9 each
begin
put 9 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 10 each
begin
put 10 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 11 each
begin
put 11 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 12 each
begin
put 12 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 13 each
begin
put 13 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 14 each
begin
put 14 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 15 each
begin
put 15 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 16 each
begin
put 16 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 17 each
begin
put 17 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 18 each
begin
put 18 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 19 each
begin
put 19 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 20 each
begin
put 20 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 21 each
begin
put 21 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 23 each
begin
put 23 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 24 each
begin
put 24 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 25 each
begin
put 25 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 26 each
begin
put 26 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 27 each
begin
put 27 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 28 each
begin
put 28 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 29 each
begin
put 29 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 30 each
begin
put 30 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 31 each
begin
put 31 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 32 each
begin
put 32 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 33 each
begin
put 33 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 34 each
begin
put 34 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 35 each
begin
put 35 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 36 each
begin
put 36 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 37 each
begin
put 37 to Record "DistData" Data
end
end
else
begin
//****
if Record "Matrix" Data index > Record "Matrix3" Data index each
begin
if Record "secondlast" Layout = number 0 each
begin
subtract 1 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 1 each
begin
subtract 21 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 2 each
begin
subtract 7 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 3 each
begin
subtract 36 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 4 each
begin
subtract 5 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 5 each
begin
subtract 20 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 6 each
begin
subtract 11 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 7 each
begin
subtract 32 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 8 each
begin
subtract 17 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 9 each
begin
subtract 28 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 10 each
begin
subtract 19 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 11 each
begin
subtract 15 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 12 each
begin
subtract 34 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 13 each
begin
subtract 13 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 14 each
begin
subtract 26 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 15 each
begin
subtract 3 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 16 each
begin
subtract 22 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 17 each
begin
subtract 9 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 18 each
begin
subtract 30 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 19 each
begin
subtract 4 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 20 each
begin
subtract 25 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 21 each
begin
subtract 6 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 22 each
begin
subtract 29 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 23 each
begin
subtract 18 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 24 each
begin
subtract 21 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 25 each
begin
subtract 8 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 26 each
begin
subtract 37 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 27 each
begin
subtract 12 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 28 each
begin
subtract 33 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 29 each
begin
subtract 31 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 30 each
begin
subtract 16 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 31 each
begin
subtract 27 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 32 each
begin
subtract 23 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 33 each
begin
subtract 34 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 34 each
begin
subtract 10 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 35 each
begin
subtract 35 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 36 each
begin
subtract 14 from Record "Matrix" Data index
end
// if flag "loop" false each
// begin
Set Max to Record "DistData" Data Index
Add 1 to Record "DistData" Data Index
// end
IF Record "Matrix" Data index = 1 each
begin
put 1 to Record "DistData" Data
end
IF Record "Matrix" Data index = 2 each
begin
put 2 to Record "DistData" Data
end
IF Record "Matrix" Data index = 3 each
begin
put 3 to Record "DistData" Data
end
IF Record "Matrix" Data index = 4 each
begin
put 4 to Record "DistData" Data
end
IF Record "Matrix" Data index = 5 each
begin
put 5 to Record "DistData" Data
end
IF Record "Matrix" Data index = 6 each
begin
put 6 to Record "DistData" Data
end
IF Record "Matrix" Data index = 7 each
begin
put 7 to Record "DistData" Data
end
IF Record "Matrix" Data index = 8 each
begin
put 8 to Record "DistData" Data
end
IF Record "Matrix" Data index = 9 each
begin
put 9 to Record "DistData" Data
end
IF Record "Matrix" Data index = 10 each
begin
put 10 to Record "DistData" Data
end
IF Record "Matrix" Data index = 11 each
begin
put 11 to Record "DistData" Data
end
IF Record "Matrix" Data index = 12 each
begin
put 12 to Record "DistData" Data
end
IF Record "Matrix" Data index = 13 each
begin
put 13 to Record "DistData" Data
end
IF Record "Matrix" Data index = 14 each
begin
put 14 to Record "DistData" Data
end
IF Record "Matrix" Data index = 15 each
begin
put 15 to Record "DistData" Data
end
IF Record "Matrix" Data index = 16 each
begin
put 16 to Record "DistData" Data
end
IF Record "Matrix" Data index = 17 each
begin
put 17 to Record "DistData" Data
end
IF Record "Matrix" Data index = 18 each
begin
put 18 to Record "DistData" Data
end
IF Record "Matrix" Data index = 19 each
begin
put 19 to Record "DistData" Data
end
IF Record "Matrix" Data index = 20 each
begin
put 20 to Record "DistData" Data
end
IF Record "Matrix" Data index = 21 each
begin
put 21 to Record "DistData" Data
end
IF Record "Matrix" Data index = 23 each
begin
put 23 to Record "DistData" Data
end
IF Record "Matrix" Data index = 24 each
begin
put 24 to Record "DistData" Data
end
IF Record "Matrix" Data index = 25 each
begin
put 25 to Record "DistData" Data
end
IF Record "Matrix" Data index = 26 each
begin
put 26 to Record "DistData" Data
end
IF Record "Matrix" Data index = 27 each
begin
put 27 to Record "DistData" Data
end
IF Record "Matrix" Data index = 28 each
begin
put 28 to Record "DistData" Data
end
IF Record "Matrix" Data index = 29 each
begin
put 29 to Record "DistData" Data
end
IF Record "Matrix" Data index = 30 each
begin
put 30 to Record "DistData" Data
end
IF Record "Matrix" Data index = 31 each
begin
put 31 to Record "DistData" Data
end
IF Record "Matrix" Data index = 32 each
begin
put 32 to Record "DistData" Data
end
IF Record "Matrix" Data index = 33 each
begin
put 33 to Record "DistData" Data
end
IF Record "Matrix" Data index = 34 each
begin
put 34 to Record "DistData" Data
end
IF Record "Matrix" Data index = 35 each
begin
put 35 to Record "DistData" Data
end
IF Record "Matrix" Data index = 36 each
begin
put 36 to Record "DistData" Data
end
IF Record "Matrix" Data index = 37 each
begin
put 37 to Record "DistData" Data
end
end
end
end
end
add 1 to Record "spin" Data index
put 11 to Record "DistData" Data
IF Record "DistData" Data = 1 each
begin
subtract 1 from Record "Matrix7" Data index
add 1 on Record "Matrix8" Data index
subtract 1 from Record "Matrix10" Data index
add 1 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 2 each
begin
subtract 2 from Record "Matrix7" Data index
add 2 on Record "Matrix8" Data index
subtract 2 from Record "Matrix10" Data index
add 2 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 3 each
begin
subtract 3 from Record "Matrix7" Data index
add 3 on Record "Matrix8" Data index
subtract 3 from Record "Matrix10" Data index
add 3 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 4 each
begin
subtract 4 from Record "Matrix7" Data
add 4 on Record "Matrix8" Data index
subtract 4 from Record "Matrix10" Data index
add 4 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 5 each
begin
subtract 5 from Record "Matrix7" Data index
add 5 on Record "Matrix8" Data index
subtract 5 from Record "Matrix10" Data index
add 5 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 6 each
begin
subtract 6 from Record "Matrix7" Data index
add 6 on Record "Matrix8" Data index
subtract 6 from Record "Matrix10" Data index
add 6 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 7 each
begin
subtract 7 from Record "Matrix7" Data index
add 7 on Record "Matrix8" Data index
subtract 7 from Record "Matrix10" Data index
add 7 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 8 each
begin
subtract 8 from Record "Matrix7" Data index
add 8 on Record "Matrix8" Data index
subtract 8 from Record "Matrix10" Data index
add 8 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 9 each
begin
subtract 9 from Record "Matrix7" Data index
add 9 on Record "Matrix8" Data index
subtract 9 from Record "Matrix10" Data index
add 9 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 10 each
begin
subtract 10 from Record "Matrix7" Data index
add 10 on Record "Matrix8" Data index
subtract 10 from Record "Matrix10" Data index
add 10 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 11 each
begin
subtract 11 from Record "Matrix7" Data index
add 11 on Record "Matrix8" Data index
subtract 11 from Record "Matrix10" Data index
add 11 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 12 each
begin
subtract 12 from Record "Matrix7" Data index
add 12 on Record "Matrix8" Data index
subtract 12 from Record "Matrix10" Data index
add 12 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 13 each
begin
subtract 13 from Record "Matrix7" Data index
add 13 on Record "Matrix8" Data index
subtract 13 from Record "Matrix10" Data index
add 13 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 14 each
begin
subtract 14 from Record "Matrix7" Data index
add 14 on Record "Matrix8" Data index
subtract 14 from Record "Matrix10" Data index
add 14 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 15 each
begin
subtract 15 from Record "Matrix7" Data index
add 15 on Record "Matrix8" Data index
subtract 15 from Record "Matrix10" Data index
add 15 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 16 each
begin
subtract 16 from Record "Matrix7" Data index
add 16 on Record "Matrix8" Data index
subtract 16 from Record "Matrix10" Data index
add 16 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 17 each
begin
subtract 17 from Record "Matrix7" Data index
add 17 on Record "Matrix8" Data index
subtract 17 from Record "Matrix10" Data index
add 17 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 18 each
begin
subtract 18 from Record "Matrix7" Data index
add 18 on Record "Matrix8" Data index
subtract 18 from Record "Matrix10" Data index
add 18 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 19 each
begin
subtract 19 from Record "Matrix7" Data index
add 19 on Record "Matrix8" Data index
subtract 19 from Record "Matrix10" Data index
add 19 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 20 each
begin
subtract 20 from Record "Matrix7" Data index
add 20 on Record "Matrix8" Data index
subtract 20 from Record "Matrix10" Data index
add 20 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 21 each
begin
subtract 21 from Record "Matrix7" Data index
add 21 on Record "Matrix8" Data index
subtract 21 from Record "Matrix10" Data index
add 21 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 22 each
begin
subtract 22 from Record "Matrix7" Data index
add 22 on Record "Matrix8" Data index
subtract 22 from Record "Matrix10" Data index
add 22 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 23 each
begin
subtract 23 from Record "Matrix7" Data index
add 23 on Record "Matrix8" Data index
subtract 23 from Record "Matrix10" Data index
add 23 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 24 each
begin
subtract 24 from Record "Matrix7" Data index
add 24 on Record "Matrix8" Data index
subtract 24 from Record "Matrix10" Data index
add 24 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 25 each
begin
subtract 25 from Record "Matrix7" Data index
add 25 on Record "Matrix8" Data index
subtract 25 from Record "Matrix10" Data index
add 25 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 26 each
begin
subtract 26 from Record "Matrix7" Data index
add 26 on Record "Matrix8" Data index
subtract 26 from Record "Matrix10" Data index
add 26 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 27 each
begin
subtract 27 from Record "Matrix7" Data index
add 27 on Record "Matrix8" Data index
subtract 27 from Record "Matrix10" Data index
add 27 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 28 each
begin
subtract 28 from Record "Matrix7" Data index
add 28 on Record "Matrix8" Data index
subtract 28 from Record "Matrix10" Data index
add 28 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 29 each
begin
subtract 29 from Record "Matrix7" Data index
add 29 on Record "Matrix8" Data index
subtract 29 from Record "Matrix10" Data index
add 29 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 30 each
begin
subtract 30 from Record "Matrix7" Data index
add 30 on Record "Matrix8" Data index
subtract 30 from Record "Matrix10" Data index
add 30 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 31 each
begin
subtract 31 from Record "Matrix7" Data index
add 31 on Record "Matrix8" Data index
subtract 31 from Record "Matrix10" Data index
add 31 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 32 each
begin
subtract 32 from Record "Matrix7" Data index
add 32 on Record "Matrix8" Data index
subtract 32 from Record "Matrix10" Data index
add 32 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 33 each
begin
subtract 33 from Record "Matrix7" Data index
add 33 on Record "Matrix8" Data index
subtract 33 from Record "Matrix10" Data index
add 33 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 34 each
begin
subtract 34 from Record "Matrix7" Data index
add 34 on Record "Matrix8" Data index
subtract 34 from Record "Matrix10" Data index
add 34 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 35 each
begin
subtract 35 from Record "Matrix7" Data index
add 35 on Record "Matrix8" Data index
subtract 35 from Record "Matrix10" Data index
add 35 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 36 each
begin
subtract 36 from Record "Matrix7" Data index
add 36 on Record "Matrix8" Data index
subtract 36 from Record "Matrix10" Data index
add 36 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 37 each
begin
subtract 37 from Record "Matrix7" Data index
add 37 on Record "Matrix8" Data index
subtract 37 from Record "Matrix10" Data index
add 37 on Record "Matrix11" Data index
end
Set Max to Record "Bet2" Layout Index
Add 1 to Record "Bet2" Layout Index
Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
if Record "Matrix7" Data index > 37 each
begin
subtract 37 from Record "Matrix7" data index
end
if Record "Matrix8" Data index > 37 each
begin
subtract 37 from Record "Matrix8" data index
end
if Record "Matrix10" Data index > 37 each
begin
subtract 37 from Record "Matrix10" data index
end
if Record "Matrix11" Data index > 37 each
begin
subtract 37 from Record "Matrix11" data index
end
if Record "Matrix7" Data index < 0 each
begin
add 37 to Record "Matrix7" data index
end
if Record "Matrix8" Data index < 0 each
begin
add 37 to Record "Matrix8" data index
end
if Record "Matrix10" Data index < 0 each
begin
add 37 to Record "Matrix10" data index
end
if Record "Matrix11" Data index < 0 each
begin
add 37 to Record "Matrix11" data index
end
if Record "Matrix7" Data index = 0 each
begin
put 1 to Record "Matrix7" data index
end
if Record "Matrix8" Data index = 0 each
begin
put 1 to Record "Matrix8" data index
end
if Record "Matrix10" Data index = 0 each
begin
put 1 to Record "Matrix10" data index
end
if Record "Matrix11" Data index = 0 each
begin
put 1 to Record "Matrix11" data index
end
Set Max to Record "Bet2" Layout Index
Add 1 to Record "Bet2" Layout Index
Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
IF Record "Matrix7" Data index = 1 each
begin
copy number 0 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 2 each
begin
copy number 32 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 3 each
begin
copy number 15 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 4 each
begin
copy number 19 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 5 each
begin
copy number 4 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 6 each
begin
copy number 21 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 7 each
begin
copy number 2 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 8 each
begin
copy number 25 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 9 each
begin
copy number 17 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 10 each
begin
copy number 34 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 11 each
begin
copy number 6 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 12 each
begin
copy number 27 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 13 each
begin
copy number 13 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 14 each
begin
copy number 36 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 15 each
begin
copy number 11 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 16 each
begin
copy number 30 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 17 each
begin
copy number 8 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 18 each
begin
copy number 23 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 19 each
begin
copy number 10 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 20 each
begin
copy number 5 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 21 each
begin
copy number 24 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 22 each
begin
copy number 16 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 23 each
begin
copy number 33 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 24 each
begin
copy number 1 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 25 each
begin
copy number 20 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 26 each
begin
copy number 14 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 27 each
begin
copy number 31 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 28 each
begin
copy number 9 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 29 each
begin
copy number 22 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 30 each
begin
copy number 18 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 31 each
begin
copy number 29 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 32 each
begin
copy number 7 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 33 each
begin
copy number 28 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 34 each
begin
copy number 12 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 35 each
begin
copy number 35 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 36 each
begin
copy number 3 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 37 each
begin
copy number 26 to Record "Bet" Layout
end
if Record "current" layout is found within Record "1" layout each
begin
set flag "hit" true
end
if Record "current" layout is found within Record "2" layout each
begin
set flag "hit" true
end
if Record "current" layout is found within Record "3" layout each
begin
set flag "hit" true
end
if Record "current" layout is found within Record "4" layout each
begin
set flag "hit" true
end
if Record "spin2" Data Index = 3 each
begin
set flag "hit" false
Put 1 on Record "spin2" Data Index
end
if flag "hit" true each
begin
add 1 on Record "spin2" Data Index
end
Put 3 on Neighbor Count
Copy Neighbors of Record "Bet" layout
to Record "Bet2" Layout
if flag "hit" true each
begin
Put 100% of Record "progression" data to Record "Bet2" Layout list
Put 100% of Record "progression" data to Record "Bet" Layout list
end
duplicate Record "Bet2" to Record "1"
duplicate Record "Bet" to Record "2"
Set Max to Record "Bet2" Layout Index
Add 1 to Record "Bet2" Layout Index
Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
IF Record "Matrix8" Data index = 1 each
begin
copy number 0 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 2 each
begin
copy number 32 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 3 each
begin
copy number 15 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 4 each
begin
copy number 19 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 5 each
begin
copy number 4 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 6 each
begin
copy number 21 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 7 each
begin
copy number 2 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 8 each
begin
copy number 25 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 9 each
begin
copy number 17 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 10 each
begin
copy number 34 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 11 each
begin
copy number 6 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 12 each
begin
copy number 27 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 13 each
begin
copy number 13 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 14 each
begin
copy number 36 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 15 each
begin
copy number 11 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 16 each
begin
copy number 30 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 17 each
begin
copy number 8 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 18 each
begin
copy number 23 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 19 each
begin
copy number 10 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 20 each
begin
copy number 5 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 21 each
begin
copy number 24 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 22 each
begin
copy number 16 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 23 each
begin
copy number 33 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 24 each
begin
copy number 1 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 25 each
begin
copy number 20 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 26 each
begin
copy number 14 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 27 each
begin
copy number 31 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 28 each
begin
copy number 9 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 29 each
begin
copy number 22 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 30 each
begin
copy number 18 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 31 each
begin
copy number 29 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 32 each
begin
copy number 7 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 33 each
begin
copy number 28 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 34 each
begin
copy number 12 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 35 each
begin
copy number 35 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 36 each
begin
copy number 3 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 37 each
begin
copy number 26 to Record "Bet" Layout
end
Put 3 on Neighbor Count
Copy Neighbors of Record "Bet" layout
to Record "Bet2" Layout
if flag "hit" true each
begin
Put 100% of Record "progression" data to Record "Bet" Layout list
Put 100% of Record "progression" data to Record "Bet2" Layout list
end
duplicate Record "Bet2" to Record "3"
duplicate Record "Bet" to Record "4"
clear Record "Bet" layout
clear Record "Bet2" layout
{ Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
IF Record "Matrix10" Data index = 1 each
begin
copy number 0 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 2 each
begin
copy number 1 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 3 each
begin
copy number 2 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 4 each
begin
copy number 3 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 5 each
begin
copy number 4 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 6 each
begin
copy number 5 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 7 each
begin
copy number 6 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 8 each
begin
copy number 7 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 9 each
begin
copy number 8 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 10 each
begin
copy number 9 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 11 each
begin
copy number 10 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 12 each
begin
copy number 11 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 13 each
begin
copy number 12 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 14 each
begin
copy number 13 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 15 each
begin
copy number 14 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 16 each
begin
copy number 15 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 17 each
begin
copy number 16 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 18 each
begin
copy number 17 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 19 each
begin
copy number 18 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 20 each
begin
copy number 19 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 21 each
begin
copy number 20 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 22 each
begin
copy number 21 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 23 each
begin
copy number 22 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 24 each
begin
copy number 23 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 25 each
begin
copy number 24 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 26 each
begin
copy number 25 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 27 each
begin
copy number 26 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 28 each
begin
copy number 27 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 29 each
begin
copy number 28 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 30 each
begin
copy number 29 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 31 each
begin
copy number 30 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 32 each
begin
copy number 31 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 33 each
begin
copy number 32 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 34 each
begin
copy number 33 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 35 each
begin
copy number 34 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 36 each
begin
copy number 35 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 37 each
begin
copy number 36 to Record "Bet" Layout
end
Put 2 on Neighbor Count
Copy Neighbors of Record "Bet" layout
to Record "Bet2" Layout
Put 100% of Record "progression" data to Record "Bet2" Layout list
Put 100% of Record "progression" data to Record "Bet" Layout list
Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
IF Record "Matrix11" Data index = 1 each
begin
copy number 0 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 2 each
begin
copy number 1 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 3 each
begin
copy number 2 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 4 each
begin
copy number 3 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 5 each
begin
copy number 4 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 6 each
begin
copy number 5 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 7 each
begin
copy number 6 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 8 each
begin
copy number 7 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 9 each
begin
copy number 8 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 10 each
begin
copy number 9 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 11 each
begin
copy number 10 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 12 each
begin
copy number 11 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 13 each
begin
copy number 12 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 14 each
begin
copy number 13 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 15 each
begin
copy number 14 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 16 each
begin
copy number 15 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 17 each
begin
copy number 16 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 18 each
begin
copy number 17 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 19 each
begin
copy number 18 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 20 each
begin
copy number 19 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 21 each
begin
copy number 20 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 22 each
begin
copy number 21 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 23 each
begin
copy number 22 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 24 each
begin
copy number 23 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 25 each
begin
copy number 24 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 26 each
begin
copy number 25 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 27 each
begin
copy number 26 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 28 each
begin
copy number 27 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 29 each
begin
copy number 28 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 30 each
begin
copy number 29 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 31 each
begin
copy number 30 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 32 each
begin
copy number 31 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 33 each
begin
copy number 32 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 34 each
begin
copy number 33 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 35 each
begin
copy number 34 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 36 each
begin
copy number 35 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 37 each
begin
copy number 36 to Record "Bet" Layout
end
}
set flag "loop" true
{ Put 2 on Neighbor Count
Copy Neighbors of Record "Bet" layout
to Record "Bet2" Layout
Put 100% of Record "progression" data to Record "Bet2" Layout list
Put 100% of Record "progression" data to Record "Bet" Layout list
}
// subtract 1 to Record "last" Layout index
// subtract 1 to Record "DistData" Data index
//subtract 1 to Record "secondlast" Layout index
end
end
{
IF Record "LastBetMatrix" Layout index >= 4
begin
//duplicate Record "DistData" to Record "DistDataTEMP"
loop until Record "last" Layout index = 1
begin
//set max to Record "LastBetMatrix2" Layout index
//set max to Record "LastBetMatrix" Layout index
//set max to Record "secondlast" Layout index
//set flag "loop" true
//duplicate Record "DistData" to Record "DistData2"
//loop until Record "LastBetMatrix2" Layout index = 0
//begin
duplicate Record "Matrix9" to Record "Matrix7"
if Record "LastBetMatrix" Layout = number 0 each
begin
put 1 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 1 each
begin
put 21 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 2 each
begin
put 7 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 3 each
begin
put 36 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 4 each
begin
put 5 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 5 each
begin
put 20 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 6 each
begin
put 11 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 7 each
begin
put 32 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 8 each
begin
put 17 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 9 each
begin
put 28 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 10 each
begin
put 19 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 11 each
begin
put 15 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 12 each
begin
put 34 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 13 each
begin
put 13 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 14 each
begin
put 26 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 15 each
begin
put 3 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 16 each
begin
put 22 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 17 each
begin
put 9 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 18 each
begin
put 30 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 19 each
begin
put 4 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 20 each
begin
put 25 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 21 each
begin
put 6 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 22 each
begin
put 29 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 23 each
begin
put 18 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 24 each
begin
put 21 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 25 each
begin
put 8 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 26 each
begin
put 37 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 27 each
begin
put 12 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 28 each
begin
put 33 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 29 each
begin
put 31 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 30 each
begin
put 16 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 31 each
begin
put 27 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 32 each
begin
put 2 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 33 each
begin
put 23 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 34 each
begin
put 10 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 35 each
begin
put 35 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 36 each
begin
put 14 to Record "Matrix7" Data index
end
duplicate Record "Matrix7" to Record "Matrix8"
duplicate Record "Matrix7" to Record "Matrix"
duplicate Record "Matrix7" to Record "Matrix2"
duplicate Record "Matrix7" to Record "Matrix5"
//duplicate Record "Matrix7" to Record "last"
//==========
duplicate Record "Matrix9" to Record "Matrix10"
if Record "secondlast" Layout = number 0 each
begin
put 1 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 1 each
begin
put 21 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 2 each
begin
put 7 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 3 each
begin
put 36 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 4 each
begin
put 5 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 5 each
begin
put 20 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 6 each
begin
put 11 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 7 each
begin
put 32 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 8 each
begin
put 17 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 9 each
begin
put 28 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 10 each
begin
put 19 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 11 each
begin
put 15 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 12 each
begin
put 34 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 13 each
begin
put 13 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 14 each
begin
put 26 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 15 each
begin
put 3 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 16 each
begin
put 22 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 17 each
begin
put 9 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 18 each
begin
put 30 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 19 each
begin
put 4 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 20 each
begin
put 25 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 21 each
begin
put 6 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 22 each
begin
put 29 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 23 each
begin
put 18 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 24 each
begin
put 21 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 25 each
begin
put 8 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 26 each
begin
put 37 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 27 each
begin
put 12 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 28 each
begin
put 33 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 29 each
begin
put 31 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 30 each
begin
put 16 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 31 each
begin
put 27 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 32 each
begin
put 2 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 33 each
begin
put 23 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 34 each
begin
put 10 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 35 each
begin
put 35 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 36 each
begin
put 14 to Record "Matrix10" Data index
end
duplicate Record "Matrix10" to Record "Matrix11"
duplicate Record "Matrix10" to Record "Matrix3"
duplicate Record "Matrix10" to Record "Matrix4"
duplicate Record "Matrix10" to Record "Matrix6"
IF flag "loop" false each
begin
//==Dist Calc===
duplicate Record "last" to Record "temp"
// duplicate Record "LastBetMatrix" to Record "last"
duplicate Record "Matrix7" to Record "Matrix"
duplicate Record "Matrix10" to Record "Matrix3"
if Record "Matrix" Data index < Record "Matrix3" Data index each
begin
if Record "last" Layout = number 0 each
begin
subtract 1 from Record "Matrix3" Data index
end
if Record "last" Layout = number 1 each
begin
subtract 21 from Record "Matrix3" Data index
end
if Record "last" Layout = number 2 each
begin
subtract 7 from Record "Matrix3" Data index
end
if Record "last" Layout = number 3 each
begin
subtract 36 from Record "Matrix3" Data index
end
if Record "last" Layout = number 4 each
begin
subtract 5 from Record "Matrix3" Data index
end
if Record "last" Layout = number 5 each
begin
subtract 20 from Record "Matrix3" Data index
end
if Record "last" Layout = number 6 each
begin
subtract 11 from Record "Matrix3" Data index
end
if Record "last" Layout = number 7 each
begin
subtract 32 from Record "Matrix3" Data index
end
if Record "last" Layout = number 8 each
begin
subtract 17 from Record "Matrix3" Data index
end
if Record "last" Layout = number 9 each
begin
subtract 28 from Record "Matrix3" Data index
end
if Record "last" Layout = number 10 each
begin
subtract 19 from Record "Matrix3" Data index
end
if Record "last" Layout = number 11 each
begin
subtract 15 from Record "Matrix3" Data index
end
if Record "last" Layout = number 12 each
begin
subtract 34 from Record "Matrix3" Data index
end
if Record "last" Layout = number 13 each
begin
subtract 13 from Record "Matrix3" Data index
end
if Record "last" Layout = number 14 each
begin
subtract 26 from Record "Matrix3" Data index
end
if Record "last" Layout = number 15 each
begin
subtract 3 from Record "Matrix3" Data index
end
if Record "last" Layout = number 16 each
begin
subtract 22 from Record "Matrix3" Data index
end
if Record "last" Layout = number 17 each
begin
subtract 9 from Record "Matrix3" Data index
end
if Record "last" Layout = number 18 each
begin
subtract 30 from Record "Matrix3" Data index
end
if Record "last" Layout = number 19 each
begin
subtract 4 from Record "Matrix3" Data index
end
if Record "last" Layout = number 20 each
begin
subtract 25 from Record "Matrix3" Data index
end
if Record "last" Layout = number 21 each
begin
subtract 6 from Record "Matrix3" Data index
end
if Record "last" Layout = number 22 each
begin
subtract 29 from Record "Matrix3" Data index
end
if Record "last" Layout = number 23 each
begin
subtract 18 from Record "Matrix3" Data index
end
if Record "last" Layout = number 24 each
begin
subtract 21 from Record "Matrix3" Data index
end
if Record "last" Layout = number 25 each
begin
subtract 8 from Record "Matrix3" Data index
end
if Record "last" Layout = number 26 each
begin
subtract 37 from Record "Matrix3" Data index
end
if Record "last" Layout = number 27 each
begin
subtract 12 from Record "Matrix3" Data index
end
if Record "last" Layout = number 28 each
begin
subtract 33 from Record "Matrix3" Data index
end
if Record "last" Layout = number 29 each
begin
subtract 31 from Record "Matrix3" Data index
end
if Record "last" Layout = number 30 each
begin
subtract 16 from Record "Matrix3" Data index
end
if Record "last" Layout = number 31 each
begin
subtract 27 from Record "Matrix3" Data index
end
if Record "last" Layout = number 32 each
begin
subtract 2 from Record "Matrix3" Data index
end
if Record "last" Layout = number 33 each
begin
subtract 23 from Record "Matrix3" Data index
end
if Record "last" Layout = number 34 each
begin
subtract 10 from Record "Matrix3" Data index
end
if Record "last" Layout = number 35 each
begin
subtract 35 from Record "Matrix3" Data index
end
if Record "last" Layout = number 36 each
begin
subtract 14 from Record "Matrix3" Data index
end
// if flag "loop" false each
// begin
Set Max to Record "DistData" Data Index
Add 1 to Record "DistData" Data Index
// end
IF Record "Matrix3" Data index = 1 each
begin
put 1 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 2 each
begin
put 2 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 3 each
begin
put 3 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 4 each
begin
put 4 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 5 each
begin
put 5 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 6 each
begin
put 6 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 7 each
begin
put 7 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 8 each
begin
put 8 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 9 each
begin
put 9 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 10 each
begin
put 10 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 11 each
begin
put 11 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 12 each
begin
put 12 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 13 each
begin
put 13 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 14 each
begin
put 14 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 15 each
begin
put 15 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 16 each
begin
put 16 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 17 each
begin
put 17 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 18 each
begin
put 18 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 19 each
begin
put 19 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 20 each
begin
put 20 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 21 each
begin
put 21 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 23 each
begin
put 23 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 24 each
begin
put 24 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 25 each
begin
put 25 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 26 each
begin
put 26 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 27 each
begin
put 27 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 28 each
begin
put 28 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 29 each
begin
put 29 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 30 each
begin
put 30 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 31 each
begin
put 31 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 32 each
begin
put 32 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 33 each
begin
put 33 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 34 each
begin
put 34 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 35 each
begin
put 35 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 36 each
begin
put 36 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 37 each
begin
put 37 to Record "DistData" Data
end
end
else
begin
//****
if Record "Matrix" Data index > Record "Matrix3" Data index each
begin
if Record "secondlast" Layout = number 0 each
begin
subtract 1 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 1 each
begin
subtract 21 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 2 each
begin
subtract 7 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 3 each
begin
subtract 36 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 4 each
begin
subtract 5 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 5 each
begin
subtract 20 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 6 each
begin
subtract 11 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 7 each
begin
subtract 32 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 8 each
begin
subtract 17 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 9 each
begin
subtract 28 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 10 each
begin
subtract 19 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 11 each
begin
subtract 15 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 12 each
begin
subtract 34 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 13 each
begin
subtract 13 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 14 each
begin
subtract 26 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 15 each
begin
subtract 3 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 16 each
begin
subtract 22 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 17 each
begin
subtract 9 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 18 each
begin
subtract 30 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 19 each
begin
subtract 4 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 20 each
begin
subtract 25 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 21 each
begin
subtract 6 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 22 each
begin
subtract 29 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 23 each
begin
subtract 18 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 24 each
begin
subtract 21 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 25 each
begin
subtract 8 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 26 each
begin
subtract 37 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 27 each
begin
subtract 12 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 28 each
begin
subtract 33 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 29 each
begin
subtract 31 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 30 each
begin
subtract 16 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 31 each
begin
subtract 27 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 32 each
begin
subtract 23 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 33 each
begin
subtract 34 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 34 each
begin
subtract 10 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 35 each
begin
subtract 35 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 36 each
begin
subtract 14 from Record "Matrix" Data index
end
// if flag "loop" false each
// begin
Set Max to Record "DistData" Data Index
Add 1 to Record "DistData" Data Index
// end
IF Record "Matrix" Data index = 1 each
begin
put 1 to Record "DistData" Data
end
IF Record "Matrix" Data index = 2 each
begin
put 2 to Record "DistData" Data
end
IF Record "Matrix" Data index = 3 each
begin
put 3 to Record "DistData" Data
end
IF Record "Matrix" Data index = 4 each
begin
put 4 to Record "DistData" Data
end
IF Record "Matrix" Data index = 5 each
begin
put 5 to Record "DistData" Data
end
IF Record "Matrix" Data index = 6 each
begin
put 6 to Record "DistData" Data
end
IF Record "Matrix" Data index = 7 each
begin
put 7 to Record "DistData" Data
end
IF Record "Matrix" Data index = 8 each
begin
put 8 to Record "DistData" Data
end
IF Record "Matrix" Data index = 9 each
begin
put 9 to Record "DistData" Data
end
IF Record "Matrix" Data index = 10 each
begin
put 10 to Record "DistData" Data
end
IF Record "Matrix" Data index = 11 each
begin
put 11 to Record "DistData" Data
end
IF Record "Matrix" Data index = 12 each
begin
put 12 to Record "DistData" Data
end
IF Record "Matrix" Data index = 13 each
begin
put 13 to Record "DistData" Data
end
IF Record "Matrix" Data index = 14 each
begin
put 14 to Record "DistData" Data
end
IF Record "Matrix" Data index = 15 each
begin
put 15 to Record "DistData" Data
end
IF Record "Matrix" Data index = 16 each
begin
put 16 to Record "DistData" Data
end
IF Record "Matrix" Data index = 17 each
begin
put 17 to Record "DistData" Data
end
IF Record "Matrix" Data index = 18 each
begin
put 18 to Record "DistData" Data
end
IF Record "Matrix" Data index = 19 each
begin
put 19 to Record "DistData" Data
end
IF Record "Matrix" Data index = 20 each
begin
put 20 to Record "DistData" Data
end
IF Record "Matrix" Data index = 21 each
begin
put 21 to Record "DistData" Data
end
IF Record "Matrix" Data index = 23 each
begin
put 23 to Record "DistData" Data
end
IF Record "Matrix" Data index = 24 each
begin
put 24 to Record "DistData" Data
end
IF Record "Matrix" Data index = 25 each
begin
put 25 to Record "DistData" Data
end
IF Record "Matrix" Data index = 26 each
begin
put 26 to Record "DistData" Data
end
IF Record "Matrix" Data index = 27 each
begin
put 27 to Record "DistData" Data
end
IF Record "Matrix" Data index = 28 each
begin
put 28 to Record "DistData" Data
end
IF Record "Matrix" Data index = 29 each
begin
put 29 to Record "DistData" Data
end
IF Record "Matrix" Data index = 30 each
begin
put 30 to Record "DistData" Data
end
IF Record "Matrix" Data index = 31 each
begin
put 31 to Record "DistData" Data
end
IF Record "Matrix" Data index = 32 each
begin
put 32 to Record "DistData" Data
end
IF Record "Matrix" Data index = 33 each
begin
put 33 to Record "DistData" Data
end
IF Record "Matrix" Data index = 34 each
begin
put 34 to Record "DistData" Data
end
IF Record "Matrix" Data index = 35 each
begin
put 35 to Record "DistData" Data
end
IF Record "Matrix" Data index = 36 each
begin
put 36 to Record "DistData" Data
end
IF Record "Matrix" Data index = 37 each
begin
put 37 to Record "DistData" Data
end
end
end
end
IF Record "DistData" Data = 1 each
begin
subtract 1 from Record "Matrix7" Data index
add 1 on Record "Matrix8" Data index
subtract 1 from Record "Matrix10" Data index
add 1 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 2 each
begin
subtract 2 from Record "Matrix7" Data index
add 2 on Record "Matrix8" Data index
subtract 2 from Record "Matrix10" Data index
add 2 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 3 each
begin
subtract 3 from Record "Matrix7" Data index
add 3 on Record "Matrix8" Data index
subtract 3 from Record "Matrix10" Data index
add 3 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 4 each
begin
subtract 4 from Record "Matrix7" Data
add 4 on Record "Matrix8" Data index
subtract 4 from Record "Matrix10" Data index
add 4 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 5 each
begin
subtract 5 from Record "Matrix7" Data index
add 5 on Record "Matrix8" Data index
subtract 5 from Record "Matrix10" Data index
add 5 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 6 each
begin
subtract 6 from Record "Matrix7" Data index
add 6 on Record "Matrix8" Data index
subtract 6 from Record "Matrix10" Data index
add 6 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 7 each
begin
subtract 7 from Record "Matrix7" Data index
add 7 on Record "Matrix8" Data index
subtract 7 from Record "Matrix10" Data index
add 7 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 8 each
begin
subtract 8 from Record "Matrix7" Data index
add 8 on Record "Matrix8" Data index
subtract 8 from Record "Matrix10" Data index
add 8 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 9 each
begin
subtract 9 from Record "Matrix7" Data index
add 9 on Record "Matrix8" Data index
subtract 9 from Record "Matrix10" Data index
add 9 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 10 each
begin
subtract 10 from Record "Matrix7" Data index
add 10 on Record "Matrix8" Data index
subtract 10 from Record "Matrix10" Data index
add 10 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 11 each
begin
subtract 11 from Record "Matrix7" Data index
add 11 on Record "Matrix8" Data index
subtract 11 from Record "Matrix10" Data index
add 11 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 12 each
begin
subtract 12 from Record "Matrix7" Data index
add 12 on Record "Matrix8" Data index
subtract 12 from Record "Matrix10" Data index
add 12 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 13 each
begin
subtract 13 from Record "Matrix7" Data index
add 13 on Record "Matrix8" Data index
subtract 13 from Record "Matrix10" Data index
add 13 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 14 each
begin
subtract 14 from Record "Matrix7" Data index
add 14 on Record "Matrix8" Data index
subtract 14 from Record "Matrix10" Data index
add 14 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 15 each
begin
subtract 15 from Record "Matrix7" Data index
add 15 on Record "Matrix8" Data index
subtract 15 from Record "Matrix10" Data index
add 15 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 16 each
begin
subtract 16 from Record "Matrix7" Data index
add 16 on Record "Matrix8" Data index
subtract 16 from Record "Matrix10" Data index
add 16 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 17 each
begin
subtract 17 from Record "Matrix7" Data index
add 17 on Record "Matrix8" Data index
subtract 17 from Record "Matrix10" Data index
add 17 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 18 each
begin
subtract 18 from Record "Matrix7" Data index
add 18 on Record "Matrix8" Data index
subtract 18 from Record "Matrix10" Data index
add 18 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 19 each
begin
subtract 19 from Record "Matrix7" Data index
add 19 on Record "Matrix8" Data index
subtract 19 from Record "Matrix10" Data index
add 19 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 20 each
begin
subtract 20 from Record "Matrix7" Data index
add 20 on Record "Matrix8" Data index
subtract 20 from Record "Matrix10" Data index
add 20 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 21 each
begin
subtract 21 from Record "Matrix7" Data index
add 21 on Record "Matrix8" Data index
subtract 21 from Record "Matrix10" Data index
add 21 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 22 each
begin
subtract 22 from Record "Matrix7" Data index
add 22 on Record "Matrix8" Data index
subtract 22 from Record "Matrix10" Data index
add 22 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 23 each
begin
subtract 23 from Record "Matrix7" Data index
add 23 on Record "Matrix8" Data index
subtract 23 from Record "Matrix10" Data index
add 23 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 24 each
begin
subtract 24 from Record "Matrix7" Data index
add 24 on Record "Matrix8" Data index
subtract 24 from Record "Matrix10" Data index
add 24 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 25 each
begin
subtract 25 from Record "Matrix7" Data index
add 25 on Record "Matrix8" Data index
subtract 25 from Record "Matrix10" Data index
add 25 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 26 each
begin
subtract 26 from Record "Matrix7" Data index
add 26 on Record "Matrix8" Data index
subtract 26 from Record "Matrix10" Data index
add 26 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 27 each
begin
subtract 27 from Record "Matrix7" Data index
add 27 on Record "Matrix8" Data index
subtract 27 from Record "Matrix10" Data index
add 27 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 28 each
begin
subtract 28 from Record "Matrix7" Data index
add 28 on Record "Matrix8" Data index
subtract 28 from Record "Matrix10" Data index
add 28 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 29 each
begin
subtract 29 from Record "Matrix7" Data index
add 29 on Record "Matrix8" Data index
subtract 29 from Record "Matrix10" Data index
add 29 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 30 each
begin
subtract 30 from Record "Matrix7" Data index
add 30 on Record "Matrix8" Data index
subtract 30 from Record "Matrix10" Data index
add 30 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 31 each
begin
subtract 31 from Record "Matrix7" Data index
add 31 on Record "Matrix8" Data index
subtract 31 from Record "Matrix10" Data index
add 31 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 32 each
begin
subtract 32 from Record "Matrix7" Data index
add 32 on Record "Matrix8" Data index
subtract 32 from Record "Matrix10" Data index
add 32 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 33 each
begin
subtract 33 from Record "Matrix7" Data index
add 33 on Record "Matrix8" Data index
subtract 33 from Record "Matrix10" Data index
add 33 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 34 each
begin
subtract 34 from Record "Matrix7" Data index
add 34 on Record "Matrix8" Data index
subtract 34 from Record "Matrix10" Data index
add 34 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 35 each
begin
subtract 35 from Record "Matrix7" Data index
add 35 on Record "Matrix8" Data index
subtract 35 from Record "Matrix10" Data index
add 35 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 36 each
begin
subtract 36 from Record "Matrix7" Data index
add 36 on Record "Matrix8" Data index
subtract 36 from Record "Matrix10" Data index
add 36 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 37 each
begin
subtract 37 from Record "Matrix7" Data index
add 37 on Record "Matrix8" Data index
subtract 37 from Record "Matrix10" Data index
add 37 on Record "Matrix11" Data index
end
Set Max to Record "Bet2" Layout Index
Add 1 to Record "Bet2" Layout Index
Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
if Record "Matrix7" Data index > 37 each
begin
subtract 37 from Record "Matrix7" data index
end
if Record "Matrix8" Data index > 37 each
begin
subtract 37 from Record "Matrix8" data index
end
if Record "Matrix10" Data index > 37 each
begin
subtract 37 from Record "Matrix10" data index
end
if Record "Matrix11" Data index > 37 each
begin
subtract 37 from Record "Matrix11" data index
end
if Record "Matrix7" Data index < 0 each
begin
add 37 to Record "Matrix7" data index
end
if Record "Matrix8" Data index < 0 each
begin
add 37 to Record "Matrix8" data index
end
if Record "Matrix10" Data index < 0 each
begin
add 37 to Record "Matrix10" data index
end
if Record "Matrix11" Data index < 0 each
begin
add 37 to Record "Matrix11" data index
end
if Record "Matrix7" Data index = 0 each
begin
put 1 to Record "Matrix7" data index
end
if Record "Matrix8" Data index = 0 each
begin
put 1 to Record "Matrix8" data index
end
if Record "Matrix10" Data index = 0 each
begin
put 1 to Record "Matrix10" data index
end
if Record "Matrix11" Data index = 0 each
begin
put 1 to Record "Matrix11" data index
end
{
Set Max to Record "Bet2" Layout Index
Add 1 to Record "Bet2" Layout Index
Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
IF Record "Matrix7" Data index = 1 each
begin
copy number 0 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 2 each
begin
copy number 32 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 3 each
begin
copy number 15 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 4 each
begin
copy number 19 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 5 each
begin
copy number 4 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 6 each
begin
copy number 21 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 7 each
begin
copy number 2 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 8 each
begin
copy number 25 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 9 each
begin
copy number 17 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 10 each
begin
copy number 34 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 11 each
begin
copy number 6 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 12 each
begin
copy number 27 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 13 each
begin
copy number 13 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 14 each
begin
copy number 36 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 15 each
begin
copy number 11 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 16 each
begin
copy number 30 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 17 each
begin
copy number 8 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 18 each
begin
copy number 23 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 19 each
begin
copy number 10 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 20 each
begin
copy number 5 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 21 each
begin
copy number 24 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 22 each
begin
copy number 16 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 23 each
begin
copy number 33 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 24 each
begin
copy number 1 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 25 each
begin
copy number 20 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 26 each
begin
copy number 14 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 27 each
begin
copy number 31 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 28 each
begin
copy number 9 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 29 each
begin
copy number 22 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 30 each
begin
copy number 18 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 31 each
begin
copy number 29 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 32 each
begin
copy number 7 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 33 each
begin
copy number 28 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 34 each
begin
copy number 12 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 35 each
begin
copy number 35 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 36 each
begin
copy number 3 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 37 each
begin
copy number 26 to Record "Bet" Layout
end
{Put 1 on Neighbor Count
Copy Neighbors of Record "Bet" layout
to Record "Bet2" Layout
Put 100% of Record "progression" data to Record "Bet2" Layout list
Put 100% of Record "progression" data to Record "Bet" Layout list
Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
{ Set Max to Record "Bet2" Layout Index
Add 1 to Record "Bet2" Layout Index
IF Record "Matrix8" Data index = 1 each
begin
copy number 0 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 2 each
begin
copy number 32 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 3 each
begin
copy number 15 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 4 each
begin
copy number 19 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 5 each
begin
copy number 4 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 6 each
begin
copy number 21 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 7 each
begin
copy number 2 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 8 each
begin
copy number 25 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 9 each
begin
copy number 17 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 10 each
begin
copy number 34 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 11 each
begin
copy number 6 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 12 each
begin
copy number 27 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 13 each
begin
copy number 13 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 14 each
begin
copy number 36 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 15 each
begin
copy number 11 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 16 each
begin
copy number 30 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 17 each
begin
copy number 8 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 18 each
begin
copy number 23 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 19 each
begin
copy number 10 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 20 each
begin
copy number 5 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 21 each
begin
copy number 24 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 22 each
begin
copy number 16 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 23 each
begin
copy number 33 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 24 each
begin
copy number 1 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 25 each
begin
copy number 20 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 26 each
begin
copy number 14 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 27 each
begin
copy number 31 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 28 each
begin
copy number 9 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 29 each
begin
copy number 22 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 30 each
begin
copy number 18 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 31 each
begin
copy number 29 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 32 each
begin
copy number 7 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 33 each
begin
copy number 28 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 34 each
begin
copy number 12 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 35 each
begin
copy number 35 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 36 each
begin
copy number 3 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 37 each
begin
copy number 26 to Record "Bet" Layout
end
{ Put 1 on Neighbor Count
Copy Neighbors of Record "Bet" layout
to Record "Bet2" Layout
Put 100% of Record "progression" data to Record "Bet" Layout list
Put 100% of Record "progression" data to Record "Bet" Layout list }
{ Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
IF Record "Matrix10" Data index = 1 each
begin
copy number 0 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 2 each
begin
copy number 1 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 3 each
begin
copy number 2 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 4 each
begin
copy number 3 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 5 each
begin
copy number 4 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 6 each
begin
copy number 5 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 7 each
begin
copy number 6 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 8 each
begin
copy number 7 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 9 each
begin
copy number 8 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 10 each
begin
copy number 9 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 11 each
begin
copy number 10 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 12 each
begin
copy number 11 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 13 each
begin
copy number 12 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 14 each
begin
copy number 13 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 15 each
begin
copy number 14 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 16 each
begin
copy number 15 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 17 each
begin
copy number 16 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 18 each
begin
copy number 17 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 19 each
begin
copy number 18 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 20 each
begin
copy number 19 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 21 each
begin
copy number 20 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 22 each
begin
copy number 21 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 23 each
begin
copy number 22 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 24 each
begin
copy number 23 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 25 each
begin
copy number 24 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 26 each
begin
copy number 25 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 27 each
begin
copy number 26 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 28 each
begin
copy number 27 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 29 each
begin
copy number 28 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 30 each
begin
copy number 29 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 31 each
begin
copy number 30 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 32 each
begin
copy number 31 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 33 each
begin
copy number 32 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 34 each
begin
copy number 33 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 35 each
begin
copy number 34 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 36 each
begin
copy number 35 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 37 each
begin
copy number 36 to Record "Bet" Layout
end
Put 100% of Record "progression" data to Record "Bet" Layout list
Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
IF Record "Matrix11" Data index = 1 each
begin
copy number 0 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 2 each
begin
copy number 1 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 3 each
begin
copy number 2 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 4 each
begin
copy number 3 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 5 each
begin
copy number 4 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 6 each
begin
copy number 5 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 7 each
begin
copy number 6 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 8 each
begin
copy number 7 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 9 each
begin
copy number 8 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 10 each
begin
copy number 9 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 11 each
begin
copy number 10 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 12 each
begin
copy number 11 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 13 each
begin
copy number 12 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 14 each
begin
copy number 13 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 15 each
begin
copy number 14 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 16 each
begin
copy number 15 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 17 each
begin
copy number 16 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 18 each
begin
copy number 17 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 19 each
begin
copy number 18 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 20 each
begin
copy number 19 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 21 each
begin
copy number 20 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 22 each
begin
copy number 21 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 23 each
begin
copy number 22 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 24 each
begin
copy number 23 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 25 each
begin
copy number 24 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 26 each
begin
copy number 25 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 27 each
begin
copy number 26 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 28 each
begin
copy number 27 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 29 each
begin
copy number 28 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 30 each
begin
copy number 29 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 31 each
begin
copy number 30 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 32 each
begin
copy number 31 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 33 each
begin
copy number 32 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 34 each
begin
copy number 33 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 35 each
begin
copy number 34 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 36 each
begin
copy number 35 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 37 each
begin
copy number 36 to Record "Bet" Layout
end
]
set flag "loop" true
Put 100% of Record "progression" data to Record "Bet" Layout list
subtract 1 to Record "last" Layout index
subtract 1 to Record "DistData" Data index
//subtract 1 to Record "secondlast" Layout index
end
end }
{
set max to Record "DistData" Data index
set max to Record "last" Layout index
set max to Record "secondlast" Layout index
set max to Record "LastBetMatrix" Layout index
set max to Record "LastBetMatrix2" Layout index
}
{ if total spin count >= 300 each
begin
stop session
end
}
if total bankroll <= -1000 each
begin
{ add 1 to record "lost sessions" data index
put 0 on total bankroll
put 1 on Record "progression" Data Index
}
stop session
end
if total bankroll >= 1000 each
begin
{ add 1 to record "won sessions" data index
put 0 on total bankroll
put 1 on Record "progression" Data Index
}
stop session
end
If Record "progression" Data Index >
Record "progression" Data Count each
Begin
Put 1 on Record "progression" Data Index
clear Record "DistData" Layout
clear Record "Bet" Layout
clear Record "secondlast" Layout
clear Record "last" Layout
clear Record "Matrix" Layout
clear Record "Matrix1" Layout
clear Record "Matrix2" Layout
clear Record "Matrix3" Layout
clear Record "Matrix4" Layout
clear Record "Matrix5" Layout
clear Record "Matrix6" Layout
clear Record "Matrix7" Layout
clear Record "Matrix8" Layout
clear Record "Matrix9" Layout
clear Record "Matrix10" Layout
clear Record "Matrix11" Layout
clear Record "Matrix12" Layout
clear Record "Matrix13" Layout
clear Record "LastBetMatrix" Layout
End
Set Max to Record "secondlast" Layout Index
Add 1 to Record "secondlast" Layout Index
copy last Number to Record "secondlast" Layout
{ clear Record "Matrix" Layout
clear Record "Matrix1" Layout
clear Record "Matrix2" Layout
clear Record "Matrix3" Layout
clear Record "Matrix4" Layout
clear Record "Matrix5" Layout
clear Record "Matrix6" Layout
clear Record "Matrix7" Layout
clear Record "Matrix8" Layout }
// clear Record "last" Layout
set flag "loop" false
//
// clear Record "temp" layout
END
Seems like a good result to me.
1st test had a decent profit.
Will do more test on any live results.
Quote from: Macro on Feb 01, 09:54 AM 2020
Seems like a good result to me.
1st test had a decent profit.
Will do more test on any live results.
Alright :thumbsup:
I tested now another trigger (seems to be good i got 80% winrate first test) O0
TRIGGER; -wait for 3 virtual losses then start BET for the next (6) spins then STOP (and wait for a new trigger/3 losses)...
Version 3 system "Dealers Signature v.3"
// © ignatus 2019 ©
method "main"
begin
while starting a new session
begin
Set List[1,1,2,3,5,8,13,21,32,55,89,144,233,377,610,987]
to Record "progression" Data
Set List[1,2,3,4,5,6,7,8] to Record "spin" Data
Set List[1,2,3,4,5,6,7,8,9,10,11,12] to Record "spin2" Data
Set List [0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,
37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73]
to Record "Matrix" Data
Set List [0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,
37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73]
to Record "Matrix2" Data
Set List [0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,
37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73]
to Record "Matrix3" Data
Set List [0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,
37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73]
to Record "Matrix4" Data
Set List [0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,
37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73]
to Record "Matrix9" Data
copy List[number 0,number 32,number 15,number 19,number 4,number 21,number 2,
number 25,number 17,number 34,number 6,number 27,number 13,number 36,
number 11,number 30,number 8,number 23,number 10,number 5,number 24,
number 16,number 33,number 1,number 20,number 14,number 31,number 9,
number 22,number 18,number 29,number 7,number 28,number 12,number 35,
number 3,number 26]
to Record "Wheel" Layout
{ Set List [0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,
37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73]
to Record "DistData" Data
}
end
put 0 to Record "Highest Bankroll" Data
while on each spin
begin
Track last Number for 4 spins to Record "track" layout
Track last Number for 1 spins to Record "current" layout
IF Record "track" layout index >= 5 each
begin
clear Record "track" layout
set flag "loop" false
end
IF any inside bet lost each
begin
add 1 on Record "progression" Data Index
clear Record "Bet" Layout
clear Record "Bet2" Layout
clear Record "Bet3" Layout
clear Record "Bet4" Layout
// Put 100% of Record "progression" data to Record "Bet" Layout list
// Put 100% of Record "progression" data to Record "Bet2" Layout list
// Put 100% of Record "progression" data to Record "Bet3" Layout list
// Put 100% of Record "progression" data to Record "Bet4" Layout list
end
// Put 100% of Record "progression" data to Record "Bet" Layout list
// Put 100% of Record "progression" data to Record "Bet2" Layout list
If any inside bet won each
begin
set flag "hit" false
// set flag "loop" false
clear Record "DistData" Layout
clear Record "Bet" Layout
clear Record "Bet2" Layout
clear Record "Bet3" Layout
clear Record "Bet4" Layout
clear Record "secondlast" Layout
clear Record "last" Layout
clear Record "secondlast" Layout
clear Record "Matrix" Layout
clear Record "Matrix1" Layout
clear Record "Matrix2" Layout
clear Record "Matrix3" Layout
clear Record "Matrix4" Layout
clear Record "Matrix5" Layout
clear Record "Matrix6" Layout
clear Record "Matrix7" Layout
clear Record "Matrix8" Layout
clear Record "Matrix9" Layout
clear Record "Matrix10" Layout
clear Record "Matrix11" Layout
clear Record "Matrix12" Layout
clear Record "Matrix13" Layout
clear Record "LastBetMatrix" Layout
clear Record "LastBetMatrix2" Layout
Put 1 on Record "spin" Data Index
Put 1 on Record "spin2" Data Index
put 1 on Record "progression" Data Index
if Bankroll >= Record "Highest Bankroll" Data
begin
clear Record "Highest Bankroll" Data
put 100% Bankroll to Record "Highest Bankroll" Data
put 1 on Record "progression" Data Index
end
end
if Record "spin" Data Index = 6 each
begin
Put 1 on Record "spin" Data Index
end
Set Max to Record "last" Layout Index
Add 1 to Record "last" Layout Index
copy last Number to Record "last" Layout
Set Max to Record "LastBetMatrix" Layout Index
Add 1 to Record "LastBetMatrix" Layout Index
copy last Number to Record "LastBetMatrix" Layout
Set Max to Record "LastBetMatrix2" Layout Index
Add 1 to Record "LastBetMatrix2" Layout Index
copy last Number to Record "LastBetMatrix2" Layout
Set Max to Record "current" Layout Index
Add 1 to Record "current" Layout Index
copy last number to Record "current" Layout
//===============================================================
IF Record "LastBetMatrix" Layout index >= 2
begin
//duplicate Record "DistData" to Record "DistDataTEMP"
//loop until Record "last" Layout index = 1
//begin
//set max to Record "LastBetMatrix2" Layout index
//set max to Record "LastBetMatrix" Layout index
//set max to Record "secondlast" Layout index
//set flag "loop" true
//duplicate Record "DistData" to Record "DistData2"
//loop until Record "LastBetMatrix2" Layout index = 0
//begin
duplicate Record "Matrix9" to Record "Matrix7"
if Record "LastBetMatrix" Layout = number 0 each
begin
put 1 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 1 each
begin
put 21 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 2 each
begin
put 7 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 3 each
begin
put 36 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 4 each
begin
put 5 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 5 each
begin
put 20 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 6 each
begin
put 11 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 7 each
begin
put 32 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 8 each
begin
put 17 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 9 each
begin
put 28 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 10 each
begin
put 19 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 11 each
begin
put 15 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 12 each
begin
put 34 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 13 each
begin
put 13 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 14 each
begin
put 26 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 15 each
begin
put 3 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 16 each
begin
put 22 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 17 each
begin
put 9 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 18 each
begin
put 30 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 19 each
begin
put 4 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 20 each
begin
put 25 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 21 each
begin
put 6 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 22 each
begin
put 29 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 23 each
begin
put 18 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 24 each
begin
put 21 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 25 each
begin
put 8 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 26 each
begin
put 37 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 27 each
begin
put 12 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 28 each
begin
put 33 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 29 each
begin
put 31 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 30 each
begin
put 16 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 31 each
begin
put 27 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 32 each
begin
put 2 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 33 each
begin
put 23 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 34 each
begin
put 10 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 35 each
begin
put 35 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 36 each
begin
put 14 to Record "Matrix7" Data index
end
duplicate Record "Matrix7" to Record "Matrix8"
duplicate Record "Matrix7" to Record "Matrix"
duplicate Record "Matrix7" to Record "Matrix2"
duplicate Record "Matrix7" to Record "Matrix5"
//duplicate Record "Matrix7" to Record "last"
//==========
duplicate Record "Matrix9" to Record "Matrix10"
if Record "secondlast" Layout = number 0 each
begin
put 1 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 1 each
begin
put 21 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 2 each
begin
put 7 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 3 each
begin
put 36 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 4 each
begin
put 5 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 5 each
begin
put 20 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 6 each
begin
put 11 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 7 each
begin
put 32 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 8 each
begin
put 17 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 9 each
begin
put 28 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 10 each
begin
put 19 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 11 each
begin
put 15 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 12 each
begin
put 34 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 13 each
begin
put 13 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 14 each
begin
put 26 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 15 each
begin
put 3 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 16 each
begin
put 22 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 17 each
begin
put 9 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 18 each
begin
put 30 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 19 each
begin
put 4 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 20 each
begin
put 25 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 21 each
begin
put 6 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 22 each
begin
put 29 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 23 each
begin
put 18 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 24 each
begin
put 21 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 25 each
begin
put 8 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 26 each
begin
put 37 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 27 each
begin
put 12 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 28 each
begin
put 33 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 29 each
begin
put 31 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 30 each
begin
put 16 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 31 each
begin
put 27 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 32 each
begin
put 2 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 33 each
begin
put 23 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 34 each
begin
put 10 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 35 each
begin
put 35 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 36 each
begin
put 14 to Record "Matrix10" Data index
end
duplicate Record "Matrix10" to Record "Matrix11"
duplicate Record "Matrix10" to Record "Matrix3"
duplicate Record "Matrix10" to Record "Matrix4"
duplicate Record "Matrix10" to Record "Matrix6"
IF flag "loop" false each
begin
//==Dist Calc===
//if Record "spin" Data index = 1 each
//begin
duplicate Record "last" to Record "temp"
// duplicate Record "LastBetMatrix" to Record "last"
duplicate Record "Matrix7" to Record "Matrix"
duplicate Record "Matrix10" to Record "Matrix3"
if Record "Matrix" Data index < Record "Matrix3" Data index each
begin
if Record "last" Layout = number 0 each
begin
subtract 1 from Record "Matrix3" Data index
end
if Record "last" Layout = number 1 each
begin
subtract 21 from Record "Matrix3" Data index
end
if Record "last" Layout = number 2 each
begin
subtract 7 from Record "Matrix3" Data index
end
if Record "last" Layout = number 3 each
begin
subtract 36 from Record "Matrix3" Data index
end
if Record "last" Layout = number 4 each
begin
subtract 5 from Record "Matrix3" Data index
end
if Record "last" Layout = number 5 each
begin
subtract 20 from Record "Matrix3" Data index
end
if Record "last" Layout = number 6 each
begin
subtract 11 from Record "Matrix3" Data index
end
if Record "last" Layout = number 7 each
begin
subtract 32 from Record "Matrix3" Data index
end
if Record "last" Layout = number 8 each
begin
subtract 17 from Record "Matrix3" Data index
end
if Record "last" Layout = number 9 each
begin
subtract 28 from Record "Matrix3" Data index
end
if Record "last" Layout = number 10 each
begin
subtract 19 from Record "Matrix3" Data index
end
if Record "last" Layout = number 11 each
begin
subtract 15 from Record "Matrix3" Data index
end
if Record "last" Layout = number 12 each
begin
subtract 34 from Record "Matrix3" Data index
end
if Record "last" Layout = number 13 each
begin
subtract 13 from Record "Matrix3" Data index
end
if Record "last" Layout = number 14 each
begin
subtract 26 from Record "Matrix3" Data index
end
if Record "last" Layout = number 15 each
begin
subtract 3 from Record "Matrix3" Data index
end
if Record "last" Layout = number 16 each
begin
subtract 22 from Record "Matrix3" Data index
end
if Record "last" Layout = number 17 each
begin
subtract 9 from Record "Matrix3" Data index
end
if Record "last" Layout = number 18 each
begin
subtract 30 from Record "Matrix3" Data index
end
if Record "last" Layout = number 19 each
begin
subtract 4 from Record "Matrix3" Data index
end
if Record "last" Layout = number 20 each
begin
subtract 25 from Record "Matrix3" Data index
end
if Record "last" Layout = number 21 each
begin
subtract 6 from Record "Matrix3" Data index
end
if Record "last" Layout = number 22 each
begin
subtract 29 from Record "Matrix3" Data index
end
if Record "last" Layout = number 23 each
begin
subtract 18 from Record "Matrix3" Data index
end
if Record "last" Layout = number 24 each
begin
subtract 21 from Record "Matrix3" Data index
end
if Record "last" Layout = number 25 each
begin
subtract 8 from Record "Matrix3" Data index
end
if Record "last" Layout = number 26 each
begin
subtract 37 from Record "Matrix3" Data index
end
if Record "last" Layout = number 27 each
begin
subtract 12 from Record "Matrix3" Data index
end
if Record "last" Layout = number 28 each
begin
subtract 33 from Record "Matrix3" Data index
end
if Record "last" Layout = number 29 each
begin
subtract 31 from Record "Matrix3" Data index
end
if Record "last" Layout = number 30 each
begin
subtract 16 from Record "Matrix3" Data index
end
if Record "last" Layout = number 31 each
begin
subtract 27 from Record "Matrix3" Data index
end
if Record "last" Layout = number 32 each
begin
subtract 2 from Record "Matrix3" Data index
end
if Record "last" Layout = number 33 each
begin
subtract 23 from Record "Matrix3" Data index
end
if Record "last" Layout = number 34 each
begin
subtract 10 from Record "Matrix3" Data index
end
if Record "last" Layout = number 35 each
begin
subtract 35 from Record "Matrix3" Data index
end
if Record "last" Layout = number 36 each
begin
subtract 14 from Record "Matrix3" Data index
end
// if flag "loop" false each
// begin
Set Max to Record "DistData" Data Index
Add 1 to Record "DistData" Data Index
// end
IF Record "Matrix3" Data index = 1 each
begin
put 1 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 2 each
begin
put 2 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 3 each
begin
put 3 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 4 each
begin
put 4 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 5 each
begin
put 5 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 6 each
begin
put 6 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 7 each
begin
put 7 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 8 each
begin
put 8 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 9 each
begin
put 9 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 10 each
begin
put 10 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 11 each
begin
put 11 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 12 each
begin
put 12 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 13 each
begin
put 13 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 14 each
begin
put 14 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 15 each
begin
put 15 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 16 each
begin
put 16 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 17 each
begin
put 17 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 18 each
begin
put 18 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 19 each
begin
put 19 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 20 each
begin
put 20 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 21 each
begin
put 21 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 23 each
begin
put 23 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 24 each
begin
put 24 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 25 each
begin
put 25 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 26 each
begin
put 26 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 27 each
begin
put 27 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 28 each
begin
put 28 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 29 each
begin
put 29 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 30 each
begin
put 30 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 31 each
begin
put 31 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 32 each
begin
put 32 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 33 each
begin
put 33 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 34 each
begin
put 34 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 35 each
begin
put 35 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 36 each
begin
put 36 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 37 each
begin
put 37 to Record "DistData" Data
end
end
else
begin
//****
if Record "Matrix" Data index > Record "Matrix3" Data index each
begin
if Record "secondlast" Layout = number 0 each
begin
subtract 1 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 1 each
begin
subtract 21 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 2 each
begin
subtract 7 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 3 each
begin
subtract 36 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 4 each
begin
subtract 5 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 5 each
begin
subtract 20 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 6 each
begin
subtract 11 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 7 each
begin
subtract 32 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 8 each
begin
subtract 17 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 9 each
begin
subtract 28 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 10 each
begin
subtract 19 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 11 each
begin
subtract 15 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 12 each
begin
subtract 34 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 13 each
begin
subtract 13 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 14 each
begin
subtract 26 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 15 each
begin
subtract 3 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 16 each
begin
subtract 22 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 17 each
begin
subtract 9 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 18 each
begin
subtract 30 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 19 each
begin
subtract 4 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 20 each
begin
subtract 25 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 21 each
begin
subtract 6 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 22 each
begin
subtract 29 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 23 each
begin
subtract 18 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 24 each
begin
subtract 21 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 25 each
begin
subtract 8 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 26 each
begin
subtract 37 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 27 each
begin
subtract 12 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 28 each
begin
subtract 33 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 29 each
begin
subtract 31 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 30 each
begin
subtract 16 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 31 each
begin
subtract 27 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 32 each
begin
subtract 23 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 33 each
begin
subtract 34 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 34 each
begin
subtract 10 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 35 each
begin
subtract 35 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 36 each
begin
subtract 14 from Record "Matrix" Data index
end
// if flag "loop" false each
// begin
Set Max to Record "DistData" Data Index
Add 1 to Record "DistData" Data Index
// end
IF Record "Matrix" Data index = 1 each
begin
put 1 to Record "DistData" Data
end
IF Record "Matrix" Data index = 2 each
begin
put 2 to Record "DistData" Data
end
IF Record "Matrix" Data index = 3 each
begin
put 3 to Record "DistData" Data
end
IF Record "Matrix" Data index = 4 each
begin
put 4 to Record "DistData" Data
end
IF Record "Matrix" Data index = 5 each
begin
put 5 to Record "DistData" Data
end
IF Record "Matrix" Data index = 6 each
begin
put 6 to Record "DistData" Data
end
IF Record "Matrix" Data index = 7 each
begin
put 7 to Record "DistData" Data
end
IF Record "Matrix" Data index = 8 each
begin
put 8 to Record "DistData" Data
end
IF Record "Matrix" Data index = 9 each
begin
put 9 to Record "DistData" Data
end
IF Record "Matrix" Data index = 10 each
begin
put 10 to Record "DistData" Data
end
IF Record "Matrix" Data index = 11 each
begin
put 11 to Record "DistData" Data
end
IF Record "Matrix" Data index = 12 each
begin
put 12 to Record "DistData" Data
end
IF Record "Matrix" Data index = 13 each
begin
put 13 to Record "DistData" Data
end
IF Record "Matrix" Data index = 14 each
begin
put 14 to Record "DistData" Data
end
IF Record "Matrix" Data index = 15 each
begin
put 15 to Record "DistData" Data
end
IF Record "Matrix" Data index = 16 each
begin
put 16 to Record "DistData" Data
end
IF Record "Matrix" Data index = 17 each
begin
put 17 to Record "DistData" Data
end
IF Record "Matrix" Data index = 18 each
begin
put 18 to Record "DistData" Data
end
IF Record "Matrix" Data index = 19 each
begin
put 19 to Record "DistData" Data
end
IF Record "Matrix" Data index = 20 each
begin
put 20 to Record "DistData" Data
end
IF Record "Matrix" Data index = 21 each
begin
put 21 to Record "DistData" Data
end
IF Record "Matrix" Data index = 23 each
begin
put 23 to Record "DistData" Data
end
IF Record "Matrix" Data index = 24 each
begin
put 24 to Record "DistData" Data
end
IF Record "Matrix" Data index = 25 each
begin
put 25 to Record "DistData" Data
end
IF Record "Matrix" Data index = 26 each
begin
put 26 to Record "DistData" Data
end
IF Record "Matrix" Data index = 27 each
begin
put 27 to Record "DistData" Data
end
IF Record "Matrix" Data index = 28 each
begin
put 28 to Record "DistData" Data
end
IF Record "Matrix" Data index = 29 each
begin
put 29 to Record "DistData" Data
end
IF Record "Matrix" Data index = 30 each
begin
put 30 to Record "DistData" Data
end
IF Record "Matrix" Data index = 31 each
begin
put 31 to Record "DistData" Data
end
IF Record "Matrix" Data index = 32 each
begin
put 32 to Record "DistData" Data
end
IF Record "Matrix" Data index = 33 each
begin
put 33 to Record "DistData" Data
end
IF Record "Matrix" Data index = 34 each
begin
put 34 to Record "DistData" Data
end
IF Record "Matrix" Data index = 35 each
begin
put 35 to Record "DistData" Data
end
IF Record "Matrix" Data index = 36 each
begin
put 36 to Record "DistData" Data
end
IF Record "Matrix" Data index = 37 each
begin
put 37 to Record "DistData" Data
end
end
end
end
//end
put 11 to Record "DistData" Data
IF Record "DistData" Data = 1 each
begin
subtract 1 from Record "Matrix7" Data index
add 1 on Record "Matrix8" Data index
subtract 1 from Record "Matrix10" Data index
add 1 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 2 each
begin
subtract 2 from Record "Matrix7" Data index
add 2 on Record "Matrix8" Data index
subtract 2 from Record "Matrix10" Data index
add 2 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 3 each
begin
subtract 3 from Record "Matrix7" Data index
add 3 on Record "Matrix8" Data index
subtract 3 from Record "Matrix10" Data index
add 3 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 4 each
begin
subtract 4 from Record "Matrix7" Data
add 4 on Record "Matrix8" Data index
subtract 4 from Record "Matrix10" Data index
add 4 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 5 each
begin
subtract 5 from Record "Matrix7" Data index
add 5 on Record "Matrix8" Data index
subtract 5 from Record "Matrix10" Data index
add 5 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 6 each
begin
subtract 6 from Record "Matrix7" Data index
add 6 on Record "Matrix8" Data index
subtract 6 from Record "Matrix10" Data index
add 6 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 7 each
begin
subtract 7 from Record "Matrix7" Data index
add 7 on Record "Matrix8" Data index
subtract 7 from Record "Matrix10" Data index
add 7 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 8 each
begin
subtract 8 from Record "Matrix7" Data index
add 8 on Record "Matrix8" Data index
subtract 8 from Record "Matrix10" Data index
add 8 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 9 each
begin
subtract 9 from Record "Matrix7" Data index
add 9 on Record "Matrix8" Data index
subtract 9 from Record "Matrix10" Data index
add 9 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 10 each
begin
subtract 10 from Record "Matrix7" Data index
add 10 on Record "Matrix8" Data index
subtract 10 from Record "Matrix10" Data index
add 10 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 11 each
begin
subtract 11 from Record "Matrix7" Data index
add 11 on Record "Matrix8" Data index
subtract 11 from Record "Matrix10" Data index
add 11 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 12 each
begin
subtract 12 from Record "Matrix7" Data index
add 12 on Record "Matrix8" Data index
subtract 12 from Record "Matrix10" Data index
add 12 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 13 each
begin
subtract 13 from Record "Matrix7" Data index
add 13 on Record "Matrix8" Data index
subtract 13 from Record "Matrix10" Data index
add 13 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 14 each
begin
subtract 14 from Record "Matrix7" Data index
add 14 on Record "Matrix8" Data index
subtract 14 from Record "Matrix10" Data index
add 14 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 15 each
begin
subtract 15 from Record "Matrix7" Data index
add 15 on Record "Matrix8" Data index
subtract 15 from Record "Matrix10" Data index
add 15 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 16 each
begin
subtract 16 from Record "Matrix7" Data index
add 16 on Record "Matrix8" Data index
subtract 16 from Record "Matrix10" Data index
add 16 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 17 each
begin
subtract 17 from Record "Matrix7" Data index
add 17 on Record "Matrix8" Data index
subtract 17 from Record "Matrix10" Data index
add 17 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 18 each
begin
subtract 18 from Record "Matrix7" Data index
add 18 on Record "Matrix8" Data index
subtract 18 from Record "Matrix10" Data index
add 18 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 19 each
begin
subtract 19 from Record "Matrix7" Data index
add 19 on Record "Matrix8" Data index
subtract 19 from Record "Matrix10" Data index
add 19 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 20 each
begin
subtract 20 from Record "Matrix7" Data index
add 20 on Record "Matrix8" Data index
subtract 20 from Record "Matrix10" Data index
add 20 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 21 each
begin
subtract 21 from Record "Matrix7" Data index
add 21 on Record "Matrix8" Data index
subtract 21 from Record "Matrix10" Data index
add 21 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 22 each
begin
subtract 22 from Record "Matrix7" Data index
add 22 on Record "Matrix8" Data index
subtract 22 from Record "Matrix10" Data index
add 22 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 23 each
begin
subtract 23 from Record "Matrix7" Data index
add 23 on Record "Matrix8" Data index
subtract 23 from Record "Matrix10" Data index
add 23 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 24 each
begin
subtract 24 from Record "Matrix7" Data index
add 24 on Record "Matrix8" Data index
subtract 24 from Record "Matrix10" Data index
add 24 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 25 each
begin
subtract 25 from Record "Matrix7" Data index
add 25 on Record "Matrix8" Data index
subtract 25 from Record "Matrix10" Data index
add 25 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 26 each
begin
subtract 26 from Record "Matrix7" Data index
add 26 on Record "Matrix8" Data index
subtract 26 from Record "Matrix10" Data index
add 26 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 27 each
begin
subtract 27 from Record "Matrix7" Data index
add 27 on Record "Matrix8" Data index
subtract 27 from Record "Matrix10" Data index
add 27 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 28 each
begin
subtract 28 from Record "Matrix7" Data index
add 28 on Record "Matrix8" Data index
subtract 28 from Record "Matrix10" Data index
add 28 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 29 each
begin
subtract 29 from Record "Matrix7" Data index
add 29 on Record "Matrix8" Data index
subtract 29 from Record "Matrix10" Data index
add 29 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 30 each
begin
subtract 30 from Record "Matrix7" Data index
add 30 on Record "Matrix8" Data index
subtract 30 from Record "Matrix10" Data index
add 30 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 31 each
begin
subtract 31 from Record "Matrix7" Data index
add 31 on Record "Matrix8" Data index
subtract 31 from Record "Matrix10" Data index
add 31 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 32 each
begin
subtract 32 from Record "Matrix7" Data index
add 32 on Record "Matrix8" Data index
subtract 32 from Record "Matrix10" Data index
add 32 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 33 each
begin
subtract 33 from Record "Matrix7" Data index
add 33 on Record "Matrix8" Data index
subtract 33 from Record "Matrix10" Data index
add 33 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 34 each
begin
subtract 34 from Record "Matrix7" Data index
add 34 on Record "Matrix8" Data index
subtract 34 from Record "Matrix10" Data index
add 34 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 35 each
begin
subtract 35 from Record "Matrix7" Data index
add 35 on Record "Matrix8" Data index
subtract 35 from Record "Matrix10" Data index
add 35 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 36 each
begin
subtract 36 from Record "Matrix7" Data index
add 36 on Record "Matrix8" Data index
subtract 36 from Record "Matrix10" Data index
add 36 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 37 each
begin
subtract 37 from Record "Matrix7" Data index
add 37 on Record "Matrix8" Data index
subtract 37 from Record "Matrix10" Data index
add 37 on Record "Matrix11" Data index
end
Set Max to Record "Bet2" Layout Index
Add 1 to Record "Bet2" Layout Index
Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
if Record "Matrix7" Data index > 37 each
begin
subtract 37 from Record "Matrix7" data index
end
if Record "Matrix8" Data index > 37 each
begin
subtract 37 from Record "Matrix8" data index
end
if Record "Matrix10" Data index > 37 each
begin
subtract 37 from Record "Matrix10" data index
end
if Record "Matrix11" Data index > 37 each
begin
subtract 37 from Record "Matrix11" data index
end
if Record "Matrix7" Data index < 0 each
begin
add 37 to Record "Matrix7" data index
end
if Record "Matrix8" Data index < 0 each
begin
add 37 to Record "Matrix8" data index
end
if Record "Matrix10" Data index < 0 each
begin
add 37 to Record "Matrix10" data index
end
if Record "Matrix11" Data index < 0 each
begin
add 37 to Record "Matrix11" data index
end
if Record "Matrix7" Data index = 0 each
begin
put 1 to Record "Matrix7" data index
end
if Record "Matrix8" Data index = 0 each
begin
put 1 to Record "Matrix8" data index
end
if Record "Matrix10" Data index = 0 each
begin
put 1 to Record "Matrix10" data index
end
if Record "Matrix11" Data index = 0 each
begin
put 1 to Record "Matrix11" data index
end
Set Max to Record "Bet2" Layout Index
Add 1 to Record "Bet2" Layout Index
Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
IF Record "Matrix7" Data index = 1 each
begin
copy number 0 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 2 each
begin
copy number 32 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 3 each
begin
copy number 15 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 4 each
begin
copy number 19 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 5 each
begin
copy number 4 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 6 each
begin
copy number 21 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 7 each
begin
copy number 2 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 8 each
begin
copy number 25 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 9 each
begin
copy number 17 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 10 each
begin
copy number 34 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 11 each
begin
copy number 6 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 12 each
begin
copy number 27 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 13 each
begin
copy number 13 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 14 each
begin
copy number 36 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 15 each
begin
copy number 11 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 16 each
begin
copy number 30 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 17 each
begin
copy number 8 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 18 each
begin
copy number 23 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 19 each
begin
copy number 10 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 20 each
begin
copy number 5 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 21 each
begin
copy number 24 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 22 each
begin
copy number 16 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 23 each
begin
copy number 33 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 24 each
begin
copy number 1 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 25 each
begin
copy number 20 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 26 each
begin
copy number 14 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 27 each
begin
copy number 31 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 28 each
begin
copy number 9 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 29 each
begin
copy number 22 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 30 each
begin
copy number 18 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 31 each
begin
copy number 29 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 32 each
begin
copy number 7 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 33 each
begin
copy number 28 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 34 each
begin
copy number 12 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 35 each
begin
copy number 35 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 36 each
begin
copy number 3 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 37 each
begin
copy number 26 to Record "Bet" Layout
end
if Record "current" layout is found within Record "1" layout each
begin
set flag "hit" true
end
if Record "current" layout is found within Record "2" layout each
begin
set flag "hit" true
end
if Record "current" layout is found within Record "3" layout each
begin
set flag "hit" true
end
if Record "current" layout is found within Record "4" layout each
begin
set flag "hit" true
end
if Record "spin2" Data Index < 4 each
begin
if flag "hit" true each
begin
set flag "hit" false
Put 1 on Record "spin2" Data Index
end
end
if Record "spin2" Data Index = 4 each
begin
set flag "hit" true
end
if flag "hit" false each
begin
add 1 on Record "spin2" Data Index
end
if Record "spin" Data Index = 7 each
begin
set flag "hit" false
Put 1 on Record "spin" Data Index
Put 1 on Record "spin2" Data Index
end
if flag "hit" true each
begin
add 1 on Record "spin" Data Index
end
Put 3 on Neighbor Count
Copy Neighbors of Record "Bet" layout
to Record "Bet2" Layout
if flag "hit" true each
begin
Put 100% of Record "progression" data to Record "Bet2" Layout list
Put 100% of Record "progression" data to Record "Bet" Layout list
end
duplicate Record "Bet2" to Record "1"
duplicate Record "Bet" to Record "2"
Set Max to Record "Bet2" Layout Index
Add 1 to Record "Bet2" Layout Index
Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
IF Record "Matrix8" Data index = 1 each
begin
copy number 0 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 2 each
begin
copy number 32 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 3 each
begin
copy number 15 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 4 each
begin
copy number 19 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 5 each
begin
copy number 4 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 6 each
begin
copy number 21 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 7 each
begin
copy number 2 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 8 each
begin
copy number 25 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 9 each
begin
copy number 17 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 10 each
begin
copy number 34 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 11 each
begin
copy number 6 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 12 each
begin
copy number 27 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 13 each
begin
copy number 13 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 14 each
begin
copy number 36 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 15 each
begin
copy number 11 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 16 each
begin
copy number 30 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 17 each
begin
copy number 8 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 18 each
begin
copy number 23 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 19 each
begin
copy number 10 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 20 each
begin
copy number 5 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 21 each
begin
copy number 24 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 22 each
begin
copy number 16 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 23 each
begin
copy number 33 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 24 each
begin
copy number 1 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 25 each
begin
copy number 20 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 26 each
begin
copy number 14 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 27 each
begin
copy number 31 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 28 each
begin
copy number 9 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 29 each
begin
copy number 22 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 30 each
begin
copy number 18 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 31 each
begin
copy number 29 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 32 each
begin
copy number 7 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 33 each
begin
copy number 28 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 34 each
begin
copy number 12 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 35 each
begin
copy number 35 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 36 each
begin
copy number 3 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 37 each
begin
copy number 26 to Record "Bet" Layout
end
Put 3 on Neighbor Count
Copy Neighbors of Record "Bet" layout
to Record "Bet2" Layout
if flag "hit" true each
begin
Put 100% of Record "progression" data to Record "Bet" Layout list
Put 100% of Record "progression" data to Record "Bet2" Layout list
end
duplicate Record "Bet2" to Record "3"
duplicate Record "Bet" to Record "4"
clear Record "Bet" layout
clear Record "Bet2" layout
{ Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
IF Record "Matrix10" Data index = 1 each
begin
copy number 0 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 2 each
begin
copy number 1 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 3 each
begin
copy number 2 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 4 each
begin
copy number 3 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 5 each
begin
copy number 4 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 6 each
begin
copy number 5 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 7 each
begin
copy number 6 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 8 each
begin
copy number 7 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 9 each
begin
copy number 8 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 10 each
begin
copy number 9 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 11 each
begin
copy number 10 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 12 each
begin
copy number 11 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 13 each
begin
copy number 12 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 14 each
begin
copy number 13 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 15 each
begin
copy number 14 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 16 each
begin
copy number 15 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 17 each
begin
copy number 16 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 18 each
begin
copy number 17 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 19 each
begin
copy number 18 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 20 each
begin
copy number 19 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 21 each
begin
copy number 20 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 22 each
begin
copy number 21 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 23 each
begin
copy number 22 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 24 each
begin
copy number 23 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 25 each
begin
copy number 24 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 26 each
begin
copy number 25 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 27 each
begin
copy number 26 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 28 each
begin
copy number 27 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 29 each
begin
copy number 28 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 30 each
begin
copy number 29 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 31 each
begin
copy number 30 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 32 each
begin
copy number 31 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 33 each
begin
copy number 32 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 34 each
begin
copy number 33 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 35 each
begin
copy number 34 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 36 each
begin
copy number 35 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 37 each
begin
copy number 36 to Record "Bet" Layout
end
Put 2 on Neighbor Count
Copy Neighbors of Record "Bet" layout
to Record "Bet2" Layout
Put 100% of Record "progression" data to Record "Bet2" Layout list
Put 100% of Record "progression" data to Record "Bet" Layout list
Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
IF Record "Matrix11" Data index = 1 each
begin
copy number 0 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 2 each
begin
copy number 1 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 3 each
begin
copy number 2 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 4 each
begin
copy number 3 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 5 each
begin
copy number 4 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 6 each
begin
copy number 5 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 7 each
begin
copy number 6 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 8 each
begin
copy number 7 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 9 each
begin
copy number 8 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 10 each
begin
copy number 9 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 11 each
begin
copy number 10 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 12 each
begin
copy number 11 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 13 each
begin
copy number 12 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 14 each
begin
copy number 13 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 15 each
begin
copy number 14 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 16 each
begin
copy number 15 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 17 each
begin
copy number 16 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 18 each
begin
copy number 17 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 19 each
begin
copy number 18 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 20 each
begin
copy number 19 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 21 each
begin
copy number 20 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 22 each
begin
copy number 21 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 23 each
begin
copy number 22 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 24 each
begin
copy number 23 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 25 each
begin
copy number 24 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 26 each
begin
copy number 25 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 27 each
begin
copy number 26 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 28 each
begin
copy number 27 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 29 each
begin
copy number 28 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 30 each
begin
copy number 29 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 31 each
begin
copy number 30 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 32 each
begin
copy number 31 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 33 each
begin
copy number 32 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 34 each
begin
copy number 33 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 35 each
begin
copy number 34 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 36 each
begin
copy number 35 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 37 each
begin
copy number 36 to Record "Bet" Layout
end
}
set flag "loop" true
{ Put 2 on Neighbor Count
Copy Neighbors of Record "Bet" layout
to Record "Bet2" Layout
Put 100% of Record "progression" data to Record "Bet2" Layout list
Put 100% of Record "progression" data to Record "Bet" Layout list
}
// subtract 1 to Record "last" Layout index
// subtract 1 to Record "DistData" Data index
//subtract 1 to Record "secondlast" Layout index
end
end
{
IF Record "LastBetMatrix" Layout index >= 4
begin
//duplicate Record "DistData" to Record "DistDataTEMP"
loop until Record "last" Layout index = 1
begin
//set max to Record "LastBetMatrix2" Layout index
//set max to Record "LastBetMatrix" Layout index
//set max to Record "secondlast" Layout index
//set flag "loop" true
//duplicate Record "DistData" to Record "DistData2"
//loop until Record "LastBetMatrix2" Layout index = 0
//begin
duplicate Record "Matrix9" to Record "Matrix7"
if Record "LastBetMatrix" Layout = number 0 each
begin
put 1 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 1 each
begin
put 21 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 2 each
begin
put 7 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 3 each
begin
put 36 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 4 each
begin
put 5 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 5 each
begin
put 20 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 6 each
begin
put 11 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 7 each
begin
put 32 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 8 each
begin
put 17 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 9 each
begin
put 28 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 10 each
begin
put 19 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 11 each
begin
put 15 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 12 each
begin
put 34 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 13 each
begin
put 13 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 14 each
begin
put 26 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 15 each
begin
put 3 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 16 each
begin
put 22 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 17 each
begin
put 9 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 18 each
begin
put 30 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 19 each
begin
put 4 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 20 each
begin
put 25 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 21 each
begin
put 6 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 22 each
begin
put 29 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 23 each
begin
put 18 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 24 each
begin
put 21 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 25 each
begin
put 8 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 26 each
begin
put 37 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 27 each
begin
put 12 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 28 each
begin
put 33 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 29 each
begin
put 31 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 30 each
begin
put 16 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 31 each
begin
put 27 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 32 each
begin
put 2 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 33 each
begin
put 23 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 34 each
begin
put 10 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 35 each
begin
put 35 to Record "Matrix7" Data index
end
if Record "LastBetMatrix" Layout = number 36 each
begin
put 14 to Record "Matrix7" Data index
end
duplicate Record "Matrix7" to Record "Matrix8"
duplicate Record "Matrix7" to Record "Matrix"
duplicate Record "Matrix7" to Record "Matrix2"
duplicate Record "Matrix7" to Record "Matrix5"
//duplicate Record "Matrix7" to Record "last"
//==========
duplicate Record "Matrix9" to Record "Matrix10"
if Record "secondlast" Layout = number 0 each
begin
put 1 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 1 each
begin
put 21 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 2 each
begin
put 7 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 3 each
begin
put 36 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 4 each
begin
put 5 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 5 each
begin
put 20 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 6 each
begin
put 11 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 7 each
begin
put 32 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 8 each
begin
put 17 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 9 each
begin
put 28 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 10 each
begin
put 19 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 11 each
begin
put 15 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 12 each
begin
put 34 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 13 each
begin
put 13 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 14 each
begin
put 26 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 15 each
begin
put 3 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 16 each
begin
put 22 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 17 each
begin
put 9 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 18 each
begin
put 30 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 19 each
begin
put 4 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 20 each
begin
put 25 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 21 each
begin
put 6 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 22 each
begin
put 29 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 23 each
begin
put 18 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 24 each
begin
put 21 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 25 each
begin
put 8 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 26 each
begin
put 37 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 27 each
begin
put 12 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 28 each
begin
put 33 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 29 each
begin
put 31 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 30 each
begin
put 16 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 31 each
begin
put 27 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 32 each
begin
put 2 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 33 each
begin
put 23 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 34 each
begin
put 10 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 35 each
begin
put 35 to Record "Matrix10" Data index
end
if Record "secondlast" Layout = number 36 each
begin
put 14 to Record "Matrix10" Data index
end
duplicate Record "Matrix10" to Record "Matrix11"
duplicate Record "Matrix10" to Record "Matrix3"
duplicate Record "Matrix10" to Record "Matrix4"
duplicate Record "Matrix10" to Record "Matrix6"
IF flag "loop" false each
begin
//==Dist Calc===
duplicate Record "last" to Record "temp"
// duplicate Record "LastBetMatrix" to Record "last"
duplicate Record "Matrix7" to Record "Matrix"
duplicate Record "Matrix10" to Record "Matrix3"
if Record "Matrix" Data index < Record "Matrix3" Data index each
begin
if Record "last" Layout = number 0 each
begin
subtract 1 from Record "Matrix3" Data index
end
if Record "last" Layout = number 1 each
begin
subtract 21 from Record "Matrix3" Data index
end
if Record "last" Layout = number 2 each
begin
subtract 7 from Record "Matrix3" Data index
end
if Record "last" Layout = number 3 each
begin
subtract 36 from Record "Matrix3" Data index
end
if Record "last" Layout = number 4 each
begin
subtract 5 from Record "Matrix3" Data index
end
if Record "last" Layout = number 5 each
begin
subtract 20 from Record "Matrix3" Data index
end
if Record "last" Layout = number 6 each
begin
subtract 11 from Record "Matrix3" Data index
end
if Record "last" Layout = number 7 each
begin
subtract 32 from Record "Matrix3" Data index
end
if Record "last" Layout = number 8 each
begin
subtract 17 from Record "Matrix3" Data index
end
if Record "last" Layout = number 9 each
begin
subtract 28 from Record "Matrix3" Data index
end
if Record "last" Layout = number 10 each
begin
subtract 19 from Record "Matrix3" Data index
end
if Record "last" Layout = number 11 each
begin
subtract 15 from Record "Matrix3" Data index
end
if Record "last" Layout = number 12 each
begin
subtract 34 from Record "Matrix3" Data index
end
if Record "last" Layout = number 13 each
begin
subtract 13 from Record "Matrix3" Data index
end
if Record "last" Layout = number 14 each
begin
subtract 26 from Record "Matrix3" Data index
end
if Record "last" Layout = number 15 each
begin
subtract 3 from Record "Matrix3" Data index
end
if Record "last" Layout = number 16 each
begin
subtract 22 from Record "Matrix3" Data index
end
if Record "last" Layout = number 17 each
begin
subtract 9 from Record "Matrix3" Data index
end
if Record "last" Layout = number 18 each
begin
subtract 30 from Record "Matrix3" Data index
end
if Record "last" Layout = number 19 each
begin
subtract 4 from Record "Matrix3" Data index
end
if Record "last" Layout = number 20 each
begin
subtract 25 from Record "Matrix3" Data index
end
if Record "last" Layout = number 21 each
begin
subtract 6 from Record "Matrix3" Data index
end
if Record "last" Layout = number 22 each
begin
subtract 29 from Record "Matrix3" Data index
end
if Record "last" Layout = number 23 each
begin
subtract 18 from Record "Matrix3" Data index
end
if Record "last" Layout = number 24 each
begin
subtract 21 from Record "Matrix3" Data index
end
if Record "last" Layout = number 25 each
begin
subtract 8 from Record "Matrix3" Data index
end
if Record "last" Layout = number 26 each
begin
subtract 37 from Record "Matrix3" Data index
end
if Record "last" Layout = number 27 each
begin
subtract 12 from Record "Matrix3" Data index
end
if Record "last" Layout = number 28 each
begin
subtract 33 from Record "Matrix3" Data index
end
if Record "last" Layout = number 29 each
begin
subtract 31 from Record "Matrix3" Data index
end
if Record "last" Layout = number 30 each
begin
subtract 16 from Record "Matrix3" Data index
end
if Record "last" Layout = number 31 each
begin
subtract 27 from Record "Matrix3" Data index
end
if Record "last" Layout = number 32 each
begin
subtract 2 from Record "Matrix3" Data index
end
if Record "last" Layout = number 33 each
begin
subtract 23 from Record "Matrix3" Data index
end
if Record "last" Layout = number 34 each
begin
subtract 10 from Record "Matrix3" Data index
end
if Record "last" Layout = number 35 each
begin
subtract 35 from Record "Matrix3" Data index
end
if Record "last" Layout = number 36 each
begin
subtract 14 from Record "Matrix3" Data index
end
// if flag "loop" false each
// begin
Set Max to Record "DistData" Data Index
Add 1 to Record "DistData" Data Index
// end
IF Record "Matrix3" Data index = 1 each
begin
put 1 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 2 each
begin
put 2 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 3 each
begin
put 3 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 4 each
begin
put 4 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 5 each
begin
put 5 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 6 each
begin
put 6 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 7 each
begin
put 7 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 8 each
begin
put 8 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 9 each
begin
put 9 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 10 each
begin
put 10 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 11 each
begin
put 11 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 12 each
begin
put 12 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 13 each
begin
put 13 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 14 each
begin
put 14 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 15 each
begin
put 15 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 16 each
begin
put 16 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 17 each
begin
put 17 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 18 each
begin
put 18 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 19 each
begin
put 19 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 20 each
begin
put 20 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 21 each
begin
put 21 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 23 each
begin
put 23 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 24 each
begin
put 24 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 25 each
begin
put 25 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 26 each
begin
put 26 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 27 each
begin
put 27 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 28 each
begin
put 28 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 29 each
begin
put 29 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 30 each
begin
put 30 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 31 each
begin
put 31 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 32 each
begin
put 32 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 33 each
begin
put 33 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 34 each
begin
put 34 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 35 each
begin
put 35 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 36 each
begin
put 36 to Record "DistData" Data
end
IF Record "Matrix3" Data index = 37 each
begin
put 37 to Record "DistData" Data
end
end
else
begin
//****
if Record "Matrix" Data index > Record "Matrix3" Data index each
begin
if Record "secondlast" Layout = number 0 each
begin
subtract 1 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 1 each
begin
subtract 21 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 2 each
begin
subtract 7 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 3 each
begin
subtract 36 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 4 each
begin
subtract 5 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 5 each
begin
subtract 20 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 6 each
begin
subtract 11 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 7 each
begin
subtract 32 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 8 each
begin
subtract 17 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 9 each
begin
subtract 28 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 10 each
begin
subtract 19 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 11 each
begin
subtract 15 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 12 each
begin
subtract 34 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 13 each
begin
subtract 13 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 14 each
begin
subtract 26 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 15 each
begin
subtract 3 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 16 each
begin
subtract 22 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 17 each
begin
subtract 9 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 18 each
begin
subtract 30 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 19 each
begin
subtract 4 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 20 each
begin
subtract 25 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 21 each
begin
subtract 6 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 22 each
begin
subtract 29 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 23 each
begin
subtract 18 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 24 each
begin
subtract 21 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 25 each
begin
subtract 8 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 26 each
begin
subtract 37 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 27 each
begin
subtract 12 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 28 each
begin
subtract 33 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 29 each
begin
subtract 31 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 30 each
begin
subtract 16 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 31 each
begin
subtract 27 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 32 each
begin
subtract 23 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 33 each
begin
subtract 34 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 34 each
begin
subtract 10 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 35 each
begin
subtract 35 from Record "Matrix" Data index
end
if Record "secondlast" Layout = number 36 each
begin
subtract 14 from Record "Matrix" Data index
end
// if flag "loop" false each
// begin
Set Max to Record "DistData" Data Index
Add 1 to Record "DistData" Data Index
// end
IF Record "Matrix" Data index = 1 each
begin
put 1 to Record "DistData" Data
end
IF Record "Matrix" Data index = 2 each
begin
put 2 to Record "DistData" Data
end
IF Record "Matrix" Data index = 3 each
begin
put 3 to Record "DistData" Data
end
IF Record "Matrix" Data index = 4 each
begin
put 4 to Record "DistData" Data
end
IF Record "Matrix" Data index = 5 each
begin
put 5 to Record "DistData" Data
end
IF Record "Matrix" Data index = 6 each
begin
put 6 to Record "DistData" Data
end
IF Record "Matrix" Data index = 7 each
begin
put 7 to Record "DistData" Data
end
IF Record "Matrix" Data index = 8 each
begin
put 8 to Record "DistData" Data
end
IF Record "Matrix" Data index = 9 each
begin
put 9 to Record "DistData" Data
end
IF Record "Matrix" Data index = 10 each
begin
put 10 to Record "DistData" Data
end
IF Record "Matrix" Data index = 11 each
begin
put 11 to Record "DistData" Data
end
IF Record "Matrix" Data index = 12 each
begin
put 12 to Record "DistData" Data
end
IF Record "Matrix" Data index = 13 each
begin
put 13 to Record "DistData" Data
end
IF Record "Matrix" Data index = 14 each
begin
put 14 to Record "DistData" Data
end
IF Record "Matrix" Data index = 15 each
begin
put 15 to Record "DistData" Data
end
IF Record "Matrix" Data index = 16 each
begin
put 16 to Record "DistData" Data
end
IF Record "Matrix" Data index = 17 each
begin
put 17 to Record "DistData" Data
end
IF Record "Matrix" Data index = 18 each
begin
put 18 to Record "DistData" Data
end
IF Record "Matrix" Data index = 19 each
begin
put 19 to Record "DistData" Data
end
IF Record "Matrix" Data index = 20 each
begin
put 20 to Record "DistData" Data
end
IF Record "Matrix" Data index = 21 each
begin
put 21 to Record "DistData" Data
end
IF Record "Matrix" Data index = 23 each
begin
put 23 to Record "DistData" Data
end
IF Record "Matrix" Data index = 24 each
begin
put 24 to Record "DistData" Data
end
IF Record "Matrix" Data index = 25 each
begin
put 25 to Record "DistData" Data
end
IF Record "Matrix" Data index = 26 each
begin
put 26 to Record "DistData" Data
end
IF Record "Matrix" Data index = 27 each
begin
put 27 to Record "DistData" Data
end
IF Record "Matrix" Data index = 28 each
begin
put 28 to Record "DistData" Data
end
IF Record "Matrix" Data index = 29 each
begin
put 29 to Record "DistData" Data
end
IF Record "Matrix" Data index = 30 each
begin
put 30 to Record "DistData" Data
end
IF Record "Matrix" Data index = 31 each
begin
put 31 to Record "DistData" Data
end
IF Record "Matrix" Data index = 32 each
begin
put 32 to Record "DistData" Data
end
IF Record "Matrix" Data index = 33 each
begin
put 33 to Record "DistData" Data
end
IF Record "Matrix" Data index = 34 each
begin
put 34 to Record "DistData" Data
end
IF Record "Matrix" Data index = 35 each
begin
put 35 to Record "DistData" Data
end
IF Record "Matrix" Data index = 36 each
begin
put 36 to Record "DistData" Data
end
IF Record "Matrix" Data index = 37 each
begin
put 37 to Record "DistData" Data
end
end
end
end
IF Record "DistData" Data = 1 each
begin
subtract 1 from Record "Matrix7" Data index
add 1 on Record "Matrix8" Data index
subtract 1 from Record "Matrix10" Data index
add 1 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 2 each
begin
subtract 2 from Record "Matrix7" Data index
add 2 on Record "Matrix8" Data index
subtract 2 from Record "Matrix10" Data index
add 2 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 3 each
begin
subtract 3 from Record "Matrix7" Data index
add 3 on Record "Matrix8" Data index
subtract 3 from Record "Matrix10" Data index
add 3 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 4 each
begin
subtract 4 from Record "Matrix7" Data
add 4 on Record "Matrix8" Data index
subtract 4 from Record "Matrix10" Data index
add 4 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 5 each
begin
subtract 5 from Record "Matrix7" Data index
add 5 on Record "Matrix8" Data index
subtract 5 from Record "Matrix10" Data index
add 5 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 6 each
begin
subtract 6 from Record "Matrix7" Data index
add 6 on Record "Matrix8" Data index
subtract 6 from Record "Matrix10" Data index
add 6 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 7 each
begin
subtract 7 from Record "Matrix7" Data index
add 7 on Record "Matrix8" Data index
subtract 7 from Record "Matrix10" Data index
add 7 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 8 each
begin
subtract 8 from Record "Matrix7" Data index
add 8 on Record "Matrix8" Data index
subtract 8 from Record "Matrix10" Data index
add 8 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 9 each
begin
subtract 9 from Record "Matrix7" Data index
add 9 on Record "Matrix8" Data index
subtract 9 from Record "Matrix10" Data index
add 9 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 10 each
begin
subtract 10 from Record "Matrix7" Data index
add 10 on Record "Matrix8" Data index
subtract 10 from Record "Matrix10" Data index
add 10 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 11 each
begin
subtract 11 from Record "Matrix7" Data index
add 11 on Record "Matrix8" Data index
subtract 11 from Record "Matrix10" Data index
add 11 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 12 each
begin
subtract 12 from Record "Matrix7" Data index
add 12 on Record "Matrix8" Data index
subtract 12 from Record "Matrix10" Data index
add 12 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 13 each
begin
subtract 13 from Record "Matrix7" Data index
add 13 on Record "Matrix8" Data index
subtract 13 from Record "Matrix10" Data index
add 13 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 14 each
begin
subtract 14 from Record "Matrix7" Data index
add 14 on Record "Matrix8" Data index
subtract 14 from Record "Matrix10" Data index
add 14 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 15 each
begin
subtract 15 from Record "Matrix7" Data index
add 15 on Record "Matrix8" Data index
subtract 15 from Record "Matrix10" Data index
add 15 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 16 each
begin
subtract 16 from Record "Matrix7" Data index
add 16 on Record "Matrix8" Data index
subtract 16 from Record "Matrix10" Data index
add 16 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 17 each
begin
subtract 17 from Record "Matrix7" Data index
add 17 on Record "Matrix8" Data index
subtract 17 from Record "Matrix10" Data index
add 17 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 18 each
begin
subtract 18 from Record "Matrix7" Data index
add 18 on Record "Matrix8" Data index
subtract 18 from Record "Matrix10" Data index
add 18 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 19 each
begin
subtract 19 from Record "Matrix7" Data index
add 19 on Record "Matrix8" Data index
subtract 19 from Record "Matrix10" Data index
add 19 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 20 each
begin
subtract 20 from Record "Matrix7" Data index
add 20 on Record "Matrix8" Data index
subtract 20 from Record "Matrix10" Data index
add 20 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 21 each
begin
subtract 21 from Record "Matrix7" Data index
add 21 on Record "Matrix8" Data index
subtract 21 from Record "Matrix10" Data index
add 21 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 22 each
begin
subtract 22 from Record "Matrix7" Data index
add 22 on Record "Matrix8" Data index
subtract 22 from Record "Matrix10" Data index
add 22 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 23 each
begin
subtract 23 from Record "Matrix7" Data index
add 23 on Record "Matrix8" Data index
subtract 23 from Record "Matrix10" Data index
add 23 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 24 each
begin
subtract 24 from Record "Matrix7" Data index
add 24 on Record "Matrix8" Data index
subtract 24 from Record "Matrix10" Data index
add 24 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 25 each
begin
subtract 25 from Record "Matrix7" Data index
add 25 on Record "Matrix8" Data index
subtract 25 from Record "Matrix10" Data index
add 25 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 26 each
begin
subtract 26 from Record "Matrix7" Data index
add 26 on Record "Matrix8" Data index
subtract 26 from Record "Matrix10" Data index
add 26 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 27 each
begin
subtract 27 from Record "Matrix7" Data index
add 27 on Record "Matrix8" Data index
subtract 27 from Record "Matrix10" Data index
add 27 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 28 each
begin
subtract 28 from Record "Matrix7" Data index
add 28 on Record "Matrix8" Data index
subtract 28 from Record "Matrix10" Data index
add 28 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 29 each
begin
subtract 29 from Record "Matrix7" Data index
add 29 on Record "Matrix8" Data index
subtract 29 from Record "Matrix10" Data index
add 29 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 30 each
begin
subtract 30 from Record "Matrix7" Data index
add 30 on Record "Matrix8" Data index
subtract 30 from Record "Matrix10" Data index
add 30 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 31 each
begin
subtract 31 from Record "Matrix7" Data index
add 31 on Record "Matrix8" Data index
subtract 31 from Record "Matrix10" Data index
add 31 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 32 each
begin
subtract 32 from Record "Matrix7" Data index
add 32 on Record "Matrix8" Data index
subtract 32 from Record "Matrix10" Data index
add 32 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 33 each
begin
subtract 33 from Record "Matrix7" Data index
add 33 on Record "Matrix8" Data index
subtract 33 from Record "Matrix10" Data index
add 33 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 34 each
begin
subtract 34 from Record "Matrix7" Data index
add 34 on Record "Matrix8" Data index
subtract 34 from Record "Matrix10" Data index
add 34 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 35 each
begin
subtract 35 from Record "Matrix7" Data index
add 35 on Record "Matrix8" Data index
subtract 35 from Record "Matrix10" Data index
add 35 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 36 each
begin
subtract 36 from Record "Matrix7" Data index
add 36 on Record "Matrix8" Data index
subtract 36 from Record "Matrix10" Data index
add 36 on Record "Matrix11" Data index
end
IF Record "DistData" Data = 37 each
begin
subtract 37 from Record "Matrix7" Data index
add 37 on Record "Matrix8" Data index
subtract 37 from Record "Matrix10" Data index
add 37 on Record "Matrix11" Data index
end
Set Max to Record "Bet2" Layout Index
Add 1 to Record "Bet2" Layout Index
Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
if Record "Matrix7" Data index > 37 each
begin
subtract 37 from Record "Matrix7" data index
end
if Record "Matrix8" Data index > 37 each
begin
subtract 37 from Record "Matrix8" data index
end
if Record "Matrix10" Data index > 37 each
begin
subtract 37 from Record "Matrix10" data index
end
if Record "Matrix11" Data index > 37 each
begin
subtract 37 from Record "Matrix11" data index
end
if Record "Matrix7" Data index < 0 each
begin
add 37 to Record "Matrix7" data index
end
if Record "Matrix8" Data index < 0 each
begin
add 37 to Record "Matrix8" data index
end
if Record "Matrix10" Data index < 0 each
begin
add 37 to Record "Matrix10" data index
end
if Record "Matrix11" Data index < 0 each
begin
add 37 to Record "Matrix11" data index
end
if Record "Matrix7" Data index = 0 each
begin
put 1 to Record "Matrix7" data index
end
if Record "Matrix8" Data index = 0 each
begin
put 1 to Record "Matrix8" data index
end
if Record "Matrix10" Data index = 0 each
begin
put 1 to Record "Matrix10" data index
end
if Record "Matrix11" Data index = 0 each
begin
put 1 to Record "Matrix11" data index
end
{
Set Max to Record "Bet2" Layout Index
Add 1 to Record "Bet2" Layout Index
Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
IF Record "Matrix7" Data index = 1 each
begin
copy number 0 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 2 each
begin
copy number 32 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 3 each
begin
copy number 15 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 4 each
begin
copy number 19 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 5 each
begin
copy number 4 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 6 each
begin
copy number 21 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 7 each
begin
copy number 2 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 8 each
begin
copy number 25 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 9 each
begin
copy number 17 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 10 each
begin
copy number 34 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 11 each
begin
copy number 6 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 12 each
begin
copy number 27 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 13 each
begin
copy number 13 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 14 each
begin
copy number 36 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 15 each
begin
copy number 11 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 16 each
begin
copy number 30 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 17 each
begin
copy number 8 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 18 each
begin
copy number 23 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 19 each
begin
copy number 10 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 20 each
begin
copy number 5 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 21 each
begin
copy number 24 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 22 each
begin
copy number 16 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 23 each
begin
copy number 33 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 24 each
begin
copy number 1 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 25 each
begin
copy number 20 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 26 each
begin
copy number 14 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 27 each
begin
copy number 31 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 28 each
begin
copy number 9 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 29 each
begin
copy number 22 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 30 each
begin
copy number 18 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 31 each
begin
copy number 29 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 32 each
begin
copy number 7 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 33 each
begin
copy number 28 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 34 each
begin
copy number 12 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 35 each
begin
copy number 35 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 36 each
begin
copy number 3 to Record "Bet" Layout
end
IF Record "Matrix7" Data index = 37 each
begin
copy number 26 to Record "Bet" Layout
end
{Put 1 on Neighbor Count
Copy Neighbors of Record "Bet" layout
to Record "Bet2" Layout
Put 100% of Record "progression" data to Record "Bet2" Layout list
Put 100% of Record "progression" data to Record "Bet" Layout list
Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
{ Set Max to Record "Bet2" Layout Index
Add 1 to Record "Bet2" Layout Index
IF Record "Matrix8" Data index = 1 each
begin
copy number 0 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 2 each
begin
copy number 32 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 3 each
begin
copy number 15 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 4 each
begin
copy number 19 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 5 each
begin
copy number 4 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 6 each
begin
copy number 21 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 7 each
begin
copy number 2 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 8 each
begin
copy number 25 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 9 each
begin
copy number 17 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 10 each
begin
copy number 34 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 11 each
begin
copy number 6 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 12 each
begin
copy number 27 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 13 each
begin
copy number 13 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 14 each
begin
copy number 36 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 15 each
begin
copy number 11 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 16 each
begin
copy number 30 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 17 each
begin
copy number 8 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 18 each
begin
copy number 23 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 19 each
begin
copy number 10 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 20 each
begin
copy number 5 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 21 each
begin
copy number 24 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 22 each
begin
copy number 16 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 23 each
begin
copy number 33 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 24 each
begin
copy number 1 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 25 each
begin
copy number 20 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 26 each
begin
copy number 14 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 27 each
begin
copy number 31 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 28 each
begin
copy number 9 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 29 each
begin
copy number 22 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 30 each
begin
copy number 18 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 31 each
begin
copy number 29 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 32 each
begin
copy number 7 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 33 each
begin
copy number 28 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 34 each
begin
copy number 12 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 35 each
begin
copy number 35 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 36 each
begin
copy number 3 to Record "Bet" Layout
end
IF Record "Matrix8" Data index = 37 each
begin
copy number 26 to Record "Bet" Layout
end
{ Put 1 on Neighbor Count
Copy Neighbors of Record "Bet" layout
to Record "Bet2" Layout
Put 100% of Record "progression" data to Record "Bet" Layout list
Put 100% of Record "progression" data to Record "Bet" Layout list }
{ Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
IF Record "Matrix10" Data index = 1 each
begin
copy number 0 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 2 each
begin
copy number 1 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 3 each
begin
copy number 2 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 4 each
begin
copy number 3 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 5 each
begin
copy number 4 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 6 each
begin
copy number 5 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 7 each
begin
copy number 6 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 8 each
begin
copy number 7 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 9 each
begin
copy number 8 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 10 each
begin
copy number 9 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 11 each
begin
copy number 10 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 12 each
begin
copy number 11 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 13 each
begin
copy number 12 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 14 each
begin
copy number 13 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 15 each
begin
copy number 14 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 16 each
begin
copy number 15 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 17 each
begin
copy number 16 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 18 each
begin
copy number 17 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 19 each
begin
copy number 18 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 20 each
begin
copy number 19 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 21 each
begin
copy number 20 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 22 each
begin
copy number 21 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 23 each
begin
copy number 22 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 24 each
begin
copy number 23 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 25 each
begin
copy number 24 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 26 each
begin
copy number 25 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 27 each
begin
copy number 26 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 28 each
begin
copy number 27 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 29 each
begin
copy number 28 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 30 each
begin
copy number 29 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 31 each
begin
copy number 30 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 32 each
begin
copy number 31 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 33 each
begin
copy number 32 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 34 each
begin
copy number 33 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 35 each
begin
copy number 34 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 36 each
begin
copy number 35 to Record "Bet" Layout
end
IF Record "Matrix10" Data index = 37 each
begin
copy number 36 to Record "Bet" Layout
end
Put 100% of Record "progression" data to Record "Bet" Layout list
Set Max to Record "Bet" Layout Index
Add 1 to Record "Bet" Layout Index
IF Record "Matrix11" Data index = 1 each
begin
copy number 0 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 2 each
begin
copy number 1 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 3 each
begin
copy number 2 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 4 each
begin
copy number 3 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 5 each
begin
copy number 4 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 6 each
begin
copy number 5 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 7 each
begin
copy number 6 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 8 each
begin
copy number 7 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 9 each
begin
copy number 8 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 10 each
begin
copy number 9 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 11 each
begin
copy number 10 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 12 each
begin
copy number 11 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 13 each
begin
copy number 12 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 14 each
begin
copy number 13 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 15 each
begin
copy number 14 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 16 each
begin
copy number 15 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 17 each
begin
copy number 16 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 18 each
begin
copy number 17 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 19 each
begin
copy number 18 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 20 each
begin
copy number 19 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 21 each
begin
copy number 20 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 22 each
begin
copy number 21 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 23 each
begin
copy number 22 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 24 each
begin
copy number 23 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 25 each
begin
copy number 24 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 26 each
begin
copy number 25 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 27 each
begin
copy number 26 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 28 each
begin
copy number 27 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 29 each
begin
copy number 28 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 30 each
begin
copy number 29 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 31 each
begin
copy number 30 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 32 each
begin
copy number 31 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 33 each
begin
copy number 32 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 34 each
begin
copy number 33 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 35 each
begin
copy number 34 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 36 each
begin
copy number 35 to Record "Bet" Layout
end
IF Record "Matrix11" Data index = 37 each
begin
copy number 36 to Record "Bet" Layout
end
]
set flag "loop" true
Put 100% of Record "progression" data to Record "Bet" Layout list
subtract 1 to Record "last" Layout index
subtract 1 to Record "DistData" Data index
//subtract 1 to Record "secondlast" Layout index
end
end }
{
set max to Record "DistData" Data index
set max to Record "last" Layout index
set max to Record "secondlast" Layout index
set max to Record "LastBetMatrix" Layout index
set max to Record "LastBetMatrix2" Layout index
}
{ if total spin count >= 300 each
begin
stop session
end
}
if total bankroll <= -1000 each
begin
{ add 1 to record "lost sessions" data index
put 0 on total bankroll
put 1 on Record "progression" Data Index
}
stop session
end
if total bankroll >= 1000 each
begin
{ add 1 to record "won sessions" data index
put 0 on total bankroll
put 1 on Record "progression" Data Index
}
stop session
end
If Record "progression" Data Index >
Record "progression" Data Count each
Begin
Put 1 on Record "progression" Data Index
clear Record "DistData" Layout
clear Record "Bet" Layout
clear Record "secondlast" Layout
clear Record "last" Layout
clear Record "Matrix" Layout
clear Record "Matrix1" Layout
clear Record "Matrix2" Layout
clear Record "Matrix3" Layout
clear Record "Matrix4" Layout
clear Record "Matrix5" Layout
clear Record "Matrix6" Layout
clear Record "Matrix7" Layout
clear Record "Matrix8" Layout
clear Record "Matrix9" Layout
clear Record "Matrix10" Layout
clear Record "Matrix11" Layout
clear Record "Matrix12" Layout
clear Record "Matrix13" Layout
clear Record "LastBetMatrix" Layout
End
Set Max to Record "secondlast" Layout Index
Add 1 to Record "secondlast" Layout Index
copy last Number to Record "secondlast" Layout
{ clear Record "Matrix" Layout
clear Record "Matrix1" Layout
clear Record "Matrix2" Layout
clear Record "Matrix3" Layout
clear Record "Matrix4" Layout
clear Record "Matrix5" Layout
clear Record "Matrix6" Layout
clear Record "Matrix7" Layout
clear Record "Matrix8" Layout }
// clear Record "last" Layout
set flag "loop" false
//
// clear Record "temp" layout
END
Tried this v3... It went up and down.
I cant tell yet about what's the best way or trigger to make some sure hits.
Hello IG,
Just to let you know, there is a Locate Left or Right function in Rx, can be usefull.
system "11 gap left and right"
method "main"
begin
Put 3 on Neighbor Count
Locate Number Left 11 gaps from the Last Number to Record "left" layout
Copy Neighbors of Record "left" layout to Record "left 2" layout
Locate Number Right 11 gaps from the Last Number to Record "right" layout
Copy Neighbors of Record "right" layout to Record "right 2" layout
put 1 on Record "left" layout
put 1 on Record "left 2" layout list
put 1 on Record "right" layout
put 1 on Record "right 2" layout list
end
Quote from: Normy2000 on Feb 01, 05:59 PM 2020
Hello IG,
Just to let you know, there is a Locate Left or Right function in Rx, can be usefull.
system "11 gap left and right"
method "main"
begin
Put 3 on Neighbor Count
Locate Number Left 11 gaps from the Last Number to Record "left" layout
Copy Neighbors of Record "left" layout to Record "left 2" layout
Locate Number Right 11 gaps from the Last Number to Record "right" layout
Copy Neighbors of Record "right" layout to Record "right 2" layout
put 1 on Record "left" layout
put 1 on Record "left 2" layout list
put 1 on Record "right" layout
put 1 on Record "right 2" layout list
end
Great ! :) Thanks :love:
U r welcome my friend!
Is there any way to add to get the average jump in the code?
And bet only if there is a close jumps to get average
It maybe hard to code I think
Not hard to code, there is a "Locate Distance between 2 numbers" function in Rx.
The problem is: we don't know if a spin is CW or CCW.
Then maybe should be coded using both types -cw and ccw- at the same time...
That would be an idea. the ball go from 27 and finish at 30.
We note +4 in CW and +33 in CCW, then after say 100 spins,
we take the hotest jump to the left and to the right as target for our 2 sector bet.
Quote from: Macro on Feb 02, 09:45 AM 2020
Is there any way to add to get the average jump in the code?
And bet only if there is a close jumps to get average
It maybe hard to code I think
I would like that too.... only i havent figured out how to code, perhaps normy can help?
its just collect all distances in a data record, and then add them all togheter and Divide that sum with the total number of distances. That would calculate the average distance...
for an example lets say last distances were 4,12,15,7. (That is 4 distances) Avg.distance would be 4+12+15+7= 38......38/4= 9,5 lets say 10. ok
The code would be then (in the Dealers Signature v.1 code)
Set Max to Record "DistData" Data Index
loop until Record "DistData" index = 1
add Record "DistData" Data to Record "AvgDist" Data
add 1 to Record "DistCalc" data
subtract 1 from Record "DistData" Data index
end
Divide Record "AvgDist" data with Record "DistCalc" data
the "average distance" would then be stored in Record "AvgDist" data
could you confirm this code is correct normy?
Does that for ccw and ccw adding together and getting the aver?
Or should it be aver for CW
And aver for ccw
I will code for the exact hottest jump, not just average, let me few minutes...
Here is something to play with. Flat bet for now...
I have to go now, will check comment tomorrow.
[reveal]
system "auto-gap target"
// coded by: nOrMy2o0o
method "main"
begin
while starting a new session
begin
call "Init"
end
call "win/loss";
call "tracking";
end
//***********************************************************************
method "win/loss"
begin
if flag "BetOn" is true
begin
if any inside bet won each
begin
if bankroll >= record "Highest BR" data
begin
clear record "Highest BR" data
put 100% of bankroll to record "Highest BR" data
put 1 en record "Progression" data
end
end
if net < 0
begin
// add 1 to record "Progression" data
end
set flag "BetOn" to false
end
end
//***********************************************************************
method "tracking"
begin
if record "Spins count" data > 1
begin
copy record "last number" layout to record "2 last number" layout
Track Last Number for 1 spins to record "last number" layout
Locate Distance between the Record "last number" layout to Record "2 last number" Layout into Record "dist CW" Data
put 37 to Record "dist CCW" Data
subtract 100% of Record "dist CW" Data from Record "dist CCW" Data
call "update score"
end
if record "Spins count" data > 99
begin
call "find hot"
call "place bets"
end
Add 1 to record "Spins count" data
end
// ************************************************************************
Method "update score"
Begin
put 100% of Record "dist CW" Data to record "CW" data index
add 1 to record "CW" data
put 100% of Record "dist CCW" Data to record "CCW" data index
add 1 to record "CCW" data
End
// ************************************************************************
Method "find hot"
Begin
put 1 on record "CW" data index
put 0 on record "left hot" data
loop until record "CW" data index > record "CW" data count
begin
if record "CW" data > record "left hot" data
begin
put 100% of record "CW" data to record "left hot" data
end
add 1 on record "CW" data index
end
put 1 on record "CCW" data index
put 0 on record "right hot" data
loop until record "CCW" data index > record "CCW" data count
begin
if record "CCW" data > record "right hot" data
begin
put 100% of record "CCW" data to record "right hot" data
end
add 1 on record "CCW" data index
end
End
//***********************************************************************
method "place bets"
begin
Locate Number Left record "left hot" data gaps from the Last Number to Record "left" layout
Copy Neighbors of Record "left" layout to Record "left 2" layout
Locate Number Right record "right hot" data gaps from the Last Number to Record "right" layout
Copy Neighbors of Record "right" layout to Record "right 2" layout
put 1 on Record "left" layout
put 1 on Record "left 2" layout list
put 1 on Record "right" layout
put 1 on Record "right 2" layout list
set flag "BetOn" to true
end
//***********************************************************************
method "Init"
begin
Put 3 to the Neighbor count
set flag "BetOn" to false
put 1 to record "Progression" data
Put 0 to record "Spins count" data
Put 0 to record "Highest BR" data
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] to record "CW" data
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] to record "CCW" data
Load Single Wheel;
end
[/reveal]
Have you found something relevant about this strategy or it's a dead end?