program SPS_Emu; {$mode objfpc}{$H+} uses {$IFDEF UNIX}{$IFDEF UseCThreads} cthreads, {$ENDIF}{$ENDIF} Interfaces, // this includes the LCL widgetset Forms, sdposeriallaz, uGUI, uSPS, uTextUi, uSelectCom, MCSLSU, MCSAbout, uiMicrobit; {$R *.res} var path : string; begin path := ParamStr(0); RequireDerivedFormResource := True; Application.Scaled:=True; Application.Initialize; MCSLSU.LSUSetDebug(false); MCSLSU.LSUInit(path, NOR_Mode, GetLNGCode); Application.CreateForm(TForm1, Form1); Application.CreateForm(TForm2, Form2); Application.CreateForm(TfrmSelectCom, frmSelectCom); Application.CreateForm(TfMicrobit, fMicrobit); Application.Run; end.