private void MiLoadFromGameBase_Click(object sender, RoutedEventArgs e) { GameBaseBrowser dialog = new GameBaseBrowser(); dialog.Owner = this; if (dialog.ShowDialog() == true) { string filename = dialog.SelectedFileName; // load program TVCFiles.LoadProgramFile(filename, ExecutionControl.TVC.Memory); // autostart program is enabled GamebaseSettings settings = SettingsFile.Default.GetSettings <GamebaseSettings>(); if (settings.Autostart) { ExecutionControl.TVC.Keyboard.InjectKeys("DR,W,UR,DU,W,UU,DN,W,UN,DEnter,W,UEnter"); } } }
private void MiSaveAsCASFile_Click(object sender, RoutedEventArgs e) { // Configure open file dialog box Microsoft.Win32.SaveFileDialog dlg = new Microsoft.Win32.SaveFileDialog { DefaultExt = ".cas", Filter = "Program file (*.cas)|*.CAS|Basic text file [ANSI encoded] (*.bas)|*.bas|Basic text file [UTF-8 encoded] (*.bas)|*.bas|Basic text file [Unicode encoded] (*.bas)|*.bas" }; // Show open file dialog box bool?result = null; result = dlg.ShowDialog(); // Process open file dialog box results if (result == true) { // Open document string filename = dlg.FileName; switch (dlg.FilterIndex) { case 1: TVCFiles.SaveProgramFile(filename, ExecutionControl.TVC.Memory); break; case 2: TVCFiles.SaveProgramFile(filename, ExecutionControl.TVC.Memory, BASFile.EncodingType.Ansi); break; case 3: TVCFiles.SaveProgramFile(filename, ExecutionControl.TVC.Memory, BASFile.EncodingType.Utf8); break; case 4: TVCFiles.SaveProgramFile(filename, ExecutionControl.TVC.Memory, BASFile.EncodingType.Unicode); break; } } }
private void MiOpenCASFile_Click(object sender, RoutedEventArgs e) { // Configure open file dialog box Microsoft.Win32.OpenFileDialog dlg = new Microsoft.Win32.OpenFileDialog { DefaultExt = ".cas", Filter = "All supported files (*.cas; *.zip; *.dsk)|*.CAS;*.ZIP;*.DSK|All files (*.*)|*.*" }; // Show open file dialog box bool?result = null; result = dlg.ShowDialog(); // Process open file dialog box results if (result == true) { // Open document string filename = dlg.FileName; TVCFiles.LoadProgramFile(filename, ExecutionControl.TVC.Memory); } }