Abandoned [RELEASE] Trade Computer Extension

eventure · Apr 7, 2015

Bragolatch said:
I gave the new one a good try, but I also came back to the old layout.
It is much quicker with the main buttons always available then going through the drop down menu every time.
But having the option is very nice !

I reviewed the new UI in practice and came to one insight. I miss also the direct way of access to all panel, so i want to rework it a little.
The menu buttons will be replaced with pictograms for each panel. They are smaller than the text buttons and all panels can be opened with one click (beside the database).

Here is a picture of all pictograms:

How do you like it?

punkerich · Apr 7, 2015

looks promising. sure it'll take some time getting used to, but that shouldn't be a prob.
keep it coming!

Palu · Apr 7, 2015

Just wanted to stop in and say that I've really been enjoying TCE and am looking forward to all the updates to come!

Bragolatch · Apr 7, 2015

Yes yes yes and yes ! I love the picto Idea !
Especially if you manage to make it feel like it is part of the ED interface like the current UI already does !!!

Dreamcaster · Apr 7, 2015

Bragolatch said:
As is, CARTOGRAPHY marks each sectors you go to at least once as VISITED.
You can then mark them manually as PARTIAL or COMPLETE.
And you can add a separate note to each sector of space.

Eventure is now working on a new and improved log book and as asked for suggestion as to what features we'd like.

So now is the right time to express your wishes in details

Well, I am one of those OCD explorers who spend as much time (if not more) filling out my spreadsheet as i spend exploring:
https://docs.google.com/spreadsheets/d/1z246yVXAs3Q3KQ7t8aJQp0Jcdbo6YZuF5j74AJOFyTM/edit?usp=sharing

Ideally, I would like the following information to be automatically retrieved (I believe the OCR app is necessary, since the .log file does not carry such information):

name of the system I have just jumped into and timestamp of the jump (can be parsed from the .log file)
distance of the last jump (needs to be checked on the galaxy map by rolling over the mouse on the next system before the jump, 2 decimals. For instance LY 17.78 and not LY 17.8 as showed on the ship HUD)
the following info that are displayed on the Galaxy Map while the mouse is on the targeted system: star types, allegiance, economy, government, population
the following info that are displayed on the System Map: security and star catalogue ID (not really sure about star catalogue ID)
number of objects within the system
types of objects (rocky planet, class O star, water world, etc...) within the system (this is possible once the scan is complete while the mouse is over a certain object).

I guess numbers 1 to 4 and 6 can somehow be retrieved using the OCR.
Not quite sure about 5 , where the data to be OCRed is not text, but graphics.

I would also like to have a couple of editable fields where I can note:
- whether I am the first one to have explored that system
- generic notes
- how much the system worth selling to Universal Cartographics

Well...I had my say! LOL
Hope it is not too much!

eventure · Apr 7, 2015

Dreamcaster said:
Well, I am one of those OCD explorers who spend as much time (if not more) filling out my spreadsheet as i spend exploring:
https://docs.google.com/spreadsheets/d/1z246yVXAs3Q3KQ7t8aJQp0Jcdbo6YZuF5j74AJOFyTM/edit?usp=sharing

Ideally, I would like the following information to be automatically retrieved (I believe the OCR app is necessary, since the .log file does not carry such information):

name of the system I have just jumped into and timestamp of the jump (can be parsed from the .log file)

distance of the last jump (needs to be checked on the galaxy map by rolling over the mouse on the next system before the jump, 2 decimals. For instance LY 17.78 and not LY 17.8 as showed on the ship HUD)

the following info that are displayed on the Galaxy Map while the mouse is on the targeted system: star types, allegiance, economy, government, population

the following info that are displayed on the System Map: security and star catalogue ID (not really sure about star catalogue ID)

number of objects within the system

types of objects (rocky planet, class O star, water world, etc...) within the system (this is possible once the scan is complete while the mouse is over a certain object).

I guess numbers 1 to 4 and 6 can somehow be retrieved using the OCR.
Not quite sure about 5 , where the data to be OCRed is not text, but graphics.

