int MapWindow::SharedTopView(LKSurface& Surface, DiagrammStruct* psDia , double fAS_Bearing, double fWP_Bearing)
{
int iOldDisplayOrientation = DisplayOrientation;
DiagrammStruct m_Dia = *psDia;
const RECT& rct = m_Dia.rc;
unsigned short getsideviewpage=GetSideviewPage();
LKASSERT(getsideviewpage<NUMBER_OF_SHARED_MULTIMAPS);
LKASSERT(Current_Multimap_SizeY!=SIZE0);
DisplayOrientation = GetMMNorthUp(getsideviewpage);
switch(GetMMNorthUp(getsideviewpage))
{
case TRACKUP:
break;
case NORTHUP:
default:
m_Dia.fXMin = -m_Dia.fXMax;
break;
}
double fOldScale = zoom.Scale();
const auto hfOld = Surface.SelectObject(LK8PanelUnitFont);
if(zoom.AutoZoom())
zoom.AutoZoom(false);
double fFact = 1.25 ;
#ifdef INIT_CASE
switch(ScreenSize) {
case ss800x480:
fFact=0.750;
break;
case ss640x480:
fFact=0.938;
break;
case ss480x272:
fFact=0.708;
break;
case ss400x240:
fFact=0.750;
break;
case ss320x240:
fFact=0.938;
break;
case ss480x800:
fFact=1.250;
break;
case ss480x640:
fFact=1.250;
break;
case ss272x480:
fFact=1.250;
break;
case ss240x400:
fFact=1.250;
break;
case ss240x320:
fFact=1.250;
break;
default:
fFact=1.000;
break;
}
#endif
if((ScreenSizeX > 0) && (ScreenSizeY > 0))
{
if(ScreenSizeX > ScreenSizeY)
fFact = (double)ScreenSizeY/(double)ScreenSizeX * 1.250;
}
PanLatitude = DrawInfo.Latitude;
PanLongitude = DrawInfo.Longitude;
switch(GetMMNorthUp(getsideviewpage))
{
case TRACKUP:
DisplayAngle = AngleLimit360(fAS_Bearing +270.0);
DisplayAircraftAngle = AngleLimit360(fWP_Bearing);
break;
case NORTHUP:
default:
DisplayAngle = 0;
if( getsideviewpage == IM_HEADING || getsideviewpage==IM_VISUALGLIDE)
DisplayAircraftAngle = AngleLimit360(fAS_Bearing);
else
DisplayAircraftAngle = AngleLimit360(DrawInfo.TrackBearing);
break;
}
int iOldLocator = EnableThermalLocator;
EnableThermalLocator =0;
/*******/
#warning "wrong place for do that, always bad idea to change layout inside drawing fonctions !"
MapWindow::ChangeDrawRect(rct); // set new area for terrain and topology
/*******/
zoom.RequestedScale((m_Dia.fXMax -m_Dia.fXMin) * fFact * (DISTANCEMODIFY)/10.0f);
POINT Orig = { CalcDistanceCoordinat(0.0, (DiagrammStruct*) &m_Dia),(rct.bottom-rct.top)/2};
POINT Orig_Aircraft= {0,0};
zoom.ModifyMapScale();
zoom.UpdateMapScale();
const ScreenProjection _Proj = CalculateScreenPositions( Orig, rct, &Orig_Aircraft);
CalculateScreenPositionsAirspace(rct, _Proj);
bool terrainpainted=false;
if (IsMultimapTerrain() && DerivedDrawInfo.TerrainValid && RasterTerrain::isTerrainLoaded() ) {
LKTextBlack=false;
BlackScreen=false;
LockTerrainDataGraphics();
DrawTerrain(Surface, rct, _Proj, GetAzimuth(), 40.0);
UnlockTerrainDataGraphics();
terrainpainted=true;
} else {
// We fill up the background wity chosen empty map color
Surface.FillRect(&rct, hInvBackgroundBrush[BgMapColor]);
// We force LK painting black values on screen depending on the background color in use
// blackscreen would force everything to be painted white, instead
LKTextBlack=BgMapColorTextBlack[BgMapColor];
if (BgMapColor>6 ) BlackScreen=true;
else BlackScreen=false;
}
ResetLabelDeclutter();
// We reduce screen cluttering for some cases..
short olddecluttermode=DeclutterMode;
if (Current_Multimap_SizeY==SIZE4) goto _nomoredeclutter;
if (Current_Multimap_SizeY<SIZE3) {
DeclutterMode+=2;
} else {
if (Current_Multimap_SizeY==SIZE3)
DeclutterMode++;
}
if (DeclutterMode>dmVeryHigh) DeclutterMode=dmVeryHigh;
_nomoredeclutter:
if (IsMultimapTopology()) {
// Do not print topology labels, to be used with another config later!
// SaturateLabelDeclutter();
DrawTopology(Surface, rct, _Proj);
} else {
// No topology is desired, but terrain requires water areas nevertheless
if (terrainpainted) {
DrawTopology(Surface, rct, _Proj, true); // water only!
}
}
if (IsMultimapAirspace()) {
DrawAirSpace(Surface, rct, _Proj); // full screen, to hide clipping effect on low border
}
if (Flags_DrawTask && MapSpaceMode!=MSM_MAPASP && ValidTaskPoint(ActiveTaskPoint) && ValidTaskPoint(1)) {
DrawTaskAAT(Surface, rct);
DrawTask(Surface, rct, _Proj, Orig_Aircraft);
}
if (IsMultimapWaypoints()) {
DrawWaypointsNew(Surface,rct);
}
if (Flags_DrawFAI)
DrawFAIOptimizer(Surface, rct, _Proj, Orig_Aircraft);
DeclutterMode=olddecluttermode; // set it back correctly
/* THIS STUFF DOES NOT WORK IN SHARED MAPS, YET
NEED FIXING LatLon2Screen for shared maps using Sideview
#ifdef GTL2
if (((FinalGlideTerrain == 2) || (FinalGlideTerrain == 4)) &&
DerivedDrawInfo.TerrainValid)
DrawTerrainAbove(hdc, rct);
#endif
*/
//
// Stuff for MAPTRK only (M1)
if (MapSpaceMode==MSM_MAPTRK) {
if(IsMultimapTerrain() || IsMultimapTopology() ) {
if (FinalGlideTerrain && DerivedDrawInfo.TerrainValid)
DrawGlideThroughTerrain(Surface, rct, _Proj);
}
if (extGPSCONNECT)
DrawBearing(Surface, rct, _Proj);
// Wind arrow
if (IsMultimapOverlaysGauges())
DrawWindAtAircraft2(Surface, Orig_Aircraft, rct);
}
if (MapSpaceMode==MSM_MAPWPT) {
if (extGPSCONNECT)
DrawBearing(Surface, rct, _Proj);
}
switch(GetMMNorthUp(getsideviewpage)) {
case NORTHUP:
default:
DrawCompass( Surface, rct, 0);
break;
case TRACKUP:
if(getsideviewpage == IM_HEADING || getsideviewpage == IM_VISUALGLIDE)
DrawCompass( Surface, rct, DrawInfo.TrackBearing-90.0);
else
DrawCompass( Surface, rct, DisplayAngle);
break;
}
/****************************************************************************************************
* draw vertical line
****************************************************************************************************/
POINT line[2];
line[0].x = rct.left;
line[0].y = Orig_Aircraft.y-1;
line[1].x = rct.right;
line[1].y = line[0].y;
switch(GetMMNorthUp(getsideviewpage))
{
case TRACKUP:
// Are we are not topview fullscreen?
if (Current_Multimap_SizeY<SIZE4 && !(MapSpaceMode==MSM_VISUALGLIDE)) {
Surface.DrawDashLine(NIBLSCALE(1), line[0], line[1], Sideview_TextColor, rct);
} else {
if (TrackBar) {
DrawHeadUpLine(Surface, Orig, rct, psDia->fXMin ,psDia->fXMax);
if (ISGAAIRCRAFT) DrawFuturePos(Surface, Orig, rct, true);
}
}
break;
case NORTHUP:
default:
if (TrackBar) {
DrawHeadUpLine(Surface, Orig, rct, psDia->fXMin ,psDia->fXMax);
if (ISGAAIRCRAFT) DrawFuturePos(Surface, Orig, rct, true);
}
break;
}
DrawAircraft(Surface, Orig_Aircraft);
// M3 has sideview always on, so wont apply here, and no need to check
if (Current_Multimap_SizeY==SIZE4) {
DrawMapScale(Surface,rct,0);
}
MapWindow::zoom.RequestedScale(fOldScale);
EnableThermalLocator = iOldLocator;
DisplayOrientation = iOldDisplayOrientation;
Surface.SelectObject(hfOld);
return 0;
}
void MapWindow::RenderMapWindowBg(HDC hdc, const RECT rc,
const POINT &Orig,
const POINT &Orig_Aircraft)
{
// Calculations are taking time and slow down painting of map, beware
#define MULTICALC_MINROBIN 5 // minimum split
#define MULTICALC_MAXROBIN 20 // max split
static short multicalc_slot=0;// -1 (which becomes immediately 0) will force full loading on startup, but this is not good
// because currently we are not waiting for ProgramStarted=3
// and the first scan is made while still initializing other things
// TODO assign numslots with a function, based also on available CPU time
short numslots=1;
#if NEWSMARTZOOM
static double quickdrawscale=0.0;
static double delta_drawscale=1.0;
#endif
#if 0
extern void TestChangeRect();
TestChangeRect();
#endif
if ((MapWindow::AlphaBlendSupported() && BarOpacity<100) || mode.AnyPan()) {
MapWindow::ChangeDrawRect(MapRect);
} else {
RECT newRect={0,0,ScreenSizeX,ScreenSizeY-BottomSize};
MapWindow::ChangeDrawRect(newRect);
}
if (QUICKDRAW) {
goto _skip_calcs;
}
if (NumberOfWayPoints>200) {
numslots=NumberOfWayPoints/400;
// keep numslots optimal
if (numslots<MULTICALC_MINROBIN) numslots=MULTICALC_MINROBIN; // seconds for full scan, as this is executed at 1Hz
if (numslots>MULTICALC_MAXROBIN) numslots=MULTICALC_MAXROBIN;
// When waypointnumber has changed, we wont be using an exceeded multicalc_slot, which would crash the sw
// In this case, we shall probably continue for the first round to calculate without going from the beginning
// but this is not a problem, we are round-robin all the time here.
if (++multicalc_slot>numslots) multicalc_slot=1;
} else {
multicalc_slot=0; // forcing full scan
}
// Here we calculate arrival altitude, GD etc for map waypoints. Splitting with multicalc will result in delayed
// updating of visible landables, for example. The nearest pages do this separately, with their own sorting.
// Basically we assume -like for nearest- that values will not change that much in the multicalc split time.
// Target and tasks are recalculated in real time in any case. Nearest too.
LKCalculateWaypointReachable(multicalc_slot, numslots);
_skip_calcs:
CalculateScreenPositionsAirspace(rc);
CalculateScreenPositionsThermalSources();
// Make the glide amoeba out of the latlon points, converting them to screen
// (This function is updated for supporting multimaps )
CalculateScreenPositionsGroundline();
if (PGZoomTrigger) {
if(!mode.Is(Mode::MODE_PANORAMA)) {
mode.Special(Mode::MODE_SPECIAL_PANORAMA, true);
LastZoomTrigger=DrawInfo.Time;
Message::Lock();
Message::AddMessage(1000, 3, gettext(TEXT("_@M872_"))); // LANDSCAPE ZOOM FOR 20s
Message::Unlock();
#ifndef DISABLEAUDIO
if (EnableSoundModes) LKSound(TEXT("LK_TONEUP.WAV"));
#endif
}
else {
// previously called, see if time has passed
if ( DrawInfo.Time > (LastZoomTrigger + 20.0)) {
// time has passed, lets go back
LastZoomTrigger=0; // just for safety
mode.Special(Mode::MODE_SPECIAL_PANORAMA, false);
PGZoomTrigger=false;
Message::Lock();
Message::AddMessage(1500, 3, gettext(TEXT("_@M873_"))); // BACK TO NORMAL ZOOM
Message::Unlock();
#ifndef DISABLEAUDIO
if (EnableSoundModes) LKSound(TEXT("LK_TONEDOWN.WAV"));
#endif
}
}
}
//
// "Checkpoint Charlie"
// This is were we process stuff for anything else but main map.
// We let the calculations run also for MapSpace modes.
// But for multimaps, we can also draw some more stuff..
// We are also sent back here from next code, when we detect that
// the MapSpace mode has changed from MAP to something else while we
// were rendering.
//
QuickRedraw:
//
if (DONTDRAWTHEMAP)
{
DrawMapSpace(hdc, rc);
// Is this a "shared map" environment?
if (IsMultiMapShared()) {
// Shared map, of course not MSN_MAP, since dontdrawthemap was checked
//
if (IsMultimapOverlaysText()) {
DrawLook8000(hdc,rc);
}
if (IsMultimapOverlaysGauges()) {
if (LKVarioBar) LKDrawVario(hdc,rc);
if ((mode.Is(Mode::MODE_CIRCLING)) )
if (ThermalBar) DrawThermalBand(hdcDrawWindow, rc);
DrawFinalGlide(hdcDrawWindow,rc);
}
} else {
// Not in map painting environment
// ex. nearest pages, but also MAPRADAR..
}
//
DrawBottomBar(hdc,rc);
#ifdef CPUSTATS
DrawCpuStats(hdc,rc);
#endif
#ifdef DRAWDEBUG
DrawDebug(hdc,rc);
#endif
// no need to do SelectObject as at the bottom of function
return;
}
// When no terrain is painted, set a background0
// Remember that in this case we have plenty of cpu time to spend for best result
if (!IsMultimapTerrain() || !DerivedDrawInfo.TerrainValid || !RasterTerrain::isTerrainLoaded() ) {
// display border and fill background..
SelectObject(hdc, hInvBackgroundBrush[BgMapColor]);
SelectObject(hdc, GetStockObject(WHITE_PEN));
Rectangle(hdc,rc.left,rc.top,rc.right,rc.bottom);
// We force LK painting black values on screen depending on the background color in use
// TODO make it an array once settled
// blackscreen would force everything to be painted white, instead
LKTextBlack=BgMapColorTextBlack[BgMapColor];
if (BgMapColor>6 ) BlackScreen=true; else BlackScreen=false;
} else {
LKTextBlack=false;
BlackScreen=false;
}
#if NEWSMARTZOOM
// Copy the old background map with no overlays
if (ONSMARTZOOM) {
if (quickdrawscale>0) {
delta_drawscale=zoom.DrawScale() / quickdrawscale;
}
// StartupStore(_T("... QuickDrawScale=%.2f new zoom=%.2f delta=%.2f\n"),quickdrawscale,zoom.DrawScale(),delta_drawscale);
int dx=MapRect.right-MapRect.left;
int dy=MapRect.bottom-MapRect.top;
// notice: zoom in is always ok.. but zoom out starting from high zoom levels will make the picture
// very small and unusable. We can consider to zoom out in fast zoom normally, in such cases?
//
// Notice 2: the delta is not yet working correctly
//
if (delta_drawscale>1.0) {
// zoom in
StretchBlt(hdcDrawWindow,
0,0,
dx,dy,
hdcQuickDrawWindow,
(int)((dx/2) - (dx / delta_drawscale)/2),
(int)((dy/2) - (dy / delta_drawscale)/2),
(int)(dx / delta_drawscale),
(int)(dy / delta_drawscale),
SRCCOPY);
} else {
// zoom out
StretchBlt(hdcDrawWindow,
(int)((dx/2) - (dx * delta_drawscale)/2),
(int)((dy/2) - (dy * delta_drawscale)/2),
(int)(dx * delta_drawscale),
(int)(dy * delta_drawscale),
hdcQuickDrawWindow,
0,0,
dx,dy,
SRCCOPY);
}
}
#endif
// Logic of DONTDRAWTHEMAP is the following:
// We are rendering the screen page here. If we are here, we passed Checkpoint Charlie.
// So we were, at charlie, in MSM_MAP: preparing the main map stuff.
// If we detect that MapSpace has CHANGED while we were doing our job here,
// it means that the user has clicked meanwhile. He desires another page, so let's
// reset our intentions and go back to beginning, or nearby..
// We have a new job to do, for another MapSpace, no more MAP.
if (DONTDRAWTHEMAP) {
goto QuickRedraw;
}
#if NEWSMARTZOOM
if ( OFFSMARTZOOM ) {
#endif
bool terrainpainted=false;
if ((IsMultimapTerrain() && (DerivedDrawInfo.TerrainValid)
&& RasterTerrain::isTerrainLoaded())
) {
// sunelevation is never used, it is still a todo in Terrain
double sunelevation = 40.0;
double sunazimuth=GetAzimuth();
LockTerrainDataGraphics();
if (DONTDRAWTHEMAP) { // 100318
UnlockTerrainDataGraphics();
goto QuickRedraw;
}
DrawTerrain(hdc, DrawRect, sunazimuth, sunelevation);
terrainpainted=true;
if (DONTDRAWTHEMAP) {
UnlockTerrainDataGraphics();
goto QuickRedraw;
}
if (!QUICKDRAW) {
// SHADED terrain unreachable, aka glide amoeba. This is not the outlined perimeter!
#ifdef GTL2
if (((FinalGlideTerrain == 2) || (FinalGlideTerrain == 4)) &&
DerivedDrawInfo.TerrainValid) {
#else
if ((FinalGlideTerrain==2) && DerivedDrawInfo.TerrainValid) {
#endif
DrawTerrainAbove(hdc, DrawRect);
}
}
UnlockTerrainDataGraphics();
}
#if NEWSMARTZOOM
}
#endif
//
// REMINDER: WE ARE IN MAIN MAP HERE: MSM_MAP ONLY, OR PANNING MODE!
// MAPSPACEMODE CAN STILL CHANGE, DUE TO USER INPUT. BUT WE GOT HERE IN
// EITHER PAN OR MSM_MAP.
//
if (DONTDRAWTHEMAP) {
goto QuickRedraw;
}
if (IsMultimapTopology()) {
DrawTopology(hdc, DrawRect);
} else {
// If no topology wanted, but terrain painted, we paint only water stuff
if (terrainpainted) DrawTopology(hdc, DrawRect,true);
}
#if 0
StartupStore(_T("... Experimental1=%.0f\n"),Experimental1);
StartupStore(_T("... Experimental2=%.0f\n"),Experimental2);
Experimental1=0.0;
Experimental2=0.0;
#endif
// Topology labels are printed first, using OLD wps positions from previous run!
// Reset for topology labels decluttering engine occurs also in another place here!
ResetLabelDeclutter();
if (Flags_DrawTask && ValidTaskPoint(ActiveWayPoint) && ValidTaskPoint(1)) {
DrawTaskAAT(hdc, DrawRect);
}
if (DONTDRAWTHEMAP) {
goto QuickRedraw;
}
if (IsMultimapAirspace())
{
if ( (GetAirSpaceFillType() == asp_fill_ablend_full) || (GetAirSpaceFillType() == asp_fill_ablend_borders) )
DrawTptAirSpace(hdc, rc);
else
DrawAirSpace(hdc, rc); // full screen, to hide clipping effect on low border
}
if (DONTDRAWTHEMAP) {
goto QuickRedraw;
}
// In QUICKDRAW dont draw trail, thermals, glide terrain
if (QUICKDRAW) goto _skip_stuff;
if(TrailActive) {
// NEED REWRITING
LKDrawTrail(hdc, Orig_Aircraft, DrawRect);
}
if (DONTDRAWTHEMAP) {
goto QuickRedraw;
}
DrawThermalEstimate(hdc, DrawRect);
if (OvertargetMode==OVT_THER) DrawThermalEstimateMultitarget(hdc, DrawRect);
// draw red cross on glide through terrain marker
if (FinalGlideTerrain && DerivedDrawInfo.TerrainValid) {
DrawGlideThroughTerrain(hdc, DrawRect);
}
if (DONTDRAWTHEMAP) {
goto QuickRedraw;
}
_skip_stuff:
if (IsMultimapAirspace() && AirspaceWarningMapLabels)
{
DrawAirspaceLabels(hdc, DrawRect, Orig_Aircraft);
if (DONTDRAWTHEMAP) { // 100319
goto QuickRedraw;
}
}
if (IsMultimapWaypoints()) {
DrawWaypointsNew(hdc,DrawRect);
}
if (DONTDRAWTHEMAP) {
goto QuickRedraw;
}
if (Flags_DrawTask && ValidTaskPoint(ActiveWayPoint) && ValidTaskPoint(1)) {
DrawTask(hdc, DrawRect, Orig_Aircraft);
}
// FAI optimizer does not depend on tasks, being based on trace
if (Flags_DrawFAI) DrawFAIOptimizer(hdc, DrawRect, Orig_Aircraft);
// In QUICKDRAW do not paint other useless stuff
if (QUICKDRAW) {
if (extGPSCONNECT) DrawBearing(hdc, DrawRect);
goto _skip_2;
}
// ---------------------------------------------------
DrawTeammate(hdc, rc);
if (extGPSCONNECT) {
DrawBestCruiseTrack(hdc, Orig_Aircraft);
DrawBearing(hdc, DrawRect);
}
// draw wind vector at aircraft
if (NOTANYPAN) {
DrawWindAtAircraft2(hdc, Orig_Aircraft, DrawRect);
} else if (mode.Is(Mode::MODE_TARGET_PAN)) {
DrawWindAtAircraft2(hdc, Orig, rc);
}
#if NEWSMARTZOOM
// Save the current rendered map before painting overlays
if ( OFFSMARTZOOM ) {
quickdrawscale=zoom.DrawScale();
BitBlt(hdcQuickDrawWindow, 0, 0, MapRect.right-MapRect.left, MapRect.bottom-MapRect.top,
hdcDrawWindow, 0, 0, SRCCOPY);
}
#endif
// VisualGlide drawn BEFORE lk8000 overlays
if (NOTANYPAN && (VisualGlide > 0)) {
DrawGlideCircle(hdc, Orig, rc);
}
if (DONTDRAWTHEMAP) {
goto QuickRedraw;
}
// Draw traffic and other specifix LK gauges
LKDrawFLARMTraffic(hdc, DrawRect, Orig_Aircraft);
// ---------------------------------------------------
_skip_2:
if (NOTANYPAN) {
// REMINDER TODO let it be configurable for not circling also, as before
if ((mode.Is(Mode::MODE_CIRCLING)) )
if (ThermalBar) DrawThermalBand(hdcDrawWindow, rc); // 091122
if (IsMultimapOverlaysText()) DrawLook8000(hdc,rc);
DrawBottomBar(hdc,rc);
}
if (DONTDRAWTHEMAP) {
goto QuickRedraw;
}
if (IsMultimapOverlaysGauges() && (LKVarioBar && NOTANYPAN))
LKDrawVario(hdc,rc);
// Draw glider or paraglider
if (extGPSCONNECT) {
DrawAircraft(hdc, Orig_Aircraft);
}
if (NOTANYPAN && !QUICKDRAW) {
if (TrackBar) DrawHeading(hdc, Orig, DrawRect);
}
#if USETOPOMARKS
// marks on top...
DrawMarks(hdc, rc);
#endif
if (ISGAAIRCRAFT && IsMultimapOverlaysGauges() && NOTANYPAN) DrawHSI(hdc,Orig,DrawRect);
if (!INPAN) {
DrawMapScale(hdcDrawWindow,rc, zoom.BigZoom()); // unused BigZoom
DrawCompass(hdcDrawWindow, rc, DisplayAngle);
}
if (IsMultimapOverlaysGauges() && NOTANYPAN) DrawFinalGlide(hdcDrawWindow,rc);
#ifdef CPUSTATS
DrawCpuStats(hdc,rc);
#endif
#ifdef DRAWDEBUG
DrawDebug(hdc,rc);
#endif
}
void MapWindow::RenderMapWindowBg(HDC hdc, const RECT rc,
const POINT &Orig,
const POINT &Orig_Aircraft)
{
HFONT hfOld;
// Calculations are taking time and slow down painting of map, beware
#define MULTICALC_MINROBIN 5 // minimum split
#define MULTICALC_MAXROBIN 20 // max split
static short multicalc_slot=0;// -1 (which becomes immediately 0) will force full loading on startup, but this is not good
// because currently we are not waiting for ProgramStarted=3
// and the first scan is made while still initializing other things
// TODO assign numslots with a function, based also on available CPU time
short numslots=1;
#if NEWSMARTZOOM
static double quickdrawscale=0.0;
static double delta_drawscale=1.0;
#endif
// If we have a BigZoom request, we serve it immediately without calculating anything
// TODO: stretch the old map bitmap to the new zoom, while fastzooming
if (QUICKDRAW) {
goto fastzoom;
}
if (NumberOfWayPoints>200) {
numslots=NumberOfWayPoints/400;
// keep numslots optimal
if (numslots<MULTICALC_MINROBIN) numslots=MULTICALC_MINROBIN; // seconds for full scan, as this is executed at 1Hz
if (numslots>MULTICALC_MAXROBIN) numslots=MULTICALC_MAXROBIN;
// When waypointnumber has changed, we wont be using an exceeded multicalc_slot, which would crash the sw
// In this case, we shall probably continue for the first round to calculate without going from the beginning
// but this is not a problem, we are round-robin all the time here.
if (++multicalc_slot>numslots) multicalc_slot=1;
} else {
multicalc_slot=0; // forcing full scan
}
// Here we calculate arrival altitude, GD etc for map waypoints. Splitting with multicalc will result in delayed
// updating of visible landables, for example. The nearest pages do this separately, with their own sorting.
// Basically we assume -like for nearest- that values will not change that much in the multicalc split time.
// Target and tasks are recalculated in real time in any case. Nearest too.
LKCalculateWaypointReachable(multicalc_slot, numslots);
CalculateScreenPositionsAirspace();
CalculateScreenPositionsThermalSources();
CalculateScreenPositionsGroundline();
if (PGZoomTrigger) {
if(!mode.Is(Mode::MODE_PANORAMA)) {
mode.Special(Mode::MODE_SPECIAL_PANORAMA, true);
LastZoomTrigger=GPS_INFO.Time;
Message::Lock();
Message::AddMessage(1000, 3, gettext(TEXT("_@M872_"))); // LANDSCAPE ZOOM FOR 20s
Message::Unlock();
#ifndef DISABLEAUDIO
if (EnableSoundModes) LKSound(TEXT("LK_TONEUP.WAV"));
#endif
}
else {
// previously called, see if time has passed
if ( GPS_INFO.Time > (LastZoomTrigger + 20.0)) {
// time has passed, lets go back
LastZoomTrigger=0; // just for safety
mode.Special(Mode::MODE_SPECIAL_PANORAMA, false);
PGZoomTrigger=false;
Message::Lock();
Message::AddMessage(1500, 3, gettext(TEXT("_@M873_"))); // BACK TO NORMAL ZOOM
Message::Unlock();
#ifndef DISABLEAUDIO
if (EnableSoundModes) LKSound(TEXT("LK_TONEDOWN.WAV"));
#endif
}
}
}
// let the calculations run, but dont draw anything but the look8000 when in MapSpaceMode != MSM_MAP
if (DONTDRAWTHEMAP)
{
QuickRedraw: // 100318 speedup redraw
DrawLook8000(hdc,rc);
#ifdef CPUSTATS
DrawCpuStats(hdc,rc);
#endif
#ifdef DRAWDEBUG
DrawDebug(hdc,rc);
#endif
// no need to do SelectObject as at the bottom of function
return;
}
// When no terrain is painted, set a background0
// Remember that in this case we have plenty of cpu time to spend for best result
if (!EnableTerrain || !DerivedDrawInfo.TerrainValid || !RasterTerrain::isTerrainLoaded() ) {
// display border and fill background..
SelectObject(hdc, hInvBackgroundBrush[BgMapColor]);
SelectObject(hdc, GetStockObject(WHITE_PEN));
Rectangle(hdc,rc.left,rc.top,rc.right,rc.bottom);
// We force LK painting black values on screen depending on the background color in use
// TODO make it an array once settled
// blackscreen would force everything to be painted white, instead
LKTextBlack=BgMapColorTextBlack[BgMapColor];
if (BgMapColor>6 ) BlackScreen=true; else BlackScreen=false;
} else {
LKTextBlack=false;
BlackScreen=false;
}
fastzoom:
#if NEWSMARTZOOM
// Copy the old background map with no overlays
if (ONSMARTZOOM) {
if (quickdrawscale>0) {
delta_drawscale=zoom.DrawScale() / quickdrawscale;
}
// StartupStore(_T("... QuickDrawScale=%.2f new zoom=%.2f delta=%.2f\n"),quickdrawscale,zoom.DrawScale(),delta_drawscale);
int dx=MapRect.right-MapRect.left;
int dy=MapRect.bottom-MapRect.top;
// notice: zoom in is always ok.. but zoom out starting from high zoom levels will make the picture
// very small and unusable. We can consider to zoom out in fast zoom normally, in such cases?
//
// Notice 2: the delta is not yet working correctly
//
if (delta_drawscale>1.0) {
// zoom in
StretchBlt(hdcDrawWindow,
0,0,
dx,dy,
hdcQuickDrawWindow,
(int)((dx/2) - (dx / delta_drawscale)/2),
(int)((dy/2) - (dy / delta_drawscale)/2),
(int)(dx / delta_drawscale),
(int)(dy / delta_drawscale),
SRCCOPY);
} else {
// zoom out
StretchBlt(hdcDrawWindow,
(int)((dx/2) - (dx * delta_drawscale)/2),
(int)((dy/2) - (dy * delta_drawscale)/2),
(int)(dx * delta_drawscale),
(int)(dy * delta_drawscale),
hdcQuickDrawWindow,
0,0,
dx,dy,
SRCCOPY);
}
}
#endif
SelectObject(hdc, GetStockObject(BLACK_BRUSH));
SelectObject(hdc, GetStockObject(BLACK_PEN));
hfOld = (HFONT)SelectObject(hdc, MapWindowFont);
// ground first...
if (DONTDRAWTHEMAP) { // 100319
SelectObject(hdcDrawWindow, hfOld);
goto QuickRedraw;
}
#if NEWSMARTZOOM
if ( OFFSMARTZOOM ) {
#endif
if ((EnableTerrain && (DerivedDrawInfo.TerrainValid)
&& RasterTerrain::isTerrainLoaded())
) {
// sunelevation is never used, it is still a todo in Terrain
double sunelevation = 40.0;
double sunazimuth=GetAzimuth();
LockTerrainDataGraphics();
if (DONTDRAWTHEMAP) { // 100318
UnlockTerrainDataGraphics();
SelectObject(hdcDrawWindow, hfOld);
goto QuickRedraw;
}
DrawTerrain(hdc, rc, sunazimuth, sunelevation); // LOCKED 091105
if (DONTDRAWTHEMAP) { // 100318
UnlockTerrainDataGraphics();
SelectObject(hdcDrawWindow, hfOld);
goto QuickRedraw;
}
if (!QUICKDRAW) {
// shaded terrain unreachable, aka glide amoeba
#ifdef GTL2
if (((FinalGlideTerrain == 2) || (FinalGlideTerrain == 4)) &&
DerivedDrawInfo.TerrainValid) {
#else
if ((FinalGlideTerrain==2) && DerivedDrawInfo.TerrainValid) {
#endif
DrawTerrainAbove(hdc, rc);
}
}
UnlockTerrainDataGraphics();
}
#if NEWSMARTZOOM
}
#endif
if (QUICKDRAW) {
if ( !mode.AnyPan()) DrawLook8000(hdc,rc);
SelectObject(hdcDrawWindow, hfOld);
return;
}
if (DONTDRAWTHEMAP) { // 100319
SelectObject(hdcDrawWindow, hfOld);
goto QuickRedraw;
}
if (EnableTopology) {
DrawTopology(hdc, rc); // LOCKED 091105
}
#if 0
StartupStore(_T("... Experimental1=%.0f\n"),Experimental1);
StartupStore(_T("... Experimental2=%.0f\n"),Experimental2);
Experimental1=0.0;
Experimental2=0.0;
#endif
// Topology labels are printed first, using OLD wps positions from previous run!
// Reset for topology labels decluttering engine occurs also in another place here!
nLabelBlocks = 0;
#if TOPOFASTLABEL
for (short nvi=0; nvi<SCREENVSLOTS; nvi++) nVLabelBlocks[nvi]=0;
#endif
if (ValidTaskPoint(ActiveWayPoint) && ValidTaskPoint(1)) { // 100503
DrawTaskAAT(hdc, rc);
}
if (DONTDRAWTHEMAP) { // 100319
SelectObject(hdcDrawWindow, hfOld);
goto QuickRedraw;
}
if (OnAirSpace > 0) // Default is true, always true at startup no regsave
{
if ( (GetAirSpaceFillType() == asp_fill_ablend_full) || (GetAirSpaceFillType() == asp_fill_ablend_borders) )
DrawTptAirSpace(hdc, rc);
else
DrawAirSpace(hdc, rc);
}
if (DONTDRAWTHEMAP) { // 100319
SelectObject(hdcDrawWindow, hfOld);
goto QuickRedraw;
}
if(TrailActive) {
// NEED REWRITING
LKDrawTrail(hdc, Orig_Aircraft, rc);
}
if (DONTDRAWTHEMAP) { // 100319
SelectObject(hdcDrawWindow, hfOld);
goto QuickRedraw;
}
DrawThermalEstimate(hdc, rc);
if (OvertargetMode==OVT_THER) DrawThermalEstimateMultitarget(hdc, rc);
// draw red cross on glide through terrain marker
if (FinalGlideTerrain && DerivedDrawInfo.TerrainValid) {
DrawGlideThroughTerrain(hdc, rc);
}
if (DONTDRAWTHEMAP) { // 100319
SelectObject(hdcDrawWindow, hfOld);
goto QuickRedraw;
}
if ((OnAirSpace > 0) && AirspaceWarningMapLabels)
{
DrawAirspaceLabels(hdc, rc, Orig_Aircraft);
if (DONTDRAWTHEMAP) { // 100319
SelectObject(hdcDrawWindow, hfOld);
goto QuickRedraw;
}
}
DrawWaypointsNew(hdc,rc);
if (DONTDRAWTHEMAP) { // 100319
SelectObject(hdcDrawWindow, hfOld);
goto QuickRedraw;
}
if (ValidTaskPoint(ActiveWayPoint) && ValidTaskPoint(1)) { // 100503
DrawTask(hdc, rc, Orig_Aircraft);
}
DrawTeammate(hdc, rc);
if (extGPSCONNECT) {
DrawBestCruiseTrack(hdc, Orig_Aircraft);
DrawBearing(hdc, rc);
}
// draw wind vector at aircraft
if (!mode.AnyPan()) {
DrawWindAtAircraft2(hdc, Orig_Aircraft, rc);
} else if (mode.Is(Mode::MODE_TARGET_PAN)) {
DrawWindAtAircraft2(hdc, Orig, rc);
}
#if NEWSMARTZOOM
// Save the current rendered map before painting overlays
if ( OFFSMARTZOOM ) {
quickdrawscale=zoom.DrawScale();
BitBlt(hdcQuickDrawWindow, 0, 0, MapRect.right-MapRect.left, MapRect.bottom-MapRect.top,
hdcDrawWindow, 0, 0, SRCCOPY);
}
#endif
// VisualGlide drawn BEFORE lk8000 overlays
if (!mode.AnyPan() && VisualGlide > 0) {
DrawGlideCircle(hdc, Orig, rc);
}
if (DONTDRAWTHEMAP) { // 100319
SelectObject(hdcDrawWindow, hfOld);
goto QuickRedraw;
}
// Draw traffic and other specifix LK gauges
LKDrawFLARMTraffic(hdc, rc, Orig_Aircraft);
if (!mode.AnyPan()) {
// REMINDER TODO let it be configurable for not circling also, as before
if ((mode.Is(Mode::MODE_CIRCLING)) )
if (ThermalBar) DrawThermalBand(hdcDrawWindow, rc); // 091122
DrawLook8000(hdc,rc);
}
if (LKVarioBar && !mode.AnyPan()) // 091214 do not draw Vario when in Pan mode
LKDrawVario(hdc,rc); // 091111
// Draw glider or paraglider
if (extGPSCONNECT) {
DrawAircraft(hdc, Orig_Aircraft);
}
if (!mode.AnyPan()) {
if (TrackBar) DrawHeading(hdc, Orig, rc);
}
#if USETOPOMARKS
// marks on top...
DrawMarks(hdc, rc);
#endif
if (ISGAAIRCRAFT) DrawHSI(hdc,Orig,rc);
#ifdef CPUSTATS
DrawCpuStats(hdc,rc);
#endif
#ifdef DRAWDEBUG
DrawDebug(hdc,rc);
#endif
SelectObject(hdcDrawWindow, hfOld);
}
void MapWindow::LKDrawMultimap_Test(LKSurface& Surface, const RECT& rc)
{
if (DoInit[MDI_MAPTEST]) {
// init statics here and then clear init to false
DoInit[MDI_MAPTEST]=false;
}
//
// X,Y coordinates of last clicked point on screen
// These coordinates are related to any point clicked, even for a page flip, for bottom bar etc.
// In some cases, you will read old coordinates because for example after clicking in the center of
// bottom bar, the page changed out of multimap and entered nearest pages.
//
int X=startScreen.x;
int Y=startScreen.y;
//
// Duration of key is inside long VKtime, in milliseconds.
//
//
// Draw a boxed terrain/topology example
// --------------------------------------
//
RECT rct=rc; // desired area is 400x180, topleft is (20,30)
rct.top=20;
rct.bottom=rct.top+180;
rct.left=30;
rct.right=rct.left+400;
MapWindow::ChangeDrawRect(rct); // set new area for terrain and topology
PanLatitude = DrawInfo.Latitude;
PanLongitude = DrawInfo.Longitude;
// Current position is in center map
POINT Orig = { (rct.right-rct.left)/2,(rct.bottom-rct.top)/2};
POINT Orig_Aircraft= {0,0};
//zoom.ModifyMapScale();
//zoom.UpdateMapScale();
const ScreenProjection _Proj = CalculateScreenPositions( Orig, rct, &Orig_Aircraft);
CalculateScreenPositionsAirspace(rct, _Proj);
double sunelevation = 40.0;
double sunazimuth=GetAzimuth();
if (IsMultimapTerrain() && DerivedDrawInfo.TerrainValid) {
LockTerrainDataGraphics();
DrawTerrain(Surface, rct, _Proj, sunazimuth, sunelevation);
UnlockTerrainDataGraphics();
}
ResetLabelDeclutter(); // This is needed to reset at each run the declutter, for topology and waypoints!
// SaturateLabelDeclutter(); // Use this to force no labels be printed, from now on.
DrawTopology(Surface, rct, _Proj);
DrawAirSpace(Surface, rct, _Proj);
// ResetLabelDeclutter(); // If you saturated labels for topology, now you can reset the declutter to allow
// printing only waypoints,
DrawWaypointsNew(Surface,rct);
const auto oldpen = Surface.SelectObject(LKPen_White_N1);
const auto oldbrush = Surface.SelectObject(LKBrush_LightGrey);
LKWriteBoxedText(Surface, rct, _T("MULTIMAP PAGE EXAMPLE"), 1, 1, WTALIGN_LEFT, RGB_BLACK, RGB_WHITE);
TCHAR ttext[100];
switch(LKevent) {
//
// USABLE EVENTS
//
case LKEVENT_NEWRUN:
// CALLED ON ENTRY: when we select this page coming from another mapspace
_tcscpy(ttext,_T("Event = NEW RUN"));
break;
case LKEVENT_UP:
// click on upper part of screen, excluding center
_tcscpy(ttext,_T("Event = UP"));
break;
case LKEVENT_DOWN:
// click on lower part of screen, excluding center
_tcscpy(ttext,_T("Event = DOWN"));
break;
case LKEVENT_LONGCLICK:
_stprintf(ttext,_T("Event = LONG CLICK"));
break;
case LKEVENT_PAGEUP:
_tcscpy(ttext,_T("Event = PAGE UP"));
break;
case LKEVENT_PAGEDOWN:
_tcscpy(ttext,_T("Event = PAGE DOWN"));
break;
case LKEVENT_TOPLEFT:
_tcscpy(ttext,_T("Event = TOP LEFT"));
break;
case LKEVENT_TOPRIGHT:
_tcscpy(ttext,_T("Event = TOP RIGHT"));
break;
case LKEVENT_SHORTCLICK:
_tcscpy(ttext,_T("Event = SHORT CLICK"));
break;
//
// THESE EVENTS ARE NOT AVAILABLE IN MULTIMAPS!
//
case LKEVENT_ENTER:
// click longer on center, like to confirm a selection
_tcscpy(ttext,_T("Event = ENTER"));
break;
case LKEVENT_NEWPAGE:
// swipe gesture up/down produces NEW PAGE in this case
_tcscpy(ttext,_T("Event = NEW PAGE"));
break;
case LKEVENT_NONE:
// Normally no event.
_tcscpy(ttext,_T("Event = NONE"));
break;
//
default:
// THIS SHOULD NEVER HAPPEN, but always CHECK FOR IT!
_tcscpy(ttext,_T("Event = unknown"));
break;
}
LKWriteBoxedText(Surface, rct, ttext, 1, 50 , WTALIGN_LEFT, RGB_BLACK, RGB_WHITE);
//
// Be sure to check that an EVENT was generated, otherwise you are checking even bottombar key presses.
//
if (LKevent!=LKEVENT_NONE) {
_stprintf(ttext,_T("Last coords: X=%d Y=%d , duration=%ld ms"),X,Y,VKtime);
LKWriteBoxedText(Surface, rct, ttext, 1, 100 , WTALIGN_LEFT, RGB_BLACK, RGB_WHITE);
}
// After using the event, WE MUST CLEAR IT, otherwise it will survive for next run.
// This can be good for something, though, like automatic redo of last action.
// You can also clear this event at the end of this function, to know during execution which was
// the key pressed, but remember to clear it.
LKevent=LKEVENT_NONE;
Surface.SelectObject(oldbrush);
Surface.SelectObject(oldpen);
}