COM interface - starting prices

[Marshy]

I have recently moved to using the COM interface and all is going well apart from getting the starting prices. I am using getMarketDepth which returns the MarketDepthSelection and this seems to be working. Before the start I can get the farSPPrice and nearSPPrice which work fine, and actualSPPrice returns zero as I would expect before the race stars. However once the race starts the actualSPPrice continues to be zero but I believe it should contain the actual starting price.

Anybody else trying to do this and got any ideas why it is n't working?

Thanks
Marshy

[Captain Sensible]

Guess that's one for Gary to answer, the new API works slightly differently than API6 as you can now request all or as little data as you need. I think values now have their own fields rather than doubling up on SP reconciliation like the old API used to switch the projected price to Actual BSP once reconciled and inplay

[rourkem]

Thanks. I'm still checking out API6 at this point, so far, I can't find any issues with it. But for sure, I'll let you know once I stumble into something.

[GaryRussell]

This issue is fixed in the next release due shortly.

[Temujin]

Hi,
I am looking for help to get totalBSPBackAmountAvailable and totalBSPLayAmountAvailable into my working sheet. Ultimately I want to try and predict the SP price, so perhaps the nearSP and farSP also for comparison.

All this is completely beyond me. Very limited VBA, but can generally work my way logically through the code and adapt to my needs.

I have been through the GetMarketDepthExample and the Async example spreadsheets and tried to adapt them but to no avail. I simply seem to be able to get them to stop working at all.

From the best of my ability, it seems that all this data is bought in with the getMarketDepth call from either of these sheets. From there, I would assume it would be an easy call to simply add another line of code in to display these figures.

Ultimately, the Async example would be best as I like the idea of the 10 best back/lay prices also, but for a start, can anybody advise on how exactly I get the back stake and the lay liability for SP into an Excel spreadsheet?

[Temujin]

Think I cracked it. As soon as I can work out why I can no longer link to my sheet, I will be able to test it.


Option Explicit

Dim ba As New BettingAssistantCom.ComClass

Private Sub Worksheet_Change(ByVal Target As Range)
Dim marketDepth As Variant, prices As Variant
If Target.Columns.Count = 16 Then
Application.EnableEvents = False
If ba Is Nothing Then
Set ba = New BettingAssistantCom.ComClass
End If
marketDepth = ba.getMarketDepth
If Not IsEmpty(marketDepth) Then
Dim i As Integer, r As Integer, selecName As String, j As Integer
Dim bestBackPrice As Double, bestLayPrice As Double, backAmount As Double, layAmount As Double
r = 5
Do
selecName = Cells(r, 1).Value
If selecName <> "" Then
For i = 0 To UBound(marketDepth)
If marketDepth(i).Selection = selecName Then
bestBackPrice = 1000
bestLayPrice = 1.01
backAmount = 0
layAmount = 0
prices = marketDepth(i).prices
For j = 0 To UBound(prices)

If prices(j).odds = bestBackPrice Then

backAmount = prices(j).totalBSPBackAmountAvailable
End If


If prices(j).odds = bestLayPrice Then

layAmount = prices(j).totalBSPLayAmountAvailable
End If
End If
Next
Cells(r, 43).Value = backAmount
Cells(r, 44).Value = layAmount

Exit For
End If
Next
End If
r = r + 1
Loop Until selecName = ""
End If
Application.EnableEvents = True
End If
End Sub

[Temujin]

Ok.
So it seems that there is an issue with this code on my main sheet.

This was copied directly from where I tested it on the GetMarketDepthExample sheet, where it connected fine and read in the data.

I copied this directly into my main sheet and it is throwing up user-defined type not defined. I referenced the newest Active X.

Works fine on one sheet, but not my main sheet.

Possibly the reason I can't connect it to Gruss. Can recognise the file, but no worksheet able to be selected.

Any takers?