Nice list, but EliteOCR is only for price data, nothing else, so:
1. via Netlogfile
2. will be calculated, but only, if both systems (start and destination) are recorded.
3.-6. must be entered manually.

Maedhros · Apr 7, 2015

Eventure said:
I reviewed the new UI in practice and came to one insight. I miss also the direct way of access to all panel, so i want to rework it a little.
The menu buttons will be replaced with pictograms for each panel. They are smaller than the text buttons and all panels can be opened with one click (beside the database).

Here is a picture of all pictograms:

View attachment 27602

How do you like it?

Looks good so far - presumably the pictograms would take the selected UI colour?

eventure · Apr 7, 2015

Maedhros said:
Looks good so far - presumably the pictograms would take the selected UI colour?

No, because they are pictures and not a font. They stay white, but getting a border of the UI color, when mouseover, like on the preview.

Astardes · Apr 7, 2015

Eventure - when is FD going to offer you a position at ED =)

Seriously, I cannot stomach to play the game without your addon - it's just too painful. At least with your addon I get to imagine I'm working with a futuristic space ship with an integral computer that I can log things with....

Keep up the great work

LBITB · Apr 7, 2015

Eventure said:
No, because they are pictures and not a font. They stay white, but getting a border of the UI color, when mouseover, like on the preview.

Could you get them to also display some hover text like Windows etc does, so for the uninitiated / forgetful, it's still easy to work out which button to press. I assume the core location / destination text would remain prominent?

Bragolatch · Apr 7, 2015

Error 13

I just receive an Error 13 trying to PREVIEW TRADE ROUTE SELECTION.
Funny thing is, I had previewed the same route a few minutes before without any problems !

Private Sub BTN_Preview_Click()

Temp_POS_StarID = Worksheets("Werte").Cells(2, 2).Value
Temp_POS_StationID = Worksheets("Werte").Cells(3, 2).Value
Temp_DES_StarID = Worksheets("Werte").Cells(12, 2).Value
Temp_DES_StationID = Worksheets("Werte").Cells(13, 2).Value
POS_StarID = Worksheets("Data").Cells(118, 2).Value
POS_StationID = Worksheets("Data").Cells(116, 2).Value
DES_StarID = Worksheets("Data").Cells(121, 2).Value
DES_StationID = Worksheets("Data").Cells(119, 2).Value
Call POS_Commodities
Call DES_Commodities
Me.Hide
TS_Preview = True
If Menu_Mode = "CLASSIC" Then
If Main_Panel = "TOP" Then
Panel_Menu_top.BTN_Trade_Layer.BackColor = TCE_Color
Panel_Menu_top.BTN_Trade_Label.ForeColor = 0
Else
Panel_Menu_bottom.BTN_Trade_Layer.BackColor = TCE_Color
Panel_Menu_bottom.BTN_Trade_Label.ForeColor = 0
End If
End If
Panel_Trade.Show
DoEvents

End Sub

eventure · Apr 7, 2015

LBITB said:
Could you get them to also display some hover text like Windows etc does, so for the uninitiated / forgetful, it's still easy to work out which button to press. I assume the core location / destination text would remain prominent?

Will add a tooltip on mouseover. The classic UI will be untouched. It will only affect the text buttons of the compact UI. They will be removed.

Bragolatch said:
I just receive an Error 13 trying to PREVIEW TRADE ROUTE SELECTION.
Funny thing is, I had previewed the same route a few minutes before without any problems !

Private Sub BTN_Preview_Click()

Temp_POS_StarID = Worksheets("Werte").Cells(2, 2).Value
Temp_POS_StationID = Worksheets("Werte").Cells(3, 2).Value
Temp_DES_StarID = Worksheets("Werte").Cells(12, 2).Value
Temp_DES_StationID = Worksheets("Werte").Cells(13, 2).Value
POS_StarID = Worksheets("Data").Cells(118, 2).Value
POS_StationID = Worksheets("Data").Cells(116, 2).Value
DES_StarID = Worksheets("Data").Cells(121, 2).Value
DES_StationID = Worksheets("Data").Cells(119, 2).Value
Call POS_Commodities
Call DES_Commodities
Me.Hide
TS_Preview = True
If Menu_Mode = "CLASSIC" Then
If Main_Panel = "TOP" Then
Panel_Menu_top.BTN_Trade_Layer.BackColor = TCE_Color
Panel_Menu_top.BTN_Trade_Label.ForeColor = 0
Else
Panel_Menu_bottom.BTN_Trade_Layer.BackColor = TCE_Color
Panel_Menu_bottom.BTN_Trade_Label.ForeColor = 0
End If
End If
Panel_Trade.Show
DoEvents

