SecInitBPage (IPage)
| Eigenschaft |
Wert |
| Modul |
Mcdu/Pages |
| Klasse |
SecInitBPage |
| Typ |
IPage Implementation |
| Sichtbarkeit |
Public |
| Datei |
Mcdu/Pages/SecFplnPages.vb |
Beschreibung
SEC INIT B Seite — Kraftstoff- und Gewichtszusammenfassung fuer den sekundaeren Flugplan. Zeigt TAXI, TRIP/TIME, RTE RSV/%, ALTN/TIME, FINAL/TIME, EXTRA/TIME auf der linken Seite und ZFWCG/ZFW, BLOCK, TOW, LW auf der rechten Seite. Wenn ZFW, FOB, CI und CRZ ALT alle gesetzt sind, wechselt der Titel zu "SEC INIT FUEL PRED". L1 akzeptiert ZFW-Eingabe, L2 FOB-Eingabe (jeweils in Tonnen). L6 kehrt zu SecInitA zurueck. Portiert aus VB6 CreateSECINITB.
Implementierte Methoden
Render
Public Sub Render(ctx As McduContext, buffer As Inet.Arinc429ScreenBuffer) Implements IPage.Render
| Name |
Typ |
Beschreibung |
Standard |
| ctx |
McduContext |
MCDU-Kontextdaten (Zfw, Fob, CostIndex, CrzAltFt, FuelTable) |
— |
| buffer |
Inet.Arinc429ScreenBuffer |
Zielpuffer |
— |
HandleLsk
Public Function HandleLsk(key As McduLskKey, ctx As McduContext) As McduCommand Implements IPage.HandleLsk
| Name |
Typ |
Beschreibung |
Standard |
| key |
McduLskKey |
Gedrueckte LSK-Taste |
— |
| ctx |
McduContext |
MCDU-Kontextdaten |
— |
Rückgabewert (HandleLsk)
| Typ |
Beschreibung |
| McduCommand |
SetSecZfw bei L1, SetSecFob bei L2, NavigateTo(SecInitA) bei L6, NoOp sonst |
Ablaufdiagramm
flowchart TD
A[Start Render] --> B[LISTCLEAR]
B --> C{Alle Daten gesetzt?}
C -- Ja --> D[Titel SEC INIT FUEL PRED]
C -- Nein --> E[Titel SEC INIT]
D --> F[Labels und Kraftstoffwerte]
E --> F
F --> G[ZFW und FOB rechts]
G --> H[L6: RETURN blau]
H --> I[ParseAndRender]
I --> J[Ende]
Aufgerufen von
| Modul |
Sub/Function |
Kontext |
| McduActor |
RenderActivePage |
Seitenrendering bei aktivem PageType.SecInitB |
Ruft auf
| Modul |
Sub/Function |
Kontext |
| McduCommandParser |
ParseAndRender |
Kommandoliste in Bildschirmpuffer rendern |
Beispiel
Dim page As New SecInitBPage()
page.Render(ctx, buffer)
' L1 druecken mit "62.5" im Scratchpad → ZFW auf 62500 kg setzen
Dim cmd = page.HandleLsk(McduLskKey.L1, ctx)
' cmd ist SetSecZfw(62500.0)
Änderungshistorie
| Version |
Datum |
Änderung |
| 1.0 |
2026-04-16 |
Erstdokumentation |