Matthew-02 Details
This is a nice steady system which should belong in everyone's portfolio.
The main two components of this systems are that the selections must be running in Great Britain and that the selection must have the best positive 5 Year Class Differential in the race.
Rules
All of these requirements have to be met.
GB only
Positive 5 Year Class Differential
Best 5 Year Class Differential in the race
Additionally the following have to be met for the Race Types:
All Weather:
Alarm 'c', or
Underscore RAdj and Underscore WinF, or
Positive 1 Year Class Differential and Underscore HCP and Underscore Cls, or
Positive 1 Year Class Differential and Underscore HCP and Underscore WinF, or
Underscore Trainer and Underscore Lst
Flat:
Five Year Class Differential > 5.0 and Alarm 'p'
Hurdle:
Five Year Class Differential > 5.0 and Alarm 'p', or
Underscore Trainer and Underscore Lst, or
Underscore Conn and Underscore Lst
Chase:
Five Year Class Differential > 5.0 and Alarm 'p', or
Underscore Conn and Underscore Lst, or
Positive 1 Year Class Differential and Underscore HCP and Underscore Cls, or
Top-3 rated, Jockey Rated 100+, Trainer Rated 110+ and TrForm Rated 80+
|
|
Runs: | 1,324 |
Wins: | 425 |
Level Stakes Profit: | 397 |
Strike Rate: | 32.1% |
ROI: | 30.0% |
Level stakes, 5% Commission
Code example from the Data Analysis Tool
nRawRanking = Val(asEntry(GetColumnNumber("DK") - 1))
nRAdjRanking = Val(asEntry(GetColumnNumber("DL") - 1))
nHCPRanking = Val(asEntry(GetColumnNumber("DV") - 1))
nFrmRanking = Val(asEntry(GetColumnNumber("DQ") - 1))
nSpdRanking = Val(asEntry(GetColumnNumber("DU") - 1))
nConnRanking = Val(asEntry(GetColumnNumber("DP") - 1))
nTrainerRanking = Val(asEntry(GetColumnNumber("DN") - 1))
nLstRanking = Val(asEntry(GetColumnNumber("DR") - 1))
nWinFRanking = Val(asEntry(GetColumnNumber("DT") - 1))
nClsRanking = Val(asEntry(GetColumnNumber("DS") - 1))
nTrFormRanking = Val(asEntry(GetColumnNumber("DO") - 1))
sCountry = Trim$("" & asEntry(GetColumnNumber("EI") - 1))
sAlarms = Trim$("" & asEntry(GetColumnNumber("AR") - 1))
nRanking = Val(asEntry(GetColumnNumber("AZ") - 1))
nClassDifferential5Years = Val(asEntry(GetColumnNumber("EO") - 1))
nClassDifferential1Year = Val(asEntry(GetColumnNumber("FY") - 1))
nClassDifferential1YearWins = Val(asEntry(GetColumnNumber("GC") - 1))
nWeightDifferential1Year = Val(asEntry(GetColumnNumber("GG") - 1))
nTrainer = Val(asEntry(GetColumnNumber("AJ") - 1))
nTrForm = Val(asEntry(GetColumnNumber("DO") - 1))
bIsSelection = False
If sCountry = "GB" Then
If TopColumnRatedAbsolute(nIndexStart, nIndexEnd, asEntry(), "EO") > 0# Then ' Has best 5 Year Class Diff. in race
If sRaceType = "AW" Then
If nClassDifferential5Years > 0# And InStr(1, sAlarms, "c", vbTextCompare) > 0 Then bIsSelection = True
If nClassDifferential5Years > 0# And nRAdjRanking = 1 And nWinFRanking = 1 Then bIsSelection = True
If nClassDifferential5Years > 0# And nClassDifferential1Year > 0# And nHCPRanking = 1 And nClsRanking = 1 Then bIsSelection = True
If nClassDifferential5Years > 0# And nClassDifferential1Year > 0# And nHCPRanking = 1 And nWinFRanking = 1 Then bIsSelection = True
If nClassDifferential5Years > 0# And nTrainerRanking = 1 And nLstRanking = 1 Then bIsSelection = True
ElseIf sRaceType = "Flat" Then
If nClassDifferential5Years > 5# And InStr(1, sAlarms, "p", vbTextCompare) > 0 Then bIsSelection = True
ElseIf sRaceType = "Hurdle" Then
If nClassDifferential5Years > 5# And InStr(1, sAlarms, "p", vbTextCompare) > 0 Then bIsSelection = True
If nClassDifferential5Years > 0# And nTrainerRanking = 1 And nLstRanking = 1 Then bIsSelection = True
If nClassDifferential5Years > 0# And nConnRanking = 1 And nLstRanking = 1 Then bIsSelection = True
If nRanking >= 1 And nRanking <= 9 And nTrainerRanking = 1 And nLstRanking = 1 Then bIsSelection = True
ElseIf sRaceType = "Chase" Then
If nClassDifferential5Years > 5# And InStr(1, sAlarms, "p", vbTextCompare) > 0 Then bIsSelection = True
If nClassDifferential5Years > 5# And nConnRanking = 1 And nLstRanking = 1 Then bIsSelection = True
If nClassDifferential5Years > 0# And nClassDifferential1YearWins > 0# And nClsRanking = 1 And nHCPRanking = 1 Then bIsSelection = True
If nClassDifferential5Years > 0# And nJockey >= 100# And nTrainer >= 110# And nTrForm >= 80# And nRanking >= 1 And nRanking <= 3 Then bIsSelection = True
End If
End If
End If