End Sub

Was fixed here, i will release a new beta tomorrow.

Bragolatch · Apr 8, 2015

Can't edit a registered station

It's probably related to the Error 13 I last reported, I just had it again.
After restarting TCE the SELECTED POSITION said "near body"
while I was at a previously registered station.

I manually selected that station and was able to update the prices.
But I figure I would edit the station and re-enter the data just to be safe.
But on opening the DATABASE - STATIONS panel
and selecting EDIT REGISTERED STATION
There is nothing in the STATION NAME box and no drop down list,
even thought I have 3 registered station in this system.
Tried selecting a different position and I get the same result.

I jumped to a different system and docked at a station where the CURRENT STATION updated automatically.
From there the EDIT REGISTERED STATION panel works properly for that station.

So the problem only happens when I manually select CURRENT STATION.
But (I thought) that is one of the main purpose of being able to select CURRENT STATION,
to be able to fix/modify a station without having to travel there.
Or, as in my case, fix the data for that station when it's acting funny.

Bragolatch · Apr 8, 2015

Error 13

Another Error 13 on clicking START TRADE ROUTE

Private Sub BTN_Start_Click()

Dim SX As Double, SY As Double, SZ As Double, TX As Double, TY As Double, TZ As Double, ZX As Double, ZY As Double, ZZ As Double, SID As Long, TID As Long, ZID As Long, z As Long, Dist1 As Double, Dist2 As Double

If Me.BTN_Start_Label.Caption = "START TRADE ROUTE" Then
If Saving = False And Panel_Scout_BD.Visible = True Then
TR_ID = Worksheets("Data").Cells(115, 2).Value
If POS_StationID = Worksheets("TR_Route").Cells(TR_ID + 1, 1).Value Then
TLocked = True
TLocked_Star1 = Worksheets("Data").Cells(118, 2).Value
TLocked_Station1 = Worksheets("Data").Cells(116, 2).Value
TGood1 = Worksheets("Data").Cells(124, 2).Value
TLocked_Star2 = Worksheets("Data").Cells(121, 2).Value
TLocked_Station2 = Worksheets("Data").Cells(119, 2).Value
TGood2 = Worksheets("Data").Cells(125, 2).Value
If Menu_Mode = "CLASSIC" Then
If Main_Panel = "TOP" Then
Panel_Menu_top.TLocked_line1.Visible = True
Panel_Menu_top.TLocked_line2.Visible = True
Panel_Menu_top.BTN_Locked.Visible = True
Panel_Menu_top.POS_Eco.Caption = TGood1
Panel_Menu_top.DES_Eco.Caption = TGood2
Else
Panel_Menu_bottom.TLocked_line1.Visible = True
Panel_Menu_bottom.TLocked_line2.Visible = True
Panel_Menu_bottom.BTN_Locked.Visible = True
Panel_Menu_bottom.POS_Eco.Caption = TGood1
Panel_Menu_bottom.DES_Eco.Caption = TGood2
End If
Else
Panel_Displays.TLocked_line.Visible = True
Panel_Displays.BTN_Locked.Visible = True
Panel_Displays.POS_Eco.Caption = TGood1
Panel_Displays.DES_Eco.Caption = TGood2
End If
DES_StarID = TLocked_Star2
DES_StationID = TLocked_Station2
Worksheets("Werte").Cells(12, 2).Value = TLocked_Star2
Worksheets("Werte").Cells(13, 2).Value = TLocked_Station2
Me.BTN_Start_Label.Caption = "STOP TRADE ROUTE"
DoEvents
End If
If POS_StationID = Worksheets("TR_Route").Cells(TR_ID + 1, 3).Value And TLocked = False Then
TLocked = True
TLocked_Star1 = Worksheets("Data").Cells(121, 2).Value
TLocked_Station1 = Worksheets("Data").Cells(119, 2).Value
TGood1 = Worksheets("Data").Cells(125, 2).Value
TLocked_Star2 = Worksheets("Data").Cells(118, 2).Value
TLocked_Station2 = Worksheets("Data").Cells(116, 2).Value
TGood2 = Worksheets("Data").Cells(124, 2).Value
If Menu_Mode = "CLASSIC" Then
If Main_Panel = "TOP" Then
Panel_Menu_top.TLocked_line1.Visible = True
Panel_Menu_top.TLocked_line2.Visible = True
Panel_Menu_top.BTN_Locked.Visible = True
Panel_Menu_top.POS_Eco.Caption = TGood1
Panel_Menu_top.DES_Eco.Caption = TGood2
Else
Panel_Menu_bottom.TLocked_line1.Visible = True
Panel_Menu_bottom.TLocked_line2.Visible = True
Panel_Menu_bottom.BTN_Locked.Visible = True
Panel_Menu_bottom.POS_Eco.Caption = TGood1
Panel_Menu_bottom.DES_Eco.Caption = TGood2
End If
Else
Panel_Displays.TLocked_line.Visible = True
Panel_Displays.BTN_Locked.Visible = True
Panel_Displays.POS_Eco.Caption = TGood1
Panel_Displays.DES_Eco.Caption = TGood2
End If
DES_StarID = TLocked_Star2
DES_StationID = TLocked_Station2
Worksheets("Werte").Cells(12, 2).Value = TLocked_Star2
Worksheets("Werte").Cells(13, 2).Value = TLocked_Station2
Me.BTN_Start_Label.Caption = "STOP TRADE ROUTE"
DoEvents
End If
If TLocked = False Then
SID = Worksheets("Data").Cells(118, 2).Value
TID = ActualStarID
ZID = Worksheets("Data").Cells(121, 2).Value
SX = Ar_DBStars(SID, 3)
SY = Ar_DBStars(SID, 4)
SZ = Ar_DBStars(SID, 5)
TX = Ar_DBStars(TID, 3)
TY = Ar_DBStars(TID, 4)
TZ = Ar_DBStars(TID, 5)
ZX = Ar_DBStars(ZID, 3)
ZY = Ar_DBStars(ZID, 4)
ZZ = Ar_DBStars(ZID, 5)
Dist1 = Round(Sqr(WorksheetFunction.Power((SX - TX), 2) + WorksheetFunction.Power((SY - TY), 2) + WorksheetFunction.Power((SZ - TZ), 2)) + 0.000001, 2)
Dist2 = Round(Sqr(WorksheetFunction.Power((TX - ZX), 2) + WorksheetFunction.Power((TY - ZY), 2) + WorksheetFunction.Power((TZ - ZZ), 2)) + 0.000001, 2)
If Dist1 < Dist2 Then
TLocked_Star1 = Worksheets("Data").Cells(118, 2).Value
TLocked_Station1 = Worksheets("Data").Cells(116, 2).Value
TGood1 = Worksheets("Data").Cells(124, 2).Value
DES_StarID = TLocked_Star1
DES_StationID = TLocked_Station1
DES_Selected = True
TLocked_Star2 = Worksheets("Data").Cells(121, 2).Value
TLocked_Station2 = Worksheets("Data").Cells(119, 2).Value
TGood2 = Worksheets("Data").Cells(125, 2).Value
Else
TLocked_Star1 = Worksheets("Data").Cells(121, 2).Value
TLocked_Station1 = Worksheets("Data").Cells(119, 2).Value
TGood1 = Worksheets("Data").Cells(125, 2).Value
DES_StarID = TLocked_Star1
DES_StationID = TLocked_Station1
DES_Selected = True
TLocked_Star2 = Worksheets("Data").Cells(118, 2).Value
TLocked_Station2 = Worksheets("Data").Cells(116, 2).Value
TGood2 = Worksheets("Data").Cells(124, 2).Value
End If
Worksheets("Werte").Cells(12, 2).Value = TLocked_Star1
Worksheets("Werte").Cells(13, 2).Value = TLocked_Station1
Me.BTN_Start_Label.Caption = "STOP TRADE ROUTE"
DoEvents
End If
Call DES_Commodities
Call Panel_Trade.DES_Display
Panel_Trade.CB_Route.ListIndex = Worksheets("Werte").Cells(53, 5).Value - 1
Call Destination_Panel
If Menu_Mode = "CLASSIC" Then
If Main_Panel = "TOP" Then
Panel_Menu_top.BTN_Trade_Layer.BackColor = TCE_Color
Panel_Menu_top.BTN_Trade_Label.ForeColor = 0
Panel_Menu_top.BTN_TradeScout_Layer.BackColor = &H101010
Panel_Menu_top.BTN_TradeScout.ForeColor = &HFFFFFF
Else
Panel_Menu_bottom.BTN_Trade_Layer.BackColor = TCE_Color
Panel_Menu_bottom.BTN_Trade_Label.ForeColor = 0
Panel_Menu_bottom.BTN_TradeScout_Layer.BackColor = &H101010
Panel_Menu_bottom.BTN_TradeScout.ForeColor = &HFFFFFF
End If
End If
Panel_Trade.DES_Label.Caption = "SELECTED DESTINATION"
Call Selected_Row(Worksheets("Data").Cells(115, 2).Value - Me.TR_Scrollbar.Value)
Me.TR_Scrollbar.Enabled = False
Panel_Trade.Show
DoEvents
Me.Hide
End If
Else
TLocked = False
TLocked_Star1 = 0
TLocked_Star2 = 0
TLocked_Station1 = 0
TLocked_Station2 = 0
TGood1 = ""
TGood2 = ""
DES_StarID = 0
DES_StationID = 0
DES_Selected = False
NoTarget = True
Me.BTN_Start_Label.Caption = "START TRADE ROUTE"
Call Selected_Row(0)
If Menu_Mode = "CLASSIC" Then
If Main_Panel = "TOP" Then
Panel_Menu_top.TLocked_line1.Visible = False
Panel_Menu_top.TLocked_line2.Visible = False
Panel_Menu_top.BTN_Locked.Visible = False
Else
Panel_Menu_bottom.TLocked_line1.Visible = False
Panel_Menu_bottom.TLocked_line2.Visible = False
Panel_Menu_bottom.BTN_Locked.Visible = False
End If
Else
Panel_Displays.TLocked_line.Visible = False
Panel_Displays.BTN_Locked.Visible = False
End If
Me.TR_Scrollbar.Enabled = True
Call Position_Panel
If Auto_DES = True Then
DES_Selected = False
NoTarget = True
Call Auto_Destination
Call DES_Commodities
Call Check_Size_DES
Call Panel_Trade.DES_Display
End If
End If

End Sub

I really hope I am not breaking my DB,
I added quite a bit of data to it in the last weeks !
And I'm growing very attached to it !!! lol

eventure · Apr 8, 2015

Bragolatch said:
Another Error 13 on clicking START TRADE ROUTE

Private Sub BTN_Start_Click()

Dim SX As Double, SY As Double, SZ As Double, TX As Double, TY As Double, TZ As Double, ZX As Double, ZY As Double, ZZ As Double, SID As Long, TID As Long, ZID As Long, z As Long, Dist1 As Double, Dist2 As Double

If Me.BTN_Start_Label.Caption = "START TRADE ROUTE" Then
If Saving = False And Panel_Scout_BD.Visible = True Then
TR_ID = Worksheets("Data").Cells(115, 2).Value
If POS_StationID = Worksheets("TR_Route").Cells(TR_ID + 1, 1).Value Then
TLocked = True
TLocked_Star1 = Worksheets("Data").Cells(118, 2).Value
TLocked_Station1 = Worksheets("Data").Cells(116, 2).Value
TGood1 = Worksheets("Data").Cells(124, 2).Value
TLocked_Star2 = Worksheets("Data").Cells(121, 2).Value
TLocked_Station2 = Worksheets("Data").Cells(119, 2).Value
TGood2 = Worksheets("Data").Cells(125, 2).Value
If Menu_Mode = "CLASSIC" Then
If Main_Panel = "TOP" Then
Panel_Menu_top.TLocked_line1.Visible = True
Panel_Menu_top.TLocked_line2.Visible = True
Panel_Menu_top.BTN_Locked.Visible = True
Panel_Menu_top.POS_Eco.Caption = TGood1
Panel_Menu_top.DES_Eco.Caption = TGood2
Else
Panel_Menu_bottom.TLocked_line1.Visible = True
Panel_Menu_bottom.TLocked_line2.Visible = True
Panel_Menu_bottom.BTN_Locked.Visible = True
Panel_Menu_bottom.POS_Eco.Caption = TGood1
Panel_Menu_bottom.DES_Eco.Caption = TGood2
End If
Else
Panel_Displays.TLocked_line.Visible = True
Panel_Displays.BTN_Locked.Visible = True
Panel_Displays.POS_Eco.Caption = TGood1
Panel_Displays.DES_Eco.Caption = TGood2
End If
DES_StarID = TLocked_Star2
DES_StationID = TLocked_Station2
Worksheets("Werte").Cells(12, 2).Value = TLocked_Star2
Worksheets("Werte").Cells(13, 2).Value = TLocked_Station2
Me.BTN_Start_Label.Caption = "STOP TRADE ROUTE"
DoEvents
End If
If POS_StationID = Worksheets("TR_Route").Cells(TR_ID + 1, 3).Value And TLocked = False Then
TLocked = True
TLocked_Star1 = Worksheets("Data").Cells(121, 2).Value
TLocked_Station1 = Worksheets("Data").Cells(119, 2).Value
TGood1 = Worksheets("Data").Cells(125, 2).Value
TLocked_Star2 = Worksheets("Data").Cells(118, 2).Value
TLocked_Station2 = Worksheets("Data").Cells(116, 2).Value
TGood2 = Worksheets("Data").Cells(124, 2).Value
If Menu_Mode = "CLASSIC" Then
If Main_Panel = "TOP" Then
Panel_Menu_top.TLocked_line1.Visible = True
Panel_Menu_top.TLocked_line2.Visible = True
Panel_Menu_top.BTN_Locked.Visible = True
Panel_Menu_top.POS_Eco.Caption = TGood1
Panel_Menu_top.DES_Eco.Caption = TGood2
Else
Panel_Menu_bottom.TLocked_line1.Visible = True
Panel_Menu_bottom.TLocked_line2.Visible = True
Panel_Menu_bottom.BTN_Locked.Visible = True
Panel_Menu_bottom.POS_Eco.Caption = TGood1
Panel_Menu_bottom.DES_Eco.Caption = TGood2
End If
Else
Panel_Displays.TLocked_line.Visible = True
Panel_Displays.BTN_Locked.Visible = True
Panel_Displays.POS_Eco.Caption = TGood1
Panel_Displays.DES_Eco.Caption = TGood2
End If
DES_StarID = TLocked_Star2
DES_StationID = TLocked_Station2
Worksheets("Werte").Cells(12, 2).Value = TLocked_Star2
Worksheets("Werte").Cells(13, 2).Value = TLocked_Station2
Me.BTN_Start_Label.Caption = "STOP TRADE ROUTE"
DoEvents
End If
If TLocked = False Then
SID = Worksheets("Data").Cells(118, 2).Value
TID = ActualStarID
ZID = Worksheets("Data").Cells(121, 2).Value
SX = Ar_DBStars(SID, 3)
SY = Ar_DBStars(SID, 4)
SZ = Ar_DBStars(SID, 5)
TX = Ar_DBStars(TID, 3)
TY = Ar_DBStars(TID, 4)
TZ = Ar_DBStars(TID, 5)
ZX = Ar_DBStars(ZID, 3)
ZY = Ar_DBStars(ZID, 4)
ZZ = Ar_DBStars(ZID, 5)
Dist1 = Round(Sqr(WorksheetFunction.Power((SX - TX), 2) + WorksheetFunction.Power((SY - TY), 2) + WorksheetFunction.Power((SZ - TZ), 2)) + 0.000001, 2)
Dist2 = Round(Sqr(WorksheetFunction.Power((TX - ZX), 2) + WorksheetFunction.Power((TY - ZY), 2) + WorksheetFunction.Power((TZ - ZZ), 2)) + 0.000001, 2)
If Dist1 < Dist2 Then
TLocked_Star1 = Worksheets("Data").Cells(118, 2).Value
TLocked_Station1 = Worksheets("Data").Cells(116, 2).Value
TGood1 = Worksheets("Data").Cells(124, 2).Value
DES_StarID = TLocked_Star1
DES_StationID = TLocked_Station1
DES_Selected = True
TLocked_Star2 = Worksheets("Data").Cells(121, 2).Value
TLocked_Station2 = Worksheets("Data").Cells(119, 2).Value
TGood2 = Worksheets("Data").Cells(125, 2).Value
Else
TLocked_Star1 = Worksheets("Data").Cells(121, 2).Value
TLocked_Station1 = Worksheets("Data").Cells(119, 2).Value
TGood1 = Worksheets("Data").Cells(125, 2).Value
DES_StarID = TLocked_Star1
DES_StationID = TLocked_Station1
DES_Selected = True
TLocked_Star2 = Worksheets("Data").Cells(118, 2).Value
TLocked_Station2 = Worksheets("Data").Cells(116, 2).Value
TGood2 = Worksheets("Data").Cells(124, 2).Value
End If
Worksheets("Werte").Cells(12, 2).Value = TLocked_Star1
Worksheets("Werte").Cells(13, 2).Value = TLocked_Station1
Me.BTN_Start_Label.Caption = "STOP TRADE ROUTE"
DoEvents
End If
Call DES_Commodities
Call Panel_Trade.DES_Display
Panel_Trade.CB_Route.ListIndex = Worksheets("Werte").Cells(53, 5).Value - 1
Call Destination_Panel
If Menu_Mode = "CLASSIC" Then
If Main_Panel = "TOP" Then
Panel_Menu_top.BTN_Trade_Layer.BackColor = TCE_Color
Panel_Menu_top.BTN_Trade_Label.ForeColor = 0
Panel_Menu_top.BTN_TradeScout_Layer.BackColor = &H101010
Panel_Menu_top.BTN_TradeScout.ForeColor = &HFFFFFF
Else
Panel_Menu_bottom.BTN_Trade_Layer.BackColor = TCE_Color
Panel_Menu_bottom.BTN_Trade_Label.ForeColor = 0
Panel_Menu_bottom.BTN_TradeScout_Layer.BackColor = &H101010
Panel_Menu_bottom.BTN_TradeScout.ForeColor = &HFFFFFF
End If
End If
Panel_Trade.DES_Label.Caption = "SELECTED DESTINATION"
Call Selected_Row(Worksheets("Data").Cells(115, 2).Value - Me.TR_Scrollbar.Value)
Me.TR_Scrollbar.Enabled = False
Panel_Trade.Show
DoEvents
Me.Hide
End If
Else
TLocked = False
TLocked_Star1 = 0
TLocked_Star2 = 0
TLocked_Station1 = 0
TLocked_Station2 = 0
TGood1 = ""
TGood2 = ""
DES_StarID = 0
DES_StationID = 0
DES_Selected = False
NoTarget = True
Me.BTN_Start_Label.Caption = "START TRADE ROUTE"
Call Selected_Row(0)
If Menu_Mode = "CLASSIC" Then
If Main_Panel = "TOP" Then
Panel_Menu_top.TLocked_line1.Visible = False
Panel_Menu_top.TLocked_line2.Visible = False
Panel_Menu_top.BTN_Locked.Visible = False
Else
Panel_Menu_bottom.TLocked_line1.Visible = False
Panel_Menu_bottom.TLocked_line2.Visible = False
Panel_Menu_bottom.BTN_Locked.Visible = False
End If
Else
Panel_Displays.TLocked_line.Visible = False
Panel_Displays.BTN_Locked.Visible = False
End If
Me.TR_Scrollbar.Enabled = True
Call Position_Panel
If Auto_DES = True Then
DES_Selected = False
NoTarget = True
Call Auto_Destination
Call DES_Commodities
Call Check_Size_DES
Call Panel_Trade.DES_Display
End If
End If

End Sub

I really hope I am not breaking my DB,
I added quite a bit of data to it in the last weeks !
And I'm growing very attached to it !!! lol

Bragolatch said:
It's probably related to the Error 13 I last reported, I just had it again.
After restarting TCE the SELECTED POSITION said "near body"
while I was at a previously registered station.

I manually selected that station and was able to update the prices.
But I figure I would edit the station and re-enter the data just to be safe.
But on opening the DATABASE - STATIONS panel
and selecting EDIT REGISTERED STATION
There is nothing in the STATION NAME box and no drop down list,
even thought I have 3 registered station in this system.
Tried selecting a different position and I get the same result.

View attachment 27776

I jumped to a different system and docked at a station where the CURRENT STATION updated automatically.
From there the EDIT REGISTERED STATION panel works properly for that station.

So the problem only happens when I manually select CURRENT STATION.
But (I thought) that is one of the main purpose of being able to select CURRENT STATION,
to be able to fix/modify a station without having to travel there.
Or, as in my case, fix the data for that station when it's acting funny.

Your database is okay, they are only display issues. I will check the Select Position issue.

eventure · Apr 8, 2015

CMDR Ross said:
Strange thing happened.
When I update a system or price list the auto position gets stuck at station or planet where I updated it. IE no change when I jump.
for example sol galileo. update price, jump to barnards star thing still says im in sol galileo. If I try to update a station in barnards star sol keeps coming up. The pilots log pauses as if im still in sol.
It works fine until I update something.
A restart makes it work properly again until another input from me.
I reverted to a earlier version and its still doing it. so is this a borked database?
Tried a reinstall no joy.

Did you using the compact or the classic UI?

Cmdr Bupu · Apr 8, 2015

Hi,
Could anyone tell me if I'm just not seeing the info I'm after anywhere.
I would like to be able to tell which stations I have commodity data for when entering a system.
eg. if there are 3 stations in a system and I only have data on 2 of them how do I know?..
if this is not easily available
then eventure please could you add it in perhaps as one line per station in the steller cartography list just under your current star system listing station names and distance visited how old data is.

and possibly with other systems in jump range another tab just saying "2 of 3" with comm data.

Thankyou.
Cmdr Bupu

bAdbUd · Apr 8, 2015

Cmdr Bupu said:
Hi,
Could anyone tell me if I'm just not seeing the info I'm after anywhere.
I would like to be able to tell which stations I have commodity data for when entering a system.
eg. if there are 3 stations in a system and I only have data on 2 of them how do I know?..
if this is not easily available
then eventure please could you add it in perhaps as one line per station in the stellar cartography list just under your current star system listing station names and distance visited how old data is.

and possibly with other systems in jump range another tab just saying "2 of 3" with comm data.

Thankyou.
Cmdr Bupu

Click on the destination station box, sort by distance and you should see the stations in the system you're in, the ones you have got data for will show up as "No Data"

eventure · Apr 8, 2015

Cmdr Bupu said:
Hi,
Could anyone tell me if I'm just not seeing the info I'm after anywhere.
I would like to be able to tell which stations I have commodity data for when entering a system.
eg. if there are 3 stations in a system and I only have data on 2 of them how do I know?..
if this is not easily available
then eventure please could you add it in perhaps as one line per station in the steller cartography list just under your current star system listing station names and distance visited how old data is.

and possibly with other systems in jump range another tab just saying "2 of 3" with comm data.

Thankyou.
Cmdr Bupu

Check the Star System Summary panel for that information. At the overview, you will see the number of stations, registered and unregistered. Use the arrow button left or right of the overview to cycle through all stations, that are registered. There you can see the last update and, if the station has no economy, you should see that too.

eventure · Apr 8, 2015

Update V1.39 beta 5 released:
- Bugfix in Trade Scout panel and Position Display
- Compact UI (pictograms and tooltips added, text buttons removed)
- Position detection routine slightly reworked (in connection with all panels)
- Panel displays faster and no more white flash on opening
- Panel Position window now free movable.