OK, So im create an ACARS style program and have got it working to extract everything i need so far, only problem im having is with the latitude and longitude and was wondering if someone could point me in the right direction!
Ive adapted the code from http://www.mycockpit.org/forums/showthr#post87129
And got this
Dim dwResult As Long
Dim latHi As Double
Dim latLo As Double
Dim latitude As Double
Dim longHi As Double
Dim longLo As Double
Dim longitude As Double
latHi = "0"
latLo = "0"
latitude = "0"
longHi = "0"
longLo = "0"
longitude = "0"
If FSUIPC_Read(&H564, 4, VarPtr(latHi), dwResult) And FSUIPC_Read(&H560, 4, VarPtr(latLo), dwResult) Then
' "Read" proceeded without any problems
If FSUIPC_Process(dwResult) Then
' "Process" proceeded without any problems
If latLo = "0" Then
latLo = latLo / (65536# * 65536#)
End If
If latHi > 0 Then
latitude = latHi + latLo
Else
latitude = latHi - latLo
End If
Lati.Caption = latitude
End If
End If
Any ideas or if I can extract it using a 64 bit integer using VB6? Ive tried a double but got nothing out of it, have been using FS Interrorgate to read the values and try and match up what it says with what I get!
Any help would be much appreciated!