Compare commits

...

3 Commits
0.2.1 ... main

Author SHA1 Message Date
SistemaRayoXP 0737548099 Cleared commit log 2021-12-21 14:27:18 -06:00
SistemaRayoXP 5c2510df3b
Create README.md 2018-02-22 12:32:03 -06:00
SistemaRayoXP 708ec3d40c
Add files via upload 2018-02-22 12:04:06 -06:00
91 changed files with 36506 additions and 0 deletions

105
ApplicationEvents.vb Normal file
View File

@ -0,0 +1,105 @@
Imports System.Management
Namespace My
' Los siguientes eventos están disponibles para MyApplication:
'
' Inicio: se desencadena cuando se inicia la aplicación, antes de que se cree el formulario de inicio.
' Apagado: generado después de cerrar todos los formularios de la aplicación. Este evento no se genera si la aplicación termina de forma anómala.
' UnhandledException: generado si la aplicación detecta una excepción no controlada.
' StartupNextInstance: se desencadena cuando se inicia una aplicación de instancia única y la aplicación ya está activa.
' NetworkAvailabilityChanged: se desencadena cuando la conexión de red está conectada o desconectada.
Partial Friend Class MyApplication
Private Sub MyApplication_Startup(ByVal sender As Object, ByVal e As Microsoft.VisualBasic.ApplicationServices.StartupEventArgs) Handles Me.Startup
SysInfo.GetSysInfo()
frmAbout.ProductNAV.Text = frmAbout.ProductNAV.Text & " " & My.Application.Info.Version.ToString & " Beta"
If My.Computer.FileSystem.DirectoryExists(My.Settings.DefaultMacFolder) = False Then
My.Settings.DefaultMacFolder = My.Computer.FileSystem.SpecialDirectories.MyDocuments & "\My Macs"
End If
If My.Settings.vMacROM = "" Then
My.Settings.vMacROM = My.Application.Info.DirectoryPath & "\Emulators\vMac\MacII.ROM"
End If
If My.Settings.BasiliskROM = "" Then
My.Settings.BasiliskROM = My.Application.Info.DirectoryPath & "\Emulators\BasiliskII\Mac_OS_ROM"
End If
If My.Settings.SheepShaverROM = "" Then
My.Settings.SheepShaverROM = My.Application.Info.DirectoryPath & "\Emulators\SheepShaver\Mac_OS_ROM"
End If
Select Case My.Settings.Lang
Case "en-US"
My.Application.ChangeUICulture("en-US")
Case "es-MX"
My.Application.ChangeUICulture("es-MX")
Case "de-DE"
My.Application.ChangeUICulture("de-DE")
End Select
If Not My.Application.CommandLineArgs.Count = 0 Then
For x As Integer = 0 To My.Application.CommandLineArgs.Count - 1
Select Case My.Application.CommandLineArgs.Item(x)
Case "/debug"
frmMain.mnuFileDebug.Visible = True
frmMain.mnuHelpCrash.Visible = True
Case "/log"
End Select
Next
End If
SearchForMacs()
If My.Settings.VerifyEmulatorPaths = True Then
If My.Settings.PearPCPath = "" Or My.Settings.QEMUPath = "" Or My.Settings.SheepShaverPath = "" _
Or My.Settings.BasiliskPath = "" Or My.Settings.vMacPath = "" Then
MsgBox("Some emulator(s)' path isn't set yet. In order to launch this/these emulator(s), " & _
"you must set their path. To do so, click on menu File > Options and select ''Emulator " & _
"path'' and set the paths for the emulators", MsgBoxStyle.Exclamation, "Incorrect paths")
End If
End If
End Sub
Private Sub MyApplication_StartupNextInstance(ByVal sender As Object, ByVal e As Microsoft.VisualBasic.ApplicationServices.StartupNextInstanceEventArgs) Handles Me.StartupNextInstance
If MsgBox("Virtual Mac is already running. Click Ok to show Virtual Mac Console. Click Cancel to close this dialog", MsgBoxStyle.OkCancel, "Virtual Mac is alerady running") = MsgBoxResult.Ok Then
frmMain.Show()
End If
End Sub
Private Sub MyApplication_UnhandledException(ByVal sender As Object, ByVal e As Microsoft.VisualBasic.ApplicationServices.UnhandledExceptionEventArgs) Handles Me.UnhandledException
For x As Integer = 0 To My.Application.CommandLineArgs.Count - 1
Select Case My.Application.CommandLineArgs.Item(x)
Case "/debug"
MsgBox(e.Exception.Message)
Resume Next
Case "/log"
Resume Next
Case ""
Resume Next
End Select
Next
End Sub
Private Sub SearchForMacs()
If My.Computer.FileSystem.DirectoryExists(My.Settings.DefaultMacFolder) = True Then
Dim Subdirectories As System.Collections.ObjectModel.ReadOnlyCollection(Of String) = My.Computer.FileSystem.GetDirectories(My.Settings.DefaultMacFolder)
Dim FilesFound As String = ""
For x As Integer = 0 To Subdirectories.Count - 1
For Each FileDetected As String In My.Computer.FileSystem.GetFiles( _
Subdirectories.Item(x), _
FileIO.SearchOption.SearchAllSubDirectories, _
"*.mcf")
If Not frmMain.VMList.Items.IndexOfKey(System.IO.Path.GetFileNameWithoutExtension(FileDetected)) = -1 Then
Dim EmulatorType As String = InputBox("The file ''" & My.Computer.FileSystem.GetName(FileDetected) & _
"'' was detected as a possible Virtual Mac configuration file. " & _
"Possible emulators are 'Basilisk', 'SheepShaver', 'PearPC', 'QEMU'." & _
"Please write below the emulator to which this file will be associated:", _
"Virtual Mac Configuration file detected")
ConfigFileHandler.CreateFromFile(FileDetected, EmulatorType, System.IO.Path.GetFileNameWithoutExtension(FileDetected))
End If
Next
Next
End If
End Sub
End Class
End Namespace

39
AssemblyInfo.vb Normal file
View File

@ -0,0 +1,39 @@
Imports System.Resources
Imports System.Reflection
Imports System.Runtime.CompilerServices
Imports System.Runtime.InteropServices
' General Information about an assembly is controlled through the following
' set of attributes. Change these attribute values to modify the information
' associated with an assembly.
' TODO: Review the values of the assembly attributes
<Assembly: AssemblyTitle("Virtual Mac © Beta")>
<Assembly: AssemblyDescription("Run Classic Mac Operating Systems")>
<Assembly: AssemblyCompany("Tecnologias Edson Armando")>
<Assembly: AssemblyProduct("Virtual Mac")>
<Assembly: AssemblyCopyright("Copyright © Tecnologias Edson Armando")>
<Assembly: AssemblyTrademark("Virtual Mac © 2018 Todos los derechos reservados")>
<Assembly: AssemblyCulture("")>
' Version information for an assembly consists of the following four values:
' Major version
' Minor Version
' Build Number
' Revision
' You can specify all the values or you can default the Build and Revision Numbers
' by using the '*' as shown below:
<Assembly: AssemblyVersion("0.6.1")>
<Assembly: AssemblyFileVersionAttribute("0.6.1.1")>
<Assembly: ComVisibleAttribute(True)>
<Assembly: NeutralResourcesLanguageAttribute("en-US")>

76
CODE_OF_CONDUCT.md Normal file
View File

@ -0,0 +1,76 @@
# Contributor Covenant Code of Conduct
## Our Pledge
In the interest of fostering an open and welcoming environment, we as
contributors and maintainers pledge to making participation in our project and
our community a harassment-free experience for everyone, regardless of age, body
size, disability, ethnicity, sex characteristics, gender identity and expression,
level of experience, education, socio-economic status, nationality, personal
appearance, race, religion, or sexual identity and orientation.
## Our Standards
Examples of behavior that contributes to creating a positive environment
include:
* Using welcoming and inclusive language
* Being respectful of differing viewpoints and experiences
* Gracefully accepting constructive criticism
* Focusing on what is best for the community
* Showing empathy towards other community members
Examples of unacceptable behavior by participants include:
* The use of sexualized language or imagery and unwelcome sexual attention or
advances
* Trolling, insulting/derogatory comments, and personal or political attacks
* Public or private harassment
* Publishing others' private information, such as a physical or electronic
address, without explicit permission
* Other conduct which could reasonably be considered inappropriate in a
professional setting
## Our Responsibilities
Project maintainers are responsible for clarifying the standards of acceptable
behavior and are expected to take appropriate and fair corrective action in
response to any instances of unacceptable behavior.
Project maintainers have the right and responsibility to remove, edit, or
reject comments, commits, code, wiki edits, issues, and other contributions
that are not aligned to this Code of Conduct, or to ban temporarily or
permanently any contributor for other behaviors that they deem inappropriate,
threatening, offensive, or harmful.
## Scope
This Code of Conduct applies both within project spaces and in public spaces
when an individual is representing the project or its community. Examples of
representing a project or community include using an official project e-mail
address, posting via an official social media account, or acting as an appointed
representative at an online or offline event. Representation of a project may be
further defined and clarified by project maintainers.
## Enforcement
Instances of abusive, harassing, or otherwise unacceptable behavior may be
reported by contacting the project team at tecnologiasedsonarmando@hotmail.com. All
complaints will be reviewed and investigated and will result in a response that
is deemed necessary and appropriate to the circumstances. The project team is
obligated to maintain confidentiality with regard to the reporter of an incident.
Further details of specific enforcement policies may be posted separately.
Project maintainers who do not follow or enforce the Code of Conduct in good
faith may face temporary or permanent repercussions as determined by other
members of the project's leadership.
## Attribution
This Code of Conduct is adapted from the [Contributor Covenant][homepage], version 1.4,
available at https://www.contributor-covenant.org/version/1/4/code-of-conduct.html
[homepage]: https://www.contributor-covenant.org
For answers to common questions about this code of conduct, see
https://www.contributor-covenant.org/faq

266
ConfigFileHandler.vb Normal file
View File

@ -0,0 +1,266 @@
Module ConfigFileHandler
Public Sub Create(ByVal MacName As String, ByVal Path As String, ByVal Emulator As String, ByVal RAMInMB As Integer, _
ByVal UseDisk As String, Optional ByVal DiskSize As Integer = 0, Optional ByVal DiskPath As String = "")
Dim ConfigFile As String = ""
If UseDisk = "New" Then
DiskImageCreator.CreateRawDisk(DiskSize, DiskPath, False)
End If
EmulatorSection:
Select Case Emulator
Case "vMac"
If UseDisk = "New" Or UseDisk = "Exist" Then
ConfigFile = FormatLine("disk", DiskPath)
End If
ConfigFile = ConfigFile & My.Settings.vMacROM & vbCrLf
Case "SheepShaver"
If UseDisk = "New" Or UseDisk = "Exist" Then
ConfigFile = FormatLine("disk", DiskPath)
End If
ConfigFile = ConfigFile & FormatLine("extfs", "")
ConfigFile = ConfigFile & FormatLine("screen", "win/800/600")
ConfigFile = ConfigFile & FormatLine("windowmodes", "2")
ConfigFile = ConfigFile & FormatLine("screenmodes", "62")
ConfigFile = ConfigFile & FormatLine("seriala", "COM1")
ConfigFile = ConfigFile & FormatLine("serialb", "COM2")
ConfigFile = ConfigFile & FormatLine("rom", My.Settings.SheepShaverROM)
ConfigFile = ConfigFile & FormatLine("bootdrive", "0")
ConfigFile = ConfigFile & FormatLine("bootdriver", "0")
ConfigFile = ConfigFile & FormatLine("ramsize", (RAMInMB * 1024) * 1024)
ConfigFile = ConfigFile & FormatLine("frameskip", "0")
ConfigFile = ConfigFile & FormatLine("gfxaccel", "true")
ConfigFile = ConfigFile & FormatLine("nocdrom", "false")
ConfigFile = ConfigFile & FormatLine("nonet", "false")
ConfigFile = ConfigFile & FormatLine("nosound", "false")
ConfigFile = ConfigFile & FormatLine("nogui", "false")
ConfigFile = ConfigFile & FormatLine("noclipconversion", "false")
ConfigFile = ConfigFile & FormatLine("ignoresegv", "true")
ConfigFile = ConfigFile & FormatLine("ignoreillegal", "true")
ConfigFile = ConfigFile & FormatLine("jit", "true")
ConfigFile = ConfigFile & FormatLine("jit68k", "false")
ConfigFile = ConfigFile & FormatLine("keyboardtype", "5")
ConfigFile = ConfigFile & FormatLine("ether", "slirp")
ConfigFile = ConfigFile & FormatLine("keycodes", "false")
ConfigFile = ConfigFile & FormatLine("keycodefile", "BasiliskII_keycodes")
ConfigFile = ConfigFile & FormatLine("mousewheelmode", "1")
ConfigFile = ConfigFile & FormatLine("mousewheellines", "3")
ConfigFile = ConfigFile & FormatLine("idlewait", "true")
ConfigFile = ConfigFile & FormatLine("mousewheelmode", "1")
ConfigFile = ConfigFile & FormatLine("mousewheellines", "3")
ConfigFile = ConfigFile & FormatLine("enableextfs", "false")
ConfigFile = ConfigFile & FormatLine("debugextfs", "false")
ConfigFile = ConfigFile & FormatLine("extdrives", "CDEFGHIJKLMNOPQRSTUVWXYZ")
ConfigFile = ConfigFile & FormatLine("pollmedia", "true")
ConfigFile = ConfigFile & FormatLine("etherpermanentaddress", "true")
ConfigFile = ConfigFile & FormatLine("routerenabled", "false")
ConfigFile = ConfigFile & FormatLine("portfile0", My.Application.Info.DirectoryPath & "\Emulators\SheepShaver\Com1.txt")
ConfigFile = ConfigFile & FormatLine("portfile1", My.Application.Info.DirectoryPath & "\Emulators\SheepShaver\Com2.txt")
Case "BII"
If UseDisk = "New" Or UseDisk = "Exist" Then
ConfigFile = FormatLine("disk", DiskPath)
End If
ConfigFile = ConfigFile & FormatLine("extfs", "")
ConfigFile = ConfigFile & FormatLine("screen", "win/800/600")
ConfigFile = ConfigFile & FormatLine("seriala", "COM1")
ConfigFile = ConfigFile & FormatLine("serialb", "COM2")
ConfigFile = ConfigFile & FormatLine("ether", "slirp")
ConfigFile = ConfigFile & FormatLine("udptunnel", "false")
ConfigFile = ConfigFile & FormatLine("udpport", "6066")
ConfigFile = ConfigFile & FormatLine("rom", My.Settings.BasiliskROM)
ConfigFile = ConfigFile & FormatLine("bootdrive", 0)
ConfigFile = ConfigFile & FormatLine("bootdriver", 0)
ConfigFile = ConfigFile & FormatLine("ramsize", (RAMInMB * 1024) * 1024)
ConfigFile = ConfigFile & FormatLine("frameskip", 0)
ConfigFile = ConfigFile & FormatLine("modelid", 5)
ConfigFile = ConfigFile & FormatLine("cpu", 4)
ConfigFile = ConfigFile & FormatLine("fpu", "true")
ConfigFile = ConfigFile & FormatLine("nocdrom", "false")
ConfigFile = ConfigFile & FormatLine("nosound", "false")
ConfigFile = ConfigFile & FormatLine("noclipconversion", "false")
ConfigFile = ConfigFile & FormatLine("nogui", "false")
ConfigFile = ConfigFile & FormatLine("jit", "true")
ConfigFile = ConfigFile & FormatLine("jitfpu", "true")
ConfigFile = ConfigFile & FormatLine("jitdebug", "true")
ConfigFile = ConfigFile & FormatLine("jitcachesize", 4096)
ConfigFile = ConfigFile & FormatLine("jitlazyflush", "true")
ConfigFile = ConfigFile & FormatLine("jitinline", "true")
ConfigFile = ConfigFile & FormatLine("keyboardtype", "5")
ConfigFile = ConfigFile & FormatLine("keycodes", "false")
ConfigFile = ConfigFile & FormatLine("keycodefile", "BasiliskII_keycodes")
ConfigFile = ConfigFile & FormatLine("mousewheelmode", "1")
ConfigFile = ConfigFile & FormatLine("mousewheellines", "3")
ConfigFile = ConfigFile & FormatLine("ignoresegv", "true")
ConfigFile = ConfigFile & FormatLine("idlewait", "true")
ConfigFile = ConfigFile & FormatLine("enableextfs", "false")
ConfigFile = ConfigFile & FormatLine("debugextfs", "false")
ConfigFile = ConfigFile & FormatLine("extdrives", "CDEFGHIJKLMNOPQRSTUVWXYZ")
ConfigFile = ConfigFile & FormatLine("pollmedia", "true")
ConfigFile = ConfigFile & FormatLine("etherpermanentaddress", "true")
ConfigFile = ConfigFile & FormatLine("routerenabled", "false")
ConfigFile = ConfigFile & FormatLine("portfile0", My.Application.Info.DirectoryPath & "COM1.log")
ConfigFile = ConfigFile & FormatLine("portfile1", My.Application.Info.DirectoryPath & "COM2.log")
Case "PearPC"
ConfigFile = FormatLine("ppc_start_resolution =", "800x600x15", True)
ConfigFile = ConfigFile & FormatLine("ppc_start_full_screen =", 0)
ConfigFile = ConfigFile & FormatLine("redraw_interval_msec =", 40)
ConfigFile = ConfigFile & FormatLine("key_compose_dialog =", "F11", True)
ConfigFile = ConfigFile & FormatLine("key_change_cd_0 =", "none", True)
ConfigFile = ConfigFile & FormatLine("key_toggle_mouse_grab =", "F12", True)
ConfigFile = ConfigFile & FormatLine("key_toggle_full_screen =", "Alt+Return", True)
ConfigFile = ConfigFile & FormatLine("prom_bootmethod =", "select", True)
ConfigFile = ConfigFile & FormatLine("prom_env_machargs =", "", True)
ConfigFile = ConfigFile & FormatLine("prom_driver_graphic =", "video.x", True)
ConfigFile = ConfigFile & FormatLine("page_table_pa =", "104857600")
ConfigFile = ConfigFile & FormatLine("cpu_pvr =", "0x00088302")
ConfigFile = ConfigFile & FormatLine("memory_size =", "0x" & RAMInMB / 0.0000256)
If UseDisk = "New" Or UseDisk = "Exist" Then
ConfigFile = ConfigFile & FormatLine("pci_ide0_master_installed =", "1")
ConfigFile = ConfigFile & FormatLine("pci_ide0_master_image =", DiskPath, True)
ConfigFile = ConfigFile & FormatLine("pci_ide0_master_type =", "hd", True)
Else
ConfigFile = ConfigFile & FormatLine("pci_ide0_master_installed =", "0")
End If
ConfigFile = ConfigFile & FormatLine("pci_ide0_slave_installed =", "0")
ConfigFile = ConfigFile & FormatLine("pci_3c90x_installed =", "0")
ConfigFile = ConfigFile & FormatLine("pci_3c90x_mac =", "de:ad:ca:fe:12:34", True)
ConfigFile = ConfigFile & FormatLine("pci_rtl8139_installed =", "0", True)
ConfigFile = ConfigFile & FormatLine("pci_rtl8139_mac =", "de:ad:ca:fe:12:34", True)
ConfigFile = ConfigFile & FormatLine("pci_usb_installed =", "1")
ConfigFile = ConfigFile & FormatLine("pci_serial_installed =", "0")
ConfigFile = ConfigFile & FormatLine("nvram_file =", "nvram", True)
Case "QEMU"
'//Will be used for reference to load and save batches for QEMU
'ConfigFile = "qemu-system-ppc.exe -L pc-bios -boot d -m " & RAMInMB & " -M mac99 -prom-env " & Chr(34) & _
' "auto-boot?=true" & Chr(34) & " -prom-env " & Chr(34) & "boot-args=-v" & Chr(34) & " -prom-env " & Chr(34) & _
' "vga-ndrv?=true" & Chr(34) & " -drive file=MacOS9.2.iso,format=raw,media=cdrom " & _
' "-drive file=" & Chr(34) & DiskPath & Chr(34) & _
' ",format=raw,media=disk -sdl -netdev user,id=network01 -device sungem,netdev=network01 "
ConfigFile = "qemu-system-ppc.exe -L pc-bios -boot d -m " & RAMInMB & " -M mac99 -prom-env " & Chr(34) & _
"auto-boot?=true" & Chr(34) & " -prom-env " & Chr(34) & "boot-args=-v" & Chr(34) & " -prom-env " & Chr(34) & _
"vga-ndrv?=true" & Chr(34) & "-drive file=" & Chr(34) & DiskPath & Chr(34) & _
",format=raw,media=disk -sdl -netdev user,id=network01 -device sungem,netdev=network01 "
End Select
CreateFiles:
If My.Computer.FileSystem.DirectoryExists(System.IO.Path.GetDirectoryName(MacName)) = False Then 'Verify that the path doesn't exists
My.Computer.FileSystem.CreateDirectory(System.IO.Path.GetDirectoryName(Path))
Write(ConfigFile, Path)
Else 'If the path does already exist...
MsgBox("This folder already exists. Creating a duplicate.", MsgBoxStyle.Information + MsgBoxStyle.OkOnly)
My.Computer.FileSystem.CreateDirectory(System.IO.Path.GetDirectoryName(Path & "(1)"))
Write(ConfigFile, Path)
End If
With frmMain.VMList.Items.Add(MacName) 'Add the fresh new Mac to the console
.SubItems.Add(Path) 'Several SubItems are used to load. This one sets the path tp the config file
.SubItems.Add(Emulator) 'This one sets the emulator to load properly a file
.StateImageIndex = 0 'Will be reimplemented. Used for icons
End With
frmMain.SaveSettings()
End Sub
Public Function FormatLine(ByVal Line1 As String, ByVal Line2 As String, Optional InQuotes As Boolean = False) As String
Dim Formatted As String = ""
If InQuotes = False Then
Formatted = Line1 & " " & Line2 & vbCrLf
Else
Formatted = Line1 & " " & Chr(34) & Line2 & Chr(34) & vbCrLf
End If
Return Formatted
End Function
Public Sub Edit(ByVal ConfigFile As String, ByVal Emulator As String, ByVal Parameters As String)
End Sub
Public Sub Convert(ByVal FileToConvert As String, ByVal OldEmulator As String, ByVal NewEmulator As String)
End Sub
Public Sub Write(ByVal Text As String, ByVal Route As String)
Dim Writer As IO.StreamWriter = IO.File.CreateText(Route)
Writer.Write(Text)
Writer.Flush()
Writer.Close()
End Sub
Public Sub CreateFromFile(ByVal File As String, ByVal Emulator As String, ByVal VMName As String)
Dim VMPath As String = My.Settings.DefaultMacFolder + "\" + VMName
Dim VMFile As String = VMPath + "\" + VMName + ".mcf"
Select Case Emulator
Case "vMacBatch"
If My.Computer.FileSystem.DirectoryExists(VMPath) = False Then
My.Computer.FileSystem.CreateDirectory(VMPath)
My.Computer.FileSystem.CopyFile(File, VMPath + "\" + VMName + ".mcf")
End If
With frmMain.VMList.Items.Add(VMName)
.SubItems.Add(VMFile)
.SubItems.Add("vMac")
.StateImageIndex = 0
End With
frmMain.SaveSettings()
Case "vMac"
If My.Computer.FileSystem.DirectoryExists(VMPath) = False Then
My.Computer.FileSystem.CreateDirectory(VMPath)
My.Computer.FileSystem.CopyFile(File, VMPath + "\" + VMName + ".mcf")
End If
With frmMain.VMList.Items.Add(VMName)
.SubItems.Add(VMFile)
.SubItems.Add("vMac")
.StateImageIndex = 0
End With
frmMain.SaveSettings()
Case "BII"
If My.Computer.FileSystem.DirectoryExists(VMPath) = False Then
My.Computer.FileSystem.CreateDirectory(VMPath)
My.Computer.FileSystem.CopyFile(File, VMPath + "\" + VMName + ".mcf")
End If
With frmMain.VMList.Items.Add(VMName)
.SubItems.Add(VMFile)
.SubItems.Add("BII")
.StateImageIndex = 0
End With
frmMain.SaveSettings()
Case "SheepShaver"
If My.Computer.FileSystem.DirectoryExists(VMPath) = False Then
My.Computer.FileSystem.CreateDirectory(VMPath)
My.Computer.FileSystem.CopyFile(File, VMPath + "\" + VMName + ".mcf")
End If
With frmMain.VMList.Items.Add(VMName)
.SubItems.Add(VMFile)
.SubItems.Add("SheepShaver")
.StateImageIndex = 0
End With
frmMain.SaveSettings()
Case "PearPC"
If My.Computer.FileSystem.DirectoryExists(VMPath) = False Then
My.Computer.FileSystem.CreateDirectory(VMPath)
My.Computer.FileSystem.CopyFile(File, VMPath + "\" + VMName + ".mcf")
End If
With frmMain.VMList.Items.Add(VMName)
.SubItems.Add(VMFile)
.SubItems.Add("PearPC")
.StateImageIndex = 0
End With
frmMain.SaveSettings()
Case "QEMUBatch"
If My.Computer.FileSystem.DirectoryExists(VMPath) = False Then
My.Computer.FileSystem.CreateDirectory(VMPath)
My.Computer.FileSystem.CopyFile(File, VMPath + "\" + VMName + ".mcf")
End If
With frmMain.VMList.Items.Add(VMName)
.SubItems.Add(VMFile)
.SubItems.Add("QEMU")
.StateImageIndex = 0
End With
frmMain.SaveSettings()
End Select
End Sub
End Module

33
DiskImageCreator.vb Normal file
View File

@ -0,0 +1,33 @@
Module DiskImageCreator
Public Function CreateRawDisk(ByVal DiskSize As Integer, ByVal DiskPath As String, Optional ShowMessages As Boolean = True) As Long
Dim Size((DiskSize * 1024) * 1024) As Byte
'//Create the file, so we don't depend on the creation of the file to report progress
'//And after file creation, fill the file with zeroes until we get the desired size
'//As the byte gets assigned a value, it's written, and also it's reported as a progress of the creation
For x As Integer = 0 To Size.Length - 1
Size(x) = 0
Next
My.Computer.FileSystem.WriteAllBytes(DiskPath, Size, False)
If ShowMessages = False Then Exit Function
MsgBox("The image ''" & DiskPath & "'' was created succefully.", MsgBoxStyle.Exclamation, "Creating disk image")
End Function
'//This thing below is useless right now. In a later update, this will create Mac formatted floppy disks of 720 KB and 1.44 MB
Public Function CreateFloppyDisk(ByVal DiskSize As Integer, ByVal DiskPath As String, Optional ShowMessages As Boolean = True) As Long
Dim FloppyImageToUse() As Byte = {0}
Select Case DiskSize
Case "720"
Case "1440"
End Select
'//Create the file from an existing image, which is formatted and ready to use with a Mac
My.Computer.FileSystem.WriteAllBytes(DiskPath, FloppyImageToUse, False)
If ShowMessages = False Then Exit Function
MsgBox("The image ''" & DiskPath & "'' was created succefully.", MsgBoxStyle.Exclamation, "Creating disk image")
End Function
End Module

43
My Project/Application.Designer.vb generated Normal file
View File

@ -0,0 +1,43 @@
'------------------------------------------------------------------------------
' <auto-generated>
' Este código fue generado por una herramienta.
' Versión de runtime:4.0.30319.42000
'
' Los cambios en este archivo podrían causar un comportamiento incorrecto y se perderán si
' se vuelve a generar el código.
' </auto-generated>
'------------------------------------------------------------------------------
Option Strict On
Option Explicit On
Namespace My
'NOTA: este archivo se genera de forma automática; no lo modifique directamente. Para realizar cambios,
' o si detecta errores de compilación en este archivo, vaya al Diseñador de proyectos
' (vaya a Propiedades del proyecto o haga doble clic en el nodo My Project en el
' Explorador de soluciones) y realice cambios en la ficha Aplicación.
'
Partial Friend Class MyApplication
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
Public Sub New()
MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
Me.IsSingleInstance = true
Me.EnableVisualStyles = true
Me.SaveMySettingsOnExit = true
Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses
End Sub
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
Protected Overrides Sub OnCreateMainForm()
Me.MainForm = Global.VirtualMac.frmMain
End Sub
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
Protected Overrides Sub OnCreateSplashScreen()
Me.SplashScreen = Global.VirtualMac.frmSplash
End Sub
End Class
End Namespace

View File

@ -0,0 +1,11 @@
<?xml version="1.0" encoding="utf-8"?>
<MyApplicationData xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
<MySubMain>true</MySubMain>
<MainForm>frmMain</MainForm>
<SingleInstance>true</SingleInstance>
<ShutdownMode>0</ShutdownMode>
<EnableVisualStyles>true</EnableVisualStyles>
<AuthenticationMode>0</AuthenticationMode>
<SplashScreen>frmSplash</SplashScreen>
<SaveMySettingsOnExit>true</SaveMySettingsOnExit>
</MyApplicationData>

172
My Project/Resources.Designer.vb generated Normal file
View File

@ -0,0 +1,172 @@
'------------------------------------------------------------------------------
' <auto-generated>
' Este código fue generado por una herramienta.
' Versión de runtime:4.0.30319.42000
'
' Los cambios en este archivo podrían causar un comportamiento incorrecto y se perderán si
' se vuelve a generar el código.
' </auto-generated>
'------------------------------------------------------------------------------
Option Strict On
Option Explicit On
Imports System
Namespace My.Resources
'StronglyTypedResourceBuilder generó automáticamente esta clase
'a través de una herramienta como ResGen o Visual Studio.
'Para agregar o quitar un miembro, edite el archivo .ResX y, a continuación, vuelva a ejecutar ResGen
'con la opción /str o vuelva a generar su proyecto de VS.
'''<summary>
''' Clase de recurso con establecimiento inflexible de tipos, para buscar cadenas traducidas, etc.
'''</summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.0.0.0"), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
Global.Microsoft.VisualBasic.HideModuleNameAttribute()> _
Friend Module Resources
Private resourceMan As Global.System.Resources.ResourceManager
Private resourceCulture As Global.System.Globalization.CultureInfo
'''<summary>
''' Devuelve la instancia de ResourceManager almacenada en caché utilizada por esta clase.
'''</summary>
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
Get
If Object.ReferenceEquals(resourceMan, Nothing) Then
Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("VirtualMac.Resources", GetType(Resources).Assembly)
resourceMan = temp
End If
Return resourceMan
End Get
End Property
'''<summary>
''' Reemplaza la propiedad CurrentUICulture del subproceso actual para todas las
''' búsquedas de recursos mediante esta clase de recurso con establecimiento inflexible de tipos.
'''</summary>
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Friend Property Culture() As Global.System.Globalization.CultureInfo
Get
Return resourceCulture
End Get
Set
resourceCulture = value
End Set
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property About() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("About", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property BrowserBack() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("BrowserBack", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property BrowserForward() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("BrowserForward", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property BrowserHome() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("BrowserHome", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property BrowserSearch() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("BrowserSearch", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Busca una cadena traducida similar a Archivo.
'''</summary>
Friend ReadOnly Property mnuFile() As String
Get
Return ResourceManager.GetString("mnuFile", resourceCulture)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property NewDisk() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("NewDisk", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property NewMac() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("NewMac", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property Shutdown_Icon() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("Shutdown_Icon", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Icon similar to (Icono).
'''</summary>
Friend ReadOnly Property VirtualMacMain() As System.Drawing.Icon
Get
Dim obj As Object = ResourceManager.GetObject("VirtualMacMain", resourceCulture)
Return CType(obj,System.Drawing.Icon)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property WizardPicture() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("WizardPicture", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
End Module
End Namespace

154
My Project/Resources.resx Normal file
View File

@ -0,0 +1,154 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
<data name="WizardPicture" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\WizardPicture.bmp;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="NewDisk" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\NewDisk.bmp;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="NewMac" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\NewMac.bmp;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Shutdown_Icon" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Shutdown Icon.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="About" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\About.bmp;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="BrowserBack" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\BrowserBack.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="BrowserForward" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\BrowserForward.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="BrowserHome" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\BrowserHome.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="BrowserSearch" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\BrowserSearch.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="VirtualMacMain" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\NewIcon.ico;System.Drawing.Icon, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="mnuFile" xml:space="preserve">
<value>Archivo</value>
</data>
</root>

289
My Project/Settings.Designer.vb generated Normal file
View File

@ -0,0 +1,289 @@
'------------------------------------------------------------------------------
' <auto-generated>
' Este código fue generado por una herramienta.
' Versión de runtime:4.0.30319.42000
'
' Los cambios en este archivo podrían causar un comportamiento incorrecto y se perderán si
' se vuelve a generar el código.
' </auto-generated>
'------------------------------------------------------------------------------
Option Strict On
Option Explicit On
Namespace My
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "10.0.0.0"), _
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Partial Friend NotInheritable Class MySettings
Inherits Global.System.Configuration.ApplicationSettingsBase
Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
#Region "Funcionalidad para autoguardar de My.Settings"
#If _MyType = "WindowsForms" Then
Private Shared addedHandler As Boolean
Private Shared addedHandlerLockObject As New Object
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
If My.Application.SaveMySettingsOnExit Then
My.Settings.Save()
End If
End Sub
#End If
#End Region
Public Shared ReadOnly Property [Default]() As MySettings
Get
#If _MyType = "WindowsForms" Then
If Not addedHandler Then
SyncLock addedHandlerLockObject
If Not addedHandler Then
AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
addedHandler = True
End If
End SyncLock
End If
#End If
Return defaultInstance
End Get
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("")> _
Public Property DefaultMacFolder() As String
Get
Return CType(Me("DefaultMacFolder"),String)
End Get
Set
Me("DefaultMacFolder") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("")> _
Public Property VMNames() As String
Get
Return CType(Me("VMNames"),String)
End Get
Set
Me("VMNames") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("")> _
Public Property VMIcons() As String
Get
Return CType(Me("VMIcons"),String)
End Get
Set
Me("VMIcons") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("")> _
Public Property VMRoutes() As String
Get
Return CType(Me("VMRoutes"),String)
End Get
Set
Me("VMRoutes") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("")> _
Public Property CustomIcons() As String
Get
Return CType(Me("CustomIcons"),String)
End Get
Set
Me("CustomIcons") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("")> _
Public Property SheepShaverROM() As String
Get
Return CType(Me("SheepShaverROM"),String)
End Get
Set
Me("SheepShaverROM") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("")> _
Public Property BasiliskROM() As String
Get
Return CType(Me("BasiliskROM"),String)
End Get
Set
Me("BasiliskROM") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("")> _
Public Property vMacROM() As String
Get
Return CType(Me("vMacROM"),String)
End Get
Set
Me("vMacROM") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("")> _
Public Property VMType() As String
Get
Return CType(Me("VMType"),String)
End Get
Set
Me("VMType") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("False")> _
Public Property TestWindow() As Boolean
Get
Return CType(Me("TestWindow"),Boolean)
End Get
Set
Me("TestWindow") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("")> _
Public Property x() As String
Get
Return CType(Me("x"),String)
End Get
Set
Me("x") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("")> _
Public Property vMacPath() As String
Get
Return CType(Me("vMacPath"),String)
End Get
Set
Me("vMacPath") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("")> _
Public Property SheepShaverPath() As String
Get
Return CType(Me("SheepShaverPath"),String)
End Get
Set
Me("SheepShaverPath") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("")> _
Public Property BasiliskPath() As String
Get
Return CType(Me("BasiliskPath"),String)
End Get
Set
Me("BasiliskPath") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("")> _
Public Property PearPCPath() As String
Get
Return CType(Me("PearPCPath"),String)
End Get
Set
Me("PearPCPath") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("")> _
Public Property QEMUPath() As String
Get
Return CType(Me("QEMUPath"),String)
End Get
Set
Me("QEMUPath") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("False")> _
Public Property VerifyEmulatorPaths() As Boolean
Get
Return CType(Me("VerifyEmulatorPaths"),Boolean)
End Get
Set
Me("VerifyEmulatorPaths") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("en-US")> _
Public Property Lang() As String
Get
Return CType(Me("Lang"),String)
End Get
Set
Me("Lang") = value
End Set
End Property
End Class
End Namespace
Namespace My
<Global.Microsoft.VisualBasic.HideModuleNameAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()> _
Friend Module MySettingsProperty
<Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _
Friend ReadOnly Property Settings() As Global.VirtualMac.My.MySettings
Get
Return Global.VirtualMac.My.MySettings.Default
End Get
End Property
End Module
End Namespace

View File

@ -0,0 +1,60 @@
<?xml version='1.0' encoding='utf-8'?>
<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" GeneratedClassNamespace="My" GeneratedClassName="MySettings" UseMySettingsClassName="true">
<Profiles />
<Settings>
<Setting Name="DefaultMacFolder" Type="System.String" Scope="User">
<Value Profile="(Default)" />
</Setting>
<Setting Name="VMNames" Type="System.String" Scope="User">
<Value Profile="(Default)" />
</Setting>
<Setting Name="VMIcons" Type="System.String" Scope="User">
<Value Profile="(Default)" />
</Setting>
<Setting Name="VMRoutes" Type="System.String" Scope="User">
<Value Profile="(Default)" />
</Setting>
<Setting Name="CustomIcons" Type="System.String" Scope="User">
<Value Profile="(Default)" />
</Setting>
<Setting Name="SheepShaverROM" Type="System.String" Scope="User">
<Value Profile="(Default)" />
</Setting>
<Setting Name="BasiliskROM" Type="System.String" Scope="User">
<Value Profile="(Default)" />
</Setting>
<Setting Name="vMacROM" Type="System.String" Scope="User">
<Value Profile="(Default)" />
</Setting>
<Setting Name="VMType" Type="System.String" Scope="User">
<Value Profile="(Default)" />
</Setting>
<Setting Name="TestWindow" Type="System.Boolean" Scope="User">
<Value Profile="(Default)">False</Value>
</Setting>
<Setting Name="x" Type="System.String" Scope="User">
<Value Profile="(Default)" />
</Setting>
<Setting Name="vMacPath" Type="System.String" Scope="User">
<Value Profile="(Default)" />
</Setting>
<Setting Name="SheepShaverPath" Type="System.String" Scope="User">
<Value Profile="(Default)" />
</Setting>
<Setting Name="BasiliskPath" Type="System.String" Scope="User">
<Value Profile="(Default)" />
</Setting>
<Setting Name="PearPCPath" Type="System.String" Scope="User">
<Value Profile="(Default)" />
</Setting>
<Setting Name="QEMUPath" Type="System.String" Scope="User">
<Value Profile="(Default)" />
</Setting>
<Setting Name="VerifyEmulatorPaths" Type="System.Boolean" Scope="User">
<Value Profile="(Default)">False</Value>
</Setting>
<Setting Name="Lang" Type="System.String" Scope="User">
<Value Profile="(Default)">en-US</Value>
</Setting>
</Settings>
</SettingsFile>

26
My Project/app.manifest Normal file
View File

@ -0,0 +1,26 @@
<?xml version="1.0" encoding="utf-8"?>
<asmv1:assembly manifestVersion="1.0" xmlns="urn:schemas-microsoft-com:asm.v1" xmlns:asmv1="urn:schemas-microsoft-com:asm.v1" xmlns:asmv2="urn:schemas-microsoft-com:asm.v2" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
<assemblyIdentity version="1.0.0.0" name="MyApplication.app" />
<trustInfo xmlns="urn:schemas-microsoft-com:asm.v2">
<security>
<requestedPrivileges xmlns="urn:schemas-microsoft-com:asm.v3">
<!-- Opciones del manifiesto de Control de cuentas de usuario
Si desea cambiar el nivel de Control de cuentas de usuario de Windows, reemplace el
nodo requestedExecutionLevel por alguno de los siguientes.
<requestedExecutionLevel level="asInvoker" uiAccess="false" />
<requestedExecutionLevel level="requireAdministrator" uiAccess="false" />
<requestedExecutionLevel level="highestAvailable" uiAccess="false" />
Si desea utilizar la virtualización de archivos y del Registro para la compatibilidad
con versiones anteriores, elimine el nodo requestedExecutionLevel.
-->
<requestedExecutionLevel level="asInvoker" uiAccess="false" />
</requestedPrivileges>
<applicationRequestMinimum>
<defaultAssemblyRequest permissionSetReference="Custom" />
<PermissionSet ID="Custom" SameSite="site" Unrestricted="true" />
</applicationRequestMinimum>
</security>
</trustInfo>
</asmv1:assembly>

BIN
NewIcon.ico Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 2.7 KiB

BIN
Preferences.ico Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 1.1 KiB

15
README.md Normal file
View File

@ -0,0 +1,15 @@
# VirtualMac
A GUI for several Macintosh emulators
This project has the intention to 'merge' all the current classic Macintosh emulators functions by making a Unified Front End for all.
The main idea came to me when I wanted to check out some apps in Mac OS but I had no Mac, so here comes the need of an emulator.
But almost all of them are different emulators and you need one for Mac OS 7, other for OS 8 to 9.0.4, and other
for OS X 10.1 to 10.4 (And even other for for 9.1 to 10.5). Do you understand my point? Why so many emulators and so many GUIs
and so many options. This, must be over, we need an universal front-end for all plataforms, that, is the purpose of Virtual Mac,
but as I only have Windows (By now), I need to anyone who is interested to help me to take this to macOS and Linux. The Unified Front End must become real!
Now that you understand the point of this project, if you are a Mac enthusiast or a vintage computer enthusiast, and you know
coding, if you'd like where this goes, feel free to help us. We'd be glad to get your help! Pull requests are encouraged!
If you want to know the exact purposes of this project, check out the Wiki to consult all the goals and the current status of the project

BIN
Resources/About.bmp Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 425 KiB

BIN
Resources/BrowserBack.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 349 B

Binary file not shown.

After

Width:  |  Height:  |  Size: 344 B

BIN
Resources/BrowserHome.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 348 B

BIN
Resources/BrowserSearch.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 420 B

BIN
Resources/NewDisk.bmp Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 151 KiB

BIN
Resources/NewMac.bmp Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 151 KiB

BIN
Resources/Shutdown Icon.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 6.2 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 147 KiB

BIN
Resources/VirtualMac.ico Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 1.1 KiB

BIN
Resources/Warning.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 4.5 KiB

BIN
Resources/Warning1.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 1.7 KiB

BIN
Resources/WizardPicture.bmp Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 7.1 KiB

12
Settings.vb Normal file
View File

@ -0,0 +1,12 @@

Namespace My
'Esta clase le permite controlar eventos específicos en la clase de configuración:
' El evento SettingChanging se desencadena antes de cambiar un valor de configuración.
' El evento PropertyChanged se desencadena después de cambiar el valor de configuración.
' El evento SettingsLoaded se desencadena después de cargar los valores de configuración.
' El evento SettingsSaving se desencadena antes de guardar los valores de configuración.
Partial Friend NotInheritable Class MySettings
End Class
End Namespace

85
SysInfo.vb Normal file
View File

@ -0,0 +1,85 @@
Imports System.Management
Module SysInfo
Public OSName As String
Public OSBuild As String
Public CPUClass As String
Public CPUCores As String
Public InstalledRAM As String
Public UserName As String
Public ComputerName As String
Public Function GetSysInfo() As String
Dim VersionArray() As String = Split(My.Computer.Info.OSVersion, ".")
'Setting the labels with the versions
Dim BuildOS As String = VersionArray(0) + "." + VersionArray(1) + "." + VersionArray(2)
Dim NameOS As String = ""
Dim CPUInfo As String = GetProcessorInfo()
Dim NameCPU As String = CPUInfo.ToString.Substring(0, InStr(CPUInfo, ";") - 1)
Dim CoresCPU As String = CPUInfo.ToString.Substring(InStr(CPUInfo, ";"), InStr(CPUInfo, "_") - InStr(CPUInfo, ";") - 1)
Dim TotalRAM As Long = (My.Computer.Info.TotalPhysicalMemory / 1024) / 1024
Dim UsrName As String = Replace(Replace(My.User.Name, My.Computer.Name, ""), "\", "")
Dim PCName As String = My.Computer.Name
'Naming the Windows OS by its version
frmAbout.OSName.Text = "Unknown"
Select Case BuildOS
Case "6.0.6000"
NameOS = "Windows Vista RTM"
Case "6.0.6001"
NameOS = "Windows Vista SP1"
Case "6.0.6002"
NameOS = "Windows Vista SP2"
Case "6.1.7600"
NameOS = "Windows 7 RTM"
Case "6.1.7601"
NameOS = "Windows 7 SP1"
Case "6.2.9200"
NameOS = "Windows 8"
Case "6.2.9600"
NameOS = "Windows 8.1"
End Select
Select Case My.Computer.Info.OSVersion
Case "5.1.2600.0"
NameOS = "Windows XP RTM"
Case "5.1.2600.1106"
NameOS = "Windows XP SP1"
Case "5.1.2600.2180"
NameOS = "Windows XP SP2"
Case "5.1.2600.5512"
NameOS = "Windows XP SP3"
End Select
OSName = NameOS
OSBuild = BuildOS
CPUClass = NameCPU
CPUCores = CoresCPU
InstalledRAM = TotalRAM
UserName = UsrName
ComputerName = PCName
Return (NameOS + vbCrLf + BuildOS + vbCrLf + NameCPU + vbCrLf + CoresCPU + vbCrLf & TotalRAM & " MB" & vbCrLf + UsrName + vbCrLf + PCName)
End Function
Public Function GetProcessorInfo() As String
Dim Info As String = ""
Try
Dim searcher As New ManagementObjectSearcher( _
"root\CIMV2", _
"SELECT * FROM Win32_Processor")
For Each queryObj As ManagementObject In searcher.Get()
Info = queryObj("Name")
Info = Info & " (" & Replace(Replace(Replace(queryObj("Caption"), "Family ", "F"), "Model ", "M"), "Stepping ", "S") & ")"
Info = Info & ";" & queryObj("NumberOfCores")
Info = Info & "_" & queryObj("MaxClockSpeed")
Next
Catch err As ManagementException
MessageBox.Show("An error occurred while getting the processor info: " & err.Message & " . The system information may be incomplete", "Virtual Mac", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
Return Info
End Function
End Module

BIN
VirtualMac.ico Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 6.2 KiB

32
VirtualMac.sln Normal file
View File

@ -0,0 +1,32 @@

Microsoft Visual Studio Solution File, Format Version 10.00
# Visual Studio 2008
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "VirtualMac", "VirtualMac.vbproj", "{9EF23765-7DA9-4904-9EBD-E951DEB90063}"
EndProject
Global
GlobalSection(SolutionConfigurationPlatforms) = preSolution
Debug|Any CPU = Debug|Any CPU
Debug|x64 = Debug|x64
Debug|x86 = Debug|x86
Release|Any CPU = Release|Any CPU
Release|x64 = Release|x64
Release|x86 = Release|x86
EndGlobalSection
GlobalSection(ProjectConfigurationPlatforms) = postSolution
{9EF23765-7DA9-4904-9EBD-E951DEB90063}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
{9EF23765-7DA9-4904-9EBD-E951DEB90063}.Debug|Any CPU.Build.0 = Debug|Any CPU
{9EF23765-7DA9-4904-9EBD-E951DEB90063}.Debug|x64.ActiveCfg = Debug|x64
{9EF23765-7DA9-4904-9EBD-E951DEB90063}.Debug|x64.Build.0 = Debug|x64
{9EF23765-7DA9-4904-9EBD-E951DEB90063}.Debug|x86.ActiveCfg = Debug|x86
{9EF23765-7DA9-4904-9EBD-E951DEB90063}.Debug|x86.Build.0 = Debug|x86
{9EF23765-7DA9-4904-9EBD-E951DEB90063}.Release|Any CPU.ActiveCfg = Release|Any CPU
{9EF23765-7DA9-4904-9EBD-E951DEB90063}.Release|Any CPU.Build.0 = Release|Any CPU
{9EF23765-7DA9-4904-9EBD-E951DEB90063}.Release|x64.ActiveCfg = Release|x64
{9EF23765-7DA9-4904-9EBD-E951DEB90063}.Release|x64.Build.0 = Release|x64
{9EF23765-7DA9-4904-9EBD-E951DEB90063}.Release|x86.ActiveCfg = Release|x86
{9EF23765-7DA9-4904-9EBD-E951DEB90063}.Release|x86.Build.0 = Release|x86
EndGlobalSection
GlobalSection(SolutionProperties) = preSolution
HideSolutionNode = FALSE
EndGlobalSection
EndGlobal

418
VirtualMac.vbproj Normal file
View File

@ -0,0 +1,418 @@
<?xml version="1.0" encoding="utf-8"?>
<Project DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003" ToolsVersion="4.0">
<PropertyGroup>
<ProjectType>Local</ProjectType>
<MyType>WindowsForms</MyType>
<ProductVersion>9.0.21022</ProductVersion>
<SchemaVersion>2.0</SchemaVersion>
<ProjectGuid>{9EF23765-7DA9-4904-9EBD-E951DEB90063}</ProjectGuid>
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
<AssemblyName>Virtual Mac</AssemblyName>
<OutputType>WinExe</OutputType>
<StartupObject>VirtualMac.My.MyApplication</StartupObject>
<AssemblyMajorVersion>0</AssemblyMajorVersion>
<AssemblyMinorVersion>2</AssemblyMinorVersion>
<AssemblyRevisionNumber>2</AssemblyRevisionNumber>
<GenerateRevisionNumber>False</GenerateRevisionNumber>
<AssemblyCompanyName>Armando Technologies</AssemblyCompanyName>
<ApplicationIcon>VirtualMac.ico</ApplicationIcon>
<RootNamespace>VirtualMac</RootNamespace>
<FileUpgradeFlags>
</FileUpgradeFlags>
<OptionStrict>Off</OptionStrict>
<UpgradeBackupLocation>
</UpgradeBackupLocation>
<OldToolsVersion>3.5</OldToolsVersion>
<ApplicationManifest>My Project\app.manifest</ApplicationManifest>
<IsWebBootstrapper>false</IsWebBootstrapper>
<TargetFrameworkVersion>v2.0</TargetFrameworkVersion>
<PublishUrl>publish\</PublishUrl>
<Install>true</Install>
<InstallFrom>Disk</InstallFrom>
<UpdateEnabled>false</UpdateEnabled>
<UpdateMode>Foreground</UpdateMode>
<UpdateInterval>7</UpdateInterval>
<UpdateIntervalUnits>Days</UpdateIntervalUnits>
<UpdatePeriodically>false</UpdatePeriodically>
<UpdateRequired>false</UpdateRequired>
<MapFileExtensions>true</MapFileExtensions>
<SupportUrl>http://www.tecnologiasarmando.info.tm/support/virtualmac</SupportUrl>
<PublisherName>Edson Armando</PublisherName>
<ApplicationRevision>0</ApplicationRevision>
<ApplicationVersion>1.0.0.0</ApplicationVersion>
<UseApplicationTrust>true</UseApplicationTrust>
<PublishWizardCompleted>true</PublishWizardCompleted>
<BootstrapperEnabled>true</BootstrapperEnabled>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
<OutputPath>.\bin\</OutputPath>
<DocumentationFile>
</DocumentationFile>
<DebugSymbols>True</DebugSymbols>
<DefineDebug>True</DefineDebug>
<DefineTrace>True</DefineTrace>
<DefineConstants>Win32=True</DefineConstants>
<PlatformTarget>AnyCPU</PlatformTarget>
<NoWarn>41999,42016,42017,42018,42019,42020,42021,42022,42032,42036,42353,42354,42355</NoWarn>
<DebugType>full</DebugType>
<WarningsAsErrors>
</WarningsAsErrors>
<CodeAnalysisRuleSet>AllRules.ruleset</CodeAnalysisRuleSet>
<Optimize>true</Optimize>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
<OutputPath>.\bin\</OutputPath>
<DocumentationFile>
</DocumentationFile>
<DebugSymbols>False</DebugSymbols>
<DefineDebug>False</DefineDebug>
<DefineTrace>True</DefineTrace>
<DefineConstants>Win32=True</DefineConstants>
<PlatformTarget>AnyCPU</PlatformTarget>
<NoWarn>41999,42016,42017,42018,42019,42020,42021,42022,42032,42036,42353,42354,42355</NoWarn>
<DebugType>none</DebugType>
<Optimize>true</Optimize>
<WarningsAsErrors>
</WarningsAsErrors>
<CodeAnalysisRuleSet>AllRules.ruleset</CodeAnalysisRuleSet>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|x64' ">
<PlatformTarget>x64</PlatformTarget>
<OutputPath>bin\x64\Debug\</OutputPath>
<NoWarn>42353,42354,42355</NoWarn>
<CodeAnalysisRuleSet>AllRules.ruleset</CodeAnalysisRuleSet>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|x64' ">
<PlatformTarget>x64</PlatformTarget>
<OutputPath>bin\x64\Release\</OutputPath>
<NoWarn>42353,42354,42355</NoWarn>
<CodeAnalysisRuleSet>AllRules.ruleset</CodeAnalysisRuleSet>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|x86' ">
<PlatformTarget>x86</PlatformTarget>
<OutputPath>bin\x86\Debug\</OutputPath>
<NoWarn>42353,42354,42355</NoWarn>
<CodeAnalysisRuleSet>AllRules.ruleset</CodeAnalysisRuleSet>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|x86' ">
<PlatformTarget>x86</PlatformTarget>
<OutputPath>bin\x86\Release\</OutputPath>
<NoWarn>42353,42354,42355</NoWarn>
<CodeAnalysisRuleSet>AllRules.ruleset</CodeAnalysisRuleSet>
</PropertyGroup>
<PropertyGroup>
<ManifestCertificateThumbprint>81CE3CBBBD0E6FC09E6C2FAE0AA21E54A7AD616E</ManifestCertificateThumbprint>
</PropertyGroup>
<PropertyGroup>
<ManifestKeyFile>VirtualMac_TemporaryKey.pfx</ManifestKeyFile>
</PropertyGroup>
<PropertyGroup>
<GenerateManifests>false</GenerateManifests>
</PropertyGroup>
<PropertyGroup>
<TargetZone>LocalIntranet</TargetZone>
</PropertyGroup>
<PropertyGroup>
<SignManifests>false</SignManifests>
</PropertyGroup>
<ItemGroup>
<Reference Include="Microsoft.VisualBasic.Compatibility">
<Name>Microsoft.VisualBasic.Compatibility</Name>
</Reference>
<Reference Include="System">
<Name>System</Name>
</Reference>
<Reference Include="System.Data">
<Name>System.Data</Name>
</Reference>
<Reference Include="System.Deployment" />
<Reference Include="System.Drawing">
<Name>System.Drawing</Name>
</Reference>
<Reference Include="System.Management" />
<Reference Include="System.ServiceProcess" />
<Reference Include="System.Windows.Forms">
<Name>System.Windows.Forms</Name>
</Reference>
<Reference Include="System.XML">
<Name>System.XML</Name>
</Reference>
</ItemGroup>
<ItemGroup>
<Import Include="Microsoft.VisualBasic" />
<Import Include="Microsoft.VisualBasic.Compatibility" />
<Import Include="System" />
<Import Include="System.Collections" />
<Import Include="System.Data" />
<Import Include="System.Diagnostics" />
<Import Include="System.Drawing" />
<Import Include="System.Windows" />
<Import Include="System.Windows.Forms" />
</ItemGroup>
<ItemGroup>
<Compile Include="ApplicationEvents.vb" />
<Compile Include="AssemblyInfo.vb" />
<Compile Include="DiskImageCreator.vb" />
<Compile Include="frmHelp.Designer.vb">
<DependentUpon>frmHelp.vb</DependentUpon>
</Compile>
<Compile Include="frmHelp.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmNewDisk.Designer.vb">
<DependentUpon>frmNewDisk.vb</DependentUpon>
</Compile>
<Compile Include="frmNewDisk.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmSettingsBasiliskVM.Designer.vb">
<DependentUpon>frmSettingsBasiliskVM.vb</DependentUpon>
</Compile>
<Compile Include="frmSettingsBasiliskVM.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmSettingsQemuVM.Designer.vb">
<DependentUpon>frmSettingsQemuVM.vb</DependentUpon>
</Compile>
<Compile Include="frmSettingsQemuVM.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmSettingsSheepVM.Designer.vb">
<DependentUpon>frmSettingsSheepVM.vb</DependentUpon>
</Compile>
<Compile Include="frmSettingsSheepVM.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmAbout.Designer.vb">
<SubType>Code</SubType>
<DependentUpon>frmAbout.vb</DependentUpon>
</Compile>
<Compile Include="frmAbout.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmDebug.Designer.vb">
<DependentUpon>frmDebug.vb</DependentUpon>
</Compile>
<Compile Include="frmDebug.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmNewMac.Designer.vb">
<DependentUpon>frmNewMac.vb</DependentUpon>
</Compile>
<Compile Include="frmNewMac.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmOptions.Designer.vb">
<SubType>Code</SubType>
<DependentUpon>frmOptions.vb</DependentUpon>
</Compile>
<Compile Include="frmOptions.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmSettingsPearPCVM.Designer.vb">
<DependentUpon>frmSettingsPearPCVM.vb</DependentUpon>
</Compile>
<Compile Include="frmSettingsPearPCVM.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmSplash.Designer.vb">
<SubType>Code</SubType>
<DependentUpon>frmSplash.vb</DependentUpon>
</Compile>
<Compile Include="frmSplash.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmVirtualMacintosh.Designer.vb">
<SubType>Code</SubType>
<DependentUpon>frmVirtualMacintosh.vb</DependentUpon>
</Compile>
<Compile Include="frmVirtualMacintosh.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmVirtualMacintoshClose.Designer.vb">
<DependentUpon>frmVirtualMacintoshClose.vb</DependentUpon>
</Compile>
<Compile Include="frmVirtualMacintoshClose.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="ConfigFileHandler.vb" />
<Compile Include="My Project\Application.Designer.vb">
<AutoGen>True</AutoGen>
<DependentUpon>Application.myapp</DependentUpon>
</Compile>
<Compile Include="My Project\Resources.Designer.vb">
<AutoGen>True</AutoGen>
<DesignTime>True</DesignTime>
<DependentUpon>Resources.resx</DependentUpon>
</Compile>
<Compile Include="My Project\Settings.Designer.vb">
<AutoGen>True</AutoGen>
<DesignTimeSharedInput>True</DesignTimeSharedInput>
<DependentUpon>Settings.settings</DependentUpon>
</Compile>
<Compile Include="frmMain.Designer.vb">
<DependentUpon>frmMain.vb</DependentUpon>
</Compile>
<Compile Include="frmMain.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="Settings.vb" />
<Compile Include="SysInfo.vb" />
<None Include="Resources\VirtualMac.ico" />
<EmbeddedResource Include="frmAbout.de-DE.resx">
<DependentUpon>frmAbout.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmAbout.es-MX.resx">
<DependentUpon>frmAbout.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmHelp.resx">
<DependentUpon>frmHelp.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource>
<EmbeddedResource Include="frmMain.de-DE.resx">
<DependentUpon>frmMain.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmMain.es-MX.resx">
<DependentUpon>frmMain.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmNewDisk.resx">
<DependentUpon>frmNewDisk.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource>
<EmbeddedResource Include="frmNewMac.es-MX.resx">
<DependentUpon>frmNewMac.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmOptions.de-DE.resx">
<DependentUpon>frmOptions.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmOptions.es-MX.resx">
<DependentUpon>frmOptions.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmSettingsBasiliskVM.resx">
<DependentUpon>frmSettingsBasiliskVM.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource>
<EmbeddedResource Include="frmSettingsPearPCVM.en-US.resx">
<DependentUpon>frmSettingsPearPCVM.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmSettingsPearPCVM.es-MX.resx">
<DependentUpon>frmSettingsPearPCVM.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmSettingsPearPCVM.es.resx">
<DependentUpon>frmSettingsPearPCVM.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmSettingsQemuVM.resx">
<DependentUpon>frmSettingsQemuVM.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource>
<EmbeddedResource Include="frmSettingsSheepVM.resX">
<DependentUpon>frmSettingsSheepVM.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource>
<EmbeddedResource Include="frmAbout.resX">
<DependentUpon>frmAbout.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource>
<EmbeddedResource Include="frmDebug.resx">
<SubType>Designer</SubType>
<DependentUpon>frmDebug.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmNewMac.resx">
<SubType>Designer</SubType>
<DependentUpon>frmNewMac.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmOptions.resX">
<DependentUpon>frmOptions.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource>
<EmbeddedResource Include="frmSettingsPearPCVM.resx">
<DependentUpon>frmSettingsPearPCVM.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource>
<EmbeddedResource Include="frmSplash.es-MX.resx">
<DependentUpon>frmSplash.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmSplash.resX">
<DependentUpon>frmSplash.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource>
<EmbeddedResource Include="frmVirtualMacintosh.resX">
<DependentUpon>frmVirtualMacintosh.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource>
<EmbeddedResource Include="frmVirtualMacintoshClose.resx">
<SubType>Designer</SubType>
<DependentUpon>frmVirtualMacintoshClose.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="My Project\Resources.resx">
<SubType>Designer</SubType>
<CustomToolNamespace>My.Resources</CustomToolNamespace>
<Generator>VbMyResourcesResXFileCodeGenerator</Generator>
<LastGenOutput>Resources.Designer.vb</LastGenOutput>
</EmbeddedResource>
<Content Include="My Project\Application.myapp">
<Generator>MyApplicationCodeGenerator</Generator>
<LastGenOutput>Application.Designer.vb</LastGenOutput>
</Content>
<Content Include="NewIcon.ico" />
<None Include="Resources\BrowserSearch.png" />
<None Include="Resources\BrowserHome.png" />
<None Include="Resources\BrowserForward.png" />
<None Include="Resources\BrowserBack.png" />
<None Include="My Project\app.manifest" />
<None Include="Resources\About.bmp" />
<None Include="Resources\NewDisk.bmp" />
<None Include="Resources\NewMac.bmp" />
<None Include="Resources\WizardPicture.bmp" />
<None Include="Resources\Shutdown Icon.png" />
<None Include="Resources\Warning1.png" />
<EmbeddedResource Include="frmMain.resx">
<DependentUpon>frmMain.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource>
<EmbeddedResource Include="VirtualMac.ico" />
<EmbeddedResource Include="VirtualMacMachineFormat.xml" />
<None Include="app.config" />
<None Include="My Project\Settings.settings">
<CustomToolNamespace>My</CustomToolNamespace>
<Generator>SettingsSingleFileGenerator</Generator>
<LastGenOutput>Settings.Designer.vb</LastGenOutput>
</None>
<None Include="VirtualMac_TemporaryKey.pfx" />
</ItemGroup>
<ItemGroup>
<BootstrapperPackage Include="Microsoft.Net.Client.3.5">
<Visible>False</Visible>
<ProductName>.NET Framework 3.5 SP1 Client Profile</ProductName>
<Install>false</Install>
</BootstrapperPackage>
<BootstrapperPackage Include="Microsoft.Net.Framework.2.0">
<Visible>False</Visible>
<ProductName>.NET Framework 2.0 %28x86%29</ProductName>
<Install>true</Install>
</BootstrapperPackage>
<BootstrapperPackage Include="Microsoft.Net.Framework.3.0">
<Visible>False</Visible>
<ProductName>.NET Framework 3.0 %28x86%29</ProductName>
<Install>false</Install>
</BootstrapperPackage>
<BootstrapperPackage Include="Microsoft.Net.Framework.3.5">
<Visible>False</Visible>
<ProductName>.NET Framework 3.5</ProductName>
<Install>false</Install>
</BootstrapperPackage>
<BootstrapperPackage Include="Microsoft.Net.Framework.3.5.SP1">
<Visible>False</Visible>
<ProductName>.NET Framework 3.5 SP1</ProductName>
<Install>false</Install>
</BootstrapperPackage>
</ItemGroup>
<Import Project="$(MSBuildBinPath)\Microsoft.VisualBasic.targets" />
<PropertyGroup>
<PreBuildEvent>
</PreBuildEvent>
<PostBuildEvent>
</PostBuildEvent>
</PropertyGroup>
</Project>

View File

@ -0,0 +1,5 @@
<?xml version="1.0" encoding="utf-8" ?>
<MachineSettings>
<Graphics fullscreen="0" frequency="60" width="640" height="480"/>
<Disks volumes="" bootdrive="hd" efs=""/>
</MachineSettings>

88
app.config Normal file
View File

@ -0,0 +1,88 @@
<?xml version="1.0" encoding="utf-8" ?>
<configuration>
<configSections>
<sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
<section name="VirtualMac.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" />
</sectionGroup>
</configSections>
<system.diagnostics>
<sources>
<!-- En esta sección se define la configuración del registro para My.Application.Log -->
<source name="DefaultSource" switchName="DefaultSwitch">
<listeners>
<add name="FileLog"/>
<!-- Quite los comentarios de la sección posterior para escribir en el registro de eventos de la aplicación -->
<!--<add name="EventLog"/>-->
</listeners>
</source>
</sources>
<switches>
<add name="DefaultSwitch" value="Information" />
</switches>
<sharedListeners>
<add name="FileLog"
type="Microsoft.VisualBasic.Logging.FileLogTraceListener, Microsoft.VisualBasic, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL"
initializeData="FileLogWriter"/>
<!-- Quite los comentarios de la sección posterior y reemplace APPLICATION_NAME con el nombre de su aplicación para escribir en el registro de sucesos de la aplicación -->
<!--<add name="EventLog" type="System.Diagnostics.EventLogTraceListener" initializeData="APPLICATION_NAME"/> -->
</sharedListeners>
</system.diagnostics>
<userSettings>
<VirtualMac.My.MySettings>
<setting name="DefaultMacFolder" serializeAs="String">
<value />
</setting>
<setting name="VMNames" serializeAs="String">
<value />
</setting>
<setting name="VMIcons" serializeAs="String">
<value />
</setting>
<setting name="VMRoutes" serializeAs="String">
<value />
</setting>
<setting name="CustomIcons" serializeAs="String">
<value />
</setting>
<setting name="SheepShaverROM" serializeAs="String">
<value />
</setting>
<setting name="BasiliskROM" serializeAs="String">
<value />
</setting>
<setting name="vMacROM" serializeAs="String">
<value />
</setting>
<setting name="VMType" serializeAs="String">
<value />
</setting>
<setting name="TestWindow" serializeAs="String">
<value>False</value>
</setting>
<setting name="x" serializeAs="String">
<value />
</setting>
<setting name="vMacPath" serializeAs="String">
<value />
</setting>
<setting name="SheepShaverPath" serializeAs="String">
<value />
</setting>
<setting name="BasiliskPath" serializeAs="String">
<value />
</setting>
<setting name="PearPCPath" serializeAs="String">
<value />
</setting>
<setting name="QEMUPath" serializeAs="String">
<value />
</setting>
<setting name="VerifyEmulatorPaths" serializeAs="String">
<value>False</value>
</setting>
<setting name="Lang" serializeAs="String">
<value>en-US</value>
</setting>
</VirtualMac.My.MySettings>
</userSettings>
</configuration>

372
frmAbout.Designer.vb generated Normal file
View File

@ -0,0 +1,372 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> Partial Class frmAbout
#Region "Windows Form Designer generated code "
<System.Diagnostics.DebuggerNonUserCode()> Public Sub New()
MyBase.New()
'This call is required by the Windows Form Designer.
InitializeComponent()
End Sub
'Form overrides dispose to clean up the component list.
<System.Diagnostics.DebuggerNonUserCode()> Protected Overloads Overrides Sub Dispose(ByVal Disposing As Boolean)
If Disposing Then
If Not components Is Nothing Then
components.Dispose()
End If
End If
MyBase.Dispose(Disposing)
End Sub
'Required by the Windows Form Designer
Private components As System.ComponentModel.IContainer
Public ToolTip1 As System.Windows.Forms.ToolTip
Public WithEvents ProductNAV As System.Windows.Forms.Label
Public WithEvents ArmandoTechnologiesCopyright As System.Windows.Forms.Label
Public WithEvents LicenseInformation As System.Windows.Forms.Label
Public WithEvents ThirdPartyNotice As System.Windows.Forms.Label
Public WithEvents MvMCopyright As System.Windows.Forms.Label
Public WithEvents AboutTab_AppInfo As System.Windows.Forms.TabPage
Public WithEvents AboutTab_SysInfo As System.Windows.Forms.TabPage
Public WithEvents AboutTab As System.Windows.Forms.TabControl
'NOTE: The following procedure is required by the Windows Form Designer
'It can be modified using the Windows Form Designer.
'Do not modify it using the code editor.
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmAbout))
Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components)
Me.AboutTab = New System.Windows.Forms.TabControl()
Me.AboutTab_AppInfo = New System.Windows.Forms.TabPage()
Me.LicenseInformation = New System.Windows.Forms.Label()
Me.ProductNAV = New System.Windows.Forms.Label()
Me.MvMCopyright = New System.Windows.Forms.Label()
Me.ThirdPartyNotice = New System.Windows.Forms.Label()
Me.ArmandoTechnologiesCopyright = New System.Windows.Forms.Label()
Me.AppleCopyright = New System.Windows.Forms.Label()
Me.ArmandoLink = New System.Windows.Forms.LinkLabel()
Me.EmaculationLink = New System.Windows.Forms.LinkLabel()
Me.AboutTab_SysInfo = New System.Windows.Forms.TabPage()
Me.OSName = New System.Windows.Forms.Label()
Me.CPUCoresLabel = New System.Windows.Forms.Label()
Me.CPUType = New System.Windows.Forms.Label()
Me.OSVersion = New System.Windows.Forms.Label()
Me.SysInfoLabel = New System.Windows.Forms.Label()
Me.CPUTypeLabel = New System.Windows.Forms.Label()
Me.RAMInstalledLabel = New System.Windows.Forms.Label()
Me.CPUCores = New System.Windows.Forms.Label()
Me.OSNameLabel = New System.Windows.Forms.Label()
Me.OSVersionLabel = New System.Windows.Forms.Label()
Me.RAMInstalled = New System.Windows.Forms.Label()
Me.RAMAvailableLabel = New System.Windows.Forms.Label()
Me.RAMAvailable = New System.Windows.Forms.Label()
Me.CurrUsr = New System.Windows.Forms.Label()
Me.CurrUsrLabel = New System.Windows.Forms.Label()
Me.UserInfoLabel = New System.Windows.Forms.Label()
Me.PCName = New System.Windows.Forms.Label()
Me.PCNameLabel = New System.Windows.Forms.Label()
Me.AvailMemTimer = New System.Windows.Forms.Timer(Me.components)
Me.AboutTab.SuspendLayout()
Me.AboutTab_AppInfo.SuspendLayout()
Me.AboutTab_SysInfo.SuspendLayout()
Me.SuspendLayout()
'
'AboutTab
'
Me.AboutTab.Controls.Add(Me.AboutTab_AppInfo)
Me.AboutTab.Controls.Add(Me.AboutTab_SysInfo)
resources.ApplyResources(Me.AboutTab, "AboutTab")
Me.AboutTab.Name = "AboutTab"
Me.AboutTab.SelectedIndex = 0
'
'AboutTab_AppInfo
'
Me.AboutTab_AppInfo.BackgroundImage = Global.VirtualMac.My.Resources.Resources.About
resources.ApplyResources(Me.AboutTab_AppInfo, "AboutTab_AppInfo")
Me.AboutTab_AppInfo.Controls.Add(Me.LicenseInformation)
Me.AboutTab_AppInfo.Controls.Add(Me.ProductNAV)
Me.AboutTab_AppInfo.Controls.Add(Me.MvMCopyright)
Me.AboutTab_AppInfo.Controls.Add(Me.ThirdPartyNotice)
Me.AboutTab_AppInfo.Controls.Add(Me.ArmandoTechnologiesCopyright)
Me.AboutTab_AppInfo.Controls.Add(Me.AppleCopyright)
Me.AboutTab_AppInfo.Controls.Add(Me.ArmandoLink)
Me.AboutTab_AppInfo.Controls.Add(Me.EmaculationLink)
Me.AboutTab_AppInfo.Name = "AboutTab_AppInfo"
'
'LicenseInformation
'
Me.LicenseInformation.BackColor = System.Drawing.Color.Transparent
Me.LicenseInformation.Cursor = System.Windows.Forms.Cursors.Default
resources.ApplyResources(Me.LicenseInformation, "LicenseInformation")
Me.LicenseInformation.ForeColor = System.Drawing.SystemColors.ControlText
Me.LicenseInformation.Name = "LicenseInformation"
'
'ProductNAV
'
Me.ProductNAV.BackColor = System.Drawing.Color.Transparent
Me.ProductNAV.Cursor = System.Windows.Forms.Cursors.Default
resources.ApplyResources(Me.ProductNAV, "ProductNAV")
Me.ProductNAV.ForeColor = System.Drawing.SystemColors.ControlText
Me.ProductNAV.Name = "ProductNAV"
'
'MvMCopyright
'
Me.MvMCopyright.BackColor = System.Drawing.Color.Transparent
Me.MvMCopyright.Cursor = System.Windows.Forms.Cursors.Default
Me.MvMCopyright.ForeColor = System.Drawing.SystemColors.ControlText
resources.ApplyResources(Me.MvMCopyright, "MvMCopyright")
Me.MvMCopyright.Name = "MvMCopyright"
'
'ThirdPartyNotice
'
Me.ThirdPartyNotice.BackColor = System.Drawing.Color.Transparent
Me.ThirdPartyNotice.Cursor = System.Windows.Forms.Cursors.Default
Me.ThirdPartyNotice.ForeColor = System.Drawing.SystemColors.ControlText
resources.ApplyResources(Me.ThirdPartyNotice, "ThirdPartyNotice")
Me.ThirdPartyNotice.Name = "ThirdPartyNotice"
'
'ArmandoTechnologiesCopyright
'
Me.ArmandoTechnologiesCopyright.BackColor = System.Drawing.Color.Transparent
Me.ArmandoTechnologiesCopyright.Cursor = System.Windows.Forms.Cursors.Default
resources.ApplyResources(Me.ArmandoTechnologiesCopyright, "ArmandoTechnologiesCopyright")
Me.ArmandoTechnologiesCopyright.ForeColor = System.Drawing.SystemColors.ControlText
Me.ArmandoTechnologiesCopyright.Name = "ArmandoTechnologiesCopyright"
'
'AppleCopyright
'
Me.AppleCopyright.BackColor = System.Drawing.Color.Transparent
Me.AppleCopyright.Cursor = System.Windows.Forms.Cursors.Default
resources.ApplyResources(Me.AppleCopyright, "AppleCopyright")
Me.AppleCopyright.ForeColor = System.Drawing.SystemColors.ControlText
Me.AppleCopyright.Name = "AppleCopyright"
'
'ArmandoLink
'
resources.ApplyResources(Me.ArmandoLink, "ArmandoLink")
Me.ArmandoLink.BackColor = System.Drawing.Color.Transparent
Me.ArmandoLink.LinkColor = System.Drawing.Color.Blue
Me.ArmandoLink.Name = "ArmandoLink"
Me.ArmandoLink.TabStop = True
'
'EmaculationLink
'
resources.ApplyResources(Me.EmaculationLink, "EmaculationLink")
Me.EmaculationLink.BackColor = System.Drawing.Color.Transparent
Me.EmaculationLink.LinkColor = System.Drawing.Color.Blue
Me.EmaculationLink.Name = "EmaculationLink"
Me.EmaculationLink.TabStop = True
'
'AboutTab_SysInfo
'
Me.AboutTab_SysInfo.BackgroundImage = Global.VirtualMac.My.Resources.Resources.About
resources.ApplyResources(Me.AboutTab_SysInfo, "AboutTab_SysInfo")
Me.AboutTab_SysInfo.Controls.Add(Me.OSName)
Me.AboutTab_SysInfo.Controls.Add(Me.CPUCoresLabel)
Me.AboutTab_SysInfo.Controls.Add(Me.CPUType)
Me.AboutTab_SysInfo.Controls.Add(Me.OSVersion)
Me.AboutTab_SysInfo.Controls.Add(Me.SysInfoLabel)
Me.AboutTab_SysInfo.Controls.Add(Me.CPUTypeLabel)
Me.AboutTab_SysInfo.Controls.Add(Me.RAMInstalledLabel)
Me.AboutTab_SysInfo.Controls.Add(Me.CPUCores)
Me.AboutTab_SysInfo.Controls.Add(Me.OSNameLabel)
Me.AboutTab_SysInfo.Controls.Add(Me.OSVersionLabel)
Me.AboutTab_SysInfo.Controls.Add(Me.RAMInstalled)
Me.AboutTab_SysInfo.Controls.Add(Me.RAMAvailableLabel)
Me.AboutTab_SysInfo.Controls.Add(Me.RAMAvailable)
Me.AboutTab_SysInfo.Controls.Add(Me.CurrUsr)
Me.AboutTab_SysInfo.Controls.Add(Me.CurrUsrLabel)
Me.AboutTab_SysInfo.Controls.Add(Me.UserInfoLabel)
Me.AboutTab_SysInfo.Controls.Add(Me.PCName)
Me.AboutTab_SysInfo.Controls.Add(Me.PCNameLabel)
Me.AboutTab_SysInfo.Name = "AboutTab_SysInfo"
Me.AboutTab_SysInfo.UseVisualStyleBackColor = True
'
'OSName
'
Me.OSName.BackColor = System.Drawing.Color.Transparent
Me.OSName.Cursor = System.Windows.Forms.Cursors.Default
Me.OSName.ForeColor = System.Drawing.SystemColors.ControlText
resources.ApplyResources(Me.OSName, "OSName")
Me.OSName.Name = "OSName"
'
'CPUCoresLabel
'
Me.CPUCoresLabel.BackColor = System.Drawing.Color.Transparent
Me.CPUCoresLabel.Cursor = System.Windows.Forms.Cursors.Default
Me.CPUCoresLabel.ForeColor = System.Drawing.SystemColors.ControlText
resources.ApplyResources(Me.CPUCoresLabel, "CPUCoresLabel")
Me.CPUCoresLabel.Name = "CPUCoresLabel"
'
'CPUType
'
Me.CPUType.BackColor = System.Drawing.Color.Transparent
Me.CPUType.Cursor = System.Windows.Forms.Cursors.Default
Me.CPUType.ForeColor = System.Drawing.SystemColors.ControlText
resources.ApplyResources(Me.CPUType, "CPUType")
Me.CPUType.Name = "CPUType"
'
'OSVersion
'
Me.OSVersion.BackColor = System.Drawing.Color.Transparent
Me.OSVersion.Cursor = System.Windows.Forms.Cursors.Default
Me.OSVersion.ForeColor = System.Drawing.SystemColors.ControlText
resources.ApplyResources(Me.OSVersion, "OSVersion")
Me.OSVersion.Name = "OSVersion"
'
'SysInfoLabel
'
Me.SysInfoLabel.BackColor = System.Drawing.Color.Transparent
Me.SysInfoLabel.Cursor = System.Windows.Forms.Cursors.Default
resources.ApplyResources(Me.SysInfoLabel, "SysInfoLabel")
Me.SysInfoLabel.ForeColor = System.Drawing.SystemColors.ControlText
Me.SysInfoLabel.Name = "SysInfoLabel"
'
'CPUTypeLabel
'
Me.CPUTypeLabel.BackColor = System.Drawing.Color.Transparent
Me.CPUTypeLabel.Cursor = System.Windows.Forms.Cursors.Default
Me.CPUTypeLabel.ForeColor = System.Drawing.SystemColors.ControlText
resources.ApplyResources(Me.CPUTypeLabel, "CPUTypeLabel")
Me.CPUTypeLabel.Name = "CPUTypeLabel"
'
'RAMInstalledLabel
'
Me.RAMInstalledLabel.BackColor = System.Drawing.Color.Transparent
Me.RAMInstalledLabel.Cursor = System.Windows.Forms.Cursors.Default
Me.RAMInstalledLabel.ForeColor = System.Drawing.SystemColors.ControlText
resources.ApplyResources(Me.RAMInstalledLabel, "RAMInstalledLabel")
Me.RAMInstalledLabel.Name = "RAMInstalledLabel"
'
'CPUCores
'
Me.CPUCores.BackColor = System.Drawing.Color.Transparent
Me.CPUCores.Cursor = System.Windows.Forms.Cursors.Default
Me.CPUCores.ForeColor = System.Drawing.SystemColors.ControlText
resources.ApplyResources(Me.CPUCores, "CPUCores")
Me.CPUCores.Name = "CPUCores"
'
'OSNameLabel
'
Me.OSNameLabel.BackColor = System.Drawing.Color.Transparent
Me.OSNameLabel.Cursor = System.Windows.Forms.Cursors.Default
Me.OSNameLabel.ForeColor = System.Drawing.SystemColors.ControlText
resources.ApplyResources(Me.OSNameLabel, "OSNameLabel")
Me.OSNameLabel.Name = "OSNameLabel"
'
'OSVersionLabel
'
Me.OSVersionLabel.BackColor = System.Drawing.Color.Transparent
Me.OSVersionLabel.Cursor = System.Windows.Forms.Cursors.Default
Me.OSVersionLabel.ForeColor = System.Drawing.SystemColors.ControlText
resources.ApplyResources(Me.OSVersionLabel, "OSVersionLabel")
Me.OSVersionLabel.Name = "OSVersionLabel"
'
'RAMInstalled
'
Me.RAMInstalled.BackColor = System.Drawing.Color.Transparent
Me.RAMInstalled.Cursor = System.Windows.Forms.Cursors.Default
Me.RAMInstalled.ForeColor = System.Drawing.SystemColors.ControlText
resources.ApplyResources(Me.RAMInstalled, "RAMInstalled")
Me.RAMInstalled.Name = "RAMInstalled"
'
'RAMAvailableLabel
'
Me.RAMAvailableLabel.BackColor = System.Drawing.Color.Transparent
Me.RAMAvailableLabel.Cursor = System.Windows.Forms.Cursors.Default
Me.RAMAvailableLabel.ForeColor = System.Drawing.SystemColors.ControlText
resources.ApplyResources(Me.RAMAvailableLabel, "RAMAvailableLabel")
Me.RAMAvailableLabel.Name = "RAMAvailableLabel"
'
'RAMAvailable
'
Me.RAMAvailable.BackColor = System.Drawing.Color.Transparent
Me.RAMAvailable.Cursor = System.Windows.Forms.Cursors.Default
Me.RAMAvailable.ForeColor = System.Drawing.SystemColors.ControlText
resources.ApplyResources(Me.RAMAvailable, "RAMAvailable")
Me.RAMAvailable.Name = "RAMAvailable"
'
'CurrUsr
'
Me.CurrUsr.BackColor = System.Drawing.Color.Transparent
Me.CurrUsr.Cursor = System.Windows.Forms.Cursors.Default
Me.CurrUsr.ForeColor = System.Drawing.SystemColors.ControlText
resources.ApplyResources(Me.CurrUsr, "CurrUsr")
Me.CurrUsr.Name = "CurrUsr"
'
'CurrUsrLabel
'
Me.CurrUsrLabel.BackColor = System.Drawing.Color.Transparent
Me.CurrUsrLabel.Cursor = System.Windows.Forms.Cursors.Default
Me.CurrUsrLabel.ForeColor = System.Drawing.SystemColors.ControlText
resources.ApplyResources(Me.CurrUsrLabel, "CurrUsrLabel")
Me.CurrUsrLabel.Name = "CurrUsrLabel"
'
'UserInfoLabel
'
Me.UserInfoLabel.BackColor = System.Drawing.Color.Transparent
Me.UserInfoLabel.Cursor = System.Windows.Forms.Cursors.Default
resources.ApplyResources(Me.UserInfoLabel, "UserInfoLabel")
Me.UserInfoLabel.ForeColor = System.Drawing.SystemColors.ControlText
Me.UserInfoLabel.Name = "UserInfoLabel"
'
'PCName
'
Me.PCName.BackColor = System.Drawing.Color.Transparent
Me.PCName.Cursor = System.Windows.Forms.Cursors.Default
Me.PCName.ForeColor = System.Drawing.SystemColors.ControlText
resources.ApplyResources(Me.PCName, "PCName")
Me.PCName.Name = "PCName"
'
'PCNameLabel
'
Me.PCNameLabel.BackColor = System.Drawing.Color.Transparent
Me.PCNameLabel.Cursor = System.Windows.Forms.Cursors.Default
Me.PCNameLabel.ForeColor = System.Drawing.SystemColors.ControlText
resources.ApplyResources(Me.PCNameLabel, "PCNameLabel")
Me.PCNameLabel.Name = "PCNameLabel"
'
'AvailMemTimer
'
Me.AvailMemTimer.Enabled = True
'
'frmAbout
'
resources.ApplyResources(Me, "$this")
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.BackColor = System.Drawing.SystemColors.Control
Me.Controls.Add(Me.AboutTab)
Me.Cursor = System.Windows.Forms.Cursors.Default
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
Me.MaximizeBox = False
Me.MinimizeBox = False
Me.Name = "frmAbout"
Me.ShowIcon = False
Me.Tag = "1025"
Me.AboutTab.ResumeLayout(False)
Me.AboutTab_AppInfo.ResumeLayout(False)
Me.AboutTab_AppInfo.PerformLayout()
Me.AboutTab_SysInfo.ResumeLayout(False)
Me.ResumeLayout(False)
End Sub
Public WithEvents AppleCopyright As System.Windows.Forms.Label
Friend WithEvents ArmandoLink As System.Windows.Forms.LinkLabel
Friend WithEvents EmaculationLink As System.Windows.Forms.LinkLabel
Public WithEvents PCNameLabel As System.Windows.Forms.Label
Public WithEvents PCName As System.Windows.Forms.Label
Public WithEvents UserInfoLabel As System.Windows.Forms.Label
Public WithEvents CurrUsrLabel As System.Windows.Forms.Label
Public WithEvents CurrUsr As System.Windows.Forms.Label
Public WithEvents RAMAvailable As System.Windows.Forms.Label
Public WithEvents RAMAvailableLabel As System.Windows.Forms.Label
Public WithEvents RAMInstalled As System.Windows.Forms.Label
Public WithEvents RAMInstalledLabel As System.Windows.Forms.Label
Public WithEvents CPUTypeLabel As System.Windows.Forms.Label
Public WithEvents CPUType As System.Windows.Forms.Label
Public WithEvents CPUCores As System.Windows.Forms.Label
Public WithEvents CPUCoresLabel As System.Windows.Forms.Label
Public WithEvents SysInfoLabel As System.Windows.Forms.Label
Public WithEvents OSNameLabel As System.Windows.Forms.Label
Public WithEvents OSName As System.Windows.Forms.Label
Public WithEvents OSVersion As System.Windows.Forms.Label
Public WithEvents OSVersionLabel As System.Windows.Forms.Label
Friend WithEvents AvailMemTimer As System.Windows.Forms.Timer
#End Region
End Class

273
frmAbout.de-DE.resx Normal file
View File

@ -0,0 +1,273 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="LicenseInformation.Text" xml:space="preserve">
<value>Lizenziert unter GNU GPL v3</value>
</data>
<data name="ThirdPartyNotice.Text" xml:space="preserve">
<value>Teile dieser Software:</value>
</data>
<data name="_AboutTab_TabPage0.Text" xml:space="preserve">
<value>Info</value>
</data>
<data name="CPUCoresLabel.Text" xml:space="preserve">
<value>Anzhal der Prozessoren:</value>
</data>
<data name="SysInfoLabel.Text" xml:space="preserve">
<value>Systeminfo</value>
</data>
<data name="CPUTypeLabel.Text" xml:space="preserve">
<value>Prozessortyp:</value>
</data>
<data name="RAMInstalledLabel.Text" xml:space="preserve">
<value>Arbeitsspeicher(insgesamt):</value>
</data>
<data name="OSNameLabel.Text" xml:space="preserve">
<value>Betriebssystem:</value>
</data>
<data name="OSVersionLabel.Text" xml:space="preserve">
<value>Systemversion:</value>
</data>
<data name="RAMAvailableLabel.Text" xml:space="preserve">
<value>Arbeitsspeicher(verfügbar):</value>
</data>
<data name="CurrUsrLabel.Text" xml:space="preserve">
<value>Name:</value>
</data>
<data name="PCNameLabel.Text" xml:space="preserve">
<value>Computername:</value>
</data>
<data name="_AboutTab_TabPage1.Text" xml:space="preserve">
<value>Informationen</value>
</data>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAMAEBAQAAAAAAAoAQAANgAAACAgAAAAAAAAqAgAAF4BAAAwMAAAAAAAAKgOAAAGCgAAKAAAABAA
AAAgAAAAAQAEAAAAAADAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAAIAAAACAgACAAAAAgACAAICA
AADAwMAAgICAAAAA/wAA/wAAAP//AP8AAAD/AP8A//8AAP///wAAAAd3d3AAAAAAAHd3AAAAAAAAd3cA
AAB3d3d4d3d3d3d3d3d3d3d3AAAAAAAAAAAIiIiIiIiIgAiIiIiIiIiACIiIiIiIiIAIiIiIiIiIgAiI
iIiIiIiACIiIiIiIiIAIiIiIiIiIgAiIiIiIiIiACIiIiIiIiIAAAAAAAAAAAPgfAAD8PwAA/D8AAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAoAAAAIAAAAEAA
AAABAAgAAAAAAIAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAgAAAAICAAIAAAACAAIAAgIAAAMDA
wADA3MAA8MqmAAQEBAAICAgADAwMABEREQAWFhYAHBwcACIiIgApKSkAVVVVAE1NTQBCQkIAOTk5AIB8
/wBQUP8AkwDWAP/szADG1u8A1ufnAJCprQAAADMAAABmAAAAmQAAAMwAADMAAAAzMwAAM2YAADOZAAAz
zAAAM/8AAGYAAABmMwAAZmYAAGaZAABmzAAAZv8AAJkAAACZMwAAmWYAAJmZAACZzAAAmf8AAMwAAADM
MwAAzGYAAMyZAADMzAAAzP8AAP9mAAD/mQAA/8wAMwAAADMAMwAzAGYAMwCZADMAzAAzAP8AMzMAADMz
MwAzM2YAMzOZADMzzAAzM/8AM2YAADNmMwAzZmYAM2aZADNmzAAzZv8AM5kAADOZMwAzmWYAM5mZADOZ
zAAzmf8AM8wAADPMMwAzzGYAM8yZADPMzAAzzP8AM/8zADP/ZgAz/5kAM//MADP//wBmAAAAZgAzAGYA
ZgBmAJkAZgDMAGYA/wBmMwAAZjMzAGYzZgBmM5kAZjPMAGYz/wBmZgAAZmYzAGZmZgBmZpkAZmbMAGaZ
AABmmTMAZplmAGaZmQBmmcwAZpn/AGbMAABmzDMAZsyZAGbMzABmzP8AZv8AAGb/MwBm/5kAZv/MAMwA
/wD/AMwAmZkAAJkzmQCZAJkAmQDMAJkAAACZMzMAmQBmAJkzzACZAP8AmWYAAJlmMwCZM2YAmWaZAJlm
zACZM/8AmZkzAJmZZgCZmZkAmZnMAJmZ/wCZzAAAmcwzAGbMZgCZzJkAmczMAJnM/wCZ/wAAmf8zAJnM
ZgCZ/5kAmf/MAJn//wDMAAAAmQAzAMwAZgDMAJkAzADMAJkzAADMMzMAzDNmAMwzmQDMM8wAzDP/AMxm
AADMZjMAmWZmAMxmmQDMZswAmWb/AMyZAADMmTMAzJlmAMyZmQDMmcwAzJn/AMzMAADMzDMAzMxmAMzM
mQDMzMwAzMz/AMz/AADM/zMAmf9mAMz/mQDM/8wAzP//AMwAMwD/AGYA/wCZAMwzAAD/MzMA/zNmAP8z
mQD/M8wA/zP/AP9mAAD/ZjMAzGZmAP9mmQD/ZswAzGb/AP+ZAAD/mTMA/5lmAP+ZmQD/mcwA/5n/AP/M
AAD/zDMA/8xmAP/MmQD/zMwA/8z/AP//MwDM/2YA//+ZAP//zABmZv8AZv9mAGb//wD/ZmYA/2b/AP//
ZgAhAKUAX19fAHd3dwCGhoYAlpaWAMvLywCysrIA19fXAN3d3QDj4+MA6urqAPHx8QD4+PgA8Pv/AKSg
oACAgIAAAAD/AAD/AAAA//8A/wAAAP8A/wD//wAA////AAoKCgoKCgoKCgoKBwcHBwcHBwcHBwoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoHBwcHBwcHBwoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcH
BwcKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHCgcHBwcHBwcHBwcHBwcH
B+zsBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH7OwHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoK
EhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhIS
CgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoKEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKChISEhISEhISEhISEhISEhISEhIS
EhISEhISEhIKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhIS
EhISEhISEhISEhISCgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoKEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKChISEhISEhIS
EhISEhISEhISEhISEhISEhISEhIKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhIS
EhISEhISEhISEhISEhISEhISEhISEhISCgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoK
EhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhIS
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgr/4Af///AP///wD///8A////AP/4AA
AAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAAAB/////ygAAAAwAAAAYAAAAAEA
CAAAAAAAgAoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAACAAAAAgIAAgAAAAIAAgACAgAAAwMDAAMDc
wADwyqYABAQEAAgICAAMDAwAERERABYWFgAcHBwAIiIiACkpKQBVVVUATU1NAEJCQgA5OTkAgHz/AFBQ
/wCTANYA/+zMAMbW7wDW5+cAkKmtAAAAMwAAAGYAAACZAAAAzAAAMwAAADMzAAAzZgAAM5kAADPMAAAz
/wAAZgAAAGYzAABmZgAAZpkAAGbMAABm/wAAmQAAAJkzAACZZgAAmZkAAJnMAACZ/wAAzAAAAMwzAADM
ZgAAzJkAAMzMAADM/wAA/2YAAP+ZAAD/zAAzAAAAMwAzADMAZgAzAJkAMwDMADMA/wAzMwAAMzMzADMz
ZgAzM5kAMzPMADMz/wAzZgAAM2YzADNmZgAzZpkAM2bMADNm/wAzmQAAM5kzADOZZgAzmZkAM5nMADOZ
/wAzzAAAM8wzADPMZgAzzJkAM8zMADPM/wAz/zMAM/9mADP/mQAz/8wAM///AGYAAABmADMAZgBmAGYA
mQBmAMwAZgD/AGYzAABmMzMAZjNmAGYzmQBmM8wAZjP/AGZmAABmZjMAZmZmAGZmmQBmZswAZpkAAGaZ
MwBmmWYAZpmZAGaZzABmmf8AZswAAGbMMwBmzJkAZszMAGbM/wBm/wAAZv8zAGb/mQBm/8wAzAD/AP8A
zACZmQAAmTOZAJkAmQCZAMwAmQAAAJkzMwCZAGYAmTPMAJkA/wCZZgAAmWYzAJkzZgCZZpkAmWbMAJkz
/wCZmTMAmZlmAJmZmQCZmcwAmZn/AJnMAACZzDMAZsxmAJnMmQCZzMwAmcz/AJn/AACZ/zMAmcxmAJn/
mQCZ/8wAmf//AMwAAACZADMAzABmAMwAmQDMAMwAmTMAAMwzMwDMM2YAzDOZAMwzzADMM/8AzGYAAMxm
MwCZZmYAzGaZAMxmzACZZv8AzJkAAMyZMwDMmWYAzJmZAMyZzADMmf8AzMwAAMzMMwDMzGYAzMyZAMzM
zADMzP8AzP8AAMz/MwCZ/2YAzP+ZAMz/zADM//8AzAAzAP8AZgD/AJkAzDMAAP8zMwD/M2YA/zOZAP8z
zAD/M/8A/2YAAP9mMwDMZmYA/2aZAP9mzADMZv8A/5kAAP+ZMwD/mWYA/5mZAP+ZzAD/mf8A/8wAAP/M
MwD/zGYA/8yZAP/MzAD/zP8A//8zAMz/ZgD//5kA///MAGZm/wBm/2YAZv//AP9mZgD/Zv8A//9mACEA
pQBfX18Ad3d3AIaGhgCWlpYAy8vLALKysgDX19cA3d3dAOPj4wDq6uoA8fHxAPj4+ADw+/8ApKCgAICA
gAAAAP8AAP8AAAD//wD/AAAA/wD/AP//AAD///8ACgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHBwcH
BwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgcHBwcHBwcHBwcHBwcHBwcKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
BwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcH
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoHBwcH
BwcHBwcHBwcHBwcHBwcHBwfs7AcHBwcHBwcHBwcHBwcHBwcHBwcHBwoKCgcHBwcHBwcHBwcHBwcHBwcH
BwcHB+zs7OwHBwcHBwcHBwcHBwcHBwcHBwcHBwcKBwcHBwcHBwcHBwcHBwcHBwcHBwcHB+zs7OwHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHB+zs7OwHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK//4AAH//
AAD//wAA//8AAP//wAP//wAA///AA///AAD//8AD//8AAP//wAP//wAA///AA///AAD//8AD//8AAMAA
AAAAAwAAgAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAAAAB
AADAAAAAAAMAAP///////wAA
</value>
</data>
<data name="$this.Text" xml:space="preserve">
<value>Info</value>
</data>
</root>

372
frmAbout.es-MX.resx Normal file
View File

@ -0,0 +1,372 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="LicenseInformation.Text" xml:space="preserve">
<value>Licenciado bajo la GNU GPL v3</value>
</data>
<data name="LicenseInformation.ToolTip" xml:space="preserve">
<value />
</data>
<data name="ProductNAV.Text" xml:space="preserve">
<value>Tecnologías Virtual Mac</value>
</data>
<data name="ProductNAV.ToolTip" xml:space="preserve">
<value />
</data>
<data name="MvMCopyright.ToolTip" xml:space="preserve">
<value />
</data>
<data name="ThirdPartyNotice.Text" xml:space="preserve">
<value>Porciones de este software:</value>
</data>
<data name="ThirdPartyNotice.ToolTip" xml:space="preserve">
<value />
</data>
<data name="ArmandoTechnologiesCopyright.ToolTip" xml:space="preserve">
<value />
</data>
<data name="AppleCopyright.ToolTip" xml:space="preserve">
<value />
</data>
<data name="ArmandoLink.ToolTip" xml:space="preserve">
<value />
</data>
<data name="EmaculationLink.ToolTip" xml:space="preserve">
<value />
</data>
<data name="_AboutTab_TabPage0.Text" xml:space="preserve">
<value>Acerca de Virtual Mac</value>
</data>
<data name="_AboutTab_TabPage0.ToolTip" xml:space="preserve">
<value />
</data>
<data name="OSName.ToolTip" xml:space="preserve">
<value />
</data>
<data name="CPUCoresLabel.Text" xml:space="preserve">
<value>Nucleos del procesador:</value>
</data>
<data name="CPUCoresLabel.ToolTip" xml:space="preserve">
<value />
</data>
<data name="CPUType.ToolTip" xml:space="preserve">
<value />
</data>
<data name="OSVersion.ToolTip" xml:space="preserve">
<value />
</data>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="SysInfoLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>145, 17</value>
</data>
<data name="SysInfoLabel.Text" xml:space="preserve">
<value>Información del sistema</value>
</data>
<data name="SysInfoLabel.ToolTip" xml:space="preserve">
<value />
</data>
<data name="CPUTypeLabel.Text" xml:space="preserve">
<value>Procesador:</value>
</data>
<data name="CPUTypeLabel.ToolTip" xml:space="preserve">
<value />
</data>
<data name="RAMInstalledLabel.Text" xml:space="preserve">
<value>Memoria instalada:</value>
</data>
<data name="RAMInstalledLabel.ToolTip" xml:space="preserve">
<value />
</data>
<data name="CPUCores.ToolTip" xml:space="preserve">
<value />
</data>
<data name="OSNameLabel.Text" xml:space="preserve">
<value>Sistema operativo:</value>
</data>
<data name="OSNameLabel.ToolTip" xml:space="preserve">
<value />
</data>
<data name="OSVersionLabel.Text" xml:space="preserve">
<value>Versión del sistema:</value>
</data>
<data name="OSVersionLabel.ToolTip" xml:space="preserve">
<value />
</data>
<data name="RAMInstalled.ToolTip" xml:space="preserve">
<value />
</data>
<data name="RAMAvailableLabel.Text" xml:space="preserve">
<value>Memoria disponible:</value>
</data>
<data name="RAMAvailableLabel.ToolTip" xml:space="preserve">
<value />
</data>
<data name="RAMAvailable.ToolTip" xml:space="preserve">
<value />
</data>
<data name="CurrUsr.ToolTip" xml:space="preserve">
<value />
</data>
<data name="CurrUsrLabel.Text" xml:space="preserve">
<value>Usuario actual:</value>
</data>
<data name="CurrUsrLabel.ToolTip" xml:space="preserve">
<value />
</data>
<data name="UserInfoLabel.Text" xml:space="preserve">
<value>Información del usuario</value>
</data>
<data name="UserInfoLabel.ToolTip" xml:space="preserve">
<value />
</data>
<data name="PCName.ToolTip" xml:space="preserve">
<value />
</data>
<data name="PCNameLabel.Text" xml:space="preserve">
<value>Nombre del PC:</value>
</data>
<data name="PCNameLabel.ToolTip" xml:space="preserve">
<value />
</data>
<data name="_AboutTab_TabPage1.Text" xml:space="preserve">
<value>Información del sistema</value>
</data>
<data name="_AboutTab_TabPage1.ToolTip" xml:space="preserve">
<value />
</data>
<data name="AboutTab.ToolTip" xml:space="preserve">
<value />
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAMAEBAQAAAAAAAoAQAANgAAACAgAAAAAAAAqAgAAF4BAAAwMAAAAAAAAKgOAAAGCgAAKAAAABAA
AAAgAAAAAQAEAAAAAADAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAAIAAAACAgACAAAAAgACAAICA
AADAwMAAgICAAAAA/wAA/wAAAP//AP8AAAD/AP8A//8AAP///wAAAAd3d3AAAAAAAHd3AAAAAAAAd3cA
AAB3d3d4d3d3d3d3d3d3d3d3AAAAAAAAAAAIiIiIiIiIgAiIiIiIiIiACIiIiIiIiIAIiIiIiIiIgAiI
iIiIiIiACIiIiIiIiIAIiIiIiIiIgAiIiIiIiIiACIiIiIiIiIAAAAAAAAAAAPgfAAD8PwAA/D8AAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAoAAAAIAAAAEAA
AAABAAgAAAAAAIAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAgAAAAICAAIAAAACAAIAAgIAAAMDA
wADA3MAA8MqmAAQEBAAICAgADAwMABEREQAWFhYAHBwcACIiIgApKSkAVVVVAE1NTQBCQkIAOTk5AIB8
/wBQUP8AkwDWAP/szADG1u8A1ufnAJCprQAAADMAAABmAAAAmQAAAMwAADMAAAAzMwAAM2YAADOZAAAz
zAAAM/8AAGYAAABmMwAAZmYAAGaZAABmzAAAZv8AAJkAAACZMwAAmWYAAJmZAACZzAAAmf8AAMwAAADM
MwAAzGYAAMyZAADMzAAAzP8AAP9mAAD/mQAA/8wAMwAAADMAMwAzAGYAMwCZADMAzAAzAP8AMzMAADMz
MwAzM2YAMzOZADMzzAAzM/8AM2YAADNmMwAzZmYAM2aZADNmzAAzZv8AM5kAADOZMwAzmWYAM5mZADOZ
zAAzmf8AM8wAADPMMwAzzGYAM8yZADPMzAAzzP8AM/8zADP/ZgAz/5kAM//MADP//wBmAAAAZgAzAGYA
ZgBmAJkAZgDMAGYA/wBmMwAAZjMzAGYzZgBmM5kAZjPMAGYz/wBmZgAAZmYzAGZmZgBmZpkAZmbMAGaZ
AABmmTMAZplmAGaZmQBmmcwAZpn/AGbMAABmzDMAZsyZAGbMzABmzP8AZv8AAGb/MwBm/5kAZv/MAMwA
/wD/AMwAmZkAAJkzmQCZAJkAmQDMAJkAAACZMzMAmQBmAJkzzACZAP8AmWYAAJlmMwCZM2YAmWaZAJlm
zACZM/8AmZkzAJmZZgCZmZkAmZnMAJmZ/wCZzAAAmcwzAGbMZgCZzJkAmczMAJnM/wCZ/wAAmf8zAJnM
ZgCZ/5kAmf/MAJn//wDMAAAAmQAzAMwAZgDMAJkAzADMAJkzAADMMzMAzDNmAMwzmQDMM8wAzDP/AMxm
AADMZjMAmWZmAMxmmQDMZswAmWb/AMyZAADMmTMAzJlmAMyZmQDMmcwAzJn/AMzMAADMzDMAzMxmAMzM
mQDMzMwAzMz/AMz/AADM/zMAmf9mAMz/mQDM/8wAzP//AMwAMwD/AGYA/wCZAMwzAAD/MzMA/zNmAP8z
mQD/M8wA/zP/AP9mAAD/ZjMAzGZmAP9mmQD/ZswAzGb/AP+ZAAD/mTMA/5lmAP+ZmQD/mcwA/5n/AP/M
AAD/zDMA/8xmAP/MmQD/zMwA/8z/AP//MwDM/2YA//+ZAP//zABmZv8AZv9mAGb//wD/ZmYA/2b/AP//
ZgAhAKUAX19fAHd3dwCGhoYAlpaWAMvLywCysrIA19fXAN3d3QDj4+MA6urqAPHx8QD4+PgA8Pv/AKSg
oACAgIAAAAD/AAD/AAAA//8A/wAAAP8A/wD//wAA////AAoKCgoKCgoKCgoKBwcHBwcHBwcHBwoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoHBwcHBwcHBwoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcH
BwcKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHCgcHBwcHBwcHBwcHBwcH
B+zsBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH7OwHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoK
EhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhIS
CgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoKEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKChISEhISEhISEhISEhISEhISEhIS
EhISEhISEhIKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhIS
EhISEhISEhISEhISCgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoKEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKChISEhISEhIS
EhISEhISEhISEhISEhISEhISEhIKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhIS
EhISEhISEhISEhISEhISEhISEhISEhISCgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoK
EhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhIS
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgr/4Af///AP///wD///8A////AP/4AA
AAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAAAB/////ygAAAAwAAAAYAAAAAEA
CAAAAAAAgAoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAACAAAAAgIAAgAAAAIAAgACAgAAAwMDAAMDc
wADwyqYABAQEAAgICAAMDAwAERERABYWFgAcHBwAIiIiACkpKQBVVVUATU1NAEJCQgA5OTkAgHz/AFBQ
/wCTANYA/+zMAMbW7wDW5+cAkKmtAAAAMwAAAGYAAACZAAAAzAAAMwAAADMzAAAzZgAAM5kAADPMAAAz
/wAAZgAAAGYzAABmZgAAZpkAAGbMAABm/wAAmQAAAJkzAACZZgAAmZkAAJnMAACZ/wAAzAAAAMwzAADM
ZgAAzJkAAMzMAADM/wAA/2YAAP+ZAAD/zAAzAAAAMwAzADMAZgAzAJkAMwDMADMA/wAzMwAAMzMzADMz
ZgAzM5kAMzPMADMz/wAzZgAAM2YzADNmZgAzZpkAM2bMADNm/wAzmQAAM5kzADOZZgAzmZkAM5nMADOZ
/wAzzAAAM8wzADPMZgAzzJkAM8zMADPM/wAz/zMAM/9mADP/mQAz/8wAM///AGYAAABmADMAZgBmAGYA
mQBmAMwAZgD/AGYzAABmMzMAZjNmAGYzmQBmM8wAZjP/AGZmAABmZjMAZmZmAGZmmQBmZswAZpkAAGaZ
MwBmmWYAZpmZAGaZzABmmf8AZswAAGbMMwBmzJkAZszMAGbM/wBm/wAAZv8zAGb/mQBm/8wAzAD/AP8A
zACZmQAAmTOZAJkAmQCZAMwAmQAAAJkzMwCZAGYAmTPMAJkA/wCZZgAAmWYzAJkzZgCZZpkAmWbMAJkz
/wCZmTMAmZlmAJmZmQCZmcwAmZn/AJnMAACZzDMAZsxmAJnMmQCZzMwAmcz/AJn/AACZ/zMAmcxmAJn/
mQCZ/8wAmf//AMwAAACZADMAzABmAMwAmQDMAMwAmTMAAMwzMwDMM2YAzDOZAMwzzADMM/8AzGYAAMxm
MwCZZmYAzGaZAMxmzACZZv8AzJkAAMyZMwDMmWYAzJmZAMyZzADMmf8AzMwAAMzMMwDMzGYAzMyZAMzM
zADMzP8AzP8AAMz/MwCZ/2YAzP+ZAMz/zADM//8AzAAzAP8AZgD/AJkAzDMAAP8zMwD/M2YA/zOZAP8z
zAD/M/8A/2YAAP9mMwDMZmYA/2aZAP9mzADMZv8A/5kAAP+ZMwD/mWYA/5mZAP+ZzAD/mf8A/8wAAP/M
MwD/zGYA/8yZAP/MzAD/zP8A//8zAMz/ZgD//5kA///MAGZm/wBm/2YAZv//AP9mZgD/Zv8A//9mACEA
pQBfX18Ad3d3AIaGhgCWlpYAy8vLALKysgDX19cA3d3dAOPj4wDq6uoA8fHxAPj4+ADw+/8ApKCgAICA
gAAAAP8AAP8AAAD//wD/AAAA/wD/AP//AAD///8ACgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHBwcH
BwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgcHBwcHBwcHBwcHBwcHBwcKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
BwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcH
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoHBwcH
BwcHBwcHBwcHBwcHBwcHBwfs7AcHBwcHBwcHBwcHBwcHBwcHBwcHBwoKCgcHBwcHBwcHBwcHBwcHBwcH
BwcHB+zs7OwHBwcHBwcHBwcHBwcHBwcHBwcHBwcKBwcHBwcHBwcHBwcHBwcHBwcHBwcHB+zs7OwHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHB+zs7OwHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK//4AAH//
AAD//wAA//8AAP//wAP//wAA///AA///AAD//8AD//8AAP//wAP//wAA///AA///AAD//8AD//8AAMAA
AAAAAwAAgAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAAAAB
AADAAAAAAAMAAP///////wAA
</value>
</data>
<data name="$this.Text" xml:space="preserve">
<value>Acerca de Virtual Mac</value>
</data>
<data name="$this.ToolTip" xml:space="preserve">
<value />
</data>
</root>

1058
frmAbout.resx Normal file

File diff suppressed because it is too large Load Diff

37
frmAbout.vb Normal file
View File

@ -0,0 +1,37 @@
Option Strict Off
Option Explicit On
Friend Class frmAbout
Inherits System.Windows.Forms.Form
' ; Note for me: The labels can confuse values with the declarations, rename them
Private Sub EmaculationLink_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles EmaculationLink.LinkClicked
Process.Start("http://www.emaculation.com/doku.php")
End Sub
Private Sub ArmandoLink_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles ArmandoLink.LinkClicked
Process.Start("http://edsonarmando.000webhostapp.com")
End Sub
Private Sub frmAbout_ChangeUICues(sender As Object, e As System.Windows.Forms.UICuesEventArgs) Handles Me.ChangeUICues
MsgBox(sender.ToString)
End Sub
Private Sub frmAbout_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
My.Application.ChangeUICulture(My.Settings.Lang)
OSName.Text = SysInfo.OSName
OSVersion.Text = SysInfo.OSBuild
CPUType.Text = SysInfo.CPUClass
CPUCores.Text = SysInfo.CPUCores
RAMInstalled.Text = SysInfo.InstalledRAM
CurrUsr.Text = SysInfo.UserName
PCName.Text = SysInfo.ComputerName
Dim AvailRAM As Long = (My.Computer.Info.AvailablePhysicalMemory / 1024) / 1024
RAMAvailable.Text = AvailRAM & " MB"
End Sub
Private Sub AvailMemTimer_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AvailMemTimer.Tick
Dim AvailRAM As Long = (My.Computer.Info.AvailablePhysicalMemory / 1024) / 1024
RAMAvailable.Text = AvailRAM & " MB"
End Sub
End Class

77
frmDebug.Designer.vb generated Normal file
View File

@ -0,0 +1,77 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmDebug
Inherits System.Windows.Forms.Form
'Form reemplaza a Dispose para limpiar la lista de componentes.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
'Requerido por el Diseñador de Windows Forms
Private components As System.ComponentModel.IContainer
'NOTA: el Diseñador de Windows Forms necesita el siguiente procedimiento
'Se puede modificar usando el Diseñador de Windows Forms.
'No lo modifique con el editor de código.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Me.ConsoleIO = New System.Windows.Forms.TextBox()
Me.MainMenu1 = New System.Windows.Forms.MainMenu(Me.components)
Me.MenuItem1 = New System.Windows.Forms.MenuItem()
Me.MenuItem2 = New System.Windows.Forms.MenuItem()
Me.SuspendLayout()
'
'ConsoleIO
'
Me.ConsoleIO.BackColor = System.Drawing.SystemColors.WindowText
Me.ConsoleIO.Dock = System.Windows.Forms.DockStyle.Fill
Me.ConsoleIO.Font = New System.Drawing.Font("Consolas", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.ConsoleIO.ForeColor = System.Drawing.SystemColors.Window
Me.ConsoleIO.Location = New System.Drawing.Point(0, 0)
Me.ConsoleIO.Multiline = True
Me.ConsoleIO.Name = "ConsoleIO"
Me.ConsoleIO.ScrollBars = System.Windows.Forms.ScrollBars.Both
Me.ConsoleIO.Size = New System.Drawing.Size(605, 398)
Me.ConsoleIO.TabIndex = 0
'
'MainMenu1
'
Me.MainMenu1.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem1})
'
'MenuItem1
'
Me.MenuItem1.Index = 0
Me.MenuItem1.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem2})
Me.MenuItem1.Text = "File"
'
'MenuItem2
'
Me.MenuItem2.Index = 0
Me.MenuItem2.Text = "Exit"
'
'frmDebug
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(605, 398)
Me.Controls.Add(Me.ConsoleIO)
Me.Menu = Me.MainMenu1
Me.Name = "frmDebug"
Me.Text = "Configuration Values"
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents ConsoleIO As System.Windows.Forms.TextBox
Friend WithEvents MainMenu1 As System.Windows.Forms.MainMenu
Friend WithEvents MenuItem1 As System.Windows.Forms.MenuItem
Friend WithEvents MenuItem2 As System.Windows.Forms.MenuItem
End Class

123
frmDebug.resx Normal file
View File

@ -0,0 +1,123 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="MainMenu1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
</root>

102
frmDebug.vb Normal file
View File

@ -0,0 +1,102 @@
Public Class frmDebug
Public ConsoleInput As String
Private Sub frmDebug_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
ShowHelp()
ShowPrompt()
ConsoleIO.SelectionStart = ConsoleIO.TextLength
End Sub
Private Sub frmDebug_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize
ConsoleIO.Width = Me.Width - 3
ConsoleIO.Height = Me.Height - 23
End Sub
Public Sub ClearConfig()
My.Settings.VMRoutes = ""
My.Settings.VMIcons = ""
My.Settings.VMNames = ""
My.Settings.VMType = ""
My.Settings.vMacROM = ""
My.Settings.BasiliskROM = ""
My.Settings.SheepShaverROM = ""
My.Settings.x = ""
My.Settings.DefaultMacFolder = ""
My.Settings.Save()
ConsoleIO.Text = ConsoleIO.Text & vbCrLf & vbCrLf & "App configuration cleared." & vbCrLf
End Sub
Public Sub ShowPrompt()
ConsoleIO.Text = ConsoleIO.Text & vbCrLf & "Debug prompt\> "
ConsoleIO.SelectionStart = ConsoleIO.TextLength
End Sub
Public Sub ShowConfig()
Dim TextToShow As String = ""
TextToShow = "Mini vMac ROM = " & My.Settings.vMacROM
TextToShow = TextToShow & vbCrLf & "Basilisk ROM = " & My.Settings.BasiliskROM
TextToShow = TextToShow & vbCrLf & "SheepShaver ROM = " & My.Settings.SheepShaverROM
TextToShow = TextToShow & vbCrLf & "Mac VM Folders = " & My.Settings.DefaultMacFolder
TextToShow = TextToShow & vbCrLf & "User Defined Icons = " & My.Settings.x
TextToShow = TextToShow & vbCrLf & "Vm Icons = " & My.Settings.VMIcons
TextToShow = TextToShow & vbCrLf & "VM Names = " & My.Settings.VMNames
TextToShow = TextToShow & vbCrLf & "VM Types (Subitem2) = " & My.Settings.VMType
TextToShow = TextToShow & vbCrLf & "VM Routes (Subitem1) = " & My.Settings.VMRoutes
ConsoleIO.Text = ConsoleIO.Text & vbCrLf & TextToShow & vbCrLf
End Sub
Public Sub ShowHelp()
ConsoleIO.Text = ConsoleIO.Text & vbCrLf & "Avaible commands are" & vbCrLf & vbCrLf & "show_config Shows the current values of the configuration" & vbCrLf & "clear_config Clears all the config values" & vbCrLf & "help Shows this help" & vbCrLf & "cls Clears the screen" & vbCrLf
End Sub
Private Sub ConsoleIO_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles ConsoleIO.KeyDown
If e.KeyData = Keys.Back Then
If ConsoleInput <> "" Then
ConsoleInput.Remove(ConsoleInput.Length - 1, 1)
ConsoleIO.Text.Remove(ConsoleIO.TextLength - 1, 1)
Else
e.Handled = True
End If
End If
End Sub
Private Sub ConsoleIO_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles ConsoleIO.KeyPress
If Char.IsLetterOrDigit(e.KeyChar) Or Char.IsPunctuation(e.KeyChar) = True Then
ConsoleInput = ConsoleInput & e.KeyChar.ToString
ConsoleIO.SelectionStart = ConsoleIO.TextLength
End If
End Sub
Private Sub ConsoleIO_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles ConsoleIO.KeyUp
If e.KeyData = Keys.Return Then
e.Handled = True
Select Case ConsoleInput
Case "clear_config"
ClearConfig()
Case "show_config"
ShowConfig()
Case "help"
ShowHelp()
Case "cls"
ClearScreen()
Case "show_console"
frmMain.Show()
End Select
EndCheck:
ConsoleInput = ""
ShowPrompt()
End If
If e.KeyData = Keys.Back Then
e.Handled = True
ConsoleInput = Mid(ConsoleInput, 1, ConsoleInput.Length - 1)
End If
End Sub
Public Sub ClearScreen()
ConsoleIO.Text = " "
End Sub
Private Sub MenuItem2_Click(sender As System.Object, e As System.EventArgs) Handles MenuItem2.Click
Me.Close()
End Sub
End Class

130
frmHelp.Designer.vb generated Normal file
View File

@ -0,0 +1,130 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmHelp
Inherits System.Windows.Forms.Form
'Form reemplaza a Dispose para limpiar la lista de componentes.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
'Requerido por el Diseñador de Windows Forms
Private components As System.ComponentModel.IContainer
'NOTA: el Diseñador de Windows Forms necesita el siguiente procedimiento
'Se puede modificar usando el Diseñador de Windows Forms.
'No lo modifique con el editor de código.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.HelpRenderer = New System.Windows.Forms.WebBrowser
Me.NavigationBar = New System.Windows.Forms.ToolStrip
Me.GoHome = New System.Windows.Forms.ToolStripButton
Me.GoBack = New System.Windows.Forms.ToolStripButton
Me.GoForward = New System.Windows.Forms.ToolStripButton
Me.SearchStart = New System.Windows.Forms.ToolStripButton
Me.SearchBox = New System.Windows.Forms.ToolStripTextBox
Me.NavigationBar.SuspendLayout()
Me.SuspendLayout()
'
'HelpRenderer
'
Me.HelpRenderer.Dock = System.Windows.Forms.DockStyle.Bottom
Me.HelpRenderer.Location = New System.Drawing.Point(0, 57)
Me.HelpRenderer.MinimumSize = New System.Drawing.Size(20, 20)
Me.HelpRenderer.Name = "HelpRenderer"
Me.HelpRenderer.Size = New System.Drawing.Size(719, 381)
Me.HelpRenderer.TabIndex = 0
Me.HelpRenderer.Url = New System.Uri("", System.UriKind.Relative)
'
'NavigationBar
'
Me.NavigationBar.ImageScalingSize = New System.Drawing.Size(24, 24)
Me.NavigationBar.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.GoHome, Me.GoBack, Me.GoForward, Me.SearchStart, Me.SearchBox})
Me.NavigationBar.Location = New System.Drawing.Point(0, 0)
Me.NavigationBar.Name = "NavigationBar"
Me.NavigationBar.RenderMode = System.Windows.Forms.ToolStripRenderMode.System
Me.NavigationBar.Size = New System.Drawing.Size(719, 38)
Me.NavigationBar.TabIndex = 1
Me.NavigationBar.Text = "Navigation"
'
'GoHome
'
Me.GoHome.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None
Me.GoHome.Image = Global.VirtualMac.My.Resources.Resources.BrowserHome
Me.GoHome.ImageTransparentColor = System.Drawing.Color.Magenta
Me.GoHome.Name = "GoHome"
Me.GoHome.Size = New System.Drawing.Size(44, 35)
Me.GoHome.Text = "Home"
Me.GoHome.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
'
'GoBack
'
Me.GoBack.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None
Me.GoBack.Enabled = False
Me.GoBack.Image = Global.VirtualMac.My.Resources.Resources.BrowserBack
Me.GoBack.ImageTransparentColor = System.Drawing.Color.Magenta
Me.GoBack.Name = "GoBack"
Me.GoBack.Size = New System.Drawing.Size(36, 35)
Me.GoBack.Text = "Back"
Me.GoBack.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
'
'GoForward
'
Me.GoForward.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None
Me.GoForward.Enabled = False
Me.GoForward.Image = Global.VirtualMac.My.Resources.Resources.BrowserForward
Me.GoForward.ImageTransparentColor = System.Drawing.Color.Magenta
Me.GoForward.Name = "GoForward"
Me.GoForward.Size = New System.Drawing.Size(54, 35)
Me.GoForward.Text = "Forward"
Me.GoForward.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
'
'SearchStart
'
Me.SearchStart.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
Me.SearchStart.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None
Me.SearchStart.Enabled = False
Me.SearchStart.Image = Global.VirtualMac.My.Resources.Resources.BrowserSearch
Me.SearchStart.ImageTransparentColor = System.Drawing.Color.Magenta
Me.SearchStart.Name = "SearchStart"
Me.SearchStart.Size = New System.Drawing.Size(23, 35)
Me.SearchStart.TextImageRelation = System.Windows.Forms.TextImageRelation.Overlay
'
'SearchBox
'
Me.SearchBox.AcceptsReturn = True
Me.SearchBox.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
Me.SearchBox.ForeColor = System.Drawing.SystemColors.GrayText
Me.SearchBox.Name = "SearchBox"
Me.SearchBox.Size = New System.Drawing.Size(100, 38)
Me.SearchBox.Text = "Search..."
'
'frmHelp
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(719, 438)
Me.Controls.Add(Me.NavigationBar)
Me.Controls.Add(Me.HelpRenderer)
Me.Name = "frmHelp"
Me.Text = "Help - VirtualMac"
Me.NavigationBar.ResumeLayout(False)
Me.NavigationBar.PerformLayout()
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents HelpRenderer As System.Windows.Forms.WebBrowser
Friend WithEvents NavigationBar As System.Windows.Forms.ToolStrip
Friend WithEvents GoBack As System.Windows.Forms.ToolStripButton
Friend WithEvents GoHome As System.Windows.Forms.ToolStripButton
Friend WithEvents GoForward As System.Windows.Forms.ToolStripButton
Friend WithEvents SearchStart As System.Windows.Forms.ToolStripButton
Friend WithEvents SearchBox As System.Windows.Forms.ToolStripTextBox
End Class

126
frmHelp.resx Normal file
View File

@ -0,0 +1,126 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="NavigationBar.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>50</value>
</metadata>
</root>

98
frmHelp.vb Normal file
View File

@ -0,0 +1,98 @@
Public Class frmHelp
Public InitialUrl As String = ""
Public Sub SetInitialLocation(ByVal NewUrl As String)
InitialUrl = NewUrl
End Sub
Private Sub frmHelp_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If InitialUrl <> "" Then
HelpRenderer.Navigate(InitialUrl)
Else
HelpRenderer.Navigate("http://emaculation.com/doku.php")
End If
End Sub
Private Sub GoHome_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GoHome.Click
HelpRenderer.Navigate("http://emaculation.com/doku.php")
End Sub
Private Sub GoBack_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GoBack.Click
If HelpRenderer.CanGoBack = True Then
HelpRenderer.GoBack()
Else
GoBack.Enabled = False
End If
End Sub
Private Sub GoForward_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GoForward.Click
If HelpRenderer.CanGoForward = True Then
HelpRenderer.GoForward()
Else
GoForward.Enabled = False
End If
End Sub
Private Sub HelpRenderer_DocumentCompleted(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles HelpRenderer.DocumentCompleted
If HelpRenderer.CanGoBack = True Then
GoBack.Enabled = True
Else
GoBack.Enabled = False
End If
If HelpRenderer.CanGoForward = True Then
GoForward.Enabled = True
Else
GoForward.Enabled = False
End If
End Sub
Private Sub SearchBox_GotFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles SearchBox.GotFocus
SearchBox.ForeColor = System.Windows.Forms.Control.DefaultForeColor
If SearchBox.Text = "Search..." Then
SearchBox.Text = ""
End If
End Sub
Private Sub SearchBox_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles SearchBox.LostFocus
If SearchBox.Text = "" Then
SearchBox.Text = "Search..."
End If
SearchBox.ForeColor = Color.Gray
End Sub
Private Sub SearchBox_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles SearchBox.KeyDown
e.Handled = True
If e.KeyData = Keys.Return Then
SearchStart_Click(Nothing, Nothing)
End If
End Sub
Private Sub SearchBox_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles SearchBox.KeyPress
If Char.IsControl(e.KeyChar) = True Then
e.Handled = True
End If
End Sub
Private Sub SearchBox_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles SearchBox.KeyUp
e.Handled = True
End Sub
Private Sub SearchBox_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles SearchBox.TextChanged
If SearchBox.Text <> "" Then
SearchStart.Enabled = True
ElseIf SearchBox.Text = "Search..." Then
SearchStart.Enabled = False
Else
SearchStart.Enabled = False
End If
End Sub
Private Sub SearchStart_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SearchStart.Click
Dim SearchTerm As String = SearchBox.Text
Dim SearchUrl As String = "https://www.emaculation.com/doku.php/mac_emulation?do=search&q="
HelpRenderer.Navigate(SearchUrl + SearchTerm)
End Sub
Private Sub frmHelp_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize
HelpRenderer.Height = Me.ClientSize.Height - NavigationBar.Height
End Sub
End Class

392
frmMain.Designer.vb generated Normal file
View File

@ -0,0 +1,392 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmMain
Inherits System.Windows.Forms.Form
'Form reemplaza a Dispose para limpiar la lista de componentes.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
'Requerido por el Diseñador de Windows Forms
Private components As System.ComponentModel.IContainer
'NOTA: el Diseñador de Windows Forms necesita el siguiente procedimiento
'Se puede modificar usando el Diseñador de Windows Forms.
'No lo modifique con el editor de código.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmMain))
Me.mnuActionStart = New System.Windows.Forms.MenuItem()
Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components)
Me.ButtonStart = New System.Windows.Forms.Button()
Me.ButtonRemove = New System.Windows.Forms.Button()
Me.ButtonSettings = New System.Windows.Forms.Button()
Me.TrayMenu = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.TrayShow = New System.Windows.Forms.ToolStripMenuItem()
Me.TrayNewMac = New System.Windows.Forms.ToolStripMenuItem()
Me.TrayNewDisk = New System.Windows.Forms.ToolStripMenuItem()
Me.TrayOptions = New System.Windows.Forms.ToolStripMenuItem()
Me.TrayExit = New System.Windows.Forms.ToolStripMenuItem()
Me.ButtonNewM = New System.Windows.Forms.Button()
Me.ButtonNewIcon = New System.Windows.Forms.Button()
Me.VMList = New System.Windows.Forms.ListView()
Me.ColumnHeader1 = CType(New System.Windows.Forms.ColumnHeader(), System.Windows.Forms.ColumnHeader)
Me.MacIcons = New System.Windows.Forms.ImageList(Me.components)
Me.mnuActionBar0 = New System.Windows.Forms.MenuItem()
Me.mnuAction = New System.Windows.Forms.MenuItem()
Me.mnuActionPause = New System.Windows.Forms.MenuItem()
Me.mnuActionRestart = New System.Windows.Forms.MenuItem()
Me.mnuActionBar1 = New System.Windows.Forms.MenuItem()
Me.mnuActionRemove = New System.Windows.Forms.MenuItem()
Me.mnuActionBar2 = New System.Windows.Forms.MenuItem()
Me.mnuActionSettings = New System.Windows.Forms.MenuItem()
Me.mnuActionProperties = New System.Windows.Forms.MenuItem()
Me.mnuFileOptions = New System.Windows.Forms.MenuItem()
Me.mnuFileDebug = New System.Windows.Forms.MenuItem()
Me.mnuFileBar1 = New System.Windows.Forms.MenuItem()
Me.mnuFileExit = New System.Windows.Forms.MenuItem()
Me.mnuHelpOnline = New System.Windows.Forms.MenuItem()
Me.mnuHelpBar0 = New System.Windows.Forms.MenuItem()
Me.mnuHelpContents = New System.Windows.Forms.MenuItem()
Me.mnuHelpAbout = New System.Windows.Forms.MenuItem()
Me.mnuHelp = New System.Windows.Forms.MenuItem()
Me.mnuHelpCrash = New System.Windows.Forms.MenuItem()
Me.mnuFileBar0 = New System.Windows.Forms.MenuItem()
Me.mnuFileNewDisk = New System.Windows.Forms.MenuItem()
Me.VirtualMacTray = New System.Windows.Forms.NotifyIcon(Me.components)
Me.MainMenu1 = New System.Windows.Forms.MainMenu(Me.components)
Me.mnuFile = New System.Windows.Forms.MenuItem()
Me.mnuFileNewMac = New System.Windows.Forms.MenuItem()
Me.Browser = New System.Windows.Forms.OpenFileDialog()
Me.TrayMenu.SuspendLayout()
Me.SuspendLayout()
'
'mnuActionStart
'
resources.ApplyResources(Me.mnuActionStart, "mnuActionStart")
Me.mnuActionStart.Index = 0
'
'ButtonStart
'
resources.ApplyResources(Me.ButtonStart, "ButtonStart")
Me.ButtonStart.BackColor = System.Drawing.SystemColors.Control
Me.ButtonStart.Cursor = System.Windows.Forms.Cursors.Default
Me.ButtonStart.ForeColor = System.Drawing.SystemColors.ControlText
Me.ButtonStart.Name = "ButtonStart"
Me.ToolTip1.SetToolTip(Me.ButtonStart, resources.GetString("ButtonStart.ToolTip"))
Me.ButtonStart.UseVisualStyleBackColor = True
'
'ButtonRemove
'
resources.ApplyResources(Me.ButtonRemove, "ButtonRemove")
Me.ButtonRemove.BackColor = System.Drawing.SystemColors.Control
Me.ButtonRemove.Cursor = System.Windows.Forms.Cursors.Default
Me.ButtonRemove.ForeColor = System.Drawing.SystemColors.ControlText
Me.ButtonRemove.Name = "ButtonRemove"
Me.ToolTip1.SetToolTip(Me.ButtonRemove, resources.GetString("ButtonRemove.ToolTip"))
Me.ButtonRemove.UseVisualStyleBackColor = True
'
'ButtonSettings
'
resources.ApplyResources(Me.ButtonSettings, "ButtonSettings")
Me.ButtonSettings.BackColor = System.Drawing.SystemColors.Control
Me.ButtonSettings.Cursor = System.Windows.Forms.Cursors.Default
Me.ButtonSettings.ForeColor = System.Drawing.SystemColors.ControlText
Me.ButtonSettings.Name = "ButtonSettings"
Me.ToolTip1.SetToolTip(Me.ButtonSettings, resources.GetString("ButtonSettings.ToolTip"))
Me.ButtonSettings.UseVisualStyleBackColor = True
'
'TrayMenu
'
resources.ApplyResources(Me.TrayMenu, "TrayMenu")
Me.TrayMenu.ImageScalingSize = New System.Drawing.Size(8, 8)
Me.TrayMenu.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.TrayShow, Me.TrayNewMac, Me.TrayNewDisk, Me.TrayOptions, Me.TrayExit})
Me.TrayMenu.Name = "ContextMenuStrip1"
Me.TrayMenu.RenderMode = System.Windows.Forms.ToolStripRenderMode.System
Me.ToolTip1.SetToolTip(Me.TrayMenu, resources.GetString("TrayMenu.ToolTip"))
'
'TrayShow
'
resources.ApplyResources(Me.TrayShow, "TrayShow")
Me.TrayShow.Name = "TrayShow"
'
'TrayNewMac
'
resources.ApplyResources(Me.TrayNewMac, "TrayNewMac")
Me.TrayNewMac.Name = "TrayNewMac"
'
'TrayNewDisk
'
resources.ApplyResources(Me.TrayNewDisk, "TrayNewDisk")
Me.TrayNewDisk.Name = "TrayNewDisk"
'
'TrayOptions
'
resources.ApplyResources(Me.TrayOptions, "TrayOptions")
Me.TrayOptions.Name = "TrayOptions"
'
'TrayExit
'
resources.ApplyResources(Me.TrayExit, "TrayExit")
Me.TrayExit.Name = "TrayExit"
'
'ButtonNewM
'
resources.ApplyResources(Me.ButtonNewM, "ButtonNewM")
Me.ButtonNewM.BackColor = System.Drawing.SystemColors.Control
Me.ButtonNewM.Cursor = System.Windows.Forms.Cursors.Default
Me.ButtonNewM.ForeColor = System.Drawing.SystemColors.ControlText
Me.ButtonNewM.Name = "ButtonNewM"
Me.ToolTip1.SetToolTip(Me.ButtonNewM, resources.GetString("ButtonNewM.ToolTip"))
Me.ButtonNewM.UseVisualStyleBackColor = True
'
'ButtonNewIcon
'
resources.ApplyResources(Me.ButtonNewIcon, "ButtonNewIcon")
Me.ButtonNewIcon.Name = "ButtonNewIcon"
Me.ToolTip1.SetToolTip(Me.ButtonNewIcon, resources.GetString("ButtonNewIcon.ToolTip"))
Me.ButtonNewIcon.UseVisualStyleBackColor = True
'
'VMList
'
resources.ApplyResources(Me.VMList, "VMList")
Me.VMList.AllowDrop = True
Me.VMList.Columns.AddRange(New System.Windows.Forms.ColumnHeader() {Me.ColumnHeader1})
Me.VMList.FullRowSelect = True
Me.VMList.HeaderStyle = System.Windows.Forms.ColumnHeaderStyle.None
Me.VMList.HideSelection = False
Me.VMList.MultiSelect = False
Me.VMList.Name = "VMList"
Me.VMList.ShowGroups = False
Me.VMList.Sorting = System.Windows.Forms.SortOrder.Descending
Me.VMList.StateImageList = Me.MacIcons
Me.VMList.TileSize = New System.Drawing.Size(220, 58)
Me.ToolTip1.SetToolTip(Me.VMList, resources.GetString("VMList.ToolTip"))
Me.VMList.UseCompatibleStateImageBehavior = False
Me.VMList.View = System.Windows.Forms.View.Details
'
'ColumnHeader1
'
resources.ApplyResources(Me.ColumnHeader1, "ColumnHeader1")
'
'MacIcons
'
Me.MacIcons.ImageStream = CType(resources.GetObject("MacIcons.ImageStream"), System.Windows.Forms.ImageListStreamer)
Me.MacIcons.TransparentColor = System.Drawing.Color.Transparent
Me.MacIcons.Images.SetKeyName(0, "Generic")
Me.MacIcons.Images.SetKeyName(1, "vMac")
Me.MacIcons.Images.SetKeyName(2, "BII")
Me.MacIcons.Images.SetKeyName(3, "SheepShaver")
Me.MacIcons.Images.SetKeyName(4, "PearPC")
Me.MacIcons.Images.SetKeyName(5, "OS6")
Me.MacIcons.Images.SetKeyName(6, "OS7")
Me.MacIcons.Images.SetKeyName(7, "OS8")
Me.MacIcons.Images.SetKeyName(8, "OS9")
Me.MacIcons.Images.SetKeyName(9, "OSX")
'
'mnuActionBar0
'
resources.ApplyResources(Me.mnuActionBar0, "mnuActionBar0")
Me.mnuActionBar0.Index = 1
'
'mnuAction
'
resources.ApplyResources(Me.mnuAction, "mnuAction")
Me.mnuAction.Index = 1
Me.mnuAction.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnuActionStart, Me.mnuActionBar0, Me.mnuActionPause, Me.mnuActionRestart, Me.mnuActionBar1, Me.mnuActionRemove, Me.mnuActionBar2, Me.mnuActionSettings, Me.mnuActionProperties})
'
'mnuActionPause
'
resources.ApplyResources(Me.mnuActionPause, "mnuActionPause")
Me.mnuActionPause.Index = 2
'
'mnuActionRestart
'
resources.ApplyResources(Me.mnuActionRestart, "mnuActionRestart")
Me.mnuActionRestart.Index = 3
'
'mnuActionBar1
'
resources.ApplyResources(Me.mnuActionBar1, "mnuActionBar1")
Me.mnuActionBar1.Index = 4
'
'mnuActionRemove
'
resources.ApplyResources(Me.mnuActionRemove, "mnuActionRemove")
Me.mnuActionRemove.Index = 5
'
'mnuActionBar2
'
resources.ApplyResources(Me.mnuActionBar2, "mnuActionBar2")
Me.mnuActionBar2.Index = 6
'
'mnuActionSettings
'
resources.ApplyResources(Me.mnuActionSettings, "mnuActionSettings")
Me.mnuActionSettings.Index = 7
'
'mnuActionProperties
'
resources.ApplyResources(Me.mnuActionProperties, "mnuActionProperties")
Me.mnuActionProperties.Index = 8
'
'mnuFileOptions
'
resources.ApplyResources(Me.mnuFileOptions, "mnuFileOptions")
Me.mnuFileOptions.Index = 3
'
'mnuFileDebug
'
resources.ApplyResources(Me.mnuFileDebug, "mnuFileDebug")
Me.mnuFileDebug.Index = 6
'
'mnuFileBar1
'
resources.ApplyResources(Me.mnuFileBar1, "mnuFileBar1")
Me.mnuFileBar1.Index = 4
'
'mnuFileExit
'
resources.ApplyResources(Me.mnuFileExit, "mnuFileExit")
Me.mnuFileExit.Index = 5
'
'mnuHelpOnline
'
resources.ApplyResources(Me.mnuHelpOnline, "mnuHelpOnline")
Me.mnuHelpOnline.Index = 1
'
'mnuHelpBar0
'
resources.ApplyResources(Me.mnuHelpBar0, "mnuHelpBar0")
Me.mnuHelpBar0.Index = 2
'
'mnuHelpContents
'
resources.ApplyResources(Me.mnuHelpContents, "mnuHelpContents")
Me.mnuHelpContents.Index = 0
'
'mnuHelpAbout
'
resources.ApplyResources(Me.mnuHelpAbout, "mnuHelpAbout")
Me.mnuHelpAbout.Index = 3
'
'mnuHelp
'
resources.ApplyResources(Me.mnuHelp, "mnuHelp")
Me.mnuHelp.Index = 2
Me.mnuHelp.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnuHelpContents, Me.mnuHelpOnline, Me.mnuHelpBar0, Me.mnuHelpAbout, Me.mnuHelpCrash})
'
'mnuHelpCrash
'
resources.ApplyResources(Me.mnuHelpCrash, "mnuHelpCrash")
Me.mnuHelpCrash.Index = 4
'
'mnuFileBar0
'
resources.ApplyResources(Me.mnuFileBar0, "mnuFileBar0")
Me.mnuFileBar0.Index = 2
'
'mnuFileNewDisk
'
resources.ApplyResources(Me.mnuFileNewDisk, "mnuFileNewDisk")
Me.mnuFileNewDisk.Index = 1
'
'VirtualMacTray
'
Me.VirtualMacTray.BalloonTipIcon = System.Windows.Forms.ToolTipIcon.Info
resources.ApplyResources(Me.VirtualMacTray, "VirtualMacTray")
Me.VirtualMacTray.ContextMenuStrip = Me.TrayMenu
'
'MainMenu1
'
Me.MainMenu1.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnuFile, Me.mnuAction, Me.mnuHelp})
resources.ApplyResources(Me.MainMenu1, "MainMenu1")
'
'mnuFile
'
resources.ApplyResources(Me.mnuFile, "mnuFile")
Me.mnuFile.Index = 0
Me.mnuFile.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnuFileNewMac, Me.mnuFileNewDisk, Me.mnuFileBar0, Me.mnuFileOptions, Me.mnuFileBar1, Me.mnuFileExit, Me.mnuFileDebug})
'
'mnuFileNewMac
'
resources.ApplyResources(Me.mnuFileNewMac, "mnuFileNewMac")
Me.mnuFileNewMac.Index = 0
'
'Browser
'
resources.ApplyResources(Me.Browser, "Browser")
'
'frmMain
'
Me.AcceptButton = Me.ButtonStart
resources.ApplyResources(Me, "$this")
Me.AllowDrop = True
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.BackColor = System.Drawing.SystemColors.Control
Me.Controls.Add(Me.ButtonStart)
Me.Controls.Add(Me.ButtonRemove)
Me.Controls.Add(Me.ButtonSettings)
Me.Controls.Add(Me.ButtonNewM)
Me.Controls.Add(Me.ButtonNewIcon)
Me.Controls.Add(Me.VMList)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
Me.MaximizeBox = False
Me.Menu = Me.MainMenu1
Me.Name = "frmMain"
Me.ToolTip1.SetToolTip(Me, resources.GetString("$this.ToolTip"))
Me.TrayMenu.ResumeLayout(False)
Me.ResumeLayout(False)
End Sub
Friend WithEvents mnuActionStart As System.Windows.Forms.MenuItem
Public WithEvents ToolTip1 As System.Windows.Forms.ToolTip
Public WithEvents ButtonStart As System.Windows.Forms.Button
Friend WithEvents mnuActionBar0 As System.Windows.Forms.MenuItem
Friend WithEvents mnuAction As System.Windows.Forms.MenuItem
Friend WithEvents mnuActionPause As System.Windows.Forms.MenuItem
Friend WithEvents mnuActionRestart As System.Windows.Forms.MenuItem
Friend WithEvents mnuActionBar1 As System.Windows.Forms.MenuItem
Friend WithEvents mnuActionRemove As System.Windows.Forms.MenuItem
Friend WithEvents mnuActionBar2 As System.Windows.Forms.MenuItem
Friend WithEvents mnuActionSettings As System.Windows.Forms.MenuItem
Friend WithEvents mnuActionProperties As System.Windows.Forms.MenuItem
Friend WithEvents mnuFileOptions As System.Windows.Forms.MenuItem
Friend WithEvents mnuFileDebug As System.Windows.Forms.MenuItem
Friend WithEvents mnuFileBar1 As System.Windows.Forms.MenuItem
Friend WithEvents mnuFileExit As System.Windows.Forms.MenuItem
Friend WithEvents mnuHelpOnline As System.Windows.Forms.MenuItem
Friend WithEvents mnuHelpBar0 As System.Windows.Forms.MenuItem
Friend WithEvents mnuHelpContents As System.Windows.Forms.MenuItem
Friend WithEvents mnuHelpAbout As System.Windows.Forms.MenuItem
Friend WithEvents mnuHelp As System.Windows.Forms.MenuItem
Friend WithEvents mnuFileBar0 As System.Windows.Forms.MenuItem
Friend WithEvents mnuFileNewDisk As System.Windows.Forms.MenuItem
Friend WithEvents TrayNewMac As System.Windows.Forms.ToolStripMenuItem
Public WithEvents ButtonRemove As System.Windows.Forms.Button
Public WithEvents ButtonSettings As System.Windows.Forms.Button
Friend WithEvents TrayShow As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents TrayMenu As System.Windows.Forms.ContextMenuStrip
Friend WithEvents TrayNewDisk As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents TrayOptions As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents TrayExit As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents VirtualMacTray As System.Windows.Forms.NotifyIcon
Public WithEvents ButtonNewM As System.Windows.Forms.Button
Private WithEvents MainMenu1 As System.Windows.Forms.MainMenu
Friend WithEvents mnuFile As System.Windows.Forms.MenuItem
Friend WithEvents mnuFileNewMac As System.Windows.Forms.MenuItem
Friend WithEvents ButtonNewIcon As System.Windows.Forms.Button
Friend WithEvents Browser As System.Windows.Forms.OpenFileDialog
Friend WithEvents ColumnHeader1 As System.Windows.Forms.ColumnHeader
Friend WithEvents VMList As System.Windows.Forms.ListView
Public WithEvents MacIcons As System.Windows.Forms.ImageList
Friend WithEvents mnuHelpCrash As System.Windows.Forms.MenuItem
End Class

2006
frmMain.de-DE.resx Normal file

File diff suppressed because it is too large Load Diff

2016
frmMain.es-MX.resx Normal file

File diff suppressed because it is too large Load Diff

2517
frmMain.resx Normal file

File diff suppressed because it is too large Load Diff

420
frmMain.vb Normal file
View File

@ -0,0 +1,420 @@
Public Class frmMain
Public Sub LoadSettings()
Dim VMNames() As String = Split(My.Settings.VMNames, ",")
Dim VMRoutes() As String = Split(My.Settings.VMRoutes, ",")
Dim VMIcons() As String = Split(My.Settings.VMIcons, ",")
Dim VMTypes() As String = Split(My.Settings.VMType, ",")
If Microsoft.VisualBasic.Command = "/debug" Then
Me.mnuFileDebug.Visible = True
Else
Me.mnuFileDebug.Visible = False
End If
If VMNames.Length > 1 Then
For x As Integer = 0 To VMNames.Length - 2
If VMIcons(x) = -1 Or VMIcons(x) = "" Then
VMIcons(x) = 0
End If
With VMList.Items.Add(VMNames(x))
.StateImageIndex = 0
.SubItems.Add(VMRoutes(x))
.SubItems.Add(VMTypes(x))
End With
Next
End If
End Sub
Public Sub SaveSettings()
Dim VMNames As String = ""
Dim VMIcons As String = ""
Dim VMRoutes As String = ""
Dim VMTypes As String = ""
Dim CustomIcons As String = ""
For x As Integer = 0 To VMList.Items.Count - 1
If VMList.Items(x).StateImageIndex = -1 Then
VMList.Items(x).StateImageIndex = 0
End If
Next
For x As Integer = 0 To VMList.Items.Count - 1
VMNames = VMNames & VMList.Items(x).Text & ","
VMIcons = VMIcons & VMList.Items(x).StateImageIndex & ","
VMRoutes = VMRoutes & VMList.Items(x).SubItems(1).Text & ","
VMTypes = VMTypes & VMList.Items(x).SubItems(2).Text & ","
Next
My.Settings.VMNames = VMNames
My.Settings.VMIcons = VMIcons
My.Settings.VMRoutes = VMRoutes
My.Settings.VMType = VMTypes
My.Settings.Save()
End Sub
Private Sub frmMain_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
Me.Visible = False
End Sub
Private Sub frmMain_Load(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles MyBase.Load
GetSysInfo()
VirtualMacTray.Visible = True
LoadSettings()
End Sub
Private Sub frmMain_FormClosed(ByVal eventSender As System.Object, ByVal eventArgs As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed
SaveSettings()
If Me.WindowState <> System.Windows.Forms.FormWindowState.Minimized Then
SaveSetting(My.Application.Info.Title, "Settings", "MainLeft", CStr(VB6.PixelsToTwipsX(Me.Left)))
SaveSetting(My.Application.Info.Title, "Settings", "MainTop", CStr(VB6.PixelsToTwipsY(Me.Top)))
SaveSetting(My.Application.Info.Title, "Settings", "MainWidth", CStr(VB6.PixelsToTwipsX(Me.Width)))
SaveSetting(My.Application.Info.Title, "Settings", "MainHeight", CStr(VB6.PixelsToTwipsY(Me.Height)))
End If
End Sub
Public Sub StartEmulation(ByVal ConfigPath As String)
Dim Reader As New System.IO.StreamReader(ConfigPath, True)
Dim Line As String
Dim Lines As New ArrayList
Do
Line = Reader.ReadLine()
If Not Line Is Nothing Then
Lines.Add(Line)
End If
Loop Until Line Is Nothing
Reader.Close()
If My.Settings.TestWindow = True Then
frmVirtualMacintosh.Show()
Exit Sub
End If
Select Case VMList.FocusedItem.SubItems(2).Text
Case "vMac"
If My.Computer.FileSystem.FileExists(My.Settings.vMacPath) = True Then
frmVirtualMacintosh.Text = VMList.Items(VMList.FocusedItem.Index).Text & " - Virtual Mac"
Shell(My.Settings.vMacPath & " " & Chr(34) & Lines(0) & Chr(34), AppWinStyle.NormalFocus)
End If
Case "BII"
If My.Computer.FileSystem.FileExists(My.Settings.BasiliskPath) = True Then
Shell(My.Settings.BasiliskPath & " " & Chr(34) & VMList.FocusedItem.SubItems(1).Text & Chr(34), AppWinStyle.NormalFocus)
End If
Case "SheepShaver"
If My.Computer.FileSystem.FileExists(My.Settings.SheepShaverPath) = True Then
Shell(My.Settings.SheepShaverPath & " " & Chr(34) & VMList.FocusedItem.SubItems(1).Text & Chr(34), AppWinStyle.NormalFocus)
End If
Case "PearPC"
If My.Computer.FileSystem.FileExists(My.Settings.PearPCPath) = True Then
MsgBox("cmd.exe /k " & My.Settings.PearPCPath & " " & Chr(34) & VMList.FocusedItem.SubItems(1).Text & Chr(34))
Shell("cmd.exe /k " & My.Settings.PearPCPath & " " & Chr(34) & VMList.FocusedItem.SubItems(1).Text & Chr(34), AppWinStyle.NormalFocus)
End If
Case "QEMU"
If My.Computer.FileSystem.FileExists(My.Settings.QEMUPath) = True Then
Shell(My.Settings.QEMUPath & " " & Lines(0), AppWinStyle.NormalFocus)
End If
End Select
End Sub
Public Sub EnableButtons()
mnuActionStart.Enabled = True
'mnuActionPause.Enabled = True
'mnuActionRestart.Enabled = True
mnuActionRemove.Enabled = True
mnuActionSettings.Enabled = True
'mnuActionProperties.Enabled = True
ButtonSettings.Enabled = True
ButtonRemove.Enabled = True
ButtonStart.Enabled = True
End Sub
Public Sub RemoveSelectedMac()
'Declarations
Dim Selection As Boolean
Dim Answer As Short
'Checks that you have a machine selected
If VMList.FocusedItem.Index <> -1 Then
Selection = True
End If
'Asks you if you really want to delete the machine
If Selection = True Then
Answer = MsgBox("Are you sure you want to remove ''" & VMList.Items(VMList.FocusedItem.Index).Text & "'' Mac from the Virtual Mac Console?", MsgBoxStyle.Exclamation + MsgBoxStyle.YesNo, "Virtual Mac")
'If you don't want that old Mac Plus, this
'is where it's deleted and recycled (Maybe)
If Answer = 6 Then
'Let's ask if user wants to keep files
If MsgBox("Do you want to delete the associated files? This will delete ALL the files in the folder ''" & VMList.FocusedItem.Text & "''", MsgBoxStyle.Exclamation + MsgBoxStyle.YesNo, "Delete files") = MsgBoxResult.Yes Then
'If user needs disk space...
My.Computer.FileSystem.DeleteDirectory(System.IO.Path.GetDirectoryName(VMList.FocusedItem.SubItems(1).Text), FileIO.UIOption.OnlyErrorDialogs, FileIO.RecycleOption.SendToRecycleBin, FileIO.UICancelOption.DoNothing)
VMList.Items.RemoveAt(VMList.FocusedItem.Index)
DisableButtons() 'Disable the buttons
Else
'If user just gets annoyed with the item but wants the files...
VMList.Items.RemoveAt(VMList.FocusedItem.Index)
DisableButtons() 'Disable the buttons
End If
End If
End If
End Sub
Private Sub NewMac_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles ButtonNewM.Click
frmNewMac.Show()
End Sub
Private Sub Remove_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles ButtonRemove.Click
RemoveSelectedMac()
End Sub
Private Sub Settings_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles ButtonSettings.Click
OpenSettings()
End Sub
Private Sub Start_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles ButtonStart.Click
StartEmulation(VMList.FocusedItem.SubItems(1).Text)
End Sub
Public Sub DisableButtons()
mnuActionStart.Enabled = False
mnuActionPause.Enabled = False
mnuActionRestart.Enabled = False
mnuActionRemove.Enabled = False
mnuActionSettings.Enabled = False
mnuActionProperties.Enabled = False
ButtonSettings.Enabled = False
ButtonRemove.Enabled = False
ButtonStart.Enabled = False
End Sub
Public Sub UnloadAll()
If frmVirtualMacintosh.Visible = True Then
frmVirtualMacintosh.Close()
End If
If frmOptions.Visible = True Then
frmOptions.Close()
End If
If frmSettingsSheepVM.Visible = True Then
frmSettingsSheepVM.Close()
End If
If frmNewMac.Visible = True Then
frmNewMac.Close()
End If
'If frmNewDisk.Visible = True Then
'frmNewDisk.Close()
'End If
Me.Close()
End
End Sub
Private Sub IconNewMac_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TrayNewMac.Click
frmNewMac.Show()
frmNewMac.Focus()
End Sub
Private Sub IconNewDisk_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TrayNewDisk.Click
'frmNewDisk.Show()
End Sub
Private Sub IconOptions_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TrayOptions.Click
frmOptions.Show()
End Sub
Private Sub IconExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TrayExit.Click
frmVirtualMacintosh.Close()
frmNewMac.Close()
'frmNewDisk.Close()
frmSplash.Close()
frmSettingsSheepVM.Close()
frmOptions.Close()
frmAbout.Close()
Me.Close()
End Sub
Private Sub TrayShow_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TrayShow.Click
Me.Visible = True
Me.ShowInTaskbar = True
Me.WindowState = FormWindowState.Normal
Me.Show()
Me.BringToFront()
End Sub
Private Sub frmMain_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize
If Me.WindowState = FormWindowState.Minimized Then
Me.ShowInTaskbar = False
Me.Visible = False
End If
Me.Width = 371
End Sub
Private Sub VirtualMacTray_MouseDoubleClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles VirtualMacTray.MouseDoubleClick
Me.Visible = True
Me.ShowInTaskbar = True
Me.WindowState = FormWindowState.Normal
Me.Show()
Me.BringToFront()
End Sub
Private Sub VMList_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles VMList.Click
EnableButtons()
End Sub
Private Sub ChangeIcon_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonNewIcon.Click
Dim User As Integer = MacIcons.Images.Count
Dim Picture As System.Drawing.Image
Browser.Filter = "Picture files(*.jpg;*.png;*.bmp;*.ico)|*.jpg;*.png;*.bmp;*.ico|All files (*.*)|*.*"
Browser.ShowDialog()
If Not Browser.FileName = "" Then
Picture = Image.FromFile(Browser.FileName)
MacIcons.Images.Add(User, Picture)
VMList.FocusedItem.StateImageIndex = User
End If
End Sub
Private Sub mnuFileOptions_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuFileOptions.Click
frmOptions.Show()
End Sub
Private Sub mnuHelpAbout_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuHelpAbout.Click
frmAbout.Show()
End Sub
Private Sub mnuFileDebug_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuFileDebug.Click
frmDebug.Show()
End Sub
Private Sub mnuFileNewMac_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuFileNewMac.Click
frmNewMac.Show()
End Sub
Private Sub mnuFileNewDisk_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuFileNewDisk.Click
frmNewDisk.Show()
End Sub
Private Sub VMList_DragDrop(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles VMList.DragDrop
If e.Data.GetDataPresent(DataFormats.FileDrop) Then
e.Effect = DragDropEffects.Copy
Dim x As String = CType(e.Data.GetData(DataFormats.FileDrop, True), String())(0)
ConfigFileHandler.CreateFromFile(DetectEmulator, x, InputBox("Write the name for the new Mac", "Creating new Mac from a file"))
Cursor = Cursors.Default
End If
End Sub
Private Sub MenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuHelpCrash.Click
'This instruction is WRONG purposedly, it's for crashing the program. This will be used for handling crashes
Dim x() As String = Split("crashing,instruction", ",")
MsgBox(x(3))
End Sub
Private Sub VMList_DragEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles VMList.DragEnter
e.Effect = e.AllowedEffect And DragDropEffects.Copy
End Sub
Public Function DetectEmulator() As String
Dim Emulator As String = "Unknown"
Dim EmulatorDialog As New Form
Dim OKButton As New Button
Dim CancelButton As New Button
Dim EmulatorTypes As New ComboBox
EmulatorTypes.Items.Add("Basilisk II preferences file")
EmulatorTypes.Items.Add("SheepShaver preferences file")
EmulatorTypes.Items.Add("PearPC config file")
EmulatorTypes.Items.Add("QEMU Batch")
EmulatorTypes.SelectedIndex = 0
EmulatorTypes.DropDownStyle = ComboBoxStyle.DropDownList
EmulatorDialog.Width = 400
EmulatorDialog.Height = 160
EmulatorDialog.FormBorderStyle = Forms.FormBorderStyle.FixedDialog
EmulatorDialog.Controls.Add(OKButton)
EmulatorDialog.Controls.Add(CancelButton)
EmulatorDialog.Controls.Add(EmulatorTypes)
EmulatorTypes.Left = (EmulatorDialog.Width / 2) - (EmulatorTypes.Width / 2)
EmulatorTypes.Top = 40
OKButton.Top = EmulatorDialog.Height - OKButton.Height - 30
OKButton.Left = EmulatorDialog.Width - OKButton.Width - CancelButton.Width - 20
CancelButton.Top = EmulatorDialog.Height - CancelButton.Height - 30
CancelButton.Left = EmulatorDialog.Width - CancelButton.Width - 20
EmulatorDialog.ShowDialog()
Select Case EmulatorTypes.SelectedIndex
Case 0
Emulator = "vMac"
Case 1
Emulator = "BII"
Case 2
Emulator = "ShhepShaver"
Case 3
Emulator = "PearPC"
Case 4
Emulator = "QEMU"
End Select
Return Emulator
End Function
Public Sub OpenSettings()
Select Case VMList.FocusedItem.SubItems(2).Text
Case "vMac"
' frmSettingsPearPCVM.Text = Replace(frmSettingsPearPCVM.Text, "%s", VMList.FocusedItem.Text)
' frmSettingsPearPCVM.LoadSettingsFrom(VMList.FocusedItem.SubItems(1).Text)
' frmSettingsPearPCVM.Show()
Case "BII"
frmSettingsBasiliskVM.Text = Replace(frmSettingsBasiliskVM.Text, "%s", VMList.FocusedItem.Text)
frmSettingsBasiliskVM.LoadSettingsFrom(VMList.FocusedItem.Index)
frmSettingsBasiliskVM.Show()
Case "SheepShaver"
frmSettingsSheepVM.Text = Replace(frmSettingsSheepVM.Text, "%s", VMList.FocusedItem.Text)
frmSettingsSheepVM.LoadSettingsFrom(VMList.FocusedItem.Index)
frmSettingsSheepVM.Show()
Case "QEMU"
frmSettingsQemuVM.Text = Replace(frmSettingsSheepVM.Text, "%s", VMList.FocusedItem.Text)
'frmSettingsQemuVM.LoadSettingsFrom(VMList.FocusedItem.Index)
frmSettingsQemuVM.Show()
Case "PearPC"
frmSettingsPearPCVM.Text = Replace(frmSettingsSheepVM.Text, "%s", VMList.FocusedItem.Text)
frmSettingsPearPCVM.LoadSettingsFrom(VMList.FocusedItem.Index)
frmSettingsPearPCVM.Show()
End Select
End Sub
Private Sub mnuActionSettings_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles mnuActionSettings.Click
OpenSettings()
End Sub
Private Sub mnuHelpContents_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuHelpContents.Click
frmHelp.Show()
End Sub
Private Sub mnuHelpOnline_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuHelpOnline.Click
Process.Start("https://edsonarmando.000webhostapp.com/personal/virtualmac/")
End Sub
End Class

407
frmNewDisk.Designer.vb generated Normal file
View File

@ -0,0 +1,407 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmNewDisk
Inherits System.Windows.Forms.Form
'Form reemplaza a Dispose para limpiar la lista de componentes.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
'Requerido por el Diseñador de Windows Forms
Private components As System.ComponentModel.IContainer
'NOTA: el Diseñador de Windows Forms necesita el siguiente procedimiento
'Se puede modificar usando el Diseñador de Windows Forms.
'No lo modifique con el editor de código.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmNewDisk))
Me.Welcome = New System.Windows.Forms.Panel()
Me.WelcomeDescription = New System.Windows.Forms.Label()
Me.WelcomeTitle = New System.Windows.Forms.Label()
Me.FormButtons = New System.Windows.Forms.GroupBox()
Me.cmdCancel = New System.Windows.Forms.Button()
Me.cmdNext = New System.Windows.Forms.Button()
Me.cmdBack = New System.Windows.Forms.Button()
Me.Wizard = New System.Windows.Forms.Panel()
Me.CreateDisk = New System.Windows.Forms.Panel()
Me.DiskSizeDefaults = New System.Windows.Forms.ComboBox()
Me.DiskMBLabel = New System.Windows.Forms.Label()
Me.DiskSize = New System.Windows.Forms.NumericUpDown()
Me.DiskSizeLabel = New System.Windows.Forms.Label()
Me.SaveDisk = New System.Windows.Forms.Button()
Me.DiskPath = New System.Windows.Forms.TextBox()
Me.CreateDiskDescription = New System.Windows.Forms.Label()
Me.DescriptionContainer = New System.Windows.Forms.GroupBox()
Me.Description = New System.Windows.Forms.Label()
Me.DescriptionName = New System.Windows.Forms.Label()
Me.Save = New System.Windows.Forms.SaveFileDialog()
Me.EndWizard = New System.Windows.Forms.Panel()
Me.EndTitle = New System.Windows.Forms.Label()
Me.EndDefSize = New System.Windows.Forms.Label()
Me.EndDefSizeLabel = New System.Windows.Forms.Label()
Me.EndInfoFinish = New System.Windows.Forms.Label()
Me.EndDescription = New System.Windows.Forms.Label()
Me.EndDefPathLabel = New System.Windows.Forms.Label()
Me.EndDefPath = New System.Windows.Forms.Label()
Me.CreateDiskInBackground = New System.ComponentModel.BackgroundWorker()
Me.Welcome.SuspendLayout()
Me.FormButtons.SuspendLayout()
Me.Wizard.SuspendLayout()
Me.CreateDisk.SuspendLayout()
CType(Me.DiskSize, System.ComponentModel.ISupportInitialize).BeginInit()
Me.DescriptionContainer.SuspendLayout()
Me.EndWizard.SuspendLayout()
Me.SuspendLayout()
'
'Welcome
'
Me.Welcome.BackColor = System.Drawing.Color.White
Me.Welcome.BackgroundImage = Global.VirtualMac.My.Resources.Resources.NewDisk
Me.Welcome.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None
Me.Welcome.Controls.Add(Me.WelcomeDescription)
Me.Welcome.Controls.Add(Me.WelcomeTitle)
Me.Welcome.Location = New System.Drawing.Point(0, 0)
Me.Welcome.Margin = New System.Windows.Forms.Padding(0)
Me.Welcome.Name = "Welcome"
Me.Welcome.Size = New System.Drawing.Size(500, 310)
Me.Welcome.TabIndex = 3
'
'WelcomeDescription
'
Me.WelcomeDescription.Location = New System.Drawing.Point(170, 60)
Me.WelcomeDescription.Name = "WelcomeDescription"
Me.WelcomeDescription.Size = New System.Drawing.Size(300, 105)
Me.WelcomeDescription.TabIndex = 1
Me.WelcomeDescription.Text = resources.GetString("WelcomeDescription.Text")
'
'WelcomeTitle
'
Me.WelcomeTitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.WelcomeTitle.Location = New System.Drawing.Point(170, 15)
Me.WelcomeTitle.Name = "WelcomeTitle"
Me.WelcomeTitle.Size = New System.Drawing.Size(300, 25)
Me.WelcomeTitle.TabIndex = 0
Me.WelcomeTitle.Text = "Welcome to the New Disk Wizard"
'
'FormButtons
'
Me.FormButtons.Controls.Add(Me.cmdCancel)
Me.FormButtons.Controls.Add(Me.cmdNext)
Me.FormButtons.Controls.Add(Me.cmdBack)
Me.FormButtons.Location = New System.Drawing.Point(0, 308)
Me.FormButtons.Margin = New System.Windows.Forms.Padding(0)
Me.FormButtons.Name = "FormButtons"
Me.FormButtons.Size = New System.Drawing.Size(499, 54)
Me.FormButtons.TabIndex = 0
Me.FormButtons.TabStop = False
'
'cmdCancel
'
Me.cmdCancel.DialogResult = System.Windows.Forms.DialogResult.Cancel
Me.cmdCancel.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cmdCancel.Location = New System.Drawing.Point(412, 13)
Me.cmdCancel.Name = "cmdCancel"
Me.cmdCancel.Size = New System.Drawing.Size(75, 23)
Me.cmdCancel.TabIndex = 3
Me.cmdCancel.Text = "Cancel"
Me.cmdCancel.UseVisualStyleBackColor = True
'
'cmdNext
'
Me.cmdNext.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cmdNext.Location = New System.Drawing.Point(327, 13)
Me.cmdNext.Name = "cmdNext"
Me.cmdNext.Size = New System.Drawing.Size(75, 23)
Me.cmdNext.TabIndex = 2
Me.cmdNext.Text = "&Next >"
Me.cmdNext.UseVisualStyleBackColor = True
'
'cmdBack
'
Me.cmdBack.Enabled = False
Me.cmdBack.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cmdBack.Location = New System.Drawing.Point(252, 13)
Me.cmdBack.Name = "cmdBack"
Me.cmdBack.Size = New System.Drawing.Size(75, 23)
Me.cmdBack.TabIndex = 1
Me.cmdBack.Text = "< &Back"
Me.cmdBack.UseVisualStyleBackColor = True
'
'Wizard
'
Me.Wizard.BackColor = System.Drawing.SystemColors.Control
Me.Wizard.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None
Me.Wizard.Controls.Add(Me.CreateDisk)
Me.Wizard.Controls.Add(Me.DescriptionContainer)
Me.Wizard.Location = New System.Drawing.Point(0, 0)
Me.Wizard.Margin = New System.Windows.Forms.Padding(0)
Me.Wizard.Name = "Wizard"
Me.Wizard.Size = New System.Drawing.Size(500, 310)
Me.Wizard.TabIndex = 4
Me.Wizard.Visible = False
'
'CreateDisk
'
Me.CreateDisk.Controls.Add(Me.DiskSizeDefaults)
Me.CreateDisk.Controls.Add(Me.DiskMBLabel)
Me.CreateDisk.Controls.Add(Me.DiskSize)
Me.CreateDisk.Controls.Add(Me.DiskSizeLabel)
Me.CreateDisk.Controls.Add(Me.SaveDisk)
Me.CreateDisk.Controls.Add(Me.DiskPath)
Me.CreateDisk.Controls.Add(Me.CreateDiskDescription)
Me.CreateDisk.Location = New System.Drawing.Point(0, 59)
Me.CreateDisk.Name = "CreateDisk"
Me.CreateDisk.Size = New System.Drawing.Size(498, 245)
Me.CreateDisk.TabIndex = 4
'
'DiskSizeDefaults
'
Me.DiskSizeDefaults.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.DiskSizeDefaults.FormattingEnabled = True
Me.DiskSizeDefaults.Items.AddRange(New Object() {"User defined", "Mini vMac", "Basilisk II - 40 MB", "Basilisk II - 100 MB", "Basilisk II - 200 MB", "Basilisk II - 500 MB", "Basilisk II - 1 GB", "SheepShaver - 500 MB", "SheepShaver - 1 GB", "SheepShaver - 2 GB", "PearPC - 3 GB", "PearPC - 6 GB", "QEMU - 500 MB", "QEMU - 1 GB", "QEMU - 2 GB", "QEMU - 4 GB", "QEMU - 6 GB", "QEMU - 10 GB"})
Me.DiskSizeDefaults.Location = New System.Drawing.Point(25, 93)
Me.DiskSizeDefaults.Name = "DiskSizeDefaults"
Me.DiskSizeDefaults.Size = New System.Drawing.Size(186, 21)
Me.DiskSizeDefaults.TabIndex = 7
'
'DiskMBLabel
'
Me.DiskMBLabel.AutoSize = True
Me.DiskMBLabel.Location = New System.Drawing.Point(395, 96)
Me.DiskMBLabel.Name = "DiskMBLabel"
Me.DiskMBLabel.Size = New System.Drawing.Size(23, 13)
Me.DiskMBLabel.TabIndex = 22
Me.DiskMBLabel.Text = "MB"
'
'DiskSize
'
Me.DiskSize.Location = New System.Drawing.Point(305, 94)
Me.DiskSize.Maximum = New Decimal(New Integer() {80192, 0, 0, 0})
Me.DiskSize.Name = "DiskSize"
Me.DiskSize.Size = New System.Drawing.Size(84, 20)
Me.DiskSize.TabIndex = 8
Me.DiskSize.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
'
'DiskSizeLabel
'
Me.DiskSizeLabel.AutoSize = True
Me.DiskSizeLabel.Location = New System.Drawing.Point(217, 96)
Me.DiskSizeLabel.Name = "DiskSizeLabel"
Me.DiskSizeLabel.Size = New System.Drawing.Size(82, 13)
Me.DiskSizeLabel.TabIndex = 20
Me.DiskSizeLabel.Text = "Size of the disk:"
'
'SaveDisk
'
Me.SaveDisk.Location = New System.Drawing.Point(395, 68)
Me.SaveDisk.Name = "SaveDisk"
Me.SaveDisk.Size = New System.Drawing.Size(75, 23)
Me.SaveDisk.TabIndex = 6
Me.SaveDisk.Text = "Browse..."
Me.SaveDisk.UseVisualStyleBackColor = True
'
'DiskPath
'
Me.DiskPath.Location = New System.Drawing.Point(25, 68)
Me.DiskPath.Name = "DiskPath"
Me.DiskPath.Size = New System.Drawing.Size(364, 20)
Me.DiskPath.TabIndex = 5
'
'CreateDiskDescription
'
Me.CreateDiskDescription.Location = New System.Drawing.Point(22, 24)
Me.CreateDiskDescription.Name = "CreateDiskDescription"
Me.CreateDiskDescription.Size = New System.Drawing.Size(450, 30)
Me.CreateDiskDescription.TabIndex = 0
Me.CreateDiskDescription.Text = "Click on Browse to set the path to your hard disk image. You can set the drop dow" & _
"n list to the emulator you are creating the disk for and get suggestions of reco" & _
"mmended sizes."
'
'DescriptionContainer
'
Me.DescriptionContainer.BackColor = System.Drawing.Color.White
Me.DescriptionContainer.Controls.Add(Me.Description)
Me.DescriptionContainer.Controls.Add(Me.DescriptionName)
Me.DescriptionContainer.Location = New System.Drawing.Point(-1, -8)
Me.DescriptionContainer.Name = "DescriptionContainer"
Me.DescriptionContainer.Size = New System.Drawing.Size(499, 67)
Me.DescriptionContainer.TabIndex = 0
Me.DescriptionContainer.TabStop = False
'
'Description
'
Me.Description.Location = New System.Drawing.Point(48, 34)
Me.Description.Name = "Description"
Me.Description.Size = New System.Drawing.Size(423, 30)
Me.Description.TabIndex = 1
Me.Description.Text = "Set the size and location for your new hard disk image."
'
'DescriptionName
'
Me.DescriptionName.AutoSize = True
Me.DescriptionName.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.DescriptionName.Location = New System.Drawing.Point(23, 20)
Me.DescriptionName.Name = "DescriptionName"
Me.DescriptionName.Size = New System.Drawing.Size(134, 13)
Me.DescriptionName.TabIndex = 0
Me.DescriptionName.Text = "Route and size of disk"
'
'Save
'
Me.Save.Filter = "Disk file|*.dsk|Hard disk Image|*.img|RAW hard disk data|*.raw"
Me.Save.FilterIndex = 2
Me.Save.RestoreDirectory = True
Me.Save.SupportMultiDottedExtensions = True
'
'EndWizard
'
Me.EndWizard.BackColor = System.Drawing.Color.White
Me.EndWizard.BackgroundImage = Global.VirtualMac.My.Resources.Resources.NewDisk
Me.EndWizard.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None
Me.EndWizard.Controls.Add(Me.EndTitle)
Me.EndWizard.Controls.Add(Me.EndDefSize)
Me.EndWizard.Controls.Add(Me.EndDefSizeLabel)
Me.EndWizard.Controls.Add(Me.EndInfoFinish)
Me.EndWizard.Controls.Add(Me.EndDescription)
Me.EndWizard.Controls.Add(Me.EndDefPathLabel)
Me.EndWizard.Controls.Add(Me.EndDefPath)
Me.EndWizard.Location = New System.Drawing.Point(0, 0)
Me.EndWizard.Margin = New System.Windows.Forms.Padding(0)
Me.EndWizard.Name = "EndWizard"
Me.EndWizard.Size = New System.Drawing.Size(500, 310)
Me.EndWizard.TabIndex = 5
Me.EndWizard.Visible = False
'
'EndTitle
'
Me.EndTitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.EndTitle.Location = New System.Drawing.Point(170, 15)
Me.EndTitle.Name = "EndTitle"
Me.EndTitle.Size = New System.Drawing.Size(280, 25)
Me.EndTitle.TabIndex = 0
Me.EndTitle.Text = "Completing the New Disk Wizard"
'
'EndDefSize
'
Me.EndDefSize.AutoSize = True
Me.EndDefSize.Location = New System.Drawing.Point(230, 130)
Me.EndDefSize.Name = "EndDefSize"
Me.EndDefSize.Size = New System.Drawing.Size(32, 13)
Me.EndDefSize.TabIndex = 8
Me.EndDefSize.Text = "0 MB"
'
'EndDefSizeLabel
'
Me.EndDefSizeLabel.AutoSize = True
Me.EndDefSizeLabel.Location = New System.Drawing.Point(180, 130)
Me.EndDefSizeLabel.Name = "EndDefSizeLabel"
Me.EndDefSizeLabel.Size = New System.Drawing.Size(30, 13)
Me.EndDefSizeLabel.TabIndex = 4
Me.EndDefSizeLabel.Text = "Size:"
'
'EndInfoFinish
'
Me.EndInfoFinish.Location = New System.Drawing.Point(170, 180)
Me.EndInfoFinish.Name = "EndInfoFinish"
Me.EndInfoFinish.Size = New System.Drawing.Size(280, 15)
Me.EndInfoFinish.TabIndex = 5
Me.EndInfoFinish.Text = "To close this wizard and create the disk, click Finish."
'
'EndDescription
'
Me.EndDescription.Location = New System.Drawing.Point(170, 65)
Me.EndDescription.Name = "EndDescription"
Me.EndDescription.Size = New System.Drawing.Size(300, 30)
Me.EndDescription.TabIndex = 1
Me.EndDescription.Text = "You have succefully completed the New Disk Wizard. Your new disk image will be cr" & _
"eated with the following parameters:"
'
'EndDefPathLabel
'
Me.EndDefPathLabel.AutoSize = True
Me.EndDefPathLabel.Location = New System.Drawing.Point(180, 110)
Me.EndDefPathLabel.Name = "EndDefPathLabel"
Me.EndDefPathLabel.Size = New System.Drawing.Size(38, 13)
Me.EndDefPathLabel.TabIndex = 3
Me.EndDefPathLabel.Text = "Name:"
'
'EndDefPath
'
Me.EndDefPath.Location = New System.Drawing.Point(230, 110)
Me.EndDefPath.Name = "EndDefPath"
Me.EndDefPath.Size = New System.Drawing.Size(230, 13)
Me.EndDefPath.TabIndex = 7
Me.EndDefPath.Text = "Unknown"
'
'CreateDiskInBackground
'
'
'frmNewDisk
'
Me.AcceptButton = Me.cmdNext
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.CancelButton = Me.cmdCancel
Me.ClientSize = New System.Drawing.Size(499, 362)
Me.ControlBox = False
Me.Controls.Add(Me.Wizard)
Me.Controls.Add(Me.EndWizard)
Me.Controls.Add(Me.Welcome)
Me.Controls.Add(Me.FormButtons)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.MaximizeBox = False
Me.MinimizeBox = False
Me.Name = "frmNewDisk"
Me.Text = "New Disk Wizard"
Me.Welcome.ResumeLayout(False)
Me.FormButtons.ResumeLayout(False)
Me.Wizard.ResumeLayout(False)
Me.CreateDisk.ResumeLayout(False)
Me.CreateDisk.PerformLayout()
CType(Me.DiskSize, System.ComponentModel.ISupportInitialize).EndInit()
Me.DescriptionContainer.ResumeLayout(False)
Me.DescriptionContainer.PerformLayout()
Me.EndWizard.ResumeLayout(False)
Me.EndWizard.PerformLayout()
Me.ResumeLayout(False)
End Sub
Friend WithEvents Welcome As System.Windows.Forms.Panel
Friend WithEvents WelcomeDescription As System.Windows.Forms.Label
Friend WithEvents WelcomeTitle As System.Windows.Forms.Label
Friend WithEvents FormButtons As System.Windows.Forms.GroupBox
Friend WithEvents cmdCancel As System.Windows.Forms.Button
Friend WithEvents cmdNext As System.Windows.Forms.Button
Friend WithEvents cmdBack As System.Windows.Forms.Button
Friend WithEvents Wizard As System.Windows.Forms.Panel
Friend WithEvents CreateDisk As System.Windows.Forms.Panel
Friend WithEvents SaveDisk As System.Windows.Forms.Button
Friend WithEvents DiskPath As System.Windows.Forms.TextBox
Friend WithEvents CreateDiskDescription As System.Windows.Forms.Label
Friend WithEvents DescriptionContainer As System.Windows.Forms.GroupBox
Friend WithEvents Description As System.Windows.Forms.Label
Friend WithEvents DescriptionName As System.Windows.Forms.Label
Friend WithEvents DiskMBLabel As System.Windows.Forms.Label
Friend WithEvents DiskSize As System.Windows.Forms.NumericUpDown
Friend WithEvents DiskSizeLabel As System.Windows.Forms.Label
Friend WithEvents Save As System.Windows.Forms.SaveFileDialog
Friend WithEvents DiskSizeDefaults As System.Windows.Forms.ComboBox
Friend WithEvents EndWizard As System.Windows.Forms.Panel
Friend WithEvents EndDefSize As System.Windows.Forms.Label
Friend WithEvents EndDefPath As System.Windows.Forms.Label
Friend WithEvents EndInfoFinish As System.Windows.Forms.Label
Friend WithEvents EndDefSizeLabel As System.Windows.Forms.Label
Friend WithEvents EndDefPathLabel As System.Windows.Forms.Label
Friend WithEvents EndDescription As System.Windows.Forms.Label
Friend WithEvents EndTitle As System.Windows.Forms.Label
Friend WithEvents CreateDiskInBackground As System.ComponentModel.BackgroundWorker
End Class

247
frmNewDisk.resx Normal file
View File

@ -0,0 +1,247 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="WelcomeDescription.Text" xml:space="preserve">
<value>This wizard helps you to create an empty RAW hard disk image, of the size and in the location of your desire, so you can use it with the emulator of your choice.
The file created may have a &lt;.dsk&gt;, &lt;.img&gt; or &lt;.raw&gt; extension
To continue, click Next.</value>
</data>
<metadata name="Save.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>12, 1</value>
</metadata>
<metadata name="CreateDiskInBackground.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>89, 1</value>
</metadata>
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>38</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAMAEBAQAAAABAAoAQAANgAAACAgAAAAAAgAqAgAAF4BAAAwMAAAAAAIAKgOAAAGCgAAKAAAABAA
AAAgAAAAAQAEAAAAAACAAAAAAAAAAAAAAAAQAAAAEAAAAAAAAAAAAIAAAIAAAACAgACAAAAAgACAAICA
AADAwMAAgICAAAAA/wAA/wAAAP//AP8AAAD/AP8A//8AAP///wAAAAd3d3AAAAAAAHd3AAAAAAAAd3cA
AAB3d3d4d3d3d3d3d3d3d3d3AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAPgfAAD8PwAA/D8AAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAoAAAAIAAAAEAA
AAABAAgAAAAAAAAEAAAAAAAAAAAAAAABAAAAAQAAAAAAAAAAgAAAgAAAAICAAIAAAACAAIAAgIAAAMDA
wADA3MAA8MqmAAQEBAAICAgADAwMABEREQAWFhYAHBwcACIiIgApKSkAVVVVAE1NTQBCQkIAOTk5AIB8
/wBQUP8AkwDWAP/szADG1u8A1ufnAJCprQAAADMAAABmAAAAmQAAAMwAADMAAAAzMwAAM2YAADOZAAAz
zAAAM/8AAGYAAABmMwAAZmYAAGaZAABmzAAAZv8AAJkAAACZMwAAmWYAAJmZAACZzAAAmf8AAMwAAADM
MwAAzGYAAMyZAADMzAAAzP8AAP9mAAD/mQAA/8wAMwAAADMAMwAzAGYAMwCZADMAzAAzAP8AMzMAADMz
MwAzM2YAMzOZADMzzAAzM/8AM2YAADNmMwAzZmYAM2aZADNmzAAzZv8AM5kAADOZMwAzmWYAM5mZADOZ
zAAzmf8AM8wAADPMMwAzzGYAM8yZADPMzAAzzP8AM/8zADP/ZgAz/5kAM//MADP//wBmAAAAZgAzAGYA
ZgBmAJkAZgDMAGYA/wBmMwAAZjMzAGYzZgBmM5kAZjPMAGYz/wBmZgAAZmYzAGZmZgBmZpkAZmbMAGaZ
AABmmTMAZplmAGaZmQBmmcwAZpn/AGbMAABmzDMAZsyZAGbMzABmzP8AZv8AAGb/MwBm/5kAZv/MAMwA
/wD/AMwAmZkAAJkzmQCZAJkAmQDMAJkAAACZMzMAmQBmAJkzzACZAP8AmWYAAJlmMwCZM2YAmWaZAJlm
zACZM/8AmZkzAJmZZgCZmZkAmZnMAJmZ/wCZzAAAmcwzAGbMZgCZzJkAmczMAJnM/wCZ/wAAmf8zAJnM
ZgCZ/5kAmf/MAJn//wDMAAAAmQAzAMwAZgDMAJkAzADMAJkzAADMMzMAzDNmAMwzmQDMM8wAzDP/AMxm
AADMZjMAmWZmAMxmmQDMZswAmWb/AMyZAADMmTMAzJlmAMyZmQDMmcwAzJn/AMzMAADMzDMAzMxmAMzM
mQDMzMwAzMz/AMz/AADM/zMAmf9mAMz/mQDM/8wAzP//AMwAMwD/AGYA/wCZAMwzAAD/MzMA/zNmAP8z
mQD/M8wA/zP/AP9mAAD/ZjMAzGZmAP9mmQD/ZswAzGb/AP+ZAAD/mTMA/5lmAP+ZmQD/mcwA/5n/AP/M
AAD/zDMA/8xmAP/MmQD/zMwA/8z/AP//MwDM/2YA//+ZAP//zABmZv8AZv9mAGb//wD/ZmYA/2b/AP//
ZgAhAKUAX19fAHd3dwCGhoYAlpaWAMvLywCysrIA19fXAN3d3QDj4+MA6urqAPHx8QD4+PgA8Pv/AKSg
oACAgIAAAAD/AAD/AAAA//8A/wAAAP8A/wD//wAA////AAoKCgoKCgoKCgoKBwcHBwcHBwcHBwoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoHBwcHBwcHBwoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcH
BwcKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHCgcHBwcHBwcHBwcHBwcH
B+zsBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH7OwHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKChEREREREREREREREREREREREREREREREREREREKCgoK
EREREREREREREREREREREREREREREREREREREQoKCgoRERERERERERERERERERERERERERERERERERER
CgoKChEREREREREREREREREREREREREREREREREREREKCgoKERERERERERERERERERERERERERERERER
EREREQoKCgoRERERERERERERERERERERERERERERERERERERCgoKChERERERERERERERERERERERERER
EREREREREREKCgoKEREREREREREREREREREREREREREREREREREREQoKCgoRERERERERERERERERERER
ERERERERERERERERCgoKChEREREREREREREREREREREREREREREREREREREKCgoKERERERERERERERER
EREREREREREREREREREREQoKCgoRERERERERERERERERERERERERERERERERERERCgoKChERERERERER
EREREREREREREREREREREREREREKCgoKEREREREREREREREREREREREREREREREREREREQoKCgoRERER
ERERERERERERERERERERERERERERERERCgoKChEREREREREREREREREREREREREREREREREREREKCgoK
EREREREREREREREREREREREREREREREREREREQoKCgoRERERERERERERERERERERERERERERERERERER
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgr/4Af///AP///wD///8A////AP/4AA
AAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAAAB/////ygAAAAwAAAAYAAAAAEA
CAAAAAAAAAkAAAAAAAAAAAAAAAEAAAABAAAAAAAAAACAAACAAAAAgIAAgAAAAIAAgACAgAAAwMDAAMDc
wADwyqYABAQEAAgICAAMDAwAERERABYWFgAcHBwAIiIiACkpKQBVVVUATU1NAEJCQgA5OTkAgHz/AFBQ
/wCTANYA/+zMAMbW7wDW5+cAkKmtAAAAMwAAAGYAAACZAAAAzAAAMwAAADMzAAAzZgAAM5kAADPMAAAz
/wAAZgAAAGYzAABmZgAAZpkAAGbMAABm/wAAmQAAAJkzAACZZgAAmZkAAJnMAACZ/wAAzAAAAMwzAADM
ZgAAzJkAAMzMAADM/wAA/2YAAP+ZAAD/zAAzAAAAMwAzADMAZgAzAJkAMwDMADMA/wAzMwAAMzMzADMz
ZgAzM5kAMzPMADMz/wAzZgAAM2YzADNmZgAzZpkAM2bMADNm/wAzmQAAM5kzADOZZgAzmZkAM5nMADOZ
/wAzzAAAM8wzADPMZgAzzJkAM8zMADPM/wAz/zMAM/9mADP/mQAz/8wAM///AGYAAABmADMAZgBmAGYA
mQBmAMwAZgD/AGYzAABmMzMAZjNmAGYzmQBmM8wAZjP/AGZmAABmZjMAZmZmAGZmmQBmZswAZpkAAGaZ
MwBmmWYAZpmZAGaZzABmmf8AZswAAGbMMwBmzJkAZszMAGbM/wBm/wAAZv8zAGb/mQBm/8wAzAD/AP8A
zACZmQAAmTOZAJkAmQCZAMwAmQAAAJkzMwCZAGYAmTPMAJkA/wCZZgAAmWYzAJkzZgCZZpkAmWbMAJkz
/wCZmTMAmZlmAJmZmQCZmcwAmZn/AJnMAACZzDMAZsxmAJnMmQCZzMwAmcz/AJn/AACZ/zMAmcxmAJn/
mQCZ/8wAmf//AMwAAACZADMAzABmAMwAmQDMAMwAmTMAAMwzMwDMM2YAzDOZAMwzzADMM/8AzGYAAMxm
MwCZZmYAzGaZAMxmzACZZv8AzJkAAMyZMwDMmWYAzJmZAMyZzADMmf8AzMwAAMzMMwDMzGYAzMyZAMzM
zADMzP8AzP8AAMz/MwCZ/2YAzP+ZAMz/zADM//8AzAAzAP8AZgD/AJkAzDMAAP8zMwD/M2YA/zOZAP8z
zAD/M/8A/2YAAP9mMwDMZmYA/2aZAP9mzADMZv8A/5kAAP+ZMwD/mWYA/5mZAP+ZzAD/mf8A/8wAAP/M
MwD/zGYA/8yZAP/MzAD/zP8A//8zAMz/ZgD//5kA///MAGZm/wBm/2YAZv//AP9mZgD/Zv8A//9mACEA
pQBfX18Ad3d3AIaGhgCWlpYAy8vLALKysgDX19cA3d3dAOPj4wDq6uoA8fHxAPj4+ADw+/8ApKCgAICA
gAAAAP8AAP8AAAD//wD/AAAA/wD/AP//AAD///8ACgoKCgoKCgoKCgoKCgoKCgcHBwcHBwcHBwcHBwcH
BwcKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoHBwcHBwcHBwcHBwcHBwoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
BwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcH
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoHBwcH
BwcHBwcHBwcHBwcHBwcHBwfs7AcHBwcHBwcHBwcHBwcHBwcHBwcHBwoKCgcHBwcHBwcHBwcHBwcHBwcH
BwcHB+zs7OwHBwcHBwcHBwcHBwcHBwcHBwcHBwcKBwcHBwcHBwcHBwcHBwcHBwcHBwcHB+zs7OwHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHB+zs7OwHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKERERERERERERERERERERERERERERERERERERERERERERERERERERERERCgoKCgoKERER
ERERERERERERERERERERERERERERERERERERERERERERERERERERCgoKCgoKERERERERERERERERERER
ERERERERERERERERERERERERERERERERERERCgoKCgoKERERERERERERERERERERERERERERERERERER
ERERERERERERERERERERCgoKCgoKERERERERERERERERERERERERERERERERERERERERERERERERERER
ERERCgoKCgoKERERERERERERERERERERERERERERERERERERERERERERERERERERERERCgoKCgoKERER
ERERERERERERERERERERERERERERERERERERERERERERERERERERCgoKCgoKERERERERERERERERERER
ERERERERERERERERERERERERERERERERERERCgoKCgoKERERERERERERERERERERERERERERERERERER
ERERERERERERERERERERCgoKCgoKERERERERERERERERERERERERERERERERERERERERERERERERERER
ERERCgoKCgoKERERERERERERERERERERERERERERERERERERERERERERERERERERERERCgoKCgoKERER
ERERERERERERERERERERERERERERERERERERERERERERERERERERCgoKCgoKERERERERERERERERERER
ERERERERERERERERERERERERERERERERERERCgoKCgoKERERERERERERERERERERERERERERERERERER
ERERERERERERERERERERCgoKCgoKERERERERERERERERERERERERERERERERERERERERERERERERERER
ERERCgoKCgoKERERERERERERERERERERERERERERERERERERERERERERERERERERERERCgoKCgoKERER
ERERERERERERERERERERERERERERERERERERERERERERERERERERCgoKCgoKERERERERERERERERERER
ERERERERERERERERERERERERERERERERERERCgoKCgoKERERERERERERERERERERERERERERERERERER
ERERERERERERERERERERCgoKCgoKERERERERERERERERERERERERERERERERERERERERERERERERERER
ERERCgoKCgoKERERERERERERERERERERERERERERERERERERERERERERERERERERERERCgoKCgoKERER
ERERERERERERERERERERERERERERERERERERERERERERERERERERCgoKCgoKERERERERERERERERERER
ERERERERERERERERERERERERERERERERERERCgoKCgoKERERERERERERERERERERERERERERERERERER
ERERERERERERERERERERCgoKCgoKERERERERERERERERERERERERERERERERERERERERERERERERERER
ERERCgoKCgoKERERERERERERERERERERERERERERERERERERERERERERERERERERERERCgoKCgoKERER
ERERERERERERERERERERERERERERERERERERERERERERERERERERCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK//8AAP//
AAD//4AB//8AAP//wAP//wAA///AA///AAD//8AD//8AAP//wAP//wAA///AA///AAD//8AD//8AAMAA
AAAAAwAAgAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAAAAB
AADAAAAAAAMAAP///////wAA
</value>
</data>
</root>

126
frmNewDisk.vb Normal file
View File

@ -0,0 +1,126 @@
Public Class frmNewDisk
Private Sub frmNewDisk_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
SetInitialData()
End Sub
Public Sub SetInitialData()
DiskSizeDefaults.SelectedIndex = 0
Welcome.BringToFront()
Welcome.Visible = True
Wizard.Visible = False
EndWizard.Visible = False
End Sub
Private Sub cmdCancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdCancel.Click
Me.Close()
End Sub
Private Sub cmdNext_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdNext.Click
If Welcome.Visible = True Then
If DiskPath.Text = "" Then
cmdNext.Enabled = False
Else
cmdNext.Enabled = True
End If
SwitchPages(Welcome, Wizard)
cmdBack.Enabled = True
DiskPath.Focus()
GoTo EndOfInstruction
End If
If DiskPath.Text <> "" And Wizard.Visible = True Then
Dim SizeToGrow As Integer = FixControlHeight(EndDefPath, EndWizard, 30)
EndDefSize.Top = EndDefSize.Top + SizeToGrow
EndDefSizeLabel.Top = EndDefSizeLabel.Top + SizeToGrow
EndInfoFinish.Top = EndInfoFinish.Top + SizeToGrow
EndDefPath.Text = DiskPath.Text
EndDefSize.Text = DiskSize.Value & " MB"
SwitchPages(Wizard, EndWizard)
cmdNext.Text = "Finish"
GoTo EndOfInstruction
End If
If EndWizard.Visible = True Then
CreateDiskInBackground.RunWorkerAsync(DiskSize.Value & ";" & DiskPath.Text)
MsgBox("The image ''" & DiskPath.Text & "'' is being created in the background.", MsgBoxStyle.Exclamation, "Creating disk image")
Me.Close()
GoTo EndOfInstruction
End If
EndOfInstruction:
End Sub
Public Function FixControlHeight(ByVal Control As System.Windows.Forms.Control, ByVal Parent As System.Windows.Forms.Control, ByVal LeftMargin As Long) As Integer
'Parent - Control.Location = Total size of the area where is visible the control
'Size of the area where the control should be - Margin = Are where we want the control to stay on
'Note that this is only minding the Width/X growing the height, so a certain space is respected
Dim StayArea As UInteger = ((Parent.Width - Control.Location.X) - LeftMargin)
Dim StayAreaTimes As Integer
Dim HeightGrowth As Integer
Dim OldHeight As Integer = Control.Height
If (Control.PreferredSize.Width) > StayArea Then
If Not Control.Height > Control.PreferredSize.Height Then
While (Control.PreferredSize.Width) > StayAreaTimes
StayAreaTimes = StayAreaTimes + StayArea
End While
StayAreaTimes -= StayArea
Dim PercentageToGrow As Integer = StayAreaTimes / StayArea + 1
HeightGrowth = OldHeight * PercentageToGrow
Control.Height = HeightGrowth
End If
End If
Return HeightGrowth
End Function
Private Sub cmdBack_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdBack.Click
If Wizard.Visible = True Then
cmdBack.Enabled = False
cmdNext.Enabled = True
SwitchPages(Wizard, Welcome)
End If
If EndWizard.Visible = True Then
SwitchPages(EndWizard, Wizard)
cmdNext.Text = "Next >"
End If
End Sub
Public Sub SwitchPages(ByVal EarlyPage As System.Windows.Forms.Panel, ByVal NewPage As System.Windows.Forms.Panel)
EarlyPage.BringToFront()
NewPage.Visible = True
NewPage.BringToFront()
EarlyPage.Visible = False
End Sub
Private Sub SaveDisk_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SaveDisk.Click
Save.ShowDialog()
If Save.FileName <> "" Then
DiskPath.Text = Save.FileName
End If
End Sub
Private Sub DiskPath_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles DiskPath.TextChanged
If DiskPath.Text <> "" Then
cmdNext.Enabled = True
Else
cmdNext.Enabled = False
End If
End Sub
Private Sub CreateDiskInBackground_DoWork(sender As System.Object, e As System.ComponentModel.DoWorkEventArgs) Handles CreateDiskInBackground.DoWork
Dim HDSize As Long = e.Argument.ToString.Substring(0, InStr(e.Argument.ToString, ";") - 1)
Dim HDPath As String = e.Argument.ToString.Substring(InStr(e.Argument.ToString, ";"))
DiskImageCreator.CreateRawDisk(HDSize, HDPath)
End Sub
End Class

810
frmNewMac.Designer.vb generated Normal file
View File

@ -0,0 +1,810 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmNewMac
Inherits System.Windows.Forms.Form
'Form reemplaza a Dispose para limpiar la lista de componentes.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
'Requerido por el Diseñador de Windows Forms
Private components As System.ComponentModel.IContainer
'NOTA: el Diseñador de Windows Forms necesita el siguiente procedimiento
'Se puede modificar usando el Diseñador de Windows Forms.
'No lo modifique con el editor de código.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmNewMac))
Me.FormButtons = New System.Windows.Forms.GroupBox()
Me.cmdCancel = New System.Windows.Forms.Button()
Me.cmdNext = New System.Windows.Forms.Button()
Me.cmdBack = New System.Windows.Forms.Button()
Me.Wizard = New System.Windows.Forms.Panel()
Me.CreateFrame = New System.Windows.Forms.Panel()
Me.CreateNoWizardLabel = New System.Windows.Forms.Label()
Me.CreateNoWizard = New System.Windows.Forms.RadioButton()
Me.CreateAddExistLabel = New System.Windows.Forms.Label()
Me.CreateAddExist = New System.Windows.Forms.RadioButton()
Me.CreateNormalLabel = New System.Windows.Forms.Label()
Me.CreateNormal = New System.Windows.Forms.RadioButton()
Me.CreateInfo = New System.Windows.Forms.Label()
Me.MacNameFrame = New System.Windows.Forms.Panel()
Me.MacName = New System.Windows.Forms.TextBox()
Me.MacNameLabel = New System.Windows.Forms.Label()
Me.MacNameBrowse = New System.Windows.Forms.Button()
Me.AddFromFileFrame = New System.Windows.Forms.Panel()
Me.AddName = New System.Windows.Forms.TextBox()
Me.AddNameLabel = New System.Windows.Forms.Label()
Me.AddFile = New System.Windows.Forms.TextBox()
Me.AddFileLabel = New System.Windows.Forms.Label()
Me.AddEmulatorLabel = New System.Windows.Forms.Label()
Me.AddEmulator = New System.Windows.Forms.ComboBox()
Me.AddInfo = New System.Windows.Forms.Label()
Me.AddFileBrowse = New System.Windows.Forms.Button()
Me.HwPresetsFrame = New System.Windows.Forms.Panel()
Me.HwEmulator = New System.Windows.Forms.ComboBox()
Me.HwInfoDef = New System.Windows.Forms.Label()
Me.HwEmulatorLabel = New System.Windows.Forms.Label()
Me.HwInfo = New System.Windows.Forms.Label()
Me.HwRAM = New System.Windows.Forms.Label()
Me.HwRAMLabel = New System.Windows.Forms.Label()
Me.HwDisk = New System.Windows.Forms.Label()
Me.HwDiskLabel = New System.Windows.Forms.Label()
Me.HwCPU = New System.Windows.Forms.Label()
Me.HwCPULabel = New System.Windows.Forms.Label()
Me.HwOSList = New System.Windows.Forms.ComboBox()
Me.RAMFrame = New System.Windows.Forms.Panel()
Me.RAMInfo = New System.Windows.Forms.Label()
Me.RAMCustom = New System.Windows.Forms.RadioButton()
Me.RAMDefault = New System.Windows.Forms.RadioButton()
Me.RAMControlsPanel = New System.Windows.Forms.Panel()
Me.RAMCustomInvalidSize = New System.Windows.Forms.Label()
Me.RAMSlider = New System.Windows.Forms.TrackBar()
Me.RAMLabelMB = New System.Windows.Forms.Label()
Me.RAMBox = New System.Windows.Forms.TextBox()
Me.DiskFrame = New System.Windows.Forms.Panel()
Me.DiskNew = New System.Windows.Forms.RadioButton()
Me.DiskExisting = New System.Windows.Forms.RadioButton()
Me.DiskNone = New System.Windows.Forms.RadioButton()
Me.DiskInfo = New System.Windows.Forms.Label()
Me.DiskPathBrowse = New System.Windows.Forms.Button()
Me.DiskPath = New System.Windows.Forms.TextBox()
Me.DiskSizeFrame = New System.Windows.Forms.Panel()
Me.DiskSize = New System.Windows.Forms.NumericUpDown()
Me.DiskSizeLabel = New System.Windows.Forms.Label()
Me.DiskSizeLabelMB = New System.Windows.Forms.Label()
Me.DescriptionContainer = New System.Windows.Forms.GroupBox()
Me.Description = New System.Windows.Forms.Label()
Me.DescriptionName = New System.Windows.Forms.Label()
Me.Open = New System.Windows.Forms.OpenFileDialog()
Me.Save = New System.Windows.Forms.SaveFileDialog()
Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components)
Me.Welcome = New System.Windows.Forms.Panel()
Me.WelcomeDescription = New System.Windows.Forms.Label()
Me.WelcomeTitle = New System.Windows.Forms.Label()
Me.EndWizard = New System.Windows.Forms.Panel()
Me.EndTitle = New System.Windows.Forms.Label()
Me.EndInfo = New System.Windows.Forms.Label()
Me.EndMacName = New System.Windows.Forms.Label()
Me.EndMacNameLabel = New System.Windows.Forms.Label()
Me.EndRAM = New System.Windows.Forms.Label()
Me.EndRAMLabel = New System.Windows.Forms.Label()
Me.EndDiskPath = New System.Windows.Forms.Label()
Me.EndDiskPathLabel = New System.Windows.Forms.Label()
Me.EndInfoFinish = New System.Windows.Forms.Label()
Me.FormButtons.SuspendLayout()
Me.Wizard.SuspendLayout()
Me.CreateFrame.SuspendLayout()
Me.MacNameFrame.SuspendLayout()
Me.AddFromFileFrame.SuspendLayout()
Me.HwPresetsFrame.SuspendLayout()
Me.RAMFrame.SuspendLayout()
Me.RAMControlsPanel.SuspendLayout()
CType(Me.RAMSlider, System.ComponentModel.ISupportInitialize).BeginInit()
Me.DiskFrame.SuspendLayout()
Me.DiskSizeFrame.SuspendLayout()
CType(Me.DiskSize, System.ComponentModel.ISupportInitialize).BeginInit()
Me.DescriptionContainer.SuspendLayout()
Me.Welcome.SuspendLayout()
Me.EndWizard.SuspendLayout()
Me.SuspendLayout()
'
'FormButtons
'
resources.ApplyResources(Me.FormButtons, "FormButtons")
Me.FormButtons.Controls.Add(Me.cmdCancel)
Me.FormButtons.Controls.Add(Me.cmdNext)
Me.FormButtons.Controls.Add(Me.cmdBack)
Me.FormButtons.Name = "FormButtons"
Me.FormButtons.TabStop = False
Me.ToolTip1.SetToolTip(Me.FormButtons, resources.GetString("FormButtons.ToolTip"))
'
'cmdCancel
'
resources.ApplyResources(Me.cmdCancel, "cmdCancel")
Me.cmdCancel.DialogResult = System.Windows.Forms.DialogResult.Cancel
Me.cmdCancel.Name = "cmdCancel"
Me.ToolTip1.SetToolTip(Me.cmdCancel, resources.GetString("cmdCancel.ToolTip"))
Me.cmdCancel.UseVisualStyleBackColor = True
'
'cmdNext
'
resources.ApplyResources(Me.cmdNext, "cmdNext")
Me.cmdNext.Name = "cmdNext"
Me.ToolTip1.SetToolTip(Me.cmdNext, resources.GetString("cmdNext.ToolTip"))
Me.cmdNext.UseVisualStyleBackColor = True
'
'cmdBack
'
resources.ApplyResources(Me.cmdBack, "cmdBack")
Me.cmdBack.Name = "cmdBack"
Me.ToolTip1.SetToolTip(Me.cmdBack, resources.GetString("cmdBack.ToolTip"))
Me.cmdBack.UseVisualStyleBackColor = True
'
'Wizard
'
resources.ApplyResources(Me.Wizard, "Wizard")
Me.Wizard.BackColor = System.Drawing.SystemColors.Control
Me.Wizard.Controls.Add(Me.MacNameFrame)
Me.Wizard.Controls.Add(Me.AddFromFileFrame)
Me.Wizard.Controls.Add(Me.HwPresetsFrame)
Me.Wizard.Controls.Add(Me.RAMFrame)
Me.Wizard.Controls.Add(Me.DiskFrame)
Me.Wizard.Controls.Add(Me.CreateFrame)
Me.Wizard.Controls.Add(Me.DescriptionContainer)
Me.Wizard.Name = "Wizard"
Me.ToolTip1.SetToolTip(Me.Wizard, resources.GetString("Wizard.ToolTip"))
'
'CreateFrame
'
resources.ApplyResources(Me.CreateFrame, "CreateFrame")
Me.CreateFrame.Controls.Add(Me.CreateNoWizardLabel)
Me.CreateFrame.Controls.Add(Me.CreateNoWizard)
Me.CreateFrame.Controls.Add(Me.CreateAddExistLabel)
Me.CreateFrame.Controls.Add(Me.CreateAddExist)
Me.CreateFrame.Controls.Add(Me.CreateNormalLabel)
Me.CreateFrame.Controls.Add(Me.CreateNormal)
Me.CreateFrame.Controls.Add(Me.CreateInfo)
Me.CreateFrame.Name = "CreateFrame"
Me.ToolTip1.SetToolTip(Me.CreateFrame, resources.GetString("CreateFrame.ToolTip"))
'
'CreateNoWizardLabel
'
resources.ApplyResources(Me.CreateNoWizardLabel, "CreateNoWizardLabel")
Me.CreateNoWizardLabel.Name = "CreateNoWizardLabel"
Me.ToolTip1.SetToolTip(Me.CreateNoWizardLabel, resources.GetString("CreateNoWizardLabel.ToolTip"))
'
'CreateNoWizard
'
resources.ApplyResources(Me.CreateNoWizard, "CreateNoWizard")
Me.CreateNoWizard.Checked = True
Me.CreateNoWizard.Name = "CreateNoWizard"
Me.CreateNoWizard.TabStop = True
Me.ToolTip1.SetToolTip(Me.CreateNoWizard, resources.GetString("CreateNoWizard.ToolTip"))
Me.CreateNoWizard.UseVisualStyleBackColor = True
'
'CreateAddExistLabel
'
resources.ApplyResources(Me.CreateAddExistLabel, "CreateAddExistLabel")
Me.CreateAddExistLabel.Name = "CreateAddExistLabel"
Me.ToolTip1.SetToolTip(Me.CreateAddExistLabel, resources.GetString("CreateAddExistLabel.ToolTip"))
'
'CreateAddExist
'
resources.ApplyResources(Me.CreateAddExist, "CreateAddExist")
Me.CreateAddExist.Name = "CreateAddExist"
Me.ToolTip1.SetToolTip(Me.CreateAddExist, resources.GetString("CreateAddExist.ToolTip"))
Me.CreateAddExist.UseVisualStyleBackColor = True
'
'CreateNormalLabel
'
resources.ApplyResources(Me.CreateNormalLabel, "CreateNormalLabel")
Me.CreateNormalLabel.Name = "CreateNormalLabel"
Me.ToolTip1.SetToolTip(Me.CreateNormalLabel, resources.GetString("CreateNormalLabel.ToolTip"))
'
'CreateNormal
'
resources.ApplyResources(Me.CreateNormal, "CreateNormal")
Me.CreateNormal.Name = "CreateNormal"
Me.ToolTip1.SetToolTip(Me.CreateNormal, resources.GetString("CreateNormal.ToolTip"))
Me.CreateNormal.UseVisualStyleBackColor = True
'
'CreateInfo
'
resources.ApplyResources(Me.CreateInfo, "CreateInfo")
Me.CreateInfo.Name = "CreateInfo"
Me.ToolTip1.SetToolTip(Me.CreateInfo, resources.GetString("CreateInfo.ToolTip"))
'
'MacNameFrame
'
resources.ApplyResources(Me.MacNameFrame, "MacNameFrame")
Me.MacNameFrame.Controls.Add(Me.MacName)
Me.MacNameFrame.Controls.Add(Me.MacNameLabel)
Me.MacNameFrame.Controls.Add(Me.MacNameBrowse)
Me.MacNameFrame.Name = "MacNameFrame"
Me.ToolTip1.SetToolTip(Me.MacNameFrame, resources.GetString("MacNameFrame.ToolTip"))
'
'MacName
'
resources.ApplyResources(Me.MacName, "MacName")
Me.MacName.Name = "MacName"
Me.ToolTip1.SetToolTip(Me.MacName, resources.GetString("MacName.ToolTip"))
'
'MacNameLabel
'
resources.ApplyResources(Me.MacNameLabel, "MacNameLabel")
Me.MacNameLabel.Name = "MacNameLabel"
Me.ToolTip1.SetToolTip(Me.MacNameLabel, resources.GetString("MacNameLabel.ToolTip"))
'
'MacNameBrowse
'
resources.ApplyResources(Me.MacNameBrowse, "MacNameBrowse")
Me.MacNameBrowse.Name = "MacNameBrowse"
Me.ToolTip1.SetToolTip(Me.MacNameBrowse, resources.GetString("MacNameBrowse.ToolTip"))
Me.MacNameBrowse.UseVisualStyleBackColor = True
'
'AddFromFileFrame
'
resources.ApplyResources(Me.AddFromFileFrame, "AddFromFileFrame")
Me.AddFromFileFrame.Controls.Add(Me.AddName)
Me.AddFromFileFrame.Controls.Add(Me.AddNameLabel)
Me.AddFromFileFrame.Controls.Add(Me.AddFile)
Me.AddFromFileFrame.Controls.Add(Me.AddFileLabel)
Me.AddFromFileFrame.Controls.Add(Me.AddEmulatorLabel)
Me.AddFromFileFrame.Controls.Add(Me.AddEmulator)
Me.AddFromFileFrame.Controls.Add(Me.AddInfo)
Me.AddFromFileFrame.Controls.Add(Me.AddFileBrowse)
Me.AddFromFileFrame.Name = "AddFromFileFrame"
Me.ToolTip1.SetToolTip(Me.AddFromFileFrame, resources.GetString("AddFromFileFrame.ToolTip"))
'
'AddName
'
resources.ApplyResources(Me.AddName, "AddName")
Me.AddName.Name = "AddName"
Me.ToolTip1.SetToolTip(Me.AddName, resources.GetString("AddName.ToolTip"))
'
'AddNameLabel
'
resources.ApplyResources(Me.AddNameLabel, "AddNameLabel")
Me.AddNameLabel.Name = "AddNameLabel"
Me.ToolTip1.SetToolTip(Me.AddNameLabel, resources.GetString("AddNameLabel.ToolTip"))
'
'AddFile
'
resources.ApplyResources(Me.AddFile, "AddFile")
Me.AddFile.Name = "AddFile"
Me.ToolTip1.SetToolTip(Me.AddFile, resources.GetString("AddFile.ToolTip"))
'
'AddFileLabel
'
resources.ApplyResources(Me.AddFileLabel, "AddFileLabel")
Me.AddFileLabel.Name = "AddFileLabel"
Me.ToolTip1.SetToolTip(Me.AddFileLabel, resources.GetString("AddFileLabel.ToolTip"))
'
'AddEmulatorLabel
'
resources.ApplyResources(Me.AddEmulatorLabel, "AddEmulatorLabel")
Me.AddEmulatorLabel.Name = "AddEmulatorLabel"
Me.ToolTip1.SetToolTip(Me.AddEmulatorLabel, resources.GetString("AddEmulatorLabel.ToolTip"))
'
'AddEmulator
'
resources.ApplyResources(Me.AddEmulator, "AddEmulator")
Me.AddEmulator.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.AddEmulator.FormattingEnabled = True
Me.AddEmulator.Items.AddRange(New Object() {resources.GetString("AddEmulator.Items"), resources.GetString("AddEmulator.Items1"), resources.GetString("AddEmulator.Items2"), resources.GetString("AddEmulator.Items3"), resources.GetString("AddEmulator.Items4"), resources.GetString("AddEmulator.Items5")})
Me.AddEmulator.Name = "AddEmulator"
Me.ToolTip1.SetToolTip(Me.AddEmulator, resources.GetString("AddEmulator.ToolTip"))
'
'AddInfo
'
resources.ApplyResources(Me.AddInfo, "AddInfo")
Me.AddInfo.Name = "AddInfo"
Me.ToolTip1.SetToolTip(Me.AddInfo, resources.GetString("AddInfo.ToolTip"))
'
'AddFileBrowse
'
resources.ApplyResources(Me.AddFileBrowse, "AddFileBrowse")
Me.AddFileBrowse.Name = "AddFileBrowse"
Me.ToolTip1.SetToolTip(Me.AddFileBrowse, resources.GetString("AddFileBrowse.ToolTip"))
Me.AddFileBrowse.UseVisualStyleBackColor = True
'
'HwPresetsFrame
'
resources.ApplyResources(Me.HwPresetsFrame, "HwPresetsFrame")
Me.HwPresetsFrame.Controls.Add(Me.HwEmulator)
Me.HwPresetsFrame.Controls.Add(Me.HwInfoDef)
Me.HwPresetsFrame.Controls.Add(Me.HwEmulatorLabel)
Me.HwPresetsFrame.Controls.Add(Me.HwInfo)
Me.HwPresetsFrame.Controls.Add(Me.HwRAM)
Me.HwPresetsFrame.Controls.Add(Me.HwRAMLabel)
Me.HwPresetsFrame.Controls.Add(Me.HwDisk)
Me.HwPresetsFrame.Controls.Add(Me.HwDiskLabel)
Me.HwPresetsFrame.Controls.Add(Me.HwCPU)
Me.HwPresetsFrame.Controls.Add(Me.HwCPULabel)
Me.HwPresetsFrame.Controls.Add(Me.HwOSList)
Me.HwPresetsFrame.Name = "HwPresetsFrame"
Me.ToolTip1.SetToolTip(Me.HwPresetsFrame, resources.GetString("HwPresetsFrame.ToolTip"))
'
'HwEmulator
'
resources.ApplyResources(Me.HwEmulator, "HwEmulator")
Me.HwEmulator.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.HwEmulator.FormattingEnabled = True
Me.HwEmulator.Items.AddRange(New Object() {resources.GetString("HwEmulator.Items"), resources.GetString("HwEmulator.Items1"), resources.GetString("HwEmulator.Items2"), resources.GetString("HwEmulator.Items3"), resources.GetString("HwEmulator.Items4")})
Me.HwEmulator.Name = "HwEmulator"
Me.ToolTip1.SetToolTip(Me.HwEmulator, resources.GetString("HwEmulator.ToolTip"))
'
'HwInfoDef
'
resources.ApplyResources(Me.HwInfoDef, "HwInfoDef")
Me.HwInfoDef.Name = "HwInfoDef"
Me.ToolTip1.SetToolTip(Me.HwInfoDef, resources.GetString("HwInfoDef.ToolTip"))
'
'HwEmulatorLabel
'
resources.ApplyResources(Me.HwEmulatorLabel, "HwEmulatorLabel")
Me.HwEmulatorLabel.Name = "HwEmulatorLabel"
Me.ToolTip1.SetToolTip(Me.HwEmulatorLabel, resources.GetString("HwEmulatorLabel.ToolTip"))
'
'HwInfo
'
resources.ApplyResources(Me.HwInfo, "HwInfo")
Me.HwInfo.Name = "HwInfo"
Me.ToolTip1.SetToolTip(Me.HwInfo, resources.GetString("HwInfo.ToolTip"))
'
'HwRAM
'
resources.ApplyResources(Me.HwRAM, "HwRAM")
Me.HwRAM.Name = "HwRAM"
Me.ToolTip1.SetToolTip(Me.HwRAM, resources.GetString("HwRAM.ToolTip"))
'
'HwRAMLabel
'
resources.ApplyResources(Me.HwRAMLabel, "HwRAMLabel")
Me.HwRAMLabel.Name = "HwRAMLabel"
Me.ToolTip1.SetToolTip(Me.HwRAMLabel, resources.GetString("HwRAMLabel.ToolTip"))
'
'HwDisk
'
resources.ApplyResources(Me.HwDisk, "HwDisk")
Me.HwDisk.Name = "HwDisk"
Me.ToolTip1.SetToolTip(Me.HwDisk, resources.GetString("HwDisk.ToolTip"))
'
'HwDiskLabel
'
resources.ApplyResources(Me.HwDiskLabel, "HwDiskLabel")
Me.HwDiskLabel.Name = "HwDiskLabel"
Me.ToolTip1.SetToolTip(Me.HwDiskLabel, resources.GetString("HwDiskLabel.ToolTip"))
'
'HwCPU
'
resources.ApplyResources(Me.HwCPU, "HwCPU")
Me.HwCPU.Name = "HwCPU"
Me.ToolTip1.SetToolTip(Me.HwCPU, resources.GetString("HwCPU.ToolTip"))
'
'HwCPULabel
'
resources.ApplyResources(Me.HwCPULabel, "HwCPULabel")
Me.HwCPULabel.Name = "HwCPULabel"
Me.ToolTip1.SetToolTip(Me.HwCPULabel, resources.GetString("HwCPULabel.ToolTip"))
'
'HwOSList
'
resources.ApplyResources(Me.HwOSList, "HwOSList")
Me.HwOSList.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.HwOSList.FormattingEnabled = True
Me.HwOSList.Name = "HwOSList"
Me.ToolTip1.SetToolTip(Me.HwOSList, resources.GetString("HwOSList.ToolTip"))
'
'RAMFrame
'
resources.ApplyResources(Me.RAMFrame, "RAMFrame")
Me.RAMFrame.Controls.Add(Me.RAMInfo)
Me.RAMFrame.Controls.Add(Me.RAMCustom)
Me.RAMFrame.Controls.Add(Me.RAMDefault)
Me.RAMFrame.Controls.Add(Me.RAMControlsPanel)
Me.RAMFrame.Name = "RAMFrame"
Me.ToolTip1.SetToolTip(Me.RAMFrame, resources.GetString("RAMFrame.ToolTip"))
'
'RAMInfo
'
resources.ApplyResources(Me.RAMInfo, "RAMInfo")
Me.RAMInfo.Name = "RAMInfo"
Me.ToolTip1.SetToolTip(Me.RAMInfo, resources.GetString("RAMInfo.ToolTip"))
'
'RAMCustom
'
resources.ApplyResources(Me.RAMCustom, "RAMCustom")
Me.RAMCustom.Name = "RAMCustom"
Me.ToolTip1.SetToolTip(Me.RAMCustom, resources.GetString("RAMCustom.ToolTip"))
Me.RAMCustom.UseVisualStyleBackColor = True
'
'RAMDefault
'
resources.ApplyResources(Me.RAMDefault, "RAMDefault")
Me.RAMDefault.Checked = True
Me.RAMDefault.Name = "RAMDefault"
Me.RAMDefault.TabStop = True
Me.ToolTip1.SetToolTip(Me.RAMDefault, resources.GetString("RAMDefault.ToolTip"))
Me.RAMDefault.UseVisualStyleBackColor = True
'
'RAMControlsPanel
'
resources.ApplyResources(Me.RAMControlsPanel, "RAMControlsPanel")
Me.RAMControlsPanel.Controls.Add(Me.RAMCustomInvalidSize)
Me.RAMControlsPanel.Controls.Add(Me.RAMSlider)
Me.RAMControlsPanel.Controls.Add(Me.RAMLabelMB)
Me.RAMControlsPanel.Controls.Add(Me.RAMBox)
Me.RAMControlsPanel.Name = "RAMControlsPanel"
Me.ToolTip1.SetToolTip(Me.RAMControlsPanel, resources.GetString("RAMControlsPanel.ToolTip"))
'
'RAMCustomInvalidSize
'
resources.ApplyResources(Me.RAMCustomInvalidSize, "RAMCustomInvalidSize")
Me.RAMCustomInvalidSize.Name = "RAMCustomInvalidSize"
Me.ToolTip1.SetToolTip(Me.RAMCustomInvalidSize, resources.GetString("RAMCustomInvalidSize.ToolTip"))
'
'RAMSlider
'
resources.ApplyResources(Me.RAMSlider, "RAMSlider")
Me.RAMSlider.Maximum = 960
Me.RAMSlider.Minimum = 4
Me.RAMSlider.Name = "RAMSlider"
Me.RAMSlider.TickFrequency = 48
Me.ToolTip1.SetToolTip(Me.RAMSlider, resources.GetString("RAMSlider.ToolTip"))
Me.RAMSlider.Value = 4
'
'RAMLabelMB
'
resources.ApplyResources(Me.RAMLabelMB, "RAMLabelMB")
Me.RAMLabelMB.Name = "RAMLabelMB"
Me.ToolTip1.SetToolTip(Me.RAMLabelMB, resources.GetString("RAMLabelMB.ToolTip"))
'
'RAMBox
'
resources.ApplyResources(Me.RAMBox, "RAMBox")
Me.RAMBox.Name = "RAMBox"
Me.ToolTip1.SetToolTip(Me.RAMBox, resources.GetString("RAMBox.ToolTip"))
'
'DiskFrame
'
resources.ApplyResources(Me.DiskFrame, "DiskFrame")
Me.DiskFrame.Controls.Add(Me.DiskNew)
Me.DiskFrame.Controls.Add(Me.DiskExisting)
Me.DiskFrame.Controls.Add(Me.DiskNone)
Me.DiskFrame.Controls.Add(Me.DiskInfo)
Me.DiskFrame.Controls.Add(Me.DiskPathBrowse)
Me.DiskFrame.Controls.Add(Me.DiskPath)
Me.DiskFrame.Controls.Add(Me.DiskSizeFrame)
Me.DiskFrame.Name = "DiskFrame"
Me.ToolTip1.SetToolTip(Me.DiskFrame, resources.GetString("DiskFrame.ToolTip"))
'
'DiskNew
'
resources.ApplyResources(Me.DiskNew, "DiskNew")
Me.DiskNew.Checked = True
Me.DiskNew.Name = "DiskNew"
Me.DiskNew.TabStop = True
Me.ToolTip1.SetToolTip(Me.DiskNew, resources.GetString("DiskNew.ToolTip"))
Me.DiskNew.UseVisualStyleBackColor = True
'
'DiskExisting
'
resources.ApplyResources(Me.DiskExisting, "DiskExisting")
Me.DiskExisting.Name = "DiskExisting"
Me.ToolTip1.SetToolTip(Me.DiskExisting, resources.GetString("DiskExisting.ToolTip"))
Me.DiskExisting.UseVisualStyleBackColor = True
'
'DiskNone
'
resources.ApplyResources(Me.DiskNone, "DiskNone")
Me.DiskNone.Name = "DiskNone"
Me.ToolTip1.SetToolTip(Me.DiskNone, resources.GetString("DiskNone.ToolTip"))
Me.DiskNone.UseVisualStyleBackColor = True
'
'DiskInfo
'
resources.ApplyResources(Me.DiskInfo, "DiskInfo")
Me.DiskInfo.Name = "DiskInfo"
Me.ToolTip1.SetToolTip(Me.DiskInfo, resources.GetString("DiskInfo.ToolTip"))
'
'DiskPathBrowse
'
resources.ApplyResources(Me.DiskPathBrowse, "DiskPathBrowse")
Me.DiskPathBrowse.Name = "DiskPathBrowse"
Me.ToolTip1.SetToolTip(Me.DiskPathBrowse, resources.GetString("DiskPathBrowse.ToolTip"))
Me.DiskPathBrowse.UseVisualStyleBackColor = True
'
'DiskPath
'
resources.ApplyResources(Me.DiskPath, "DiskPath")
Me.DiskPath.Name = "DiskPath"
Me.ToolTip1.SetToolTip(Me.DiskPath, resources.GetString("DiskPath.ToolTip"))
'
'DiskSizeFrame
'
resources.ApplyResources(Me.DiskSizeFrame, "DiskSizeFrame")
Me.DiskSizeFrame.Controls.Add(Me.DiskSize)
Me.DiskSizeFrame.Controls.Add(Me.DiskSizeLabel)
Me.DiskSizeFrame.Controls.Add(Me.DiskSizeLabelMB)
Me.DiskSizeFrame.Name = "DiskSizeFrame"
Me.ToolTip1.SetToolTip(Me.DiskSizeFrame, resources.GetString("DiskSizeFrame.ToolTip"))
'
'DiskSize
'
resources.ApplyResources(Me.DiskSize, "DiskSize")
Me.DiskSize.Maximum = New Decimal(New Integer() {130000, 0, 0, 0})
Me.DiskSize.Name = "DiskSize"
Me.ToolTip1.SetToolTip(Me.DiskSize, resources.GetString("DiskSize.ToolTip"))
'
'DiskSizeLabel
'
resources.ApplyResources(Me.DiskSizeLabel, "DiskSizeLabel")
Me.DiskSizeLabel.Name = "DiskSizeLabel"
Me.ToolTip1.SetToolTip(Me.DiskSizeLabel, resources.GetString("DiskSizeLabel.ToolTip"))
'
'DiskSizeLabelMB
'
resources.ApplyResources(Me.DiskSizeLabelMB, "DiskSizeLabelMB")
Me.DiskSizeLabelMB.Name = "DiskSizeLabelMB"
Me.ToolTip1.SetToolTip(Me.DiskSizeLabelMB, resources.GetString("DiskSizeLabelMB.ToolTip"))
'
'DescriptionContainer
'
resources.ApplyResources(Me.DescriptionContainer, "DescriptionContainer")
Me.DescriptionContainer.BackColor = System.Drawing.Color.White
Me.DescriptionContainer.Controls.Add(Me.Description)
Me.DescriptionContainer.Controls.Add(Me.DescriptionName)
Me.DescriptionContainer.Name = "DescriptionContainer"
Me.DescriptionContainer.TabStop = False
Me.ToolTip1.SetToolTip(Me.DescriptionContainer, resources.GetString("DescriptionContainer.ToolTip"))
'
'Description
'
resources.ApplyResources(Me.Description, "Description")
Me.Description.Name = "Description"
Me.ToolTip1.SetToolTip(Me.Description, resources.GetString("Description.ToolTip"))
'
'DescriptionName
'
resources.ApplyResources(Me.DescriptionName, "DescriptionName")
Me.DescriptionName.Name = "DescriptionName"
Me.ToolTip1.SetToolTip(Me.DescriptionName, resources.GetString("DescriptionName.ToolTip"))
'
'Open
'
resources.ApplyResources(Me.Open, "Open")
'
'Save
'
resources.ApplyResources(Me.Save, "Save")
'
'ToolTip1
'
Me.ToolTip1.AutoPopDelay = 5000
Me.ToolTip1.InitialDelay = 1000
Me.ToolTip1.ReshowDelay = 200
'
'Welcome
'
resources.ApplyResources(Me.Welcome, "Welcome")
Me.Welcome.BackColor = System.Drawing.Color.White
Me.Welcome.BackgroundImage = Global.VirtualMac.My.Resources.Resources.NewMac
Me.Welcome.Controls.Add(Me.WelcomeDescription)
Me.Welcome.Controls.Add(Me.WelcomeTitle)
Me.Welcome.Name = "Welcome"
Me.ToolTip1.SetToolTip(Me.Welcome, resources.GetString("Welcome.ToolTip"))
'
'WelcomeDescription
'
resources.ApplyResources(Me.WelcomeDescription, "WelcomeDescription")
Me.WelcomeDescription.Name = "WelcomeDescription"
Me.ToolTip1.SetToolTip(Me.WelcomeDescription, resources.GetString("WelcomeDescription.ToolTip"))
'
'WelcomeTitle
'
resources.ApplyResources(Me.WelcomeTitle, "WelcomeTitle")
Me.WelcomeTitle.Name = "WelcomeTitle"
Me.ToolTip1.SetToolTip(Me.WelcomeTitle, resources.GetString("WelcomeTitle.ToolTip"))
'
'EndWizard
'
resources.ApplyResources(Me.EndWizard, "EndWizard")
Me.EndWizard.BackColor = System.Drawing.Color.White
Me.EndWizard.BackgroundImage = Global.VirtualMac.My.Resources.Resources.NewMac
Me.EndWizard.Controls.Add(Me.EndTitle)
Me.EndWizard.Controls.Add(Me.EndInfo)
Me.EndWizard.Controls.Add(Me.EndMacName)
Me.EndWizard.Controls.Add(Me.EndMacNameLabel)
Me.EndWizard.Controls.Add(Me.EndRAM)
Me.EndWizard.Controls.Add(Me.EndRAMLabel)
Me.EndWizard.Controls.Add(Me.EndDiskPath)
Me.EndWizard.Controls.Add(Me.EndDiskPathLabel)
Me.EndWizard.Controls.Add(Me.EndInfoFinish)
Me.EndWizard.Name = "EndWizard"
Me.ToolTip1.SetToolTip(Me.EndWizard, resources.GetString("EndWizard.ToolTip"))
'
'EndTitle
'
resources.ApplyResources(Me.EndTitle, "EndTitle")
Me.EndTitle.Name = "EndTitle"
Me.ToolTip1.SetToolTip(Me.EndTitle, resources.GetString("EndTitle.ToolTip"))
'
'EndInfo
'
resources.ApplyResources(Me.EndInfo, "EndInfo")
Me.EndInfo.Name = "EndInfo"
Me.ToolTip1.SetToolTip(Me.EndInfo, resources.GetString("EndInfo.ToolTip"))
'
'EndMacName
'
resources.ApplyResources(Me.EndMacName, "EndMacName")
Me.EndMacName.Name = "EndMacName"
Me.ToolTip1.SetToolTip(Me.EndMacName, resources.GetString("EndMacName.ToolTip"))
'
'EndMacNameLabel
'
resources.ApplyResources(Me.EndMacNameLabel, "EndMacNameLabel")
Me.EndMacNameLabel.Name = "EndMacNameLabel"
Me.ToolTip1.SetToolTip(Me.EndMacNameLabel, resources.GetString("EndMacNameLabel.ToolTip"))
'
'EndRAM
'
resources.ApplyResources(Me.EndRAM, "EndRAM")
Me.EndRAM.Name = "EndRAM"
Me.ToolTip1.SetToolTip(Me.EndRAM, resources.GetString("EndRAM.ToolTip"))
'
'EndRAMLabel
'
resources.ApplyResources(Me.EndRAMLabel, "EndRAMLabel")
Me.EndRAMLabel.Name = "EndRAMLabel"
Me.ToolTip1.SetToolTip(Me.EndRAMLabel, resources.GetString("EndRAMLabel.ToolTip"))
'
'EndDiskPath
'
resources.ApplyResources(Me.EndDiskPath, "EndDiskPath")
Me.EndDiskPath.Name = "EndDiskPath"
Me.ToolTip1.SetToolTip(Me.EndDiskPath, resources.GetString("EndDiskPath.ToolTip"))
'
'EndDiskPathLabel
'
resources.ApplyResources(Me.EndDiskPathLabel, "EndDiskPathLabel")
Me.EndDiskPathLabel.Name = "EndDiskPathLabel"
Me.ToolTip1.SetToolTip(Me.EndDiskPathLabel, resources.GetString("EndDiskPathLabel.ToolTip"))
'
'EndInfoFinish
'
resources.ApplyResources(Me.EndInfoFinish, "EndInfoFinish")
Me.EndInfoFinish.Name = "EndInfoFinish"
Me.ToolTip1.SetToolTip(Me.EndInfoFinish, resources.GetString("EndInfoFinish.ToolTip"))
'
'frmNewMac
'
Me.AcceptButton = Me.cmdNext
resources.ApplyResources(Me, "$this")
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.CancelButton = Me.cmdCancel
Me.ControlBox = False
Me.Controls.Add(Me.Welcome)
Me.Controls.Add(Me.EndWizard)
Me.Controls.Add(Me.Wizard)
Me.Controls.Add(Me.FormButtons)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
Me.Name = "frmNewMac"
Me.ToolTip1.SetToolTip(Me, resources.GetString("$this.ToolTip"))
Me.FormButtons.ResumeLayout(False)
Me.Wizard.ResumeLayout(False)
Me.CreateFrame.ResumeLayout(False)
Me.CreateFrame.PerformLayout()
Me.MacNameFrame.ResumeLayout(False)
Me.MacNameFrame.PerformLayout()
Me.AddFromFileFrame.ResumeLayout(False)
Me.AddFromFileFrame.PerformLayout()
Me.HwPresetsFrame.ResumeLayout(False)
Me.HwPresetsFrame.PerformLayout()
Me.RAMFrame.ResumeLayout(False)
Me.RAMFrame.PerformLayout()
Me.RAMControlsPanel.ResumeLayout(False)
Me.RAMControlsPanel.PerformLayout()
CType(Me.RAMSlider, System.ComponentModel.ISupportInitialize).EndInit()
Me.DiskFrame.ResumeLayout(False)
Me.DiskFrame.PerformLayout()
Me.DiskSizeFrame.ResumeLayout(False)
Me.DiskSizeFrame.PerformLayout()
CType(Me.DiskSize, System.ComponentModel.ISupportInitialize).EndInit()
Me.DescriptionContainer.ResumeLayout(False)
Me.DescriptionContainer.PerformLayout()
Me.Welcome.ResumeLayout(False)
Me.EndWizard.ResumeLayout(False)
Me.EndWizard.PerformLayout()
Me.ResumeLayout(False)
End Sub
Friend WithEvents FormButtons As System.Windows.Forms.GroupBox
Friend WithEvents Welcome As System.Windows.Forms.Panel
Friend WithEvents cmdCancel As System.Windows.Forms.Button
Friend WithEvents cmdNext As System.Windows.Forms.Button
Friend WithEvents cmdBack As System.Windows.Forms.Button
Friend WithEvents WelcomeDescription As System.Windows.Forms.Label
Friend WithEvents WelcomeTitle As System.Windows.Forms.Label
Friend WithEvents Wizard As System.Windows.Forms.Panel
Friend WithEvents DescriptionContainer As System.Windows.Forms.GroupBox
Friend WithEvents CreateFrame As System.Windows.Forms.Panel
Friend WithEvents Description As System.Windows.Forms.Label
Friend WithEvents DescriptionName As System.Windows.Forms.Label
Friend WithEvents HwPresetsFrame As System.Windows.Forms.Panel
Friend WithEvents AddFromFileFrame As System.Windows.Forms.Panel
Friend WithEvents MacNameFrame As System.Windows.Forms.Panel
Friend WithEvents DiskFrame As System.Windows.Forms.Panel
Friend WithEvents RAMFrame As System.Windows.Forms.Panel
Friend WithEvents EndWizard As System.Windows.Forms.Panel
Friend WithEvents EndDiskPathLabel As System.Windows.Forms.Label
Friend WithEvents EndRAMLabel As System.Windows.Forms.Label
Friend WithEvents EndMacNameLabel As System.Windows.Forms.Label
Friend WithEvents EndInfo As System.Windows.Forms.Label
Friend WithEvents EndTitle As System.Windows.Forms.Label
Friend WithEvents EndInfoFinish As System.Windows.Forms.Label
Friend WithEvents EndDiskPath As System.Windows.Forms.Label
Friend WithEvents EndRAM As System.Windows.Forms.Label
Friend WithEvents EndMacName As System.Windows.Forms.Label
Friend WithEvents CreateAddExist As System.Windows.Forms.RadioButton
Friend WithEvents CreateNormal As System.Windows.Forms.RadioButton
Friend WithEvents CreateInfo As System.Windows.Forms.Label
Friend WithEvents CreateNormalLabel As System.Windows.Forms.Label
Friend WithEvents CreateAddExistLabel As System.Windows.Forms.Label
Friend WithEvents CreateNoWizardLabel As System.Windows.Forms.Label
Friend WithEvents CreateNoWizard As System.Windows.Forms.RadioButton
Friend WithEvents MacNameBrowse As System.Windows.Forms.Button
Friend WithEvents MacName As System.Windows.Forms.TextBox
Friend WithEvents MacNameLabel As System.Windows.Forms.Label
Friend WithEvents Open As System.Windows.Forms.OpenFileDialog
Friend WithEvents Save As System.Windows.Forms.SaveFileDialog
Friend WithEvents HwInfo As System.Windows.Forms.Label
Friend WithEvents HwRAM As System.Windows.Forms.Label
Friend WithEvents HwDisk As System.Windows.Forms.Label
Friend WithEvents HwCPU As System.Windows.Forms.Label
Friend WithEvents HwCPULabel As System.Windows.Forms.Label
Friend WithEvents HwDiskLabel As System.Windows.Forms.Label
Friend WithEvents HwRAMLabel As System.Windows.Forms.Label
Friend WithEvents HwOSList As System.Windows.Forms.ComboBox
Friend WithEvents HwEmulatorLabel As System.Windows.Forms.Label
Friend WithEvents RAMLabelMB As System.Windows.Forms.Label
Friend WithEvents RAMInfo As System.Windows.Forms.Label
Friend WithEvents RAMBox As System.Windows.Forms.TextBox
Friend WithEvents RAMSlider As System.Windows.Forms.TrackBar
Friend WithEvents RAMCustom As System.Windows.Forms.RadioButton
Friend WithEvents RAMDefault As System.Windows.Forms.RadioButton
Friend WithEvents HwInfoDef As System.Windows.Forms.Label
Friend WithEvents ToolTip1 As System.Windows.Forms.ToolTip
Friend WithEvents RAMControlsPanel As System.Windows.Forms.Panel
Friend WithEvents DiskSizeLabel As System.Windows.Forms.Label
Friend WithEvents DiskSize As System.Windows.Forms.NumericUpDown
Friend WithEvents DiskSizeLabelMB As System.Windows.Forms.Label
Friend WithEvents RAMCustomInvalidSize As System.Windows.Forms.Label
Friend WithEvents DiskSizeFrame As System.Windows.Forms.Panel
Friend WithEvents DiskInfo As System.Windows.Forms.Label
Friend WithEvents DiskExisting As System.Windows.Forms.RadioButton
Friend WithEvents DiskNew As System.Windows.Forms.RadioButton
Friend WithEvents DiskPathBrowse As System.Windows.Forms.Button
Friend WithEvents DiskPath As System.Windows.Forms.TextBox
Friend WithEvents DiskNone As System.Windows.Forms.RadioButton
Friend WithEvents AddFileBrowse As System.Windows.Forms.Button
Friend WithEvents AddFile As System.Windows.Forms.TextBox
Friend WithEvents AddInfo As System.Windows.Forms.Label
Friend WithEvents AddFileLabel As System.Windows.Forms.Label
Friend WithEvents AddEmulatorLabel As System.Windows.Forms.Label
Friend WithEvents AddEmulator As System.Windows.Forms.ComboBox
Friend WithEvents AddName As System.Windows.Forms.TextBox
Friend WithEvents AddNameLabel As System.Windows.Forms.Label
Friend WithEvents HwEmulator As System.Windows.Forms.ComboBox
End Class

439
frmNewMac.es-MX.resx Normal file
View File

@ -0,0 +1,439 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="cmdCancel.Text" xml:space="preserve">
<value>Cancelar</value>
</data>
<data name="cmdNext.Text" xml:space="preserve">
<value>&amp;Siguiente &gt;</value>
</data>
<data name="cmdBack.Text" xml:space="preserve">
<value>&lt; A&amp;tras</value>
</data>
<data name="CreateNoWizardLabel.Text" xml:space="preserve">
<value>Recomendado para la mayoría de usuarios. Crea una Mac en base al sistema que desee instalar.</value>
</data>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="CreateNoWizard.Size" type="System.Drawing.Size, System.Drawing">
<value>95, 17</value>
</data>
<data name="CreateNoWizard.Text" xml:space="preserve">
<value>&amp;Crear una Mac</value>
</data>
<data name="CreateAddExistLabel.Text" xml:space="preserve">
<value>Para usuarios de Basilisk, SheepShaver y PearPC. Crea una Mac en base al archivo de configuración de estos emuladores.</value>
</data>
<data name="CreateAddExist.Size" type="System.Drawing.Size, System.Drawing">
<value>198, 17</value>
</data>
<data name="CreateAddExist.Text" xml:space="preserve">
<value>Crear una Mac en base a un &amp;archivo</value>
</data>
<data name="CreateNormalLabel.Text" xml:space="preserve">
<value>Recomendado para usuarios avanzados. Crea una Mac guiandolo para incrementar o reducir los recursos para esta.</value>
</data>
<data name="CreateNormal.Size" type="System.Drawing.Size, System.Drawing">
<value>126, 17</value>
</data>
<data name="CreateNormal.Text" xml:space="preserve">
<value>&amp;Personalizar una Mac</value>
</data>
<data name="CreateInfo.Size" type="System.Drawing.Size, System.Drawing">
<value>116, 13</value>
</data>
<data name="CreateInfo.Text" xml:space="preserve">
<value>Seleccione una opción:</value>
</data>
<data name="MacNameLabel.Text" xml:space="preserve">
<value>Dé un nombre a su Mac. Recuerde hacerlo descriptivo, algo como "Mac OS 7" o "iMac G3" son algunos ejemplos.</value>
</data>
<data name="MacNameBrowse.Text" xml:space="preserve">
<value>Examinar...</value>
</data>
<data name="AddNameLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>48, 13</value>
</data>
<data name="AddNameLabel.Text" xml:space="preserve">
<value>Nombre:</value>
</data>
<data name="AddFileLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>47, 13</value>
</data>
<data name="AddFileLabel.Text" xml:space="preserve">
<value>Archivo:</value>
</data>
<data name="AddEmulatorLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>55, 13</value>
</data>
<data name="AddEmulatorLabel.Text" xml:space="preserve">
<value>Emulador:</value>
</data>
<data name="AddInfo.Size" type="System.Drawing.Size, System.Drawing">
<value>211, 13</value>
</data>
<data name="AddInfo.Text" xml:space="preserve">
<value>Seleccione el archivo a añadir a la consola.</value>
</data>
<data name="AddFileBrowse.Text" xml:space="preserve">
<value>Examinar...</value>
</data>
<data name="HwInfoDef.Text" xml:space="preserve">
<value>Hardware recomendado para este sistema operativo:</value>
</data>
<data name="HwEmulatorLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>116, 13</value>
</data>
<data name="HwEmulatorLabel.Text" xml:space="preserve">
<value>Seleccione una opción:</value>
</data>
<data name="HwInfo.Size" type="System.Drawing.Size, System.Drawing">
<value>440, 65</value>
</data>
<data name="HwInfo.Text" xml:space="preserve">
<value>Seleccione el emulador que planea usar. Algunos emuladores corren algunas versiones
de Mac OS y System Software. Elija diferentes emuladores para listar diferentes versiones
de Mac OS. Recuerde que puede personalizar el hardware mostrado aqui, así que no se
preocupe si deseaba más memoria, espacio de disco o incluso otro CPU (Solo algunos
emuladores)</value>
</data>
<data name="HwRAMLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>51, 13</value>
</data>
<data name="HwRAMLabel.Text" xml:space="preserve">
<value>Memoria:</value>
</data>
<data name="HwDiskLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>89, 13</value>
</data>
<data name="HwDiskLabel.Text" xml:space="preserve">
<value>Espacio en disco:</value>
</data>
<data name="RAMInfo.Location" type="System.Drawing.Point, System.Drawing">
<value>22, 3</value>
</data>
<data name="RAMInfo.Size" type="System.Drawing.Size, System.Drawing">
<value>447, 78</value>
</data>
<data name="RAMInfo.Text" xml:space="preserve">
<value>Una Mac necsita memoria para arrancar el sistema, y las aplicaciones la necesitan para
ejecutarse. Una versión reciente de Mac OS requiere más memoria, al igual que aplicaciones
pesadas. Se recomienda que use el valor recomendado a menos de que desee correr
aplicaciones más pesadas.
La memoria recomendada es [ %m MB ]</value>
</data>
<data name="RAMCustom.Location" type="System.Drawing.Point, System.Drawing">
<value>25, 111</value>
</data>
<data name="RAMCustom.Size" type="System.Drawing.Size, System.Drawing">
<value>173, 17</value>
</data>
<data name="RAMCustom.Text" xml:space="preserve">
<value>Usar esta cantidad de memoria</value>
</data>
<data name="RAMDefault.Location" type="System.Drawing.Point, System.Drawing">
<value>25, 88</value>
</data>
<data name="RAMDefault.Size" type="System.Drawing.Size, System.Drawing">
<value>169, 17</value>
</data>
<data name="RAMDefault.Text" xml:space="preserve">
<value>Usar la memoria recomendada</value>
</data>
<data name="RAMControlsPanel.Location" type="System.Drawing.Point, System.Drawing">
<value>25, 128</value>
</data>
<data name="RAMCustomInvalidSize.Size" type="System.Drawing.Size, System.Drawing">
<value>233, 13</value>
</data>
<data name="RAMCustomInvalidSize.Text" xml:space="preserve">
<value>Por favor utilize un valor válido entre %n y %x</value>
</data>
<data name="DiskNew.Location" type="System.Drawing.Point, System.Drawing">
<value>22, 99</value>
</data>
<data name="DiskNew.Size" type="System.Drawing.Size, System.Drawing">
<value>127, 17</value>
</data>
<data name="DiskNew.Text" xml:space="preserve">
<value>Crear un nuevo disco</value>
</data>
<data name="DiskExisting.Location" type="System.Drawing.Point, System.Drawing">
<value>22, 115</value>
</data>
<data name="DiskExisting.Size" type="System.Drawing.Size, System.Drawing">
<value>137, 17</value>
</data>
<data name="DiskExisting.Text" xml:space="preserve">
<value>Usar un disco existente</value>
</data>
<data name="DiskNone.Location" type="System.Drawing.Point, System.Drawing">
<value>22, 132</value>
</data>
<data name="DiskNone.Size" type="System.Drawing.Size, System.Drawing">
<value>104, 17</value>
</data>
<data name="DiskNone.Text" xml:space="preserve">
<value>No usar un disco</value>
</data>
<assembly alias="mscorlib" name="mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
<data name="DiskInfo.AutoSize" type="System.Boolean, mscorlib">
<value>True</value>
</data>
<data name="DiskInfo.Location" type="System.Drawing.Point, System.Drawing">
<value>22, 16</value>
</data>
<data name="DiskInfo.Size" type="System.Drawing.Size, System.Drawing">
<value>408, 39</value>
</data>
<data name="DiskInfo.Text" xml:space="preserve">
<value>Una Mac necesita un disco para instalar el sistema operativo. Puede crear un nuevo
disco para instalar Mac OS (O Linux) o puede usar disco existente con un sistema
preinstalado</value>
</data>
<data name="DiskPathBrowse.Location" type="System.Drawing.Point, System.Drawing">
<value>391, 62</value>
</data>
<data name="DiskPathBrowse.Size" type="System.Drawing.Size, System.Drawing">
<value>75, 23</value>
</data>
<data name="DiskPathBrowse.Text" xml:space="preserve">
<value>Examinar...</value>
</data>
<data name="DiskPath.Location" type="System.Drawing.Point, System.Drawing">
<value>22, 64</value>
</data>
<data name="DiskSizeFrame.Location" type="System.Drawing.Point, System.Drawing">
<value>197, 91</value>
</data>
<data name="DiskSizeFrame.Size" type="System.Drawing.Size, System.Drawing">
<value>189, 25</value>
</data>
<data name="DiskSize.Location" type="System.Drawing.Point, System.Drawing">
<value>97, 2</value>
</data>
<data name="DiskSizeLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>93, 13</value>
</data>
<data name="DiskSizeLabel.Text" xml:space="preserve">
<value>Tamaño del disco:</value>
</data>
<data name="DiskSizeLabelMB.Location" type="System.Drawing.Point, System.Drawing">
<value>162, 7</value>
</data>
<data name="Description.Text" xml:space="preserve">
<value>Puede crear una nueva Mac o agregar una existente a la consola</value>
</data>
<data name="DescriptionName.Size" type="System.Drawing.Size, System.Drawing">
<value>60, 13</value>
</data>
<data name="DescriptionName.Text" xml:space="preserve">
<value>Opciones</value>
</data>
<data name="WelcomeDescription.Text" xml:space="preserve">
<value>Este asistente le ayuda a crear y configurar una nueva Mac o añadir una ya existente a la consola de Virtual Mac.
La configuración es almacenada en un archivo .mcf
Para continuar, haga click en Siguiente.</value>
</data>
<data name="WelcomeTitle.Text" xml:space="preserve">
<value>Bienvenido al Asistente para Nueva Mac</value>
</data>
<data name="EndTitle.Text" xml:space="preserve">
<value>Completando el Asistente para Nueva Mac</value>
</data>
<data name="EndInfo.Text" xml:space="preserve">
<value>Usted completó satisfactoriamente el Asistente para Nueva Mac. Su nueva Mac será creada con los siguientes atributos:</value>
</data>
<data name="EndMacNameLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>48, 13</value>
</data>
<data name="EndMacNameLabel.Text" xml:space="preserve">
<value>Nombre:</value>
</data>
<data name="EndRAMLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>76, 13</value>
</data>
<data name="EndRAMLabel.Text" xml:space="preserve">
<value>Memoria RAM:</value>
</data>
<data name="EndDiskPathLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>36, 13</value>
</data>
<data name="EndDiskPathLabel.Text" xml:space="preserve">
<value>Disco:</value>
</data>
<data name="EndInfoFinish.Text" xml:space="preserve">
<value>Para cerrar este Asistente y crear la Mac, haga click en Finalizar.</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAMAEBAQAAAABAAoAQAANgAAACAgEAAAAAQA6AIAAF4BAAAwMBAAAAAEAGgGAABGBAAAKAAAABAA
AAAgAAAAAQAEAAAAAACAAAAAAAAAAAAAAAAQAAAAEAAAAAAAAAAAAIAAAIAAAACAgACAAAAAgACAAICA
AACAgIAAwMDAAAAA/wAA/wAAAP//AP8AAAD/AP8A//8AAP///wAAiIiIiIiIAAjoiIiIiI6AiO6O7u7o
7uiI6IiIiIiOiIgAAAAAAACIiAAAAAAAAIiIAAAAAAAAiIgAAAAAAACIiAAAAAAAAIiIAAAAAAAAiIgA
AAAAAACIiAAAAAAAAIiIAAAAAAAAiIgAAAAAAACICIiIiIiIiIAAiIiIiIiIAMADAACAAQAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAEAAMADAAAoAAAAIAAAAEAA
AAABAAQAAAAAAAACAAAAAAAAAAAAABAAAAAQAAAAAAAAAAAAgAAAgAAAAICAAIAAAACAAIAAgIAAAICA
gADAwMAAAAD/AAD/AAAA//8A/wAAAP8A/wDQ0AAA////AAAAAAAAAAAAAAAAAAAAAAAAAIiIiIiIiIiI
iIiIiAAAAIiIiIiIiIiIiIiIiIiIAACI7uiIiIiIiIiIiI7u6AAIju7uiIiIiIiIiIiO7uiACI7u7oju
7u7u7u6Iju7ogAiI7uiIiIiIiIiIiI7u6IAIiIiIiIiIiIiIiIiIiIiACIiAAAAAAAAAAAAAAAiIgAiI
gAAAAAAAAAAAAAAIiIAIiIAAAAAAAAAAAAAACIiACIiAAAAAAAAAAAAAAAiIgAiIgAAAAAAAAAAAAAAI
iIAIiIAAAAAAAAAAAAAACIiACIiAAAAAAAAAAAAAAAiIgAiIgAAAAAAAAAAAAAAIiIAIiIAAAAAAAAAA
AAAACIiACIiAAAAAAAAAAAAAAAiIgAiIgAAAAAAAAAAAAAAIiIAIiIAAAAAAAAAAAAAACIiACIiAAAAA
AAAAAAAAAAiIgAiIgAAAAAAAAAAAAAAIiIAIiIAAAAAAAAAAAAAACIiACIiAAAAAAAAAAAAAAAiIgAiI
gAAAAAAAAAAAAAAIiIAIiIAAAAAAAAAAAAAACIiACIiAAAAAAAAAAAAAAAiIgAiIiIiIiIiIiIiIiIiI
iIAAiIiIiIiIiIiIiIiIiIgAAIiIiIiIiIiIiIiIiIiIAAAAiIiIiIiIiIiIiIiIAAAAAAAAAAAAAAAA
AAAAAAAA//////AAAA/AAAADwAAAA4AAAAGAAAABgAAAAYAAAAGAAAABgAAAAYAAAAGAAAABgAAAAYAA
AAGAAAABgAAAAYAAAAGAAAABgAAAAYAAAAGAAAABgAAAAYAAAAGAAAABgAAAAYAAAAGAAAABgAAAAcAA
AAPAAAAD8AAAD/////8oAAAAMAAAAGAAAAABAAQAAAAAAIAEAAAAAAAAAAAAABAAAAAQAAAAAAAAAAAA
gAAAgAAAAICAAIAAAACAAIAAgIAAAMDAwACAgIAAAAD/AAD/AAAA//8A/wAAAP8A/wDZ2QAA////AAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAd3d3d3d3d3d3d3d3d3d3d3cAAAAAAAB3d3d3d3d3d3d3d3
d3d3d3d3d3AAAAAAd3d3d3d3d3d3d3d3d3d3d3d3d3cAAAAHd37ud3d3d3d3d3d3d3d3d3d+7ndwAAB3
d+7u53d3d3d3d3d3d3d3d3fu7ud3AAB3fu7u7nd3d3d3d3d3d3d3d37u7u53AAd3fu7u7nd+7u7u7u7u
7u7nd37u7u53cAd3fu7u7nd+7u7u7u7u7u7nd37u7u53cAd3d+7u53d3d3d3d3d3d3d3d3fu7ud3cAd3
d37ud3d3d3d3d3d3d3d3d3d+7nd3cAd3d3d3d3d3d3d3d3d3d3d3d3d3d3d3cAd3d3AAAAAAAAAAAAAA
AAAAAAAAB3d3cAd3d3AAAAAAAAAAAAAAAAAAAAAAB3d3cAd3d3AAAAAAAAAAAAAAAAAAAAAAB3d3cAd3
d3AAAAAAAAAAAAAAAAAAAAAAB3d3cAd3d3AAAAAAAAAAAAAAAAAAAAAAB3d3cAd3d3AAAAAAAAAAAAAA
AAAAAAAAB3d3cAd3d3AAAAAAAAAAAAAAAAAAAAAAB3d3cAd3d3AAAAAAAAAAAAAAAAAAAAAAB3d3cAd3
d3AAAAAAAAAAAAAAAAAAAAAAB3d3cAd3d3AAAAAAAAAAAAAAAAAAAAAAB3d3cAd3d3AAAAAAAAAAAAAA
AAAAAAAAB3d3cAd3d3AAAAAAAAAAAAAAAAAAAAAAB3d3cAd3d3AAAAAAAAAAAAAAAAAAAAAAB3d3cAd3
d3AAAAAAAAAAAAAAAAAAAAAAB3d3cAd3d3AAAAAAAAAAAAAAAAAAAAAAB3d3cAd3d3AAAAAAAAAAAAAA
AAAAAAAAB3d3cAd3d3AAAAAAAAAAAAAAAAAAAAAAB3d3cAd3d3AAAAAAAAAAAAAAAAAAAAAAB3d3cAd3
d3AAAAAAAAAAAAAAAAAAAAAAB3d3cAd3d3AAAAAAAAAAAAAAAAAAAAAAB3d3cAd3d3AAAAAAAAAAAAAA
AAAAAAAAB3d3cAd3d3AAAAAAAAAAAAAAAAAAAAAAB3d3cAd3d3AAAAAAAAAAAAAAAAAAAAAAB3d3cAd3
d3AAAAAAAAAAAAAAAAAAAAAAB3d3cAd3d3AAAAAAAAAAAAAAAAAAAAAAB3d3cAd3d3AAAAAAAAAAAAAA
AAAAAAAAB3d3cAd3d3AAAAAAAAAAAAAAAAAAAAAAB3d3cAd3d3AAAAAAAAAAAAAAAAAAAAAAB3d3cAd3
d3AAAAAAAAAAAAAAAAAAAAAAB3d3cAB3d3d3d3d3d3d3d3d3d3d3d3d3d3d3AAB3d3d3d3d3d3d3d3d3
d3d3d3d3d3d3AAAHd3d3d3d3d3d3d3d3d3d3d3d3d3dwAAAAd3d3d3d3d3d3d3d3d3d3d3d3d3cAAAAA
B3d3d3d3d3d3d3d3d3d3d3d3d3AAAAAAAAd3d3d3d3d3d3d3d3d3d3d3cAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAP///////wAA/gAAAAB/AAD4AAAAAB8AAPAAAAAADwAA4AAAAAAHAADAAAAAAAMAAMAA
AAAAAwAAgAAAAAABAACAAAAAAAEAAIAAAAAAAQAAgAAAAAABAACAAAAAAAEAAIAAAAAAAQAAgAAAAAAB
AACAAAAAAAEAAIAAAAAAAQAAgAAAAAABAACAAAAAAAEAAIAAAAAAAQAAgAAAAAABAACAAAAAAAEAAIAA
AAAAAQAAgAAAAAABAACAAAAAAAEAAIAAAAAAAQAAgAAAAAABAACAAAAAAAEAAIAAAAAAAQAAgAAAAAAB
AACAAAAAAAEAAIAAAAAAAQAAgAAAAAABAACAAAAAAAEAAIAAAAAAAQAAgAAAAAABAACAAAAAAAEAAIAA
AAAAAQAAgAAAAAABAACAAAAAAAEAAIAAAAAAAQAAgAAAAAABAADAAAAAAAMAAMAAAAAAAwAA4AAAAAAH
AADwAAAAAA8AAPgAAAAAHwAA/gAAAAB/AAD///////8AAA==
</value>
</data>
<data name="$this.Text" xml:space="preserve">
<value>Asistente para nueva Mac</value>
</data>
</root>

2354
frmNewMac.resx Normal file

File diff suppressed because it is too large Load Diff

634
frmNewMac.vb Normal file
View File

@ -0,0 +1,634 @@
Public Class frmNewMac
Public HostRAM As Long = My.Computer.Info.TotalPhysicalMemory / 1024 / 1024
Public NameWithoutPath As String
Public Sub SetFinalData()
EndMacName.Text = NameWithoutPath
EndRAM.Text = RAMBox.Text & " MB"
EndDiskPath.Text = DiskSize.Value & " MB"
End Sub
Private Sub cmdCancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdCancel.Click
Me.Close()
End Sub
Private Sub cmdNext_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdNext.Click
If My.Computer.FileSystem.FileExists(My.Application.Info.DirectoryPath & "\Tools\qemu-img.exe") = False Then
DiskExisting.Checked = True
DiskNew.Enabled = False
End If
If Welcome.Visible = True And Welcome.Enabled = True Then
CreateFrame.Enabled = True
CreateFrame.BringToFront()
MovePage(Welcome, Wizard)
CreateNoWizard.Focus()
cmdBack.Enabled = True
Exit Sub
End If
If Wizard.Visible = True And Wizard.Enabled = True Then
If CreateFrame.Visible = True And CreateFrame.Enabled = True Then
If CreateNormal.Checked = True Or CreateNoWizard.Checked = True Then
MovePage(CreateFrame, MacNameFrame)
MacName.Focus()
MacName.SelectAll()
Else
MovePage(CreateFrame, AddFromFileFrame)
cmdNext.Enabled = False
End If
Exit Sub
End If
If AddFromFileFrame.Visible = True And AddFromFileFrame.Enabled = True Then
cmdNext.Text = "Finish"
cmdNext.Focus()
MovePage(Wizard, EndWizard)
Exit Sub
End If
If MacNameFrame.Visible = True And MacNameFrame.Enabled = True Then
If System.IO.Path.GetFileNameWithoutExtension(MacName.Text) = MacName.Text Then
NameWithoutPath = MacName.Text
End If
If My.Computer.FileSystem.DirectoryExists(My.Settings.DefaultMacFolder & "\" & NameWithoutPath) = True Then
MsgBox("This Mac already exists in ''My Macs\" & NameWithoutPath & "''. Please use a different name, or save the Mac to another location.", MsgBoxStyle.Exclamation)
Exit Sub
Else
MovePage(MacNameFrame, HwPresetsFrame)
AutoSelectOS()
End If
Exit Sub
End If
If HwPresetsFrame.Visible = True And HwPresetsFrame.Enabled = True Then
If CreateNoWizard.Checked = True Then
SetFinalData()
cmdNext.Text = "Finish"
MovePage(Wizard, EndWizard)
cmdNext.Focus()
Else
MovePage(HwPresetsFrame, RAMFrame)
End If
Exit Sub
End If
If RAMFrame.Visible = True And RAMFrame.Enabled = True Then
MovePage(RAMFrame, DiskFrame)
GoTo EndOfInstruction
End If
If DiskFrame.Visible = True And DiskFrame.Enabled = True Then
SetFinalData()
cmdNext.Text = "Finish"
MovePage(Wizard, EndWizard)
cmdNext.Focus()
Exit Sub
End If
End If
If EndWizard.Visible = True And EndWizard.Enabled = True Then
CreateMac()
Me.Close()
Exit Sub
End If
EndOfInstruction:
End Sub
Private Sub cmdBack_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdBack.Click
If Wizard.Visible = True And Wizard.Enabled = True Then
If CreateFrame.Visible = True And CreateFrame.Enabled = True Then
cmdBack.Enabled = False
MovePage(Wizard, Welcome)
GoTo EndOfInstruction
End If
If AddFromFileFrame.Visible = True And AddFromFileFrame.Enabled = True Then
MovePage(AddFromFileFrame, CreateFrame)
GoTo EndOfInstruction
End If
If MacNameFrame.Visible = True And MacNameFrame.Enabled = True Then
MovePage(MacNameFrame, CreateFrame)
GoTo EndOfInstruction
End If
If HwPresetsFrame.Visible = True And HwPresetsFrame.Enabled = True Then
MovePage(HwPresetsFrame, MacNameFrame)
MacName.Focus()
MacName.SelectAll()
GoTo EndOfInstruction
End If
If RAMFrame.Visible = True And RAMFrame.Enabled = True Then
MovePage(RAMFrame, HwPresetsFrame)
GoTo EndOfInstruction
End If
If DiskFrame.Visible = True And DiskFrame.Enabled = True Then
MovePage(DiskFrame, RAMFrame)
GoTo EndOfInstruction
End If
End If
If EndWizard.Visible = True And EndWizard.Enabled = True Then
cmdNext.Text = "Next >"
MovePage(EndWizard, Wizard)
GoTo EndOfInstruction
End If
EndOfInstruction:
End Sub
Public Sub CreateMac()
Dim Emulator As String = ""
If CreateAddExist.Checked = True Then '//Checking "Add from file" to be checked, so we create from file
Select Case AddEmulator.SelectedItem.ToString
Case "Mini vMac Batch"
Emulator = "vMacBatch"
Case "Virtual Mac MvM File"
Emulator = "vMac"
Case "Basilisk"
Emulator = "BII"
Case "SheepShaver"
Emulator = "SheepShaver"
Case "PearPC"
Emulator = "PearPC"
Case "QEMU Windows Batch"
Emulator = "QEMUBatch"
End Select
ConfigFileHandler.CreateFromFile(AddFile.Text, Emulator, AddName.Text)
ElseIf CreateNormal.Checked = True Or CreateNoWizard.Checked = True Then '//If any of the Normal is checked, create from file
Dim UseDisk As String = ""
If DiskExisting.Checked = True Then
UseDisk = "Exist"
ElseIf DiskNone.Checked = True Then
UseDisk = "None"
ElseIf DiskNew.Checked = True Then
UseDisk = "New"
End If
Select Case HwEmulator.SelectedIndex
Case 0
Emulator = "vMac"
Case 1
Emulator = "BII"
Case 2
Emulator = "SheepShaver"
Case 3
Emulator = "PearPC"
Case 4
Emulator = "QEMUBatch"
End Select
ConfigFileHandler.Create(NameWithoutPath, MacName.Text, Emulator, RAMBox.Text, UseDisk, DiskSize.Value, DiskPath.Text)
End If
End Sub
Public Sub DisableAllPages()
EndWizard.Enabled = False
DiskFrame.Enabled = False
RAMFrame.Enabled = False
HwPresetsFrame.Enabled = False
AddFromFileFrame.Enabled = False
MacNameFrame.Enabled = False
CreateFrame.Enabled = False
Wizard.Enabled = False
Welcome.Enabled = False
End Sub
Public Sub MovePage(ByVal CurrentTab As System.Windows.Forms.Panel, ByVal NewTab As System.Windows.Forms.Panel)
NewTab.Enabled = True
NewTab.BringToFront()
CurrentTab.Enabled = False
End Sub
Public Sub DataProgrammer(ByVal OSType As String)
Select Case OSType
Case "Mac6"
If HostRAM < 8 Then
MsgBox("You have lower memory than the required to run System Software 6. Set a lower value for memory, and install an earlier version of MacOS/System Software", MsgBoxStyle.Exclamation, "Insufficient Memory")
RAMBox.Text = RAMSlider.Maximum
End If
RAMBox.Text = 8
DiskSize.Value = 100
RAMInfo.Text = Replace(RAMInfo.Text, "%m", "8")
HwRAM.Text = 8 & " MB"
HwDisk.Text = 128 & " MB"
HwCPU.Text = "Motorola 68000"
Case "Mac7"
If HostRAM < 40 Then
MsgBox("You have lower memory than the required to run System Software 7. Set a lower value for memory, and install an earlier version of MacOS/System Software", MsgBoxStyle.Exclamation, "System Memory Low")
RAMBox.Text = RAMSlider.Maximum
End If
RAMBox.Text = 16
DiskSize.Value = 250
RAMInfo.Text = Replace(RAMInfo.Text, "%m", 16)
HwRAM.Text = 16 & " MB"
HwDisk.Text = 250 & " MB"
HwCPU.Text = "Motorola 68040"
Case "Mac7Pro"
If HostRAM < 64 Then
MsgBox("You have lower memory than the required to run MacOS 7. Set a lower value for memory, and install an earlier version of MacOS/System Software", MsgBoxStyle.Exclamation, "System Memory Low")
RAMBox.Text = RAMSlider.Maximum
End If
RAMBox.Text = 24
DiskSize.Value = 250
RAMInfo.Text = Replace(RAMInfo.Text, "%m", 24)
HwRAM.Text = 24 & " MB"
HwDisk.Text = 250 & " MB"
HwCPU.Text = "PowerPC G3"
Case "Mac8"
If HostRAM < 128 Then
MsgBox("You have lower memory than the required to run MacOS 8. Install an earlier version of MacOS/System Software", MsgBoxStyle.Exclamation, "System Memory Low")
RAMBox.Text = RAMSlider.Maximum
End If
RAMBox.Text = 64
DiskSize.Value = 500
RAMInfo.Text = Replace(RAMInfo.Text, "%m", 64)
HwRAM.Text = 64 & " MB"
HwDisk.Text = 500 & " MB"
HwCPU.Text = "PowerPC G3"
Case "Mac9"
If HostRAM < 256 Then
MsgBox("You have lower memory than the required to run MacOS 9. Set a lower value for memory, and install an earlier version of MacOS/System Software", MsgBoxStyle.Exclamation, "System Memory Low")
RAMBox.Text = RAMSlider.Maximum
End If
RAMBox.Text = 256
DiskSize.Value = 1024
RAMInfo.Text = Replace(RAMInfo.Text, "%m", 256)
HwRAM.Text = 256 & " MB"
HwDisk.Text = 1024 & " MB"
HwCPU.Text = "PowerPC G3"
Case "Mac10"
If HostRAM < 384 Then
MsgBox("You have lower memory than the required to run Mac OS X. Set a lower value for memory, and install an earlier version of MacOS/System Software", MsgBoxStyle.Exclamation, "System Memory Low")
RAMBox.Text = RAMSlider.Maximum
End If
RAMBox.Text = 384
DiskSize.Value = 3072
RAMInfo.Text = Replace(RAMInfo.Text, "%m", 384)
HwRAM.Text = 384 & " MB"
HwDisk.Text = 3072 & " MB"
HwCPU.Text = "PowerPC G3"
Case "Debian"
If HostRAM < 400 Then
MsgBox("You have lower memory than the required to run Debian. Set a lower value for memory, and install an earlier version of MacOS/System Software", MsgBoxStyle.Exclamation, "System Memory Low")
RAMBox.Text = RAMSlider.Maximum
End If
RAMBox.Text = 400
DiskSize.Value = 4096
RAMInfo.Text = Replace(RAMInfo.Text, "%m", 400)
HwRAM.Text = 400 & " MB"
HwDisk.Text = 4096 & " MB"
HwCPU.Text = "PowerPC G3"
Case "Ubuntu"
If HostRAM < 400 Then
MsgBox("You have lower memory than the required to run Ubuntu. Set a lower value for memory, and install an earlier version of MacOS/System Software", MsgBoxStyle.Exclamation, "System Memory Low")
RAMBox.Text = RAMSlider.Maximum
End If
RAMBox.Text = 400
DiskSize.Value = 6144
RAMInfo.Text = Replace(RAMInfo.Text, "%m", 400)
HwRAM.Text = 400 & " MB"
HwDisk.Text = 6144 & " MB"
HwCPU.Text = "PowerPC G3"
Case "Linux"
If HostRAM < 400 Then
MsgBox("You have lower memory than the required to run Linux. Set a lower value for memory, and install an earlier version of MacOS/System Software", MsgBoxStyle.Exclamation, "System Memory Low")
RAMBox.Text = RAMSlider.Maximum
End If
RAMBox.Text = 400
DiskSize.Value = 4096
RAMInfo.Text = Replace(RAMInfo.Text, "%m", 400)
HwRAM.Text = 400 & " MB"
HwDisk.Text = 4096 & " MB"
HwCPU.Text = "PowerPC G3"
Case "Other"
If HostRAM < 256 Then
MsgBox("You have lower memory than the required to run Other. Set a lower value for memory, and install an earlier version of MacOS/System Software", MsgBoxStyle.Exclamation, "System Memory Low")
RAMBox.Text = RAMSlider.Maximum
End If
RAMBox.Text = 256
DiskSize.Value = 4096
RAMInfo.Text = Replace(RAMInfo.Text, "%m", 256)
HwRAM.Text = 256 & " MB"
HwDisk.Text = 4096 & " MB"
HwCPU.Text = "PowerPC G3"
End Select
'Place in cmdNext.Click code area
MacName.Text = My.Settings.DefaultMacFolder & "\" & NameWithoutPath & "\" & NameWithoutPath & ".mcf"
DiskPath.Text = My.Settings.DefaultMacFolder & "\" & NameWithoutPath & "\" & NameWithoutPath & ".dsk"
End Sub
Public Function AutoSelectOS() As String
Dim OS As String = "Other"
Dim OsFound As Long
OsFound = InStr(MacName.Text, "System Software")
If OsFound <> 0 Then
OS = "Mac6"
HwEmulator.SelectedIndex = 0
HwOSList.SelectedIndex = 0
GoTo OSDetected
End If
OsFound = InStr(MacName.Text, " 6")
If OsFound <> 0 Then
OS = "Mac6"
HwEmulator.SelectedIndex = 0
HwOSList.SelectedIndex = 0
GoTo OSDetected
End If
OsFound = InStr(MacName.Text, " 7")
If OsFound <> 0 Then
OS = "Mac7"
HwEmulator.SelectedIndex = 0
HwOSList.SelectedIndex = 1
GoTo OSDetected
End If
OsFound = InStr(MacName.Text, " 7.")
If OsFound <> 0 Then
OS = "Mac75"
HwEmulator.SelectedIndex = 1
HwOSList.SelectedIndex = 1
GoTo OSDetected
End If
OsFound = InStr(MacName.Text, " 8")
If OsFound <> 0 Then
OS = "Mac8"
HwEmulator.SelectedIndex = 2
HwOSList.SelectedIndex = 1
GoTo OSDetected
End If
OsFound = InStr(MacName.Text, " 9")
If OsFound <> 0 Then
OS = "Mac9"
HwEmulator.SelectedIndex = 2
HwOSList.SelectedIndex = 2
GoTo OSDetected
End If
OsFound = InStr(MacName.Text, " Classic")
If OsFound <> 0 Then
OS = "Mac9"
HwEmulator.SelectedIndex = 4
HwOSList.SelectedIndex = 0
GoTo OSDetected
End If
OsFound = InStr(MacName.Text, " 10")
If OsFound <> 0 Then
OS = "Mac10"
HwEmulator.SelectedIndex = 3
HwOSList.SelectedIndex = 0
GoTo OSDetected
End If
OsFound = InStr(MacName.Text, " X")
If OsFound <> 0 Then
OS = "Mac10"
HwEmulator.SelectedIndex = 4
HwOSList.SelectedIndex = 1
GoTo OSDetected
End If
OsFound = InStr(MacName.Text, "Debian")
If OsFound <> 0 Then
OS = "Debian"
HwEmulator.SelectedIndex = 3
HwOSList.SelectedIndex = 1
GoTo OSDetected
End If
OsFound = InStr(MacName.Text, "Ubuntu")
If OsFound <> 0 Then
OS = "Ubuntu"
HwEmulator.SelectedIndex = 4
HwOSList.SelectedIndex = 3
GoTo OSDetected
End If
OsFound = InStr(MacName.Text, "Linux")
If OsFound <> 0 Then
OS = "Linux"
HwEmulator.SelectedIndex = 3
HwOSList.SelectedIndex = 2
GoTo OSDetected
End If
HwEmulator.SelectedIndex = 4
HwOSList.SelectedIndex = 0
OSDetected:
Return OS
End Function
Private Sub SaveMac_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MacNameBrowse.Click
Save.Filter = "Virtual Mac Configuration File (*.mcf)|*.mcf|All files (*.*)|*.*"
Save.ShowDialog()
If Save.FileName <> "" Then
MacName.Text = Save.FileName
End If
End Sub
Private Sub frmNewMac_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
RAMSlider.TickFrequency = HostRAM / 20
RAMSlider.Maximum = HostRAM
RAMCustomInvalidSize.Text = Replace(Replace(RAMCustomInvalidSize.Text, "%x", RAMSlider.Maximum), "%n", RAMSlider.Minimum)
DisableAllPages()
MovePage(Wizard, Welcome)
AddEmulator.SelectedIndex = 0
HwEmulator.SelectedIndex = 0
End Sub
Private Sub RAM_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RAMBox.TextChanged
If RAMBox.Text = "" Then
RAMSlider.Value = RAMSlider.Minimum
cmdNext.Enabled = False
RAMCustomInvalidSize.Visible = True
Else
If RAMBox.Text > RAMSlider.Maximum Then
RAMSlider.Value = RAMSlider.Maximum
cmdNext.Enabled = False
RAMCustomInvalidSize.Visible = True
Else
If RAMBox.Text < RAMSlider.Minimum Then
RAMSlider.Value = RAMSlider.Minimum
cmdNext.Enabled = False
RAMCustomInvalidSize.Visible = True
Else
RAMSlider.Value = RAMBox.Text
RAMCustomInvalidSize.Visible = False
cmdNext.Enabled = True
End If
End If
End If
End Sub
Private Sub RAMSlider_Scroll(ByVal sender As Object, ByVal e As System.EventArgs) Handles RAMSlider.Scroll
RAMBox.Text = RAMSlider.Value
End Sub
Private Sub RAMDefault_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RAMDefault.CheckedChanged, RAMCustom.CheckedChanged
If RAMCustom.Checked = True Then
RAMControlsPanel.Enabled = True
RAMControlsPanel.Visible = True
Else
RAMControlsPanel.Enabled = False
RAMControlsPanel.Visible = False
End If
End Sub
Private Sub OSList_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles HwOSList.SelectedIndexChanged
Select Case HwOSList.SelectedItem.ToString
Case "System Software 6"
DataProgrammer("Mac6")
Case "System Software 7"
DataProgrammer("Mac7")
Case "System Software 7 Pro"
DataProgrammer("Mac7Pro")
Case "Mac OS 8"
DataProgrammer("Mac8")
Case "Mac OS 9"
DataProgrammer("Mac9")
Case "Mac OS X"
DataProgrammer("Mac10")
Case "Debian"
DataProgrammer("Debian")
Case "Lubuntu"
DataProgrammer("Ubuntu")
Case "Other Linux"
DataProgrammer("Linux")
Case "Other"
DataProgrammer("Other")
End Select
End Sub
Private Sub HwEmulator_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles HwEmulator.SelectedIndexChanged
Select Case HwEmulator.SelectedIndex
Case 0
HwOSList.Items.Clear()
HwOSList.Items.Add("System Software 6")
HwOSList.Items.Add("System Software 7")
HwOSList.Items.Add("Other")
HwOSList.SelectedIndex = 0
Case 1
HwOSList.Items.Clear()
HwOSList.Items.Add("System Software 7")
HwOSList.Items.Add("System Software 7 Pro")
HwOSList.Items.Add("Mac OS 8")
HwOSList.Items.Add("Other")
HwOSList.SelectedIndex = 0
Case 2
HwOSList.Items.Clear()
HwOSList.Items.Add("System Software 7 Pro")
HwOSList.Items.Add("Mac OS 8")
HwOSList.Items.Add("Mac OS 9")
HwOSList.Items.Add("Other")
HwOSList.SelectedIndex = 0
Case 3
HwOSList.Items.Clear()
HwOSList.Items.Add("Mac OS X")
HwOSList.Items.Add("Debian")
HwOSList.Items.Add("Lubuntu")
HwOSList.Items.Add("Other Linux")
HwOSList.Items.Add("Other")
HwOSList.SelectedIndex = 0
Case 4
HwOSList.Items.Clear()
HwOSList.Items.Add("Mac OS 9")
HwOSList.Items.Add("Mac OS X")
HwOSList.Items.Add("Debian")
HwOSList.Items.Add("Lubuntu")
HwOSList.Items.Add("Other Linux")
HwOSList.Items.Add("Other")
HwOSList.SelectedIndex = 0
End Select
End Sub
Private Sub BrowseDiskLocation_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DiskPathBrowse.Click
If DiskNew.Checked = True Then
Save.Filter = "Disk files (*.dsk)|*.dsk|Disk Image Files (*.img)|*.img|All files (*.*)|*.*"
Save.ShowDialog()
If Save.FileName <> "" Then
DiskPath.Text = Save.FileName
End If
Else
Open.Filter = "Disk files (*.dsk)|*.dsk|Disk Image Files (*.img)|*.img|All files (*.*)|*.*"
Open.ShowDialog()
If Open.FileName <> "" Then
DiskPath.Text = Open.FileName
End If
End If
End Sub
Private Sub MacName_GotFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles MacName.GotFocus
MacName.SelectAll()
End Sub
Private Sub Disk_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DiskNew.CheckedChanged, DiskExisting.CheckedChanged
If DiskNew.Checked = True Then
DiskSizeFrame.Visible = True
Else
DiskSizeFrame.Visible = False
End If
If DiskNone.Checked = True Then
DiskPath.Enabled = False
DiskPathBrowse.Enabled = False
Else
DiskPath.Enabled = True
DiskPathBrowse.Enabled = True
End If
End Sub
Private Sub AEBrowseFile_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AddFileBrowse.Click
Open.Filter = "Batch files|*.bat|Basilisk/SheepShaver preferences file|*_prefs|PearPC Config Files|*.cfg|Virtual Mac Mini vMac Configuration File|*.mcf|All files|*.*"
Select Case AddEmulator.SelectedIndex
Case 0
Open.FilterIndex = 0
Case 1
Open.FilterIndex = 3
Case 2
Open.FilterIndex = 1
Case 3
Open.FilterIndex = 1
Case 4
Open.FilterIndex = 2
Case 5
Open.FilterIndex = 0
Case Else
Open.FilterIndex = 4
End Select
Open.ShowDialog()
If Open.FileName <> "" Then
AddFile.Text = Open.FileName
End If
End Sub
Private Sub AEName_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AddName.TextChanged
If AddName.Text <> "" And AddFile.Text <> "" Then
cmdNext.Enabled = True
Else
cmdNext.Enabled = False
End If
End Sub
Private Sub AEFile_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AddFile.TextChanged
If AddName.Text <> "" And AddFile.Text <> "" Then
cmdNext.Enabled = True
Else
cmdNext.Enabled = False
End If
End Sub
End Class

615
frmOptions.Designer.vb generated Normal file
View File

@ -0,0 +1,615 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> Partial Class frmOptions
#Region "Windows Form Designer generated code "
<System.Diagnostics.DebuggerNonUserCode()> Public Sub New()
MyBase.New()
'This call is required by the Windows Form Designer.
InitializeComponent()
End Sub
'Form overrides dispose to clean up the component list.
<System.Diagnostics.DebuggerNonUserCode()> Protected Overloads Overrides Sub Dispose(ByVal Disposing As Boolean)
If Disposing Then
If Not components Is Nothing Then
components.Dispose()
End If
End If
MyBase.Dispose(Disposing)
End Sub
'Required by the Windows Form Designer
Private components As System.ComponentModel.IContainer
Public ToolTip1 As System.Windows.Forms.ToolTip
Public BrowseOpen As System.Windows.Forms.OpenFileDialog
Public WithEvents cmdOK As System.Windows.Forms.Button
Public WithEvents cmdCancel As System.Windows.Forms.Button
Public WithEvents FolderFrame As System.Windows.Forms.GroupBox
'NOTE: The following procedure is required by the Windows Form Designer
'It can be modified using the Windows Form Designer.
'Do not modify it using the code editor.
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmOptions))
Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components)
Me.cmdOK = New System.Windows.Forms.Button()
Me.cmdCancel = New System.Windows.Forms.Button()
Me.FolderFrame = New System.Windows.Forms.GroupBox()
Me.FolderAppCurrent = New System.Windows.Forms.Label()
Me.FolderAppCurrentLabel = New System.Windows.Forms.Label()
Me.FolderNewMacLabel = New System.Windows.Forms.Label()
Me.FolderNewMac = New System.Windows.Forms.TextBox()
Me.FolderNewMacBrowse = New System.Windows.Forms.Button()
Me.ROMFrame = New System.Windows.Forms.GroupBox()
Me.ROMNoteNoROM = New System.Windows.Forms.Label()
Me.ROMSS = New System.Windows.Forms.TextBox()
Me.ROMSSLabel = New System.Windows.Forms.Label()
Me.ROMSSBrowse = New System.Windows.Forms.Button()
Me.ROMBII = New System.Windows.Forms.TextBox()
Me.ROMBIILabel = New System.Windows.Forms.Label()
Me.ROMBIIBrowse = New System.Windows.Forms.Button()
Me.ROMvMac = New System.Windows.Forms.TextBox()
Me.ROMvMacLabel = New System.Windows.Forms.Label()
Me.ROMvMacBrowse = New System.Windows.Forms.Button()
Me.OptionContainer = New System.Windows.Forms.ListView()
Me.Setting = CType(New System.Windows.Forms.ColumnHeader(), System.Windows.Forms.ColumnHeader)
Me.Value = CType(New System.Windows.Forms.ColumnHeader(), System.Windows.Forms.ColumnHeader)
Me.UseContainerFrame = New System.Windows.Forms.GroupBox()
Me.UCDisableTest = New System.Windows.Forms.RadioButton()
Me.UCEnableTest = New System.Windows.Forms.RadioButton()
Me.EmulatorPathFrame = New System.Windows.Forms.GroupBox()
Me.EPVerifyEmulatorPaths = New System.Windows.Forms.CheckBox()
Me.EPvMacPathLabel = New System.Windows.Forms.Label()
Me.EPvMacPath = New System.Windows.Forms.TextBox()
Me.EPvMacPathBrowse = New System.Windows.Forms.Button()
Me.EPQEMUPathLabel = New System.Windows.Forms.Label()
Me.EPQEMUPath = New System.Windows.Forms.TextBox()
Me.EPQEMUPathBrowse = New System.Windows.Forms.Button()
Me.EPPPCPathLabel = New System.Windows.Forms.Label()
Me.EPPPCPath = New System.Windows.Forms.TextBox()
Me.EPPPCPathBrowse = New System.Windows.Forms.Button()
Me.EPSSPathLabel = New System.Windows.Forms.Label()
Me.EPSSPath = New System.Windows.Forms.TextBox()
Me.EPSSPathBrowse = New System.Windows.Forms.Button()
Me.EPBIIPathLabel = New System.Windows.Forms.Label()
Me.EPBIIPath = New System.Windows.Forms.TextBox()
Me.EPBIIPathBrowse = New System.Windows.Forms.Button()
Me.LangFrame = New System.Windows.Forms.GroupBox()
Me.LangSelected = New System.Windows.Forms.ComboBox()
Me.LangInfo = New System.Windows.Forms.Label()
Me.BrowseOpen = New System.Windows.Forms.OpenFileDialog()
Me.FolderBrowser = New System.Windows.Forms.FolderBrowserDialog()
Me.FolderFrame.SuspendLayout()
Me.ROMFrame.SuspendLayout()
Me.UseContainerFrame.SuspendLayout()
Me.EmulatorPathFrame.SuspendLayout()
Me.LangFrame.SuspendLayout()
Me.SuspendLayout()
'
'cmdOK
'
resources.ApplyResources(Me.cmdOK, "cmdOK")
Me.cmdOK.BackColor = System.Drawing.SystemColors.Control
Me.cmdOK.Cursor = System.Windows.Forms.Cursors.Default
Me.cmdOK.ForeColor = System.Drawing.SystemColors.ControlText
Me.cmdOK.Name = "cmdOK"
Me.cmdOK.Tag = "1024"
Me.ToolTip1.SetToolTip(Me.cmdOK, resources.GetString("cmdOK.ToolTip"))
Me.cmdOK.UseVisualStyleBackColor = True
'
'cmdCancel
'
resources.ApplyResources(Me.cmdCancel, "cmdCancel")
Me.cmdCancel.BackColor = System.Drawing.SystemColors.Control
Me.cmdCancel.Cursor = System.Windows.Forms.Cursors.Default
Me.cmdCancel.DialogResult = System.Windows.Forms.DialogResult.Cancel
Me.cmdCancel.ForeColor = System.Drawing.SystemColors.ControlText
Me.cmdCancel.Name = "cmdCancel"
Me.cmdCancel.Tag = "1023"
Me.ToolTip1.SetToolTip(Me.cmdCancel, resources.GetString("cmdCancel.ToolTip"))
Me.cmdCancel.UseVisualStyleBackColor = True
'
'FolderFrame
'
resources.ApplyResources(Me.FolderFrame, "FolderFrame")
Me.FolderFrame.BackColor = System.Drawing.SystemColors.Control
Me.FolderFrame.Controls.Add(Me.FolderAppCurrent)
Me.FolderFrame.Controls.Add(Me.FolderAppCurrentLabel)
Me.FolderFrame.Controls.Add(Me.FolderNewMacLabel)
Me.FolderFrame.Controls.Add(Me.FolderNewMac)
Me.FolderFrame.Controls.Add(Me.FolderNewMacBrowse)
Me.FolderFrame.ForeColor = System.Drawing.SystemColors.ControlText
Me.FolderFrame.Name = "FolderFrame"
Me.FolderFrame.TabStop = False
Me.ToolTip1.SetToolTip(Me.FolderFrame, resources.GetString("FolderFrame.ToolTip"))
'
'FolderAppCurrent
'
resources.ApplyResources(Me.FolderAppCurrent, "FolderAppCurrent")
Me.FolderAppCurrent.Name = "FolderAppCurrent"
Me.ToolTip1.SetToolTip(Me.FolderAppCurrent, resources.GetString("FolderAppCurrent.ToolTip"))
'
'FolderAppCurrentLabel
'
resources.ApplyResources(Me.FolderAppCurrentLabel, "FolderAppCurrentLabel")
Me.FolderAppCurrentLabel.Name = "FolderAppCurrentLabel"
Me.ToolTip1.SetToolTip(Me.FolderAppCurrentLabel, resources.GetString("FolderAppCurrentLabel.ToolTip"))
'
'FolderNewMacLabel
'
resources.ApplyResources(Me.FolderNewMacLabel, "FolderNewMacLabel")
Me.FolderNewMacLabel.BackColor = System.Drawing.SystemColors.Control
Me.FolderNewMacLabel.Cursor = System.Windows.Forms.Cursors.Default
Me.FolderNewMacLabel.ForeColor = System.Drawing.SystemColors.ControlText
Me.FolderNewMacLabel.Name = "FolderNewMacLabel"
Me.ToolTip1.SetToolTip(Me.FolderNewMacLabel, resources.GetString("FolderNewMacLabel.ToolTip"))
'
'FolderNewMac
'
Me.FolderNewMac.AcceptsReturn = True
resources.ApplyResources(Me.FolderNewMac, "FolderNewMac")
Me.FolderNewMac.BackColor = System.Drawing.SystemColors.Window
Me.FolderNewMac.Cursor = System.Windows.Forms.Cursors.IBeam
Me.FolderNewMac.ForeColor = System.Drawing.SystemColors.WindowText
Me.FolderNewMac.Name = "FolderNewMac"
Me.FolderNewMac.ReadOnly = True
Me.ToolTip1.SetToolTip(Me.FolderNewMac, resources.GetString("FolderNewMac.ToolTip"))
'
'FolderNewMacBrowse
'
resources.ApplyResources(Me.FolderNewMacBrowse, "FolderNewMacBrowse")
Me.FolderNewMacBrowse.BackColor = System.Drawing.SystemColors.Control
Me.FolderNewMacBrowse.Cursor = System.Windows.Forms.Cursors.Default
Me.FolderNewMacBrowse.ForeColor = System.Drawing.SystemColors.ControlText
Me.FolderNewMacBrowse.Name = "FolderNewMacBrowse"
Me.ToolTip1.SetToolTip(Me.FolderNewMacBrowse, resources.GetString("FolderNewMacBrowse.ToolTip"))
Me.FolderNewMacBrowse.UseVisualStyleBackColor = True
'
'ROMFrame
'
resources.ApplyResources(Me.ROMFrame, "ROMFrame")
Me.ROMFrame.BackColor = System.Drawing.SystemColors.Control
Me.ROMFrame.Controls.Add(Me.ROMNoteNoROM)
Me.ROMFrame.Controls.Add(Me.ROMSS)
Me.ROMFrame.Controls.Add(Me.ROMSSLabel)
Me.ROMFrame.Controls.Add(Me.ROMSSBrowse)
Me.ROMFrame.Controls.Add(Me.ROMBII)
Me.ROMFrame.Controls.Add(Me.ROMBIILabel)
Me.ROMFrame.Controls.Add(Me.ROMBIIBrowse)
Me.ROMFrame.Controls.Add(Me.ROMvMac)
Me.ROMFrame.Controls.Add(Me.ROMvMacLabel)
Me.ROMFrame.Controls.Add(Me.ROMvMacBrowse)
Me.ROMFrame.ForeColor = System.Drawing.SystemColors.ControlText
Me.ROMFrame.Name = "ROMFrame"
Me.ROMFrame.TabStop = False
Me.ToolTip1.SetToolTip(Me.ROMFrame, resources.GetString("ROMFrame.ToolTip"))
'
'ROMNoteNoROM
'
resources.ApplyResources(Me.ROMNoteNoROM, "ROMNoteNoROM")
Me.ROMNoteNoROM.Name = "ROMNoteNoROM"
Me.ToolTip1.SetToolTip(Me.ROMNoteNoROM, resources.GetString("ROMNoteNoROM.ToolTip"))
'
'ROMSS
'
Me.ROMSS.AcceptsReturn = True
resources.ApplyResources(Me.ROMSS, "ROMSS")
Me.ROMSS.BackColor = System.Drawing.SystemColors.Window
Me.ROMSS.Cursor = System.Windows.Forms.Cursors.IBeam
Me.ROMSS.ForeColor = System.Drawing.SystemColors.WindowText
Me.ROMSS.Name = "ROMSS"
Me.ROMSS.ReadOnly = True
Me.ToolTip1.SetToolTip(Me.ROMSS, resources.GetString("ROMSS.ToolTip"))
'
'ROMSSLabel
'
resources.ApplyResources(Me.ROMSSLabel, "ROMSSLabel")
Me.ROMSSLabel.Name = "ROMSSLabel"
Me.ToolTip1.SetToolTip(Me.ROMSSLabel, resources.GetString("ROMSSLabel.ToolTip"))
'
'ROMSSBrowse
'
resources.ApplyResources(Me.ROMSSBrowse, "ROMSSBrowse")
Me.ROMSSBrowse.BackColor = System.Drawing.SystemColors.Control
Me.ROMSSBrowse.Cursor = System.Windows.Forms.Cursors.Default
Me.ROMSSBrowse.ForeColor = System.Drawing.SystemColors.ControlText
Me.ROMSSBrowse.Name = "ROMSSBrowse"
Me.ToolTip1.SetToolTip(Me.ROMSSBrowse, resources.GetString("ROMSSBrowse.ToolTip"))
Me.ROMSSBrowse.UseVisualStyleBackColor = True
'
'ROMBII
'
Me.ROMBII.AcceptsReturn = True
resources.ApplyResources(Me.ROMBII, "ROMBII")
Me.ROMBII.BackColor = System.Drawing.SystemColors.Window
Me.ROMBII.Cursor = System.Windows.Forms.Cursors.IBeam
Me.ROMBII.ForeColor = System.Drawing.SystemColors.WindowText
Me.ROMBII.Name = "ROMBII"
Me.ROMBII.ReadOnly = True
Me.ToolTip1.SetToolTip(Me.ROMBII, resources.GetString("ROMBII.ToolTip"))
'
'ROMBIILabel
'
resources.ApplyResources(Me.ROMBIILabel, "ROMBIILabel")
Me.ROMBIILabel.Name = "ROMBIILabel"
Me.ToolTip1.SetToolTip(Me.ROMBIILabel, resources.GetString("ROMBIILabel.ToolTip"))
'
'ROMBIIBrowse
'
resources.ApplyResources(Me.ROMBIIBrowse, "ROMBIIBrowse")
Me.ROMBIIBrowse.BackColor = System.Drawing.SystemColors.Control
Me.ROMBIIBrowse.Cursor = System.Windows.Forms.Cursors.Default
Me.ROMBIIBrowse.ForeColor = System.Drawing.SystemColors.ControlText
Me.ROMBIIBrowse.Name = "ROMBIIBrowse"
Me.ToolTip1.SetToolTip(Me.ROMBIIBrowse, resources.GetString("ROMBIIBrowse.ToolTip"))
Me.ROMBIIBrowse.UseVisualStyleBackColor = True
'
'ROMvMac
'
Me.ROMvMac.AcceptsReturn = True
resources.ApplyResources(Me.ROMvMac, "ROMvMac")
Me.ROMvMac.BackColor = System.Drawing.SystemColors.Window
Me.ROMvMac.Cursor = System.Windows.Forms.Cursors.IBeam
Me.ROMvMac.ForeColor = System.Drawing.SystemColors.WindowText
Me.ROMvMac.Name = "ROMvMac"
Me.ROMvMac.ReadOnly = True
Me.ToolTip1.SetToolTip(Me.ROMvMac, resources.GetString("ROMvMac.ToolTip"))
'
'ROMvMacLabel
'
resources.ApplyResources(Me.ROMvMacLabel, "ROMvMacLabel")
Me.ROMvMacLabel.Name = "ROMvMacLabel"
Me.ToolTip1.SetToolTip(Me.ROMvMacLabel, resources.GetString("ROMvMacLabel.ToolTip"))
'
'ROMvMacBrowse
'
resources.ApplyResources(Me.ROMvMacBrowse, "ROMvMacBrowse")
Me.ROMvMacBrowse.BackColor = System.Drawing.SystemColors.Control
Me.ROMvMacBrowse.Cursor = System.Windows.Forms.Cursors.Default
Me.ROMvMacBrowse.ForeColor = System.Drawing.SystemColors.ControlText
Me.ROMvMacBrowse.Name = "ROMvMacBrowse"
Me.ToolTip1.SetToolTip(Me.ROMvMacBrowse, resources.GetString("ROMvMacBrowse.ToolTip"))
Me.ROMvMacBrowse.UseVisualStyleBackColor = True
'
'OptionContainer
'
resources.ApplyResources(Me.OptionContainer, "OptionContainer")
Me.OptionContainer.Columns.AddRange(New System.Windows.Forms.ColumnHeader() {Me.Setting, Me.Value})
Me.OptionContainer.FullRowSelect = True
Me.OptionContainer.HeaderStyle = System.Windows.Forms.ColumnHeaderStyle.Nonclickable
Me.OptionContainer.Items.AddRange(New System.Windows.Forms.ListViewItem() {CType(resources.GetObject("OptionContainer.Items"), System.Windows.Forms.ListViewItem), CType(resources.GetObject("OptionContainer.Items1"), System.Windows.Forms.ListViewItem), CType(resources.GetObject("OptionContainer.Items2"), System.Windows.Forms.ListViewItem), CType(resources.GetObject("OptionContainer.Items3"), System.Windows.Forms.ListViewItem), CType(resources.GetObject("OptionContainer.Items4"), System.Windows.Forms.ListViewItem)})
Me.OptionContainer.Name = "OptionContainer"
Me.ToolTip1.SetToolTip(Me.OptionContainer, resources.GetString("OptionContainer.ToolTip"))
Me.OptionContainer.UseCompatibleStateImageBehavior = False
Me.OptionContainer.View = System.Windows.Forms.View.Details
'
'Setting
'
resources.ApplyResources(Me.Setting, "Setting")
'
'Value
'
resources.ApplyResources(Me.Value, "Value")
'
'UseContainerFrame
'
resources.ApplyResources(Me.UseContainerFrame, "UseContainerFrame")
Me.UseContainerFrame.BackColor = System.Drawing.SystemColors.Control
Me.UseContainerFrame.Controls.Add(Me.UCDisableTest)
Me.UseContainerFrame.Controls.Add(Me.UCEnableTest)
Me.UseContainerFrame.ForeColor = System.Drawing.SystemColors.ControlText
Me.UseContainerFrame.Name = "UseContainerFrame"
Me.UseContainerFrame.TabStop = False
Me.ToolTip1.SetToolTip(Me.UseContainerFrame, resources.GetString("UseContainerFrame.ToolTip"))
'
'UCDisableTest
'
resources.ApplyResources(Me.UCDisableTest, "UCDisableTest")
Me.UCDisableTest.Name = "UCDisableTest"
Me.ToolTip1.SetToolTip(Me.UCDisableTest, resources.GetString("UCDisableTest.ToolTip"))
Me.UCDisableTest.UseVisualStyleBackColor = True
'
'UCEnableTest
'
resources.ApplyResources(Me.UCEnableTest, "UCEnableTest")
Me.UCEnableTest.Name = "UCEnableTest"
Me.ToolTip1.SetToolTip(Me.UCEnableTest, resources.GetString("UCEnableTest.ToolTip"))
Me.UCEnableTest.UseVisualStyleBackColor = True
'
'EmulatorPathFrame
'
resources.ApplyResources(Me.EmulatorPathFrame, "EmulatorPathFrame")
Me.EmulatorPathFrame.BackColor = System.Drawing.SystemColors.Control
Me.EmulatorPathFrame.Controls.Add(Me.EPVerifyEmulatorPaths)
Me.EmulatorPathFrame.Controls.Add(Me.EPvMacPathLabel)
Me.EmulatorPathFrame.Controls.Add(Me.EPvMacPath)
Me.EmulatorPathFrame.Controls.Add(Me.EPvMacPathBrowse)
Me.EmulatorPathFrame.Controls.Add(Me.EPQEMUPathLabel)
Me.EmulatorPathFrame.Controls.Add(Me.EPQEMUPath)
Me.EmulatorPathFrame.Controls.Add(Me.EPQEMUPathBrowse)
Me.EmulatorPathFrame.Controls.Add(Me.EPPPCPathLabel)
Me.EmulatorPathFrame.Controls.Add(Me.EPPPCPath)
Me.EmulatorPathFrame.Controls.Add(Me.EPPPCPathBrowse)
Me.EmulatorPathFrame.Controls.Add(Me.EPSSPathLabel)
Me.EmulatorPathFrame.Controls.Add(Me.EPSSPath)
Me.EmulatorPathFrame.Controls.Add(Me.EPSSPathBrowse)
Me.EmulatorPathFrame.Controls.Add(Me.EPBIIPathLabel)
Me.EmulatorPathFrame.Controls.Add(Me.EPBIIPath)
Me.EmulatorPathFrame.Controls.Add(Me.EPBIIPathBrowse)
Me.EmulatorPathFrame.ForeColor = System.Drawing.SystemColors.ControlText
Me.EmulatorPathFrame.Name = "EmulatorPathFrame"
Me.EmulatorPathFrame.TabStop = False
Me.ToolTip1.SetToolTip(Me.EmulatorPathFrame, resources.GetString("EmulatorPathFrame.ToolTip"))
'
'EPVerifyEmulatorPaths
'
resources.ApplyResources(Me.EPVerifyEmulatorPaths, "EPVerifyEmulatorPaths")
Me.EPVerifyEmulatorPaths.Name = "EPVerifyEmulatorPaths"
Me.ToolTip1.SetToolTip(Me.EPVerifyEmulatorPaths, resources.GetString("EPVerifyEmulatorPaths.ToolTip"))
Me.EPVerifyEmulatorPaths.UseVisualStyleBackColor = True
'
'EPvMacPathLabel
'
resources.ApplyResources(Me.EPvMacPathLabel, "EPvMacPathLabel")
Me.EPvMacPathLabel.BackColor = System.Drawing.SystemColors.Control
Me.EPvMacPathLabel.Cursor = System.Windows.Forms.Cursors.Default
Me.EPvMacPathLabel.ForeColor = System.Drawing.SystemColors.ControlText
Me.EPvMacPathLabel.Name = "EPvMacPathLabel"
Me.ToolTip1.SetToolTip(Me.EPvMacPathLabel, resources.GetString("EPvMacPathLabel.ToolTip"))
'
'EPvMacPath
'
Me.EPvMacPath.AcceptsReturn = True
resources.ApplyResources(Me.EPvMacPath, "EPvMacPath")
Me.EPvMacPath.BackColor = System.Drawing.SystemColors.Window
Me.EPvMacPath.Cursor = System.Windows.Forms.Cursors.IBeam
Me.EPvMacPath.ForeColor = System.Drawing.SystemColors.WindowText
Me.EPvMacPath.Name = "EPvMacPath"
Me.EPvMacPath.ReadOnly = True
Me.ToolTip1.SetToolTip(Me.EPvMacPath, resources.GetString("EPvMacPath.ToolTip"))
'
'EPvMacPathBrowse
'
resources.ApplyResources(Me.EPvMacPathBrowse, "EPvMacPathBrowse")
Me.EPvMacPathBrowse.BackColor = System.Drawing.SystemColors.Control
Me.EPvMacPathBrowse.Cursor = System.Windows.Forms.Cursors.Default
Me.EPvMacPathBrowse.ForeColor = System.Drawing.SystemColors.ControlText
Me.EPvMacPathBrowse.Name = "EPvMacPathBrowse"
Me.ToolTip1.SetToolTip(Me.EPvMacPathBrowse, resources.GetString("EPvMacPathBrowse.ToolTip"))
Me.EPvMacPathBrowse.UseVisualStyleBackColor = True
'
'EPQEMUPathLabel
'
resources.ApplyResources(Me.EPQEMUPathLabel, "EPQEMUPathLabel")
Me.EPQEMUPathLabel.BackColor = System.Drawing.SystemColors.Control
Me.EPQEMUPathLabel.Cursor = System.Windows.Forms.Cursors.Default
Me.EPQEMUPathLabel.ForeColor = System.Drawing.SystemColors.ControlText
Me.EPQEMUPathLabel.Name = "EPQEMUPathLabel"
Me.ToolTip1.SetToolTip(Me.EPQEMUPathLabel, resources.GetString("EPQEMUPathLabel.ToolTip"))
'
'EPQEMUPath
'
Me.EPQEMUPath.AcceptsReturn = True
resources.ApplyResources(Me.EPQEMUPath, "EPQEMUPath")
Me.EPQEMUPath.BackColor = System.Drawing.SystemColors.Window
Me.EPQEMUPath.Cursor = System.Windows.Forms.Cursors.IBeam
Me.EPQEMUPath.ForeColor = System.Drawing.SystemColors.WindowText
Me.EPQEMUPath.Name = "EPQEMUPath"
Me.EPQEMUPath.ReadOnly = True
Me.ToolTip1.SetToolTip(Me.EPQEMUPath, resources.GetString("EPQEMUPath.ToolTip"))
'
'EPQEMUPathBrowse
'
resources.ApplyResources(Me.EPQEMUPathBrowse, "EPQEMUPathBrowse")
Me.EPQEMUPathBrowse.BackColor = System.Drawing.SystemColors.Control
Me.EPQEMUPathBrowse.Cursor = System.Windows.Forms.Cursors.Default
Me.EPQEMUPathBrowse.ForeColor = System.Drawing.SystemColors.ControlText
Me.EPQEMUPathBrowse.Name = "EPQEMUPathBrowse"
Me.ToolTip1.SetToolTip(Me.EPQEMUPathBrowse, resources.GetString("EPQEMUPathBrowse.ToolTip"))
Me.EPQEMUPathBrowse.UseVisualStyleBackColor = True
'
'EPPPCPathLabel
'
resources.ApplyResources(Me.EPPPCPathLabel, "EPPPCPathLabel")
Me.EPPPCPathLabel.BackColor = System.Drawing.SystemColors.Control
Me.EPPPCPathLabel.Cursor = System.Windows.Forms.Cursors.Default
Me.EPPPCPathLabel.ForeColor = System.Drawing.SystemColors.ControlText
Me.EPPPCPathLabel.Name = "EPPPCPathLabel"
Me.ToolTip1.SetToolTip(Me.EPPPCPathLabel, resources.GetString("EPPPCPathLabel.ToolTip"))
'
'EPPPCPath
'
Me.EPPPCPath.AcceptsReturn = True
resources.ApplyResources(Me.EPPPCPath, "EPPPCPath")
Me.EPPPCPath.BackColor = System.Drawing.SystemColors.Window
Me.EPPPCPath.Cursor = System.Windows.Forms.Cursors.IBeam
Me.EPPPCPath.ForeColor = System.Drawing.SystemColors.WindowText
Me.EPPPCPath.Name = "EPPPCPath"
Me.EPPPCPath.ReadOnly = True
Me.ToolTip1.SetToolTip(Me.EPPPCPath, resources.GetString("EPPPCPath.ToolTip"))
'
'EPPPCPathBrowse
'
resources.ApplyResources(Me.EPPPCPathBrowse, "EPPPCPathBrowse")
Me.EPPPCPathBrowse.BackColor = System.Drawing.SystemColors.Control
Me.EPPPCPathBrowse.Cursor = System.Windows.Forms.Cursors.Default
Me.EPPPCPathBrowse.ForeColor = System.Drawing.SystemColors.ControlText
Me.EPPPCPathBrowse.Name = "EPPPCPathBrowse"
Me.ToolTip1.SetToolTip(Me.EPPPCPathBrowse, resources.GetString("EPPPCPathBrowse.ToolTip"))
Me.EPPPCPathBrowse.UseVisualStyleBackColor = True
'
'EPSSPathLabel
'
resources.ApplyResources(Me.EPSSPathLabel, "EPSSPathLabel")
Me.EPSSPathLabel.BackColor = System.Drawing.SystemColors.Control
Me.EPSSPathLabel.Cursor = System.Windows.Forms.Cursors.Default
Me.EPSSPathLabel.ForeColor = System.Drawing.SystemColors.ControlText
Me.EPSSPathLabel.Name = "EPSSPathLabel"
Me.ToolTip1.SetToolTip(Me.EPSSPathLabel, resources.GetString("EPSSPathLabel.ToolTip"))
'
'EPSSPath
'
Me.EPSSPath.AcceptsReturn = True
resources.ApplyResources(Me.EPSSPath, "EPSSPath")
Me.EPSSPath.BackColor = System.Drawing.SystemColors.Window
Me.EPSSPath.Cursor = System.Windows.Forms.Cursors.IBeam
Me.EPSSPath.ForeColor = System.Drawing.SystemColors.WindowText
Me.EPSSPath.Name = "EPSSPath"
Me.EPSSPath.ReadOnly = True
Me.ToolTip1.SetToolTip(Me.EPSSPath, resources.GetString("EPSSPath.ToolTip"))
'
'EPSSPathBrowse
'
resources.ApplyResources(Me.EPSSPathBrowse, "EPSSPathBrowse")
Me.EPSSPathBrowse.BackColor = System.Drawing.SystemColors.Control
Me.EPSSPathBrowse.Cursor = System.Windows.Forms.Cursors.Default
Me.EPSSPathBrowse.ForeColor = System.Drawing.SystemColors.ControlText
Me.EPSSPathBrowse.Name = "EPSSPathBrowse"
Me.ToolTip1.SetToolTip(Me.EPSSPathBrowse, resources.GetString("EPSSPathBrowse.ToolTip"))
Me.EPSSPathBrowse.UseVisualStyleBackColor = True
'
'EPBIIPathLabel
'
resources.ApplyResources(Me.EPBIIPathLabel, "EPBIIPathLabel")
Me.EPBIIPathLabel.BackColor = System.Drawing.SystemColors.Control
Me.EPBIIPathLabel.Cursor = System.Windows.Forms.Cursors.Default
Me.EPBIIPathLabel.ForeColor = System.Drawing.SystemColors.ControlText
Me.EPBIIPathLabel.Name = "EPBIIPathLabel"
Me.ToolTip1.SetToolTip(Me.EPBIIPathLabel, resources.GetString("EPBIIPathLabel.ToolTip"))
'
'EPBIIPath
'
Me.EPBIIPath.AcceptsReturn = True
resources.ApplyResources(Me.EPBIIPath, "EPBIIPath")
Me.EPBIIPath.BackColor = System.Drawing.SystemColors.Window
Me.EPBIIPath.Cursor = System.Windows.Forms.Cursors.IBeam
Me.EPBIIPath.ForeColor = System.Drawing.SystemColors.WindowText
Me.EPBIIPath.Name = "EPBIIPath"
Me.EPBIIPath.ReadOnly = True
Me.ToolTip1.SetToolTip(Me.EPBIIPath, resources.GetString("EPBIIPath.ToolTip"))
'
'EPBIIPathBrowse
'
resources.ApplyResources(Me.EPBIIPathBrowse, "EPBIIPathBrowse")
Me.EPBIIPathBrowse.BackColor = System.Drawing.SystemColors.Control
Me.EPBIIPathBrowse.Cursor = System.Windows.Forms.Cursors.Default
Me.EPBIIPathBrowse.ForeColor = System.Drawing.SystemColors.ControlText
Me.EPBIIPathBrowse.Name = "EPBIIPathBrowse"
Me.ToolTip1.SetToolTip(Me.EPBIIPathBrowse, resources.GetString("EPBIIPathBrowse.ToolTip"))
Me.EPBIIPathBrowse.UseVisualStyleBackColor = True
'
'LangFrame
'
resources.ApplyResources(Me.LangFrame, "LangFrame")
Me.LangFrame.BackColor = System.Drawing.SystemColors.Control
Me.LangFrame.Controls.Add(Me.LangSelected)
Me.LangFrame.Controls.Add(Me.LangInfo)
Me.LangFrame.ForeColor = System.Drawing.SystemColors.ControlText
Me.LangFrame.Name = "LangFrame"
Me.LangFrame.TabStop = False
Me.ToolTip1.SetToolTip(Me.LangFrame, resources.GetString("LangFrame.ToolTip"))
'
'LangSelected
'
resources.ApplyResources(Me.LangSelected, "LangSelected")
Me.LangSelected.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.LangSelected.FormattingEnabled = True
Me.LangSelected.Items.AddRange(New Object() {resources.GetString("LangSelected.Items"), resources.GetString("LangSelected.Items1"), resources.GetString("LangSelected.Items2")})
Me.LangSelected.Name = "LangSelected"
Me.ToolTip1.SetToolTip(Me.LangSelected, resources.GetString("LangSelected.ToolTip"))
'
'LangInfo
'
resources.ApplyResources(Me.LangInfo, "LangInfo")
Me.LangInfo.Name = "LangInfo"
Me.ToolTip1.SetToolTip(Me.LangInfo, resources.GetString("LangInfo.ToolTip"))
'
'BrowseOpen
'
resources.ApplyResources(Me.BrowseOpen, "BrowseOpen")
Me.BrowseOpen.ReadOnlyChecked = True
Me.BrowseOpen.ShowReadOnly = True
'
'FolderBrowser
'
resources.ApplyResources(Me.FolderBrowser, "FolderBrowser")
'
'frmOptions
'
Me.AcceptButton = Me.cmdOK
resources.ApplyResources(Me, "$this")
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.BackColor = System.Drawing.SystemColors.Control
Me.CancelButton = Me.cmdCancel
Me.Controls.Add(Me.EmulatorPathFrame)
Me.Controls.Add(Me.ROMFrame)
Me.Controls.Add(Me.UseContainerFrame)
Me.Controls.Add(Me.FolderFrame)
Me.Controls.Add(Me.LangFrame)
Me.Controls.Add(Me.cmdCancel)
Me.Controls.Add(Me.cmdOK)
Me.Controls.Add(Me.OptionContainer)
Me.Cursor = System.Windows.Forms.Cursors.Default
Me.ForeColor = System.Drawing.Color.Black
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
Me.KeyPreview = True
Me.MaximizeBox = False
Me.MinimizeBox = False
Me.Name = "frmOptions"
Me.ShowIcon = False
Me.Tag = "1017"
Me.ToolTip1.SetToolTip(Me, resources.GetString("$this.ToolTip"))
Me.FolderFrame.ResumeLayout(False)
Me.FolderFrame.PerformLayout()
Me.ROMFrame.ResumeLayout(False)
Me.ROMFrame.PerformLayout()
Me.UseContainerFrame.ResumeLayout(False)
Me.UseContainerFrame.PerformLayout()
Me.EmulatorPathFrame.ResumeLayout(False)
Me.EmulatorPathFrame.PerformLayout()
Me.LangFrame.ResumeLayout(False)
Me.LangFrame.PerformLayout()
Me.ResumeLayout(False)
End Sub
Public WithEvents FolderNewMacLabel As System.Windows.Forms.Label
Public WithEvents FolderNewMac As System.Windows.Forms.TextBox
Public WithEvents FolderNewMacBrowse As System.Windows.Forms.Button
Public WithEvents ROMFrame As System.Windows.Forms.GroupBox
Public WithEvents ROMvMac As System.Windows.Forms.TextBox
Public WithEvents ROMvMacBrowse As System.Windows.Forms.Button
Friend WithEvents FolderBrowser As System.Windows.Forms.FolderBrowserDialog
Friend WithEvents Setting As System.Windows.Forms.ColumnHeader
Friend WithEvents Value As System.Windows.Forms.ColumnHeader
Public WithEvents UseContainerFrame As System.Windows.Forms.GroupBox
Friend WithEvents UCDisableTest As System.Windows.Forms.RadioButton
Friend WithEvents UCEnableTest As System.Windows.Forms.RadioButton
Friend WithEvents OptionContainer As System.Windows.Forms.ListView
Friend WithEvents ROMSSLabel As System.Windows.Forms.Label
Public WithEvents ROMSS As System.Windows.Forms.TextBox
Public WithEvents ROMSSBrowse As System.Windows.Forms.Button
Friend WithEvents ROMBIILabel As System.Windows.Forms.Label
Public WithEvents ROMBII As System.Windows.Forms.TextBox
Public WithEvents ROMBIIBrowse As System.Windows.Forms.Button
Friend WithEvents ROMvMacLabel As System.Windows.Forms.Label
Friend WithEvents ROMNoteNoROM As System.Windows.Forms.Label
Friend WithEvents FolderAppCurrentLabel As System.Windows.Forms.Label
Friend WithEvents FolderAppCurrent As System.Windows.Forms.Label
Public WithEvents EmulatorPathFrame As System.Windows.Forms.GroupBox
Public WithEvents EPBIIPathLabel As System.Windows.Forms.Label
Public WithEvents EPBIIPath As System.Windows.Forms.TextBox
Public WithEvents EPBIIPathBrowse As System.Windows.Forms.Button
Public WithEvents EPQEMUPathLabel As System.Windows.Forms.Label
Public WithEvents EPQEMUPath As System.Windows.Forms.TextBox
Public WithEvents EPQEMUPathBrowse As System.Windows.Forms.Button
Public WithEvents EPPPCPathLabel As System.Windows.Forms.Label
Public WithEvents EPPPCPath As System.Windows.Forms.TextBox
Public WithEvents EPPPCPathBrowse As System.Windows.Forms.Button
Public WithEvents EPSSPathLabel As System.Windows.Forms.Label
Public WithEvents EPSSPath As System.Windows.Forms.TextBox
Public WithEvents EPSSPathBrowse As System.Windows.Forms.Button
Public WithEvents EPvMacPathLabel As System.Windows.Forms.Label
Public WithEvents EPvMacPath As System.Windows.Forms.TextBox
Public WithEvents EPvMacPathBrowse As System.Windows.Forms.Button
Friend WithEvents EPVerifyEmulatorPaths As System.Windows.Forms.CheckBox
Public WithEvents LangFrame As System.Windows.Forms.GroupBox
Friend WithEvents LangSelected As System.Windows.Forms.ComboBox
Friend WithEvents LangInfo As System.Windows.Forms.Label
#End Region
End Class

442
frmOptions.de-DE.resx Normal file
View File

@ -0,0 +1,442 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="cmdOK.Text" xml:space="preserve">
<value>Ja</value>
</data>
<data name="cmdCancel.Text" xml:space="preserve">
<value>Nein</value>
</data>
<data name="FolderFrame.Text" xml:space="preserve">
<value>Ordnereinstellungen</value>
</data>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="FolderAppCurrentLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>132, 13</value>
</data>
<data name="FolderAppCurrentLabel.Text" xml:space="preserve">
<value>Aktueller Programmordner</value>
</data>
<data name="FolderNewMacLabel.Text" xml:space="preserve">
<value>Standard-Mac-Ordner</value>
</data>
<data name="ROMNoteNoROM.Size" type="System.Drawing.Size, System.Drawing">
<value>323, 26</value>
</data>
<data name="ROMNoteNoROM.Text" xml:space="preserve">
<value>Beachten Sie, dass QEMU und PearPC kein ROM benötigen, um zu
funktionieren.</value>
</data>
<data name="OptionContainer.Items" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0JAAAA
BFRleHQKSW1hZ2VJbmRleAxTdWJJdGVtQ291bnQIU3ViSXRlbTEJQmFja0NvbG9yB0NoZWNrZWQERm9u
dAlGb3JlQ29sb3IXVXNlSXRlbVN0eWxlRm9yU3ViSXRlbXMBAAAEBAAEBAAICDFTeXN0ZW0uV2luZG93
cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtAgAAABRTeXN0ZW0uRHJhd2luZy5Db2xv
cgMAAAABE1N5c3RlbS5EcmF3aW5nLkZvbnQDAAAAFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAECAAAA
BgQAAAAgVGVzdGVuIFNpZSBkYXMgTWFjaW50b3NoLUZlbnN0ZXL/////AgAAAAkFAAAABfr///8UU3lz
dGVtLkRyYXdpbmcuQ29sb3IEAAAABG5hbWUFdmFsdWUKa25vd25Db2xvcgVzdGF0ZQEAAAAJBwcDAAAA
CgAAAAAAAAAAGAABAAAJBwAAAAH4////+v///woAAAAAAAAAABoAAQABDAkAAABLbXNjb3JsaWIsIFZl
cnNpb249Mi4wLjAuMCwgQ3VsdHVyZT1uZXV0cmFsLCBQdWJsaWNLZXlUb2tlbj1iNzdhNWM1NjE5MzRl
MDg5BQUAAAAxU3lzdGVtLldpbmRvd3MuRm9ybXMuTGlzdFZpZXdJdGVtK0xpc3RWaWV3U3ViSXRlbQQA
AAAEdGV4dARuYW1lBXN0eWxlCHVzZXJEYXRhAQEEAj5TeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmll
d0l0ZW0rTGlzdFZpZXdTdWJJdGVtK1N1Ykl0ZW1TdHlsZQIAAAACAAAABgoAAAACTm8KCgoFBwAAABNT
eXN0ZW0uRHJhd2luZy5Gb250BAAAAAROYW1lBFNpemUFU3R5bGUEVW5pdAEABAQLGFN5c3RlbS5EcmF3
aW5nLkZvbnRTdHlsZQMAAAAbU3lzdGVtLkRyYXdpbmcuR3JhcGhpY3NVbml0AwAAAAMAAAAGCwAAAAZU
YWhvbWEAAARBBfT///8YU3lzdGVtLkRyYXdpbmcuRm9udFN0eWxlAQAAAAd2YWx1ZV9fAAgDAAAAAAAA
AAXz////G1N5c3RlbS5EcmF3aW5nLkdyYXBoaWNzVW5pdAEAAAAHdmFsdWVfXwAIAwAAAAMAAAAL
</value>
</data>
<data name="OptionContainer.Items1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0JAAAA
BFRleHQKSW1hZ2VJbmRleAxTdWJJdGVtQ291bnQIU3ViSXRlbTEJQmFja0NvbG9yB0NoZWNrZWQERm9u
dAlGb3JlQ29sb3IXVXNlSXRlbVN0eWxlRm9yU3ViSXRlbXMBAAAEBAAEBAAICDFTeXN0ZW0uV2luZG93
cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtAgAAABRTeXN0ZW0uRHJhd2luZy5Db2xv
cgMAAAABE1N5c3RlbS5EcmF3aW5nLkZvbnQDAAAAFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAECAAAA
BgQAAAAEUk9Nc/////8CAAAACQUAAAAF+v///xRTeXN0ZW0uRHJhd2luZy5Db2xvcgQAAAAEbmFtZQV2
YWx1ZQprbm93bkNvbG9yBXN0YXRlAQAAAAkHBwMAAAAKAAAAAAAAAAAYAAEAAAkHAAAAAfj////6////
CgAAAAAAAAAAGgABAAEMCQAAAEttc2NvcmxpYiwgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRy
YWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFBQAAADFTeXN0ZW0uV2luZG93cy5Gb3Jt
cy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtBAAAAAR0ZXh0BG5hbWUFc3R5bGUIdXNlckRhdGEB
AQQCPlN5c3RlbS5XaW5kb3dzLkZvcm1zLkxpc3RWaWV3SXRlbStMaXN0Vmlld1N1Ykl0ZW0rU3ViSXRl
bVN0eWxlAgAAAAIAAAAGCgAAAAdYLCBZLCBaCgoKBQcAAAATU3lzdGVtLkRyYXdpbmcuRm9udAQAAAAE
TmFtZQRTaXplBVN0eWxlBFVuaXQBAAQECxhTeXN0ZW0uRHJhd2luZy5Gb250U3R5bGUDAAAAG1N5c3Rl
bS5EcmF3aW5nLkdyYXBoaWNzVW5pdAMAAAADAAAABgsAAAAGVGFob21hAAAEQQX0////GFN5c3RlbS5E
cmF3aW5nLkZvbnRTdHlsZQEAAAAHdmFsdWVfXwAIAwAAAAAAAAAF8////xtTeXN0ZW0uRHJhd2luZy5H
cmFwaGljc1VuaXQBAAAAB3ZhbHVlX18ACAMAAAADAAAACw==
</value>
</data>
<data name="OptionContainer.Items2" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0JAAAA
BFRleHQKSW1hZ2VJbmRleAxTdWJJdGVtQ291bnQIU3ViSXRlbTEJQmFja0NvbG9yB0NoZWNrZWQERm9u
dAlGb3JlQ29sb3IXVXNlSXRlbVN0eWxlRm9yU3ViSXRlbXMBAAAEBAAEBAAICDFTeXN0ZW0uV2luZG93
cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtAgAAABRTeXN0ZW0uRHJhd2luZy5Db2xv
cgMAAAABE1N5c3RlbS5EcmF3aW5nLkZvbnQDAAAAFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAECAAAA
BgQAAAATT3JkbmVyZWluc3RlbGx1bmdlbv////8CAAAACQUAAAAF+v///xRTeXN0ZW0uRHJhd2luZy5D
b2xvcgQAAAAEbmFtZQV2YWx1ZQprbm93bkNvbG9yBXN0YXRlAQAAAAkHBwMAAAAKAAAAAAAAAAAYAAEA
AAkHAAAAAfj////6////CgAAAAAAAAAAGgABAAEMCQAAAEttc2NvcmxpYiwgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFBQAAADFTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtBAAAAAR0ZXh0BG5hbWUF
c3R5bGUIdXNlckRhdGEBAQQCPlN5c3RlbS5XaW5kb3dzLkZvcm1zLkxpc3RWaWV3SXRlbStMaXN0Vmll
d1N1Ykl0ZW0rU3ViSXRlbVN0eWxlAgAAAAIAAAAGCgAAAANDOlwKCgoFBwAAABNTeXN0ZW0uRHJhd2lu
Zy5Gb250BAAAAAROYW1lBFNpemUFU3R5bGUEVW5pdAEABAQLGFN5c3RlbS5EcmF3aW5nLkZvbnRTdHls
ZQMAAAAbU3lzdGVtLkRyYXdpbmcuR3JhcGhpY3NVbml0AwAAAAMAAAAGCwAAAAZUYWhvbWEAAARBBfT/
//8YU3lzdGVtLkRyYXdpbmcuRm9udFN0eWxlAQAAAAd2YWx1ZV9fAAgDAAAAAAAAAAXz////G1N5c3Rl
bS5EcmF3aW5nLkdyYXBoaWNzVW5pdAEAAAAHdmFsdWVfXwAIAwAAAAMAAAAL
</value>
</data>
<data name="OptionContainer.Items3" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0JAAAA
BFRleHQKSW1hZ2VJbmRleAxTdWJJdGVtQ291bnQIU3ViSXRlbTEJQmFja0NvbG9yB0NoZWNrZWQERm9u
dAlGb3JlQ29sb3IXVXNlSXRlbVN0eWxlRm9yU3ViSXRlbXMBAAAEBAAEBAAICDFTeXN0ZW0uV2luZG93
cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtAgAAABRTeXN0ZW0uRHJhd2luZy5Db2xv
cgMAAAABE1N5c3RlbS5EcmF3aW5nLkZvbnQDAAAAFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAECAAAA
BgQAAAANRW11bGF0b3JwZmFkZf////8CAAAACQUAAAAF+v///xRTeXN0ZW0uRHJhd2luZy5Db2xvcgQA
AAAEbmFtZQV2YWx1ZQprbm93bkNvbG9yBXN0YXRlAQAAAAkHBwMAAAAKAAAAAAAAAAAYAAEAAAkHAAAA
Afj////6////CgAAAAAAAAAAGgABAAEMCQAAAEttc2NvcmxpYiwgVmVyc2lvbj0yLjAuMC4wLCBDdWx0
dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFBQAAADFTeXN0ZW0uV2lu
ZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtBAAAAAR0ZXh0BG5hbWUFc3R5bGUI
dXNlckRhdGEBAQQCPlN5c3RlbS5XaW5kb3dzLkZvcm1zLkxpc3RWaWV3SXRlbStMaXN0Vmlld1N1Ykl0
ZW0rU3ViSXRlbVN0eWxlAgAAAAIAAAAGCgAAAAZDdXN0b20KCgoFBwAAABNTeXN0ZW0uRHJhd2luZy5G
b250BAAAAAROYW1lBFNpemUFU3R5bGUEVW5pdAEABAQLGFN5c3RlbS5EcmF3aW5nLkZvbnRTdHlsZQMA
AAAbU3lzdGVtLkRyYXdpbmcuR3JhcGhpY3NVbml0AwAAAAMAAAAGCwAAAAZUYWhvbWEAAARBBfT///8Y
U3lzdGVtLkRyYXdpbmcuRm9udFN0eWxlAQAAAAd2YWx1ZV9fAAgDAAAAAAAAAAXz////G1N5c3RlbS5E
cmF3aW5nLkdyYXBoaWNzVW5pdAEAAAAHdmFsdWVfXwAIAwAAAAMAAAAL
</value>
</data>
<data name="OptionContainer.Items4" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0JAAAA
BFRleHQKSW1hZ2VJbmRleAxTdWJJdGVtQ291bnQIU3ViSXRlbTEJQmFja0NvbG9yB0NoZWNrZWQERm9u
dAlGb3JlQ29sb3IXVXNlSXRlbVN0eWxlRm9yU3ViSXRlbXMBAAAEBAAEBAAICDFTeXN0ZW0uV2luZG93
cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtAgAAABRTeXN0ZW0uRHJhd2luZy5Db2xv
cgMAAAABE1N5c3RlbS5EcmF3aW5nLkZvbnQDAAAAFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAECAAAA
BgQAAAAHU3ByYWNoZf////8CAAAACQUAAAAF+v///xRTeXN0ZW0uRHJhd2luZy5Db2xvcgQAAAAEbmFt
ZQV2YWx1ZQprbm93bkNvbG9yBXN0YXRlAQAAAAkHBwMAAAAKAAAAAAAAAAAYAAEAAAkHAAAAAfj////6
////CgAAAAAAAAAAGgABAAEMCQAAAEttc2NvcmxpYiwgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5l
dXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFBQAAADFTeXN0ZW0uV2luZG93cy5G
b3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtBAAAAAR0ZXh0BG5hbWUFc3R5bGUIdXNlckRh
dGEBAQQCPlN5c3RlbS5XaW5kb3dzLkZvcm1zLkxpc3RWaWV3SXRlbStMaXN0Vmlld1N1Ykl0ZW0rU3Vi
SXRlbVN0eWxlAgAAAAIAAAAKCgoKBQcAAAATU3lzdGVtLkRyYXdpbmcuRm9udAQAAAAETmFtZQRTaXpl
BVN0eWxlBFVuaXQBAAQECxhTeXN0ZW0uRHJhd2luZy5Gb250U3R5bGUDAAAAG1N5c3RlbS5EcmF3aW5n
LkdyYXBoaWNzVW5pdAMAAAADAAAABgoAAAAGVGFob21hAAAEQQX1////GFN5c3RlbS5EcmF3aW5nLkZv
bnRTdHlsZQEAAAAHdmFsdWVfXwAIAwAAAAAAAAAF9P///xtTeXN0ZW0uRHJhd2luZy5HcmFwaGljc1Vu
aXQBAAAAB3ZhbHVlX18ACAMAAAADAAAACw==
</value>
</data>
<data name="Setting.Text" xml:space="preserve">
<value>Optionen</value>
</data>
<data name="Value.Text" xml:space="preserve">
<value>Wert</value>
</data>
<data name="UseContainerFrame.Text" xml:space="preserve">
<value>Testen Sie das Macintosh-Fenster</value>
</data>
<data name="UCDisableTest.Text" xml:space="preserve">
<value>Nicht testen</value>
</data>
<data name="UCEnableTest.Size" type="System.Drawing.Size, System.Drawing">
<value>61, 17</value>
</data>
<data name="UCEnableTest.Text" xml:space="preserve">
<value>Testen </value>
</data>
<data name="EmulatorPathFrame.Text" xml:space="preserve">
<value>Emulatorpfade</value>
</data>
<data name="EPVerifyEmulatorPaths.Size" type="System.Drawing.Size, System.Drawing">
<value>266, 17</value>
</data>
<data name="EPVerifyEmulatorPaths.Text" xml:space="preserve">
<value>Überprüfen Sie beim Start nach ungültigen Pfaden</value>
</data>
<data name="EPvMacPathLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>57, 13</value>
</data>
<data name="EPvMacPathLabel.Text" xml:space="preserve">
<value>Mini vMac:</value>
</data>
<data name="EPQEMUPathLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>40, 13</value>
</data>
<data name="EPQEMUPathLabel.Text" xml:space="preserve">
<value>QEMU:</value>
</data>
<data name="EPPPCPathLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>46, 13</value>
</data>
<data name="EPPPCPathLabel.Text" xml:space="preserve">
<value>PearPC:</value>
</data>
<data name="EPSSPathLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>75, 13</value>
</data>
<data name="EPSSPathLabel.Text" xml:space="preserve">
<value>SheepShaver:</value>
</data>
<data name="EPBIIPathLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>55, 13</value>
</data>
<data name="EPBIIPathLabel.Text" xml:space="preserve">
<value>Basilisk II:</value>
</data>
<data name="LangFrame.Text" xml:space="preserve">
<value>Sprache</value>
</data>
<data name="LangInfo.Size" type="System.Drawing.Size, System.Drawing">
<value>336, 39</value>
</data>
<data name="LangInfo.Text" xml:space="preserve">
<value>Auf dieser Seite können Sie die Sprache der Anwendung einstellen.
Dies wird nicht sofort reflektiert. Sie müssen Virtual Mac neu starten,
damit diese Änderung wirksam wird.</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAMAEBAQAAAAAAAoAQAANgAAACAgAAAAAAAAqAgAAF4BAAAwMAAAAAAAAKgOAAAGCgAAKAAAABAA
AAAgAAAAAQAEAAAAAADAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAAIAAAACAgACAAAAAgACAAICA
AADAwMAAgICAAAAA/wAA/wAAAP//AP8AAAD/AP8A//8AAP///wAAAAd3d3AAAAAAAHd3AAAAAAAAd3cA
AAB3d3d4d3d3d3d3d3d3d3d3AAAAAAAAAAAIiIiIiIiIgAiIiIiIiIiACIiIiIiIiIAIiIiIiIiIgAiI
iIiIiIiACIiIiIiIiIAIiIiIiIiIgAiIiIiIiIiACIiIiIiIiIAAAAAAAAAAAPgfAAD8PwAA/D8AAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAoAAAAIAAAAEAA
AAABAAgAAAAAAIAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAgAAAAICAAIAAAACAAIAAgIAAAMDA
wADA3MAA8MqmAAQEBAAICAgADAwMABEREQAWFhYAHBwcACIiIgApKSkAVVVVAE1NTQBCQkIAOTk5AIB8
/wBQUP8AkwDWAP/szADG1u8A1ufnAJCprQAAADMAAABmAAAAmQAAAMwAADMAAAAzMwAAM2YAADOZAAAz
zAAAM/8AAGYAAABmMwAAZmYAAGaZAABmzAAAZv8AAJkAAACZMwAAmWYAAJmZAACZzAAAmf8AAMwAAADM
MwAAzGYAAMyZAADMzAAAzP8AAP9mAAD/mQAA/8wAMwAAADMAMwAzAGYAMwCZADMAzAAzAP8AMzMAADMz
MwAzM2YAMzOZADMzzAAzM/8AM2YAADNmMwAzZmYAM2aZADNmzAAzZv8AM5kAADOZMwAzmWYAM5mZADOZ
zAAzmf8AM8wAADPMMwAzzGYAM8yZADPMzAAzzP8AM/8zADP/ZgAz/5kAM//MADP//wBmAAAAZgAzAGYA
ZgBmAJkAZgDMAGYA/wBmMwAAZjMzAGYzZgBmM5kAZjPMAGYz/wBmZgAAZmYzAGZmZgBmZpkAZmbMAGaZ
AABmmTMAZplmAGaZmQBmmcwAZpn/AGbMAABmzDMAZsyZAGbMzABmzP8AZv8AAGb/MwBm/5kAZv/MAMwA
/wD/AMwAmZkAAJkzmQCZAJkAmQDMAJkAAACZMzMAmQBmAJkzzACZAP8AmWYAAJlmMwCZM2YAmWaZAJlm
zACZM/8AmZkzAJmZZgCZmZkAmZnMAJmZ/wCZzAAAmcwzAGbMZgCZzJkAmczMAJnM/wCZ/wAAmf8zAJnM
ZgCZ/5kAmf/MAJn//wDMAAAAmQAzAMwAZgDMAJkAzADMAJkzAADMMzMAzDNmAMwzmQDMM8wAzDP/AMxm
AADMZjMAmWZmAMxmmQDMZswAmWb/AMyZAADMmTMAzJlmAMyZmQDMmcwAzJn/AMzMAADMzDMAzMxmAMzM
mQDMzMwAzMz/AMz/AADM/zMAmf9mAMz/mQDM/8wAzP//AMwAMwD/AGYA/wCZAMwzAAD/MzMA/zNmAP8z
mQD/M8wA/zP/AP9mAAD/ZjMAzGZmAP9mmQD/ZswAzGb/AP+ZAAD/mTMA/5lmAP+ZmQD/mcwA/5n/AP/M
AAD/zDMA/8xmAP/MmQD/zMwA/8z/AP//MwDM/2YA//+ZAP//zABmZv8AZv9mAGb//wD/ZmYA/2b/AP//
ZgAhAKUAX19fAHd3dwCGhoYAlpaWAMvLywCysrIA19fXAN3d3QDj4+MA6urqAPHx8QD4+PgA8Pv/AKSg
oACAgIAAAAD/AAD/AAAA//8A/wAAAP8A/wD//wAA////AAoKCgoKCgoKCgoKBwcHBwcHBwcHBwoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoHBwcHBwcHBwoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcH
BwcKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHCgcHBwcHBwcHBwcHBwcH
B+zsBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH7OwHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoK
EhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhIS
CgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoKEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKChISEhISEhISEhISEhISEhISEhIS
EhISEhISEhIKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhIS
EhISEhISEhISEhISCgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoKEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKChISEhISEhIS
EhISEhISEhISEhISEhISEhISEhIKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhIS
EhISEhISEhISEhISEhISEhISEhISEhISCgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoK
EhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhIS
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgr/4Af///AP///wD///8A////AP/4AA
AAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAAAB/////ygAAAAwAAAAYAAAAAEA
CAAAAAAAgAoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAACAAAAAgIAAgAAAAIAAgACAgAAAwMDAAMDc
wADwyqYABAQEAAgICAAMDAwAERERABYWFgAcHBwAIiIiACkpKQBVVVUATU1NAEJCQgA5OTkAgHz/AFBQ
/wCTANYA/+zMAMbW7wDW5+cAkKmtAAAAMwAAAGYAAACZAAAAzAAAMwAAADMzAAAzZgAAM5kAADPMAAAz
/wAAZgAAAGYzAABmZgAAZpkAAGbMAABm/wAAmQAAAJkzAACZZgAAmZkAAJnMAACZ/wAAzAAAAMwzAADM
ZgAAzJkAAMzMAADM/wAA/2YAAP+ZAAD/zAAzAAAAMwAzADMAZgAzAJkAMwDMADMA/wAzMwAAMzMzADMz
ZgAzM5kAMzPMADMz/wAzZgAAM2YzADNmZgAzZpkAM2bMADNm/wAzmQAAM5kzADOZZgAzmZkAM5nMADOZ
/wAzzAAAM8wzADPMZgAzzJkAM8zMADPM/wAz/zMAM/9mADP/mQAz/8wAM///AGYAAABmADMAZgBmAGYA
mQBmAMwAZgD/AGYzAABmMzMAZjNmAGYzmQBmM8wAZjP/AGZmAABmZjMAZmZmAGZmmQBmZswAZpkAAGaZ
MwBmmWYAZpmZAGaZzABmmf8AZswAAGbMMwBmzJkAZszMAGbM/wBm/wAAZv8zAGb/mQBm/8wAzAD/AP8A
zACZmQAAmTOZAJkAmQCZAMwAmQAAAJkzMwCZAGYAmTPMAJkA/wCZZgAAmWYzAJkzZgCZZpkAmWbMAJkz
/wCZmTMAmZlmAJmZmQCZmcwAmZn/AJnMAACZzDMAZsxmAJnMmQCZzMwAmcz/AJn/AACZ/zMAmcxmAJn/
mQCZ/8wAmf//AMwAAACZADMAzABmAMwAmQDMAMwAmTMAAMwzMwDMM2YAzDOZAMwzzADMM/8AzGYAAMxm
MwCZZmYAzGaZAMxmzACZZv8AzJkAAMyZMwDMmWYAzJmZAMyZzADMmf8AzMwAAMzMMwDMzGYAzMyZAMzM
zADMzP8AzP8AAMz/MwCZ/2YAzP+ZAMz/zADM//8AzAAzAP8AZgD/AJkAzDMAAP8zMwD/M2YA/zOZAP8z
zAD/M/8A/2YAAP9mMwDMZmYA/2aZAP9mzADMZv8A/5kAAP+ZMwD/mWYA/5mZAP+ZzAD/mf8A/8wAAP/M
MwD/zGYA/8yZAP/MzAD/zP8A//8zAMz/ZgD//5kA///MAGZm/wBm/2YAZv//AP9mZgD/Zv8A//9mACEA
pQBfX18Ad3d3AIaGhgCWlpYAy8vLALKysgDX19cA3d3dAOPj4wDq6uoA8fHxAPj4+ADw+/8ApKCgAICA
gAAAAP8AAP8AAAD//wD/AAAA/wD/AP//AAD///8ACgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHBwcH
BwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgcHBwcHBwcHBwcHBwcHBwcKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
BwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcH
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoHBwcH
BwcHBwcHBwcHBwcHBwcHBwfs7AcHBwcHBwcHBwcHBwcHBwcHBwcHBwoKCgcHBwcHBwcHBwcHBwcHBwcH
BwcHB+zs7OwHBwcHBwcHBwcHBwcHBwcHBwcHBwcKBwcHBwcHBwcHBwcHBwcHBwcHBwcHB+zs7OwHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHB+zs7OwHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK//4AAH//
AAD//wAA//8AAP//wAP//wAA///AA///AAD//8AD//8AAP//wAP//wAA///AA///AAD//8AD//8AAMAA
AAAAAwAAgAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAAAAB
AADAAAAAAAMAAP///////wAA
</value>
</data>
<data name="$this.Text" xml:space="preserve">
<value>Optionen</value>
</data>
</root>

588
frmOptions.es-MX.resx Normal file
View File

@ -0,0 +1,588 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="cmdOK.Text" xml:space="preserve">
<value>Aceptar</value>
</data>
<data name="cmdOK.ToolTip" xml:space="preserve">
<value />
</data>
<data name="cmdCancel.Text" xml:space="preserve">
<value>Cancelar</value>
</data>
<data name="cmdCancel.ToolTip" xml:space="preserve">
<value />
</data>
<data name="FolderAppCurrent.ToolTip" xml:space="preserve">
<value />
</data>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="FolderAppCurrentLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>148, 13</value>
</data>
<data name="FolderAppCurrentLabel.Text" xml:space="preserve">
<value>Carpeta actual del programa:</value>
</data>
<data name="FolderAppCurrentLabel.ToolTip" xml:space="preserve">
<value />
</data>
<data name="FolderNewMacLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>220, 17</value>
</data>
<data name="FolderNewMacLabel.Text" xml:space="preserve">
<value>Carpeta predeterminada para nuevas Macs:</value>
</data>
<data name="FolderNewMacLabel.ToolTip" xml:space="preserve">
<value />
</data>
<data name="FolderNewMac.ToolTip" xml:space="preserve">
<value />
</data>
<data name="FolderNewMacBrowse.ToolTip" xml:space="preserve">
<value />
</data>
<data name="FolderFrame.Text" xml:space="preserve">
<value>Carpetas</value>
</data>
<data name="FolderFrame.ToolTip" xml:space="preserve">
<value />
</data>
<data name="ROMNoteNoROM.Size" type="System.Drawing.Size, System.Drawing">
<value>314, 13</value>
</data>
<data name="ROMNoteNoROM.Text" xml:space="preserve">
<value>Note que QEMU y PearPC no requieren una ROM para funcionar</value>
</data>
<data name="ROMNoteNoROM.ToolTip" xml:space="preserve">
<value />
</data>
<data name="ROMSS.ToolTip" xml:space="preserve">
<value />
</data>
<data name="ROMSSLabel.ToolTip" xml:space="preserve">
<value />
</data>
<data name="ROMSSBrowse.ToolTip" xml:space="preserve">
<value />
</data>
<data name="ROMBII.ToolTip" xml:space="preserve">
<value />
</data>
<data name="ROMBIILabel.ToolTip" xml:space="preserve">
<value />
</data>
<data name="ROMBIIBrowse.ToolTip" xml:space="preserve">
<value />
</data>
<data name="ROMvMac.ToolTip" xml:space="preserve">
<value />
</data>
<data name="ROMvMacLabel.ToolTip" xml:space="preserve">
<value />
</data>
<data name="ROMvMacBrowse.ToolTip" xml:space="preserve">
<value />
</data>
<data name="ROMFrame.ToolTip" xml:space="preserve">
<value />
</data>
<data name="Setting.Text" xml:space="preserve">
<value>Opciones</value>
</data>
<data name="Value.Text" xml:space="preserve">
<value>Valores</value>
</data>
<data name="OptionContainer.Items" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0JAAAA
BFRleHQKSW1hZ2VJbmRleAxTdWJJdGVtQ291bnQIU3ViSXRlbTEJQmFja0NvbG9yB0NoZWNrZWQERm9u
dAlGb3JlQ29sb3IXVXNlSXRlbVN0eWxlRm9yU3ViSXRlbXMBAAAEBAAEBAAICDFTeXN0ZW0uV2luZG93
cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtAgAAABRTeXN0ZW0uRHJhd2luZy5Db2xv
cgMAAAABE1N5c3RlbS5EcmF3aW5nLkZvbnQDAAAAFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAECAAAA
BgQAAAAcUHJvYmFyIHZlbnRhbmEgZGUgZW11bGFjacOzbv////8CAAAACQUAAAAF+v///xRTeXN0ZW0u
RHJhd2luZy5Db2xvcgQAAAAEbmFtZQV2YWx1ZQprbm93bkNvbG9yBXN0YXRlAQAAAAkHBwMAAAAKAAAA
AAAAAAAYAAEAAAkHAAAAAfj////6////CgAAAAAAAAAAGgABAAEMCQAAAEttc2NvcmxpYiwgVmVyc2lv
bj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkF
BQAAADFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtBAAAAAR0
ZXh0BG5hbWUFc3R5bGUIdXNlckRhdGEBAQQCPlN5c3RlbS5XaW5kb3dzLkZvcm1zLkxpc3RWaWV3SXRl
bStMaXN0Vmlld1N1Ykl0ZW0rU3ViSXRlbVN0eWxlAgAAAAIAAAAGCgAAAAJObwoKCgUHAAAAE1N5c3Rl
bS5EcmF3aW5nLkZvbnQEAAAABE5hbWUEU2l6ZQVTdHlsZQRVbml0AQAEBAsYU3lzdGVtLkRyYXdpbmcu
Rm9udFN0eWxlAwAAABtTeXN0ZW0uRHJhd2luZy5HcmFwaGljc1VuaXQDAAAAAwAAAAYLAAAABlRhaG9t
YQAABEEF9P///xhTeXN0ZW0uRHJhd2luZy5Gb250U3R5bGUBAAAAB3ZhbHVlX18ACAMAAAAAAAAABfP/
//8bU3lzdGVtLkRyYXdpbmcuR3JhcGhpY3NVbml0AQAAAAd2YWx1ZV9fAAgDAAAAAwAAAAs=
</value>
</data>
<data name="OptionContainer.Items1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0JAAAA
BFRleHQKSW1hZ2VJbmRleAxTdWJJdGVtQ291bnQIU3ViSXRlbTEJQmFja0NvbG9yB0NoZWNrZWQERm9u
dAlGb3JlQ29sb3IXVXNlSXRlbVN0eWxlRm9yU3ViSXRlbXMBAAAEBAAEBAAICDFTeXN0ZW0uV2luZG93
cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtAgAAABRTeXN0ZW0uRHJhd2luZy5Db2xv
cgMAAAABE1N5c3RlbS5EcmF3aW5nLkZvbnQDAAAAFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAECAAAA
BgQAAAAEUk9Nc/////8CAAAACQUAAAAF+v///xRTeXN0ZW0uRHJhd2luZy5Db2xvcgQAAAAEbmFtZQV2
YWx1ZQprbm93bkNvbG9yBXN0YXRlAQAAAAkHBwMAAAAKAAAAAAAAAAAYAAEAAAkHAAAAAfj////6////
CgAAAAAAAAAAGgABAAEMCQAAAEttc2NvcmxpYiwgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRy
YWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFBQAAADFTeXN0ZW0uV2luZG93cy5Gb3Jt
cy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtBAAAAAR0ZXh0BG5hbWUFc3R5bGUIdXNlckRhdGEB
AQQCPlN5c3RlbS5XaW5kb3dzLkZvcm1zLkxpc3RWaWV3SXRlbStMaXN0Vmlld1N1Ykl0ZW0rU3ViSXRl
bVN0eWxlAgAAAAIAAAAGCgAAAAdYLCBZLCBaCgoKBQcAAAATU3lzdGVtLkRyYXdpbmcuRm9udAQAAAAE
TmFtZQRTaXplBVN0eWxlBFVuaXQBAAQECxhTeXN0ZW0uRHJhd2luZy5Gb250U3R5bGUDAAAAG1N5c3Rl
bS5EcmF3aW5nLkdyYXBoaWNzVW5pdAMAAAADAAAABgsAAAAGVGFob21hAAAEQQX0////GFN5c3RlbS5E
cmF3aW5nLkZvbnRTdHlsZQEAAAAHdmFsdWVfXwAIAwAAAAAAAAAF8////xtTeXN0ZW0uRHJhd2luZy5H
cmFwaGljc1VuaXQBAAAAB3ZhbHVlX18ACAMAAAADAAAACw==
</value>
</data>
<data name="OptionContainer.Items2" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0JAAAA
BFRleHQKSW1hZ2VJbmRleAxTdWJJdGVtQ291bnQIU3ViSXRlbTEJQmFja0NvbG9yB0NoZWNrZWQERm9u
dAlGb3JlQ29sb3IXVXNlSXRlbVN0eWxlRm9yU3ViSXRlbXMBAAAEBAAEBAAICDFTeXN0ZW0uV2luZG93
cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtAgAAABRTeXN0ZW0uRHJhd2luZy5Db2xv
cgMAAAABE1N5c3RlbS5EcmF3aW5nLkZvbnQDAAAAFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAECAAAA
BgQAAAAXQ2FycGV0YSBwYXJhIG51ZXZhcyBNYWP/////AgAAAAkFAAAABfr///8UU3lzdGVtLkRyYXdp
bmcuQ29sb3IEAAAABG5hbWUFdmFsdWUKa25vd25Db2xvcgVzdGF0ZQEAAAAJBwcDAAAACgAAAAAAAAAA
GAABAAAJBwAAAAH4////+v///woAAAAAAAAAABoAAQABDAkAAABLbXNjb3JsaWIsIFZlcnNpb249Mi4w
LjAuMCwgQ3VsdHVyZT1uZXV0cmFsLCBQdWJsaWNLZXlUb2tlbj1iNzdhNWM1NjE5MzRlMDg5BQUAAAAx
U3lzdGVtLldpbmRvd3MuRm9ybXMuTGlzdFZpZXdJdGVtK0xpc3RWaWV3U3ViSXRlbQQAAAAEdGV4dARu
YW1lBXN0eWxlCHVzZXJEYXRhAQEEAj5TeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlz
dFZpZXdTdWJJdGVtK1N1Ykl0ZW1TdHlsZQIAAAACAAAABgoAAAADQzpcCgoKBQcAAAATU3lzdGVtLkRy
YXdpbmcuRm9udAQAAAAETmFtZQRTaXplBVN0eWxlBFVuaXQBAAQECxhTeXN0ZW0uRHJhd2luZy5Gb250
U3R5bGUDAAAAG1N5c3RlbS5EcmF3aW5nLkdyYXBoaWNzVW5pdAMAAAADAAAABgsAAAAGVGFob21hAAAE
QQX0////GFN5c3RlbS5EcmF3aW5nLkZvbnRTdHlsZQEAAAAHdmFsdWVfXwAIAwAAAAAAAAAF8////xtT
eXN0ZW0uRHJhd2luZy5HcmFwaGljc1VuaXQBAAAAB3ZhbHVlX18ACAMAAAADAAAACw==
</value>
</data>
<data name="OptionContainer.Items3" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0JAAAA
BFRleHQKSW1hZ2VJbmRleAxTdWJJdGVtQ291bnQIU3ViSXRlbTEJQmFja0NvbG9yB0NoZWNrZWQERm9u
dAlGb3JlQ29sb3IXVXNlSXRlbVN0eWxlRm9yU3ViSXRlbXMBAAAEBAAEBAAICDFTeXN0ZW0uV2luZG93
cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtAgAAABRTeXN0ZW0uRHJhd2luZy5Db2xv
cgMAAAABE1N5c3RlbS5EcmF3aW5nLkZvbnQDAAAAFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAECAAAA
BgQAAAAXUnV0YXMgZGUgbG9zIGVtdWxhZG9yZXP/////AgAAAAkFAAAABfr///8UU3lzdGVtLkRyYXdp
bmcuQ29sb3IEAAAABG5hbWUFdmFsdWUKa25vd25Db2xvcgVzdGF0ZQEAAAAJBwcDAAAACgAAAAAAAAAA
GAABAAAJBwAAAAH4////+v///woAAAAAAAAAABoAAQABDAkAAABLbXNjb3JsaWIsIFZlcnNpb249Mi4w
LjAuMCwgQ3VsdHVyZT1uZXV0cmFsLCBQdWJsaWNLZXlUb2tlbj1iNzdhNWM1NjE5MzRlMDg5BQUAAAAx
U3lzdGVtLldpbmRvd3MuRm9ybXMuTGlzdFZpZXdJdGVtK0xpc3RWaWV3U3ViSXRlbQQAAAAEdGV4dARu
YW1lBXN0eWxlCHVzZXJEYXRhAQEEAj5TeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlz
dFZpZXdTdWJJdGVtK1N1Ykl0ZW1TdHlsZQIAAAACAAAABgoAAAAGQ3VzdG9tCgoKBQcAAAATU3lzdGVt
LkRyYXdpbmcuRm9udAQAAAAETmFtZQRTaXplBVN0eWxlBFVuaXQBAAQECxhTeXN0ZW0uRHJhd2luZy5G
b250U3R5bGUDAAAAG1N5c3RlbS5EcmF3aW5nLkdyYXBoaWNzVW5pdAMAAAADAAAABgsAAAAGVGFob21h
AAAEQQX0////GFN5c3RlbS5EcmF3aW5nLkZvbnRTdHlsZQEAAAAHdmFsdWVfXwAIAwAAAAAAAAAF8///
/xtTeXN0ZW0uRHJhd2luZy5HcmFwaGljc1VuaXQBAAAAB3ZhbHVlX18ACAMAAAADAAAACw==
</value>
</data>
<data name="OptionContainer.Items4" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0JAAAA
BFRleHQKSW1hZ2VJbmRleAxTdWJJdGVtQ291bnQIU3ViSXRlbTEJQmFja0NvbG9yB0NoZWNrZWQERm9u
dAlGb3JlQ29sb3IXVXNlSXRlbVN0eWxlRm9yU3ViSXRlbXMBAAAEBAAEBAAICDFTeXN0ZW0uV2luZG93
cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtAgAAABRTeXN0ZW0uRHJhd2luZy5Db2xv
cgMAAAABE1N5c3RlbS5EcmF3aW5nLkZvbnQDAAAAFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAECAAAA
BgQAAAAGSWRpb21h/////wIAAAAJBQAAAAX6////FFN5c3RlbS5EcmF3aW5nLkNvbG9yBAAAAARuYW1l
BXZhbHVlCmtub3duQ29sb3IFc3RhdGUBAAAACQcHAwAAAAoAAAAAAAAAABgAAQAACQcAAAAB+P////r/
//8KAAAAAAAAAAAaAAEAAQwJAAAAS21zY29ybGliLCBWZXJzaW9uPTIuMC4wLjAsIEN1bHR1cmU9bmV1
dHJhbCwgUHVibGljS2V5VG9rZW49Yjc3YTVjNTYxOTM0ZTA4OQUFAAAAMVN5c3RlbS5XaW5kb3dzLkZv
cm1zLkxpc3RWaWV3SXRlbStMaXN0Vmlld1N1Ykl0ZW0EAAAABHRleHQEbmFtZQVzdHlsZQh1c2VyRGF0
YQEBBAI+U3lzdGVtLldpbmRvd3MuRm9ybXMuTGlzdFZpZXdJdGVtK0xpc3RWaWV3U3ViSXRlbStTdWJJ
dGVtU3R5bGUCAAAAAgAAAAoKCgoFBwAAABNTeXN0ZW0uRHJhd2luZy5Gb250BAAAAAROYW1lBFNpemUF
U3R5bGUEVW5pdAEABAQLGFN5c3RlbS5EcmF3aW5nLkZvbnRTdHlsZQMAAAAbU3lzdGVtLkRyYXdpbmcu
R3JhcGhpY3NVbml0AwAAAAMAAAAGCgAAAAZUYWhvbWEAAARBBfX///8YU3lzdGVtLkRyYXdpbmcuRm9u
dFN0eWxlAQAAAAd2YWx1ZV9fAAgDAAAAAAAAAAX0////G1N5c3RlbS5EcmF3aW5nLkdyYXBoaWNzVW5p
dAEAAAAHdmFsdWVfXwAIAwAAAAMAAAAL
</value>
</data>
<data name="OptionContainer.ToolTip" xml:space="preserve">
<value />
</data>
<data name="UCDisableTest.Size" type="System.Drawing.Size, System.Drawing">
<value>73, 17</value>
</data>
<data name="UCDisableTest.Text" xml:space="preserve">
<value>No probar</value>
</data>
<data name="UCDisableTest.ToolTip" xml:space="preserve">
<value />
</data>
<data name="UCEnableTest.Size" type="System.Drawing.Size, System.Drawing">
<value>57, 17</value>
</data>
<data name="UCEnableTest.Text" xml:space="preserve">
<value>Probar</value>
</data>
<data name="UCEnableTest.ToolTip" xml:space="preserve">
<value />
</data>
<data name="UseContainerFrame.Text" xml:space="preserve">
<value>Probar ventana de emulación</value>
</data>
<data name="UseContainerFrame.ToolTip" xml:space="preserve">
<value />
</data>
<data name="EPVerifyEmulatorPaths.Size" type="System.Drawing.Size, System.Drawing">
<value>178, 17</value>
</data>
<data name="EPVerifyEmulatorPaths.Text" xml:space="preserve">
<value>Verificar rutas inválidas al iniciar</value>
</data>
<data name="EPVerifyEmulatorPaths.ToolTip" xml:space="preserve">
<value />
</data>
<data name="EPvMacPathLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>57, 13</value>
</data>
<data name="EPvMacPathLabel.Text" xml:space="preserve">
<value>Mini vMac:</value>
</data>
<data name="EPvMacPathLabel.ToolTip" xml:space="preserve">
<value />
</data>
<data name="EPvMacPath.ToolTip" xml:space="preserve">
<value />
</data>
<data name="EPvMacPathBrowse.ToolTip" xml:space="preserve">
<value />
</data>
<data name="EPQEMUPathLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>40, 13</value>
</data>
<data name="EPQEMUPathLabel.Text" xml:space="preserve">
<value>QEMU:</value>
</data>
<data name="EPQEMUPathLabel.ToolTip" xml:space="preserve">
<value />
</data>
<data name="EPQEMUPath.ToolTip" xml:space="preserve">
<value />
</data>
<data name="EPQEMUPathBrowse.ToolTip" xml:space="preserve">
<value />
</data>
<data name="EPPPCPathLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>46, 13</value>
</data>
<data name="EPPPCPathLabel.Text" xml:space="preserve">
<value>PearPC:</value>
</data>
<data name="EPPPCPathLabel.ToolTip" xml:space="preserve">
<value />
</data>
<data name="EPPPCPath.ToolTip" xml:space="preserve">
<value />
</data>
<data name="EPPPCPathBrowse.ToolTip" xml:space="preserve">
<value />
</data>
<data name="EPSSPathLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>75, 13</value>
</data>
<data name="EPSSPathLabel.Text" xml:space="preserve">
<value>SheepShaver:</value>
</data>
<data name="EPSSPathLabel.ToolTip" xml:space="preserve">
<value />
</data>
<data name="EPSSPath.ToolTip" xml:space="preserve">
<value />
</data>
<data name="EPSSPathBrowse.ToolTip" xml:space="preserve">
<value />
</data>
<data name="EPBIIPathLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>55, 13</value>
</data>
<data name="EPBIIPathLabel.Text" xml:space="preserve">
<value>Basilisk II:</value>
</data>
<data name="EPBIIPathLabel.ToolTip" xml:space="preserve">
<value />
</data>
<data name="EPBIIPath.ToolTip" xml:space="preserve">
<value />
</data>
<data name="EPBIIPathBrowse.ToolTip" xml:space="preserve">
<value />
</data>
<data name="EmulatorPathFrame.Text" xml:space="preserve">
<value>Rutas de emulador</value>
</data>
<data name="EmulatorPathFrame.ToolTip" xml:space="preserve">
<value />
</data>
<data name="LangSelected.Items" xml:space="preserve">
<value>Ingles (Estados Unidos) [English]</value>
</data>
<data name="LangSelected.Items1" xml:space="preserve">
<value>Español (México) [Español]</value>
</data>
<data name="LangSelected.Size" type="System.Drawing.Size, System.Drawing">
<value>263, 21</value>
</data>
<data name="LangSelected.ToolTip" xml:space="preserve">
<value />
</data>
<data name="LangInfo.Size" type="System.Drawing.Size, System.Drawing">
<value>320, 39</value>
</data>
<data name="LangInfo.Text" xml:space="preserve">
<value>En esta página usted puede seleccionar el idioma de la aplicación.
El cambio no será reflejado inmediatamente. Debe reiniciar
Viirtual Mac para que este cambio tenga efecto</value>
</data>
<data name="LangInfo.ToolTip" xml:space="preserve">
<value />
</data>
<data name="LangFrame.Text" xml:space="preserve">
<value>Idioma</value>
</data>
<data name="LangFrame.ToolTip" xml:space="preserve">
<value />
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAMAEBAQAAAAAAAoAQAANgAAACAgAAAAAAAAqAgAAF4BAAAwMAAAAAAAAKgOAAAGCgAAKAAAABAA
AAAgAAAAAQAEAAAAAADAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAAIAAAACAgACAAAAAgACAAICA
AADAwMAAgICAAAAA/wAA/wAAAP//AP8AAAD/AP8A//8AAP///wAAAAd3d3AAAAAAAHd3AAAAAAAAd3cA
AAB3d3d4d3d3d3d3d3d3d3d3AAAAAAAAAAAIiIiIiIiIgAiIiIiIiIiACIiIiIiIiIAIiIiIiIiIgAiI
iIiIiIiACIiIiIiIiIAIiIiIiIiIgAiIiIiIiIiACIiIiIiIiIAAAAAAAAAAAPgfAAD8PwAA/D8AAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAoAAAAIAAAAEAA
AAABAAgAAAAAAIAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAgAAAAICAAIAAAACAAIAAgIAAAMDA
wADA3MAA8MqmAAQEBAAICAgADAwMABEREQAWFhYAHBwcACIiIgApKSkAVVVVAE1NTQBCQkIAOTk5AIB8
/wBQUP8AkwDWAP/szADG1u8A1ufnAJCprQAAADMAAABmAAAAmQAAAMwAADMAAAAzMwAAM2YAADOZAAAz
zAAAM/8AAGYAAABmMwAAZmYAAGaZAABmzAAAZv8AAJkAAACZMwAAmWYAAJmZAACZzAAAmf8AAMwAAADM
MwAAzGYAAMyZAADMzAAAzP8AAP9mAAD/mQAA/8wAMwAAADMAMwAzAGYAMwCZADMAzAAzAP8AMzMAADMz
MwAzM2YAMzOZADMzzAAzM/8AM2YAADNmMwAzZmYAM2aZADNmzAAzZv8AM5kAADOZMwAzmWYAM5mZADOZ
zAAzmf8AM8wAADPMMwAzzGYAM8yZADPMzAAzzP8AM/8zADP/ZgAz/5kAM//MADP//wBmAAAAZgAzAGYA
ZgBmAJkAZgDMAGYA/wBmMwAAZjMzAGYzZgBmM5kAZjPMAGYz/wBmZgAAZmYzAGZmZgBmZpkAZmbMAGaZ
AABmmTMAZplmAGaZmQBmmcwAZpn/AGbMAABmzDMAZsyZAGbMzABmzP8AZv8AAGb/MwBm/5kAZv/MAMwA
/wD/AMwAmZkAAJkzmQCZAJkAmQDMAJkAAACZMzMAmQBmAJkzzACZAP8AmWYAAJlmMwCZM2YAmWaZAJlm
zACZM/8AmZkzAJmZZgCZmZkAmZnMAJmZ/wCZzAAAmcwzAGbMZgCZzJkAmczMAJnM/wCZ/wAAmf8zAJnM
ZgCZ/5kAmf/MAJn//wDMAAAAmQAzAMwAZgDMAJkAzADMAJkzAADMMzMAzDNmAMwzmQDMM8wAzDP/AMxm
AADMZjMAmWZmAMxmmQDMZswAmWb/AMyZAADMmTMAzJlmAMyZmQDMmcwAzJn/AMzMAADMzDMAzMxmAMzM
mQDMzMwAzMz/AMz/AADM/zMAmf9mAMz/mQDM/8wAzP//AMwAMwD/AGYA/wCZAMwzAAD/MzMA/zNmAP8z
mQD/M8wA/zP/AP9mAAD/ZjMAzGZmAP9mmQD/ZswAzGb/AP+ZAAD/mTMA/5lmAP+ZmQD/mcwA/5n/AP/M
AAD/zDMA/8xmAP/MmQD/zMwA/8z/AP//MwDM/2YA//+ZAP//zABmZv8AZv9mAGb//wD/ZmYA/2b/AP//
ZgAhAKUAX19fAHd3dwCGhoYAlpaWAMvLywCysrIA19fXAN3d3QDj4+MA6urqAPHx8QD4+PgA8Pv/AKSg
oACAgIAAAAD/AAD/AAAA//8A/wAAAP8A/wD//wAA////AAoKCgoKCgoKCgoKBwcHBwcHBwcHBwoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoHBwcHBwcHBwoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcH
BwcKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHCgcHBwcHBwcHBwcHBwcH
B+zsBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH7OwHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoK
EhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhIS
CgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoKEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKChISEhISEhISEhISEhISEhISEhIS
EhISEhISEhIKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhIS
EhISEhISEhISEhISCgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoKEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKChISEhISEhIS
EhISEhISEhISEhISEhISEhISEhIKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhIS
EhISEhISEhISEhISEhISEhISEhISEhISCgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoK
EhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhIS
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgr/4Af///AP///wD///8A////AP/4AA
AAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAAAB/////ygAAAAwAAAAYAAAAAEA
CAAAAAAAgAoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAACAAAAAgIAAgAAAAIAAgACAgAAAwMDAAMDc
wADwyqYABAQEAAgICAAMDAwAERERABYWFgAcHBwAIiIiACkpKQBVVVUATU1NAEJCQgA5OTkAgHz/AFBQ
/wCTANYA/+zMAMbW7wDW5+cAkKmtAAAAMwAAAGYAAACZAAAAzAAAMwAAADMzAAAzZgAAM5kAADPMAAAz
/wAAZgAAAGYzAABmZgAAZpkAAGbMAABm/wAAmQAAAJkzAACZZgAAmZkAAJnMAACZ/wAAzAAAAMwzAADM
ZgAAzJkAAMzMAADM/wAA/2YAAP+ZAAD/zAAzAAAAMwAzADMAZgAzAJkAMwDMADMA/wAzMwAAMzMzADMz
ZgAzM5kAMzPMADMz/wAzZgAAM2YzADNmZgAzZpkAM2bMADNm/wAzmQAAM5kzADOZZgAzmZkAM5nMADOZ
/wAzzAAAM8wzADPMZgAzzJkAM8zMADPM/wAz/zMAM/9mADP/mQAz/8wAM///AGYAAABmADMAZgBmAGYA
mQBmAMwAZgD/AGYzAABmMzMAZjNmAGYzmQBmM8wAZjP/AGZmAABmZjMAZmZmAGZmmQBmZswAZpkAAGaZ
MwBmmWYAZpmZAGaZzABmmf8AZswAAGbMMwBmzJkAZszMAGbM/wBm/wAAZv8zAGb/mQBm/8wAzAD/AP8A
zACZmQAAmTOZAJkAmQCZAMwAmQAAAJkzMwCZAGYAmTPMAJkA/wCZZgAAmWYzAJkzZgCZZpkAmWbMAJkz
/wCZmTMAmZlmAJmZmQCZmcwAmZn/AJnMAACZzDMAZsxmAJnMmQCZzMwAmcz/AJn/AACZ/zMAmcxmAJn/
mQCZ/8wAmf//AMwAAACZADMAzABmAMwAmQDMAMwAmTMAAMwzMwDMM2YAzDOZAMwzzADMM/8AzGYAAMxm
MwCZZmYAzGaZAMxmzACZZv8AzJkAAMyZMwDMmWYAzJmZAMyZzADMmf8AzMwAAMzMMwDMzGYAzMyZAMzM
zADMzP8AzP8AAMz/MwCZ/2YAzP+ZAMz/zADM//8AzAAzAP8AZgD/AJkAzDMAAP8zMwD/M2YA/zOZAP8z
zAD/M/8A/2YAAP9mMwDMZmYA/2aZAP9mzADMZv8A/5kAAP+ZMwD/mWYA/5mZAP+ZzAD/mf8A/8wAAP/M
MwD/zGYA/8yZAP/MzAD/zP8A//8zAMz/ZgD//5kA///MAGZm/wBm/2YAZv//AP9mZgD/Zv8A//9mACEA
pQBfX18Ad3d3AIaGhgCWlpYAy8vLALKysgDX19cA3d3dAOPj4wDq6uoA8fHxAPj4+ADw+/8ApKCgAICA
gAAAAP8AAP8AAAD//wD/AAAA/wD/AP//AAD///8ACgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHBwcH
BwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgcHBwcHBwcHBwcHBwcHBwcKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
BwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcH
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoHBwcH
BwcHBwcHBwcHBwcHBwcHBwfs7AcHBwcHBwcHBwcHBwcHBwcHBwcHBwoKCgcHBwcHBwcHBwcHBwcHBwcH
BwcHB+zs7OwHBwcHBwcHBwcHBwcHBwcHBwcHBwcKBwcHBwcHBwcHBwcHBwcHBwcHBwcHB+zs7OwHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHB+zs7OwHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK//4AAH//
AAD//wAA//8AAP//wAP//wAA///AA///AAD//8AD//8AAP//wAP//wAA///AA///AAD//8AD//8AAMAA
AAAAAwAAgAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAAAAB
AADAAAAAAAMAAP///////wAA
</value>
</data>
<data name="$this.Text" xml:space="preserve">
<value>Opciones</value>
</data>
<data name="$this.ToolTip" xml:space="preserve">
<value />
</data>
</root>

1793
frmOptions.resx Normal file

File diff suppressed because it is too large Load Diff

137
frmOptions.vb Normal file
View File

@ -0,0 +1,137 @@
Option Strict Off
Option Explicit On
Friend Class frmOptions
Inherits System.Windows.Forms.Form
Private Sub cmdCancel_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles cmdCancel.Click
Me.Close()
End Sub
Private Sub cmdOK_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles cmdOK.Click
My.Settings.DefaultMacFolder = FolderNewMac.Text
My.Settings.vMacROM = ROMvMac.Text
My.Settings.BasiliskROM = ROMBII.Text
My.Settings.SheepShaverROM = ROMSS.Text
My.Settings.vMacPath = EPvMacPath.Text
My.Settings.BasiliskPath = EPBIIPath.Text
My.Settings.SheepShaverPath = EPSSPath.Text
My.Settings.PearPCPath = EPPPCPath.Text
My.Settings.QEMUPath = EPQEMUPath.Text
My.Settings.VerifyEmulatorPaths = EPVerifyEmulatorPaths.Checked
Select Case LangSelected.SelectedIndex
Case 0
My.Settings.Lang = "en-US"
Case 1
My.Settings.Lang = "de-DE"
Case 2
My.Settings.Lang = "es-MX"
End Select
If UCEnableTest.Checked = True Then
My.Settings.TestWindow = True
Else
My.Settings.TestWindow = False
End If
My.Settings.Save()
Me.Close()
End Sub
Private Sub BrowseFolder_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles FolderNewMacBrowse.Click
If FolderBrowser.ShowDialog() = Forms.DialogResult.OK Then
FolderNewMac.Text = FolderBrowser.SelectedPath
End If
End Sub
Private Sub OptionsContainer_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OptionContainer.SelectedIndexChanged
ROMFrame.Visible = False
FolderFrame.Visible = False
UseContainerFrame.Visible = False
EmulatorPathFrame.Visible = False
LangFrame.Visible = False
Select Case OptionContainer.FocusedItem.Index
Case 0
UseContainerFrame.Visible = True
Case 1
ROMFrame.Visible = True
Case 2
FolderFrame.Visible = True
Case 3
EmulatorPathFrame.Visible = True
Case 4
LangFrame.Visible = True
End Select
End Sub
Private Sub frmOptions_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim ROMFileNames As String = System.IO.Path.GetFileName(My.Settings.vMacROM) & ", " & System.IO.Path.GetFileName(My.Settings.BasiliskROM) & ", " & System.IO.Path.GetFileName(My.Settings.SheepShaverROM)
OptionContainer.Items(2).SubItems(1).Text = ROMFileNames
OptionContainer.Items(3).SubItems(1).Text = My.Settings.DefaultMacFolder
FolderAppCurrent.Text = My.Application.Info.DirectoryPath
FolderNewMac.Text = My.Settings.DefaultMacFolder
ROMvMac.Text = My.Settings.vMacROM
ROMBII.Text = My.Settings.BasiliskROM
ROMSS.Text = My.Settings.SheepShaverROM
EPvMacPath.Text = My.Settings.vMacPath
EPBIIPath.Text = My.Settings.BasiliskPath
EPSSPath.Text = My.Settings.SheepShaverPath
EPPPCPath.Text = My.Settings.PearPCPath
EPQEMUPath.Text = My.Settings.QEMUPath
EPVerifyEmulatorPaths.Checked = My.Settings.VerifyEmulatorPaths
Select Case My.Settings.Lang
Case "en-US"
LangSelected.SelectedIndex = 0
Case "de-DE"
LangSelected.SelectedIndex = 1
Case "es-MX"
LangSelected.SelectedIndex = 2
End Select
If My.Settings.TestWindow = True Then
UCEnableTest.Checked = True
Else
UCDisableTest.Checked = True
End If
End Sub
Private Sub BrowseForFile(sender As System.Object, e As System.EventArgs) Handles EPvMacPathBrowse.Click, EPSSPathBrowse.Click, EPQEMUPathBrowse.Click, EPPPCPathBrowse.Click, EPBIIPathBrowse.Click, ROMvMacBrowse.Click, ROMSSBrowse.Click, ROMBIIBrowse.Click
If BrowseOpen.ShowDialog = Forms.DialogResult.OK Then
If ReferenceEquals(sender, EPvMacPathBrowse) = True Then
EPvMacPath.Text = BrowseOpen.FileName
ElseIf ReferenceEquals(sender, EPBIIPathBrowse) = True Then
EPBIIPath.Text = BrowseOpen.FileName
ElseIf ReferenceEquals(sender, EPSSPathBrowse) = True Then
EPSSPath.Text = BrowseOpen.FileName
ElseIf ReferenceEquals(sender, EPPPCPathBrowse) = True Then
EPPPCPath.Text = BrowseOpen.FileName
ElseIf ReferenceEquals(sender, EPQEMUPathBrowse) = True Then
EPQEMUPath.Text = BrowseOpen.FileName
ElseIf ReferenceEquals(sender, ROMvMacBrowse) = True Then
ROMvMac.Text = BrowseOpen.FileName
ElseIf ReferenceEquals(sender, ROMBIIBrowse) = True Then
ROMBII.Text = BrowseOpen.FileName
ElseIf ReferenceEquals(sender, ROMSSBrowse) = True Then
ROMSS.Text = BrowseOpen.FileName
Else
End If
End If
End Sub
Private Sub UseContainer_Status(sender As Object, e As System.EventArgs) Handles UCEnableTest.CheckedChanged, UCDisableTest.CheckedChanged
If UCEnableTest.Checked = True Then
OptionContainer.Items.Item(0).SubItems(1).Text = "Yes"
Else
OptionContainer.Items.Item(0).SubItems(1).Text = "No"
End If
End Sub
End Class

1475
frmSettingsBasiliskVM.Designer.vb generated Normal file

File diff suppressed because it is too large Load Diff

378
frmSettingsBasiliskVM.resx Normal file
View File

@ -0,0 +1,378 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="ControlToolTip.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>14, 6</value>
</metadata>
<data name="NetEnableUDP.ToolTip" xml:space="preserve">
<value>The UDP tunnel works connecting the emulator throught your
host operating system. This way the emulator works like a browser,
where it asks for internet throught your local IP. This mode is better
for novices, but if you want to connect the emulated Mac to an
AppleTalk network, you must not use this option.</value>
</data>
<data name="NetServerPorts.ToolTip" xml:space="preserve">
<value>The TCP ports open in the emulated router. The most common
ones are 80, 443, 8080. If you are going to connect to a special
web server, like a hospital one, if you are going to play an
online game that uses a dedicated port, or if you want to open
an email port, type it here, separated with commas.
Example given: 80, 443, 8080, 995</value>
</data>
<data name="NetFTPPorts.ToolTip" xml:space="preserve">
<value>The FTP ports open in the emulated router. The most common
FTP port is 21, but if you are going to connect to a special FTP
server, then you should type here the port where you are going
to connect by.
Example given: 21, 50000, 43, 995</value>
</data>
<data name="NetType.ToolTip" xml:space="preserve">
<value>Slirp: Uses your network and connects the emulator to a
virtualized network with connection to the real network
Router: Emulates a router to which the emulator connects to.
The emulated router connects throught your real network, so
it still has access to the internet. Note that you need to specify
which ports are gonna be open in the router network
None: No network hardware is emulated</value>
</data>
<data name="IconInfo.Text" xml:space="preserve">
<value>Some personalization to your Mac could come very handy. In this page
you can change an icon of your desire for your emulated Mac. Scroll
the bar to see more icons, or click in "Add" to add a picture and set it as
the icon for your Mac</value>
</data>
<metadata name="DriveListContext.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>255, 6</value>
</metadata>
<metadata name="DriveIcons.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>147, 6</value>
</metadata>
<data name="DriveIcons.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAAC8
DwAAAk1TRnQBSQFMAgEBAwEAAdABAAHQAQABEAEAARABAAT/ASEBAAj/AUIBTQE2BwABNgMAASgDAAFA
AwABEAMAAQEBAAEgBgABEBIAAy0BRQFaAVcBWgHFAVwBWQFcAcwBWwFZAVsBxAGQAYsBjgH/A10B0gNd
AdIDXQHSA10B0gNdAdIDXQHSAV4CXAHOAVgCVgG7AVgCVgG7AVwBWgFcAc0DQgF0QAADOgFgA14BzgFg
AlgB/wFgAlgB/wFgAlgB/wFgAlgB/wFgAlgB/wFgAlgB/wFgAlgB/wFgAlgB/wFgAlgB/wFgAlgB/wFg
AlgB/wFgAlgB/wNYAbkDOgFgQAADXwHoAdEBWAGuAf8BzAFOAacB/wHBAYgBrAH/Ab8CvQH/Ab8CvQH/
AaoCpgH/AaACnAH/AZQCkAH/AY0BigGJAf8BiwGJAYgB/wGBAmMB/wGSAS0BXwH/AaUBPQGNAf8BuQFG
AZoB/wFRAlABnxAAAw4BEwM3AVsDUQGiA18B2wNcAeoDXwHbA1IBowM4AV0DDwEUDAADZQHlAUMCPgH/
AbQBrwGwAf8BtAGvAbAB/wG0Aa8BsAH/AbQBrwGwAf8BtAGvAbAB/wG0Aa8BsAH/AbQBrwGwAf8BtAGv
AbAB/wG0Aa8BsAH/AbQBrwGwAf8BlwHGAaUB/wG0Aa8BsAH/AUMCPgH/A2UB5UAAA2QB8QHAAVUBpAH/
Ab8BSQGdAf8BwAGLAa0B/wHTAtIB/wGsAT4BjwH/Aa4BQQGRAf8BqgKmAf8BnQKaAf8BkAKNAf8BiQKF
Af8BXAFZAVgB/wGKASsBVwH/AZ0BOAGGAf8BsQFBAZMB/wNOAZkMAAMqAUADVAGsBP8B+gH7AfoB/wPn
Af8D1gH/AsoBywH/AcABvgG/Af8BsAG9AbgB/wNUAawDKAE8CAABYAJYAf8BtAGvAbAB/wHYAdYB1QH/
AeUB2QHYAf8B5QHZAdgB/wHlAdkB2AH/AeUB2QHYAf8B5QHZAdgB/wHlAdkB2AH/AeUB2QHYAf8B5QHZ
AdgB/wFeAloB/wEiAbEBRwH/AUQCQQH/AbQBrwGwAf8BYAJYAf9AAANhAe4BxQFXAaYB/wHAAUwBnwH/
AccBkgG1Af8D8gH/AbEBQQGTAf8BtAFDAZUB/wHFAsIB/wG6ArgB/wGoAqYB/wGdAZoBmQH/AYYCggH/
AY8BLQFcAf8BngE5AYUB/wGyAUIBlAH/A04BmQgAAyoBQQNZAccE/wP9Af8D7QH/A94B/wPOAf8BvAG7
AbwB/wGyArMB/wGpAqwB/wOfAf8DWQHHAyUBNwQAAWACWAH/AbQBrwGwAf8B2AHWAdUB/wHlAdkB2AH/
AeUB2QHYAf8B5QHZAdgB/wHlAdkB2AH/AeUB2QHYAf8B5QHZAdgB/wHlAdkB2AH/AeUB2QHYAf8BRgGO
AVMB/wEAAeoBOQH/ATkCNgH/AbQBrwGwAf8BYAJYAf9AAANhAe4BxwFaAakB/wHAAU8BoAH/AccBlQG1
Bf8BtgFPAZsB/wG6AVABmwH/AfQC8wH/A+0B/wHTAtIB/wHCAsAB/wGiAqAB/wGTAS8BXgH/AZ0BOAGE
Af8BsgFCAZQB/wNOAZkEAAMPARQDVAGsAdsB2gHYAf8B4AHfAd4B/wP3Af8D9wH/AeUC5gH/A88B/wK5
AboB/wOzAf8BmQKYAf8DjQH/AaQBpQGkAf8DVQGtAwwBEAFgAlgB/wG9AbgBuQH/AdgB1gHVAf8B5QHZ
AdgB/wHlAdkB2AH/AeUB2QHYAf8B5QHZAdgB/wHlAdkB2AH/AeUB2QHYAf8B5QHZAdgB/wHlAdkB2AH/
AV4CWgH/ARYBwAFFAf8BSQFKAUgB/wG1AbABsQH/AWACWAH/QAADYQHuAcgBXQGqAf8ByAFXAagB/wGz
AVIBnAH/AbgBiQGqAf8BpAFUAZMB/wGkAVIBkgH/AbsBiwGsAf8BuQGKAakB/wG0AYIBpQH/Aa4BZQGe
Af8BogFVAY8B/wGTAS4BYAH/AZoBNgGCAf8BswE/AZMB/wNOAZkEAAM6AWABiAGUAZUB+wHBAc8B2QH/
AckCygH/Ad8B4QHdAf8B+QH6AfkB/wNnAfIDYQHkA2QB8wKgAaEB/wGOAY8BjgH/AZ4BnwGdAf8BsAGv
AbEB/wHEAcABxgH/AzUBVgFgAlgB/wHEAr8B/wHYAdYB1SX/AckB9wHZAf8B2QLWAf8BxgHCAcEB/wFg
AlgB/0AAA2EB7gHEAVwBqQH/Ab4BYwGlAf8BwAFiAacB/wG5AVcBnQH/AbwBWwGiAf8BvAFXAZ8B/wG3
AVABmQH/AbYBTgGYAf8BtQFNAZcB/wGzAUsBlQH/AbMBSQGSAf8BswFPAZUB/wGzAUUBlAH/AbUBPAGS
Af8DTgGZBAADUwGlAbMB3QHkAf8BugHQAeoB/wHKAcYB5gH/AdEBxwHaAf8DXgHZA1ABngNOAZUDUQGi
A1wB3wGrAaYBrQH/AbYBrgG6Af8BrAGmAbAB/wGtAagBsAH/A1EBnAM6AWADZQHlAbQBrwGwAf8BtAGv
AbAB/wG0Aa8BsAH/AbQBrwGwAf8BtAGvAbAB/wG0Aa8BsAH/AbQBrwGwAf8BtAGvAbAB/wG0Aa8BsAH/
AbQBrwGwAf8BtQGwAbEB/wG0Aa8BsAH/A2UB5QM6AWBAAANhAe4BwAFkAagB/wGwAVwBnQH/Ad0BxgHR
Af8B+AH2AfEB/wH4AfUB8AH/AfgB9QHuAf8B+AH0Ae0B/wH4AfQB6wH/AfgB8wHqAf8B+AHzAekB/wH4
AfIB5wH/Ad0BxgHRAf8BvgGIAaYB/wG2ATgBkwH/A04BmQQAA14BzgGVAZQBlgH/AZMBlQGZAf8BowGe
Aa4B/wFnAWQBaQH1A1IBoQM+AWsDKwFDA0ABcQNVAbABcwFvAXUB+gGZAZUBmwH/AZIBkAGRAf8DlAH/
A1gBvAQAAz8BbQNVAbUDYgH2AeEB4AHhAf8C6wHtAf8C7QHvAf8C7QHvAf8C7QHvAf8C7QHvAf8C7AHu
Af8B3wHeAd8B/wF/An0B9wNVAbUDPwFtRAADYQHuAcMBggGrAf8BsAFcAZ0B/wH6AfsB+AH/AfkB+AH1
Af8B+QH4AfQB/wH5AfcB8wH/AfkB9wHyAf8B+QH2AfEB/wH5AfYB8AH/AfkB9QHvAf8B+QH1Ae4B/wH7
AfwB9AH/Ab4BiAGmAf8BugE8AZUB/wNOAZkEAANgAdQCkwGRAf8BiAGJAYYB/wGHAYgBhgH/A2IB7wNR
AZ8DOgFhAxgBIgM6AWEDUwGoA20B9wGmAaUBogH/AawBowGoAf8BtAGmAawB/wNbAcQMAAMKAQ0DUQGg
A1sBxANeAdgDXgHYA14B2ANeAdgDWgG9A1EBoAMEAQVMAANhAe4BwwGFAawB/wGwAVwBnQH/AvoB+AH/
AfkB9wH1Af8B+QH3AfQB/wH5AfYB8gH/AfkB9gHyAf8B+QH2AfAB/wH5AfUB7wH/AfkB9QHuAf8B+AH0
Ae0B/wL7AfMB/wG+AYgBpgH/Ab4BQAGbAf8DTgGZBAADWwHDAZgBlwGYAf8BlgGQAZcB/wGYAZIBnAH/
AX8BbQGBAfsDVwG4A0gBgwNDAXgDSAGDA1kBwgGmAaIBQwH9AYoBuQFcAf8BYQHFAZUB/wGRAckBsQH/
A1QBr4AAA2EB7gHFAYkBrwH/AbABXAGdAf8C+gH4Af8B+QH4AfUB/wH5AfcB9AH/AfkB9wH0Af8B+QH3
AfIB/wH5AfYB8QH/AfkB9QHwAf8B+QH1Ae8B/wH5AfUB7gH/AvsB9AH/Ab4BiAGmAf8BwAFEAZ4B/wNO
AZkEAANOAZQBpgGfAakB/wGYAZIBnAH/AZIBkAGTAf8BnAGbAZwB/wNlAfQDWgHFA1YBtgNbAcYDZQH0
AZsBnQGRAf8BgQGpAWMB/wElAdMBgQH/AQAB/wGkAf8BRQJGAX+AAANhAe4BxQGMAbAB/wGwAVwBnQH/
AvoB+QH/AfkB+AH2Af8B+QH4AfUB/wH5AfgB9QH/AfkB9wHzAf8B+QH2AfIB/wH5AfYB8QH/AfkB9QHw
Af8B+QH1Ae8B/wH6AfsB9AH/Ab4BiAGmAf8BxAFIAaIB/wNOAZkEAAMvAUkDZAHsAZUBlgGVAf8BnwGg
AZ8B/wG4AbkBtwH/Ad0B3AHdAf8B9wL4Af8DkwH7A88B/wK7AbwB/wKrAa4B/wGiAZ0BogH/AY4BpAGb
Af8BWQJnAfIDIAEvgAADZwHyAccBjwGyAf8BsAFcAZ0B/wL6AfkB/wH5AfgB9wH/AfkB+AH2Af8B+QH4
AfUB/wH5AfcB9AH/AfkB9wHzAf8B+QH2AfIB/wH5AfYB8QH/AfkB9QHwAf8B+gH7AfUB/wG+AYgBpgH/
AcsBTQGoAf8DTgGYBAADDAEQA0gBhgK1AbQB/wO5Af8BzwHOAc8B/wHsAesB7AH/A/sB/wPrAf8D1gH/
A8UB/wO1Af8BrwGuAa8B/wGzAa4BsQH/A0MBeIQAA1wB0QPVAf8BsAFcAZ0B/wP6Af8B+gL5Af8C+gH4
Af8B+gH5AfgB/wH7AfkB9wH/AfoB+QH2Af8B+gH4AfUB/wH6AfgB8wH/AfoB9wHyAf8C/AH3Af8BvgGI
AaYB/wPVAf8BTAFLAUwBjwgAAw4BEwNQAZsB2AHXAdgB/wHqAegB6gH/A/UB/wP4Af8B6ALpAf8D2QH/
A8sB/wPHAf8BwQLAAf8DTAGQAwcBCYQAA1UBtQFcATEBUQH/AbABXAGdAf8C+gH4Af8B9wH1AfMB/wH0
AfIB8AH/AfMB7wHsAf8B8AHsAekB/wHvAesB5wH/Ae8B6wHmAf8B7wHrAeYB/wHvAeoB5gH/AfEB8AHr
Af8BvgGIAaYB/wFcATEBUQH/A0oBjQwAAwoBDgM/AW0DYQHiCP8B9wL2Af8D6wH/A98B/wNeAd0DPQFo
AwQBBogAA10B0wHQAaEBwAH/AdABoQHAAf8B3QHGAdEB/wHdAcYB0QH/Ad0BxgHRAf8B3QHGAdEB/wHd
AcYB0QH/Ad0BxgHRAf8B3QHGAdEB/wHdAcYB0QH/Ad0BxgHRAf8B3QHGAdEB/wHQAaEBwAH/AWwBWQFn
AfUDQQFyEAADAgEDAxYBHgM2AVkDTQGRA1QBpgNMAZIDNAFUAxABFpAAAUIBTQE+BwABPgMAASgDAAFA
AwABEAMAAQEBAAEBBQABgBcAA/8DAAL/BgAB8AEHBgAB4AEDBgABwAEBBgABgAcAAYAHAAGABwABgAEA
AYABAQQAAYABAAHgAQcEAAGAAQAC/wQAAYABAAL/BAABgAEAAv8EAAGAAQEC/wQAAcABAQL/BAAB4AED
Av8EAAHwAQ8C/wIACw==
</value>
</data>
<data name="JITFPU.ToolTip" xml:space="preserve">
<value>If JIT Compiler is enabled, and this option is marked, it will
compile too the Floating Point Unit (FPU) instructions. This
is a chipset presents in some old 68k Macs, needed for certain
applications. It also makes emulation a bit faster, but might
brake some things.</value>
</data>
<data name="JITCacheSize.ToolTip" xml:space="preserve">
<value>Size of the JIT cache. This is used so that the JIT doesn't
have recompile the instructions used early. The bigger,
the more instructions it will cache. Note that this is
recommended for slow CPUs, but requires enough
memory.</value>
</data>
<data name="MiscHwFPU.ToolTip" xml:space="preserve">
<value>The Floating Point Unit (FPU) is a chip
which allows some programs to run
quickier and smoother. If you're sure
don't need it or some program doesn't
work properly with this enabled, you
can disable it. Note also that the
Motorola 68040 cannot use FPU</value>
</data>
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>34</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAMAEBAQAAAABAAoAQAANgAAACAgAAAAAAgAqAgAAF4BAAAwMAAAAAAIAKgOAAAGCgAAKAAAABAA
AAAgAAAAAQAEAAAAAACAAAAAAAAAAAAAAAAQAAAAEAAAAAAAAAAAAIAAAIAAAACAgACAAAAAgACAAICA
AADAwMAAgICAAAAA/wAA/wAAAP//AP8AAAD/AP8A//8AAP///wAAAAd3d3AAAAAAAHd3AAAAAAAAd3cA
AAB3d3d4d3d3d3d3d3d3d3d3AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAPgfAAD8PwAA/D8AAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAoAAAAIAAAAEAA
AAABAAgAAAAAAAAEAAAAAAAAAAAAAAABAAAAAQAAAAAAAAAAgAAAgAAAAICAAIAAAACAAIAAgIAAAMDA
wADA3MAA8MqmAAQEBAAICAgADAwMABEREQAWFhYAHBwcACIiIgApKSkAVVVVAE1NTQBCQkIAOTk5AIB8
/wBQUP8AkwDWAP/szADG1u8A1ufnAJCprQAAADMAAABmAAAAmQAAAMwAADMAAAAzMwAAM2YAADOZAAAz
zAAAM/8AAGYAAABmMwAAZmYAAGaZAABmzAAAZv8AAJkAAACZMwAAmWYAAJmZAACZzAAAmf8AAMwAAADM
MwAAzGYAAMyZAADMzAAAzP8AAP9mAAD/mQAA/8wAMwAAADMAMwAzAGYAMwCZADMAzAAzAP8AMzMAADMz
MwAzM2YAMzOZADMzzAAzM/8AM2YAADNmMwAzZmYAM2aZADNmzAAzZv8AM5kAADOZMwAzmWYAM5mZADOZ
zAAzmf8AM8wAADPMMwAzzGYAM8yZADPMzAAzzP8AM/8zADP/ZgAz/5kAM//MADP//wBmAAAAZgAzAGYA
ZgBmAJkAZgDMAGYA/wBmMwAAZjMzAGYzZgBmM5kAZjPMAGYz/wBmZgAAZmYzAGZmZgBmZpkAZmbMAGaZ
AABmmTMAZplmAGaZmQBmmcwAZpn/AGbMAABmzDMAZsyZAGbMzABmzP8AZv8AAGb/MwBm/5kAZv/MAMwA
/wD/AMwAmZkAAJkzmQCZAJkAmQDMAJkAAACZMzMAmQBmAJkzzACZAP8AmWYAAJlmMwCZM2YAmWaZAJlm
zACZM/8AmZkzAJmZZgCZmZkAmZnMAJmZ/wCZzAAAmcwzAGbMZgCZzJkAmczMAJnM/wCZ/wAAmf8zAJnM
ZgCZ/5kAmf/MAJn//wDMAAAAmQAzAMwAZgDMAJkAzADMAJkzAADMMzMAzDNmAMwzmQDMM8wAzDP/AMxm
AADMZjMAmWZmAMxmmQDMZswAmWb/AMyZAADMmTMAzJlmAMyZmQDMmcwAzJn/AMzMAADMzDMAzMxmAMzM
mQDMzMwAzMz/AMz/AADM/zMAmf9mAMz/mQDM/8wAzP//AMwAMwD/AGYA/wCZAMwzAAD/MzMA/zNmAP8z
mQD/M8wA/zP/AP9mAAD/ZjMAzGZmAP9mmQD/ZswAzGb/AP+ZAAD/mTMA/5lmAP+ZmQD/mcwA/5n/AP/M
AAD/zDMA/8xmAP/MmQD/zMwA/8z/AP//MwDM/2YA//+ZAP//zABmZv8AZv9mAGb//wD/ZmYA/2b/AP//
ZgAhAKUAX19fAHd3dwCGhoYAlpaWAMvLywCysrIA19fXAN3d3QDj4+MA6urqAPHx8QD4+PgA8Pv/AKSg
oACAgIAAAAD/AAD/AAAA//8A/wAAAP8A/wD//wAA////AAoKCgoKCgoKCgoKBwcHBwcHBwcHBwoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoHBwcHBwcHBwoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcH
BwcKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHCgcHBwcHBwcHBwcHBwcH
B+zsBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH7OwHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKChEREREREREREREREREREREREREREREREREREREKCgoK
EREREREREREREREREREREREREREREREREREREQoKCgoRERERERERERERERERERERERERERERERERERER
CgoKChEREREREREREREREREREREREREREREREREREREKCgoKERERERERERERERERERERERERERERERER
EREREQoKCgoRERERERERERERERERERERERERERERERERERERCgoKChERERERERERERERERERERERERER
EREREREREREKCgoKEREREREREREREREREREREREREREREREREREREQoKCgoRERERERERERERERERERER
ERERERERERERERERCgoKChEREREREREREREREREREREREREREREREREREREKCgoKERERERERERERERER
EREREREREREREREREREREQoKCgoRERERERERERERERERERERERERERERERERERERCgoKChERERERERER
EREREREREREREREREREREREREREKCgoKEREREREREREREREREREREREREREREREREREREQoKCgoRERER
ERERERERERERERERERERERERERERERERCgoKChEREREREREREREREREREREREREREREREREREREKCgoK
EREREREREREREREREREREREREREREREREREREQoKCgoRERERERERERERERERERERERERERERERERERER
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgr/4Af///AP///wD///8A////AP/4AA
AAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAAAB/////ygAAAAwAAAAYAAAAAEA
CAAAAAAAAAkAAAAAAAAAAAAAAAEAAAABAAAAAAAAAACAAACAAAAAgIAAgAAAAIAAgACAgAAAwMDAAMDc
wADwyqYABAQEAAgICAAMDAwAERERABYWFgAcHBwAIiIiACkpKQBVVVUATU1NAEJCQgA5OTkAgHz/AFBQ
/wCTANYA/+zMAMbW7wDW5+cAkKmtAAAAMwAAAGYAAACZAAAAzAAAMwAAADMzAAAzZgAAM5kAADPMAAAz
/wAAZgAAAGYzAABmZgAAZpkAAGbMAABm/wAAmQAAAJkzAACZZgAAmZkAAJnMAACZ/wAAzAAAAMwzAADM
ZgAAzJkAAMzMAADM/wAA/2YAAP+ZAAD/zAAzAAAAMwAzADMAZgAzAJkAMwDMADMA/wAzMwAAMzMzADMz
ZgAzM5kAMzPMADMz/wAzZgAAM2YzADNmZgAzZpkAM2bMADNm/wAzmQAAM5kzADOZZgAzmZkAM5nMADOZ
/wAzzAAAM8wzADPMZgAzzJkAM8zMADPM/wAz/zMAM/9mADP/mQAz/8wAM///AGYAAABmADMAZgBmAGYA
mQBmAMwAZgD/AGYzAABmMzMAZjNmAGYzmQBmM8wAZjP/AGZmAABmZjMAZmZmAGZmmQBmZswAZpkAAGaZ
MwBmmWYAZpmZAGaZzABmmf8AZswAAGbMMwBmzJkAZszMAGbM/wBm/wAAZv8zAGb/mQBm/8wAzAD/AP8A
zACZmQAAmTOZAJkAmQCZAMwAmQAAAJkzMwCZAGYAmTPMAJkA/wCZZgAAmWYzAJkzZgCZZpkAmWbMAJkz
/wCZmTMAmZlmAJmZmQCZmcwAmZn/AJnMAACZzDMAZsxmAJnMmQCZzMwAmcz/AJn/AACZ/zMAmcxmAJn/
mQCZ/8wAmf//AMwAAACZADMAzABmAMwAmQDMAMwAmTMAAMwzMwDMM2YAzDOZAMwzzADMM/8AzGYAAMxm
MwCZZmYAzGaZAMxmzACZZv8AzJkAAMyZMwDMmWYAzJmZAMyZzADMmf8AzMwAAMzMMwDMzGYAzMyZAMzM
zADMzP8AzP8AAMz/MwCZ/2YAzP+ZAMz/zADM//8AzAAzAP8AZgD/AJkAzDMAAP8zMwD/M2YA/zOZAP8z
zAD/M/8A/2YAAP9mMwDMZmYA/2aZAP9mzADMZv8A/5kAAP+ZMwD/mWYA/5mZAP+ZzAD/mf8A/8wAAP/M
MwD/zGYA/8yZAP/MzAD/zP8A//8zAMz/ZgD//5kA///MAGZm/wBm/2YAZv//AP9mZgD/Zv8A//9mACEA
pQBfX18Ad3d3AIaGhgCWlpYAy8vLALKysgDX19cA3d3dAOPj4wDq6uoA8fHxAPj4+ADw+/8ApKCgAICA
gAAAAP8AAP8AAAD//wD/AAAA/wD/AP//AAD///8ACgoKCgoKCgoKCgoKCgoKCgcHBwcHBwcHBwcHBwcH
BwcKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoHBwcHBwcHBwcHBwcHBwoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
BwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcH
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoHBwcH
BwcHBwcHBwcHBwcHBwcHBwfs7AcHBwcHBwcHBwcHBwcHBwcHBwcHBwoKCgcHBwcHBwcHBwcHBwcHBwcH
BwcHB+zs7OwHBwcHBwcHBwcHBwcHBwcHBwcHBwcKBwcHBwcHBwcHBwcHBwcHBwcHBwcHB+zs7OwHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHB+zs7OwHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKERERERERERERERERERERERERERERERERERERERERERERERERERERERERCgoKCgoKERER
ERERERERERERERERERERERERERERERERERERERERERERERERERERCgoKCgoKERERERERERERERERERER
ERERERERERERERERERERERERERERERERERERCgoKCgoKERERERERERERERERERERERERERERERERERER
ERERERERERERERERERERCgoKCgoKERERERERERERERERERERERERERERERERERERERERERERERERERER
ERERCgoKCgoKERERERERERERERERERERERERERERERERERERERERERERERERERERERERCgoKCgoKERER
ERERERERERERERERERERERERERERERERERERERERERERERERERERCgoKCgoKERERERERERERERERERER
ERERERERERERERERERERERERERERERERERERCgoKCgoKERERERERERERERERERERERERERERERERERER
ERERERERERERERERERERCgoKCgoKERERERERERERERERERERERERERERERERERERERERERERERERERER
ERERCgoKCgoKERERERERERERERERERERERERERERERERERERERERERERERERERERERERCgoKCgoKERER
ERERERERERERERERERERERERERERERERERERERERERERERERERERCgoKCgoKERERERERERERERERERER
ERERERERERERERERERERERERERERERERERERCgoKCgoKERERERERERERERERERERERERERERERERERER
ERERERERERERERERERERCgoKCgoKERERERERERERERERERERERERERERERERERERERERERERERERERER
ERERCgoKCgoKERERERERERERERERERERERERERERERERERERERERERERERERERERERERCgoKCgoKERER
ERERERERERERERERERERERERERERERERERERERERERERERERERERCgoKCgoKERERERERERERERERERER
ERERERERERERERERERERERERERERERERERERCgoKCgoKERERERERERERERERERERERERERERERERERER
ERERERERERERERERERERCgoKCgoKERERERERERERERERERERERERERERERERERERERERERERERERERER
ERERCgoKCgoKERERERERERERERERERERERERERERERERERERERERERERERERERERERERCgoKCgoKERER
ERERERERERERERERERERERERERERERERERERERERERERERERERERCgoKCgoKERERERERERERERERERER
ERERERERERERERERERERERERERERERERERERCgoKCgoKERERERERERERERERERERERERERERERERERER
ERERERERERERERERERERCgoKCgoKERERERERERERERERERERERERERERERERERERERERERERERERERER
ERERCgoKCgoKERERERERERERERERERERERERERERERERERERERERERERERERERERERERCgoKCgoKERER
ERERERERERERERERERERERERERERERERERERERERERERERERERERCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK//8AAP//
AAD//4AB//8AAP//wAP//wAA///AA///AAD//8AD//8AAP//wAP//wAA///AA///AAD//8AD//8AAMAA
AAAAAwAAgAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAAAAB
AADAAAAAAAMAAP///////wAA
</value>
</data>
</root>

750
frmSettingsBasiliskVM.vb Normal file
View File

@ -0,0 +1,750 @@
Imports System
Imports System.IO
Imports System.Collections
Public Class frmSettingsBasiliskVM
Public ConfigFile As String
Public VMName As String
Public SelectedItem As Integer
Public Sub LoadSettingsFrom(Item As Integer)
ConfigFile = frmMain.VMList.Items.Item(Item).SubItems(1).Text
VMName = frmMain.VMList.Items.Item(Item).Text
SelectedItem = Item
End Sub
Public Sub Settings()
Dim Reader As New StreamReader(ConfigFile)
Dim ConfigValues As New ArrayList()
Dim strContainer As String = ""
Do
strContainer = Reader.ReadLine()
If Not strContainer Is Nothing Then
ConfigValues.Add(strContainer)
End If
Loop Until strContainer Is Nothing
Reader.Close()
For x As Integer = 0 To ConfigValues.Count - 1
If InStr(ConfigValues(x), "disk") <> 0 Then
With DriveList.Items.Add(ConfigValues(x).ToString.Substring(5))
.ImageKey = "Drive"
.SubItems.Add("Disk")
.SubItems.Add("")
End With
End If
If InStr(ConfigValues(x), "floppy") <> 0 Then
With DriveList.Items.Add(ConfigValues(x).ToString.Substring(7))
.ImageKey = "Floppy"
.SubItems.Add("Floppy")
.SubItems.Add("")
End With
End If
If ConfigValues(x).ToString.Substring(0, 5) = "cdrom" Then
With DriveList.Items.Add(ConfigValues(x).ToString.Substring(6))
.ImageKey = "Disc"
.SubItems.Add("CD")
.SubItems.Add("")
End With
End If
If InStr(ConfigValues(x), "screen") <> 0 Then
Dim a As String = ConfigValues(x).ToString.Substring(7)
Dim b() As String = Split(a, "/")
Dim FoundX As Boolean = False
Dim FoundY As Boolean = False
Select Case b(0)
Case "win"
ScrMode.SelectedIndex = 0
Case "dga"
ScrMode.SelectedIndex = 1
End Select
For c As Integer = 0 To ScrResY.Items.Count - 1
If FoundX = True And FoundY = True Then
Exit For
End If
If InStr(ScrResX.Items.Item(c).ToString, b(1)) <> 0 Then
ScrResX.SelectedIndex = c
FoundX = True
ElseIf c = ScrResX.Items.Count - 1 And FoundX = False Then
ScrResX.Items.Add(b(1))
ScrResX.SelectedIndex = ScrResX.Items.Count - 1
End If
If InStr(ScrResY.Items.Item(c).ToString, b(2)) <> 0 Then
ScrResY.SelectedIndex = c
FoundY = True
ElseIf c = ScrResY.Items.Count - 1 And FoundY = False Then
ScrResY.Items.Add(b(2))
ScrResY.SelectedIndex = ScrResY.Items.Count - 1
End If
Next
End If
If InStr(ConfigValues(x), "seriala") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(8)
Case "COM1"
SerialA.SelectedIndex = 0
Case "COM2"
SerialA.SelectedIndex = 1
Case "COM3"
SerialA.SelectedIndex = 2
Case "COM4"
SerialA.SelectedIndex = 3
Case "COM5"
SerialA.SelectedIndex = 4
Case "COM6"
SerialA.SelectedIndex = 5
Case "LPT1"
SerialA.SelectedIndex = 6
Case "LPT2"
SerialA.SelectedIndex = 7
Case "LPT3"
SerialA.SelectedIndex = 8
Case "LPT4"
SerialA.SelectedIndex = 9
Case "LPT5"
SerialA.SelectedIndex = 10
Case "LPT6"
SerialA.SelectedIndex = 11
Case "FILE"
SerialA.SelectedIndex = 12
End Select
End If
If InStr(ConfigValues(x), "serialb") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(8)
Case "COM1"
SerialB.SelectedIndex = 0
Case "COM2"
SerialB.SelectedIndex = 1
Case "COM3"
SerialB.SelectedIndex = 2
Case "COM4"
SerialB.SelectedIndex = 3
Case "COM5"
SerialB.SelectedIndex = 4
Case "COM6"
SerialB.SelectedIndex = 5
Case "LPT1"
SerialB.SelectedIndex = 6
Case "LPT2"
SerialB.SelectedIndex = 7
Case "LPT3"
SerialB.SelectedIndex = 8
Case "LPT4"
SerialB.SelectedIndex = 9
Case "LPT5"
SerialB.SelectedIndex = 10
Case "LPT6"
SerialB.SelectedIndex = 11
Case "FILE"
SerialB.SelectedIndex = 12
End Select
End If
If InStr(ConfigValues(x), "ether") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(6)
Case "slirp"
NetType.SelectedIndex = 0
Case "router"
NetType.SelectedIndex = 1
End Select
End If
If InStr(ConfigValues(x), "udpport") <> 0 Then
NetUPDPort.Text = ConfigValues(x).ToString.Substring(8)
End If
If InStr(ConfigValues(x), "udptunnel") <> 0 Then
If ConfigValues(x).ToString.Substring(10) = "true" Then
NetEnableUDP.Checked = True
Else
NetEnableUDP.Checked = False
End If
End If
If ConfigValues(x).ToString.Substring(0, 3) = "rom" Then
MiscROM.Text = ConfigValues(x).ToString.Substring(4)
End If
If InStr(ConfigValues(x), "bootdrive") <> 0 Then
Dim bd As Integer = ConfigValues(x).ToString.Substring(10)
If bd <= DriveList.Items.Count Then
DriveList.Items.Item(bd).SubItems.Item(2).Text = "*"
End If
End If
If InStr(ConfigValues(x), "bootdriver") Then
Dim BootDriver As Integer = ConfigValues(x).ToString.Substring(11)
Select Case BootDriver
Case 0
DriveBootDisk.Checked = True
Case -62
DriveBootCD.Checked = True
End Select
End If
If InStr(ConfigValues(x), "ramsize") <> 0 Then
Dim RAMMiB As Long = ConfigValues(x).ToString.Substring(7)
RAMMiB = (RAMMiB / 1024) / 1024
MemoryBox.Text = RAMMiB
End If
If InStr(ConfigValues(x), "frameskip") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(10)
Case "12"
ScrRefresh.SelectedIndex = 0
Case "8"
ScrRefresh.SelectedIndex = 1
Case "6"
ScrRefresh.SelectedIndex = 2
Case "4"
ScrRefresh.SelectedIndex = 3
Case "2"
ScrRefresh.SelectedIndex = 4
Case "1"
ScrRefresh.SelectedIndex = 5
End Select
End If
If InStr(ConfigValues(x), "modelid") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(8)
Case "5"
MiscHwModel.SelectedIndex = 0
Case "14"
MiscHwModel.SelectedIndex = 1
End Select
End If
If ConfigValues(x).ToString.Substring(0, 3) = "cpu" Then
Select Case ConfigValues(x).ToString.Substring(4)
Case "2"
MiscHwCPU.SelectedIndex = 0
Case "3"
MiscHwCPU.SelectedIndex = 1
Case "4"
MiscHwCPU.SelectedIndex = 2
End Select
End If
If ConfigValues(x).ToString.Substring(0, 3) = "fpu" Then
Select Case ConfigValues(x).ToString.Substring(4)
Case "true"
MiscHwFPU.Checked = True
Case "false"
MiscHwFPU.Checked = False
End Select
End If
If InStr(ConfigValues(x), "nocdrom") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(8)
Case "false"
MiscHwCD.Checked = True
Case "true"
MiscHwCD.Checked = False
End Select
End If
If InStr(ConfigValues(x), "nosound") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(8)
Case "false"
MiscHwSound.Checked = True
Case "true"
MiscHwSound.Checked = False
End Select
End If
If InStr(ConfigValues(x), "nogui") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(6)
Case "false"
MiscEnableGUI.Checked = True
Case "true"
MiscEnableGUI.Checked = False
End Select
End If
If ConfigValues(x).ToString.Substring(0, 3) = "jit" Then
Select Case ConfigValues(x).ToString.Substring(4)
Case "true"
JITEnable.Checked = True
Case "false"
JITEnable.Checked = False
End Select
End If
If InStr(ConfigValues(x), "jitfpu") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(7)
Case "true"
JITFPU.Checked = True
Case "false"
JITFPU.Checked = False
End Select
End If
If InStr(ConfigValues(x), "jitdebug") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(9)
Case "true"
JITDebug.Checked = True
Case "false"
JITDebug.Checked = False
End Select
End If
If InStr(ConfigValues(x), "jitcachesize") <> 0 Then
Dim Value As String = ConfigValues(x).ToString.Substring(13)
Dim Found As Boolean
For c As Integer = 0 To JITCacheSize.Items.Count - 1
If Found = True Then
Exit For
End If
If InStr(JITCacheSize.Items.Item(c).ToString, Value) <> 0 Then
JITCacheSize.SelectedIndex = c
Found = True
ElseIf c = JITCacheSize.Items.Count - 1 And Found = False Then
JITCacheSize.Items.Add(Value)
JITCacheSize.SelectedIndex = JITCacheSize.Items.Count - 1
End If
Next
End If
If InStr(ConfigValues(x), "jitlazyflush") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(13)
Case "true"
JITLazyFlush.Checked = True
Case "false"
JITLazyFlush.Checked = False
End Select
End If
If InStr(ConfigValues(x), "jitinline") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(10)
Case "true"
JITInLine.Checked = True
Case "false"
JITInLine.Checked = False
End Select
End If
If InStr(ConfigValues(x), "keyboardtype") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(13)
Case "5"
InputEmuKbdType.SelectedIndex = 0
Case "6"
Case "7"
Case "8"
Case "9"
Case "10"
Case "11"
InputEmuKbdType.SelectedIndex = 1
Case "12"
Case "13"
InputEmuKbdType.SelectedIndex = 2
End Select
End If
If InStr(ConfigValues(x), "keycodes") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(9)
Case "true"
InputKeycodesEnable.Checked = True
Case "false"
InputKeycodesEnable.Checked = False
End Select
End If
If InStr(ConfigValues(x), "keycodesfile") <> 0 Then
InputKeyCodesPath.Text = ConfigValues(x).ToString.Substring(13)
End If
If InStr(ConfigValues(x), "mousewheelmode") <> 0 Then
If InStr(ConfigValues(x).ToString.Substring(14), "0") Then
InputMouseWheelMode.SelectedIndex = 0
End If
If InStr(ConfigValues(x).ToString.Substring(14), "1") Then
InputMouseWheelMode.SelectedIndex = 1
End If
End If
If InStr(ConfigValues(x), "mousewheellines") <> 0 Then
Dim Number As Integer = ConfigValues(x).ToString.Substring(15)
InputMouseWheelLines.Value = Number
End If
If InStr(ConfigValues(x), "ignoresegv") <> 0 Then
If ConfigValues(x).ToString.Substring(11) = "true" Then
MiscIgnoreSegv.Checked = True
Else
MiscIgnoreSegv.Checked = False
End If
End If
If InStr(ConfigValues(x), "idlewait") <> 0 Then
If ConfigValues(x).ToString.Substring(9) = "true" Then
MiscIdleWait.Checked = True
Else
MiscIdleWait.Checked = False
End If
End If
If InStr(ConfigValues(x), "enableextfs") <> 0 Then
If ConfigValues(x).ToString.Substring(12) = "true" Then
ExtFSEnable.Checked = True
End If
End If
If InStr(ConfigValues(x), "debugextfs") <> 0 Then
If ConfigValues(x).ToString.Substring(11) = "true" Then
JITDebugExtFS.Checked = True
End If
End If
If InStr(ConfigValues(x), "extdrives") <> 0 Then
Dim StringValue As String = ConfigValues(x).ToString.Substring(10)
For a As Integer = 0 To StringValue.Length - 1
Select Case StringValue.Substring(a, 1)
Case "C"
ExtFSDrives.SetItemCheckState(0, CheckState.Checked)
Case "D"
ExtFSDrives.SetItemCheckState(1, CheckState.Checked)
Case "E"
ExtFSDrives.SetItemCheckState(2, CheckState.Checked)
Case "F"
ExtFSDrives.SetItemCheckState(3, CheckState.Checked)
Case "G"
ExtFSDrives.SetItemCheckState(4, CheckState.Checked)
Case "H"
ExtFSDrives.SetItemCheckState(5, CheckState.Checked)
Case "I"
ExtFSDrives.SetItemCheckState(6, CheckState.Checked)
Case "J"
ExtFSDrives.SetItemCheckState(7, CheckState.Checked)
Case "K"
ExtFSDrives.SetItemCheckState(8, CheckState.Checked)
Case "L"
ExtFSDrives.SetItemCheckState(9, CheckState.Checked)
Case "M"
ExtFSDrives.SetItemCheckState(10, CheckState.Checked)
Case "N"
ExtFSDrives.SetItemCheckState(11, CheckState.Checked)
Case "O"
ExtFSDrives.SetItemCheckState(12, CheckState.Checked)
Case "P"
ExtFSDrives.SetItemCheckState(13, CheckState.Checked)
Case "Q"
ExtFSDrives.SetItemCheckState(14, CheckState.Checked)
Case "R"
ExtFSDrives.SetItemCheckState(15, CheckState.Checked)
Case "S"
ExtFSDrives.SetItemCheckState(16, CheckState.Checked)
Case "T"
ExtFSDrives.SetItemCheckState(17, CheckState.Checked)
Case "U"
ExtFSDrives.SetItemCheckState(18, CheckState.Checked)
Case "V"
ExtFSDrives.SetItemCheckState(19, CheckState.Checked)
Case "W"
ExtFSDrives.SetItemCheckState(20, CheckState.Checked)
Case "X"
ExtFSDrives.SetItemCheckState(21, CheckState.Checked)
Case "Y"
ExtFSDrives.SetItemCheckState(22, CheckState.Checked)
Case "Z"
ExtFSDrives.SetItemCheckState(23, CheckState.Checked)
End Select
Next
End If
If InStr(ConfigValues(x), "pollmedia") <> 0 Then
If ConfigValues(x).ToString.Substring(10) = "true" Then
DrivePollMedia.Checked = True
End If
End If
If InStr(ConfigValues(x), "etherpermanentaddress") <> 0 Then
If ConfigValues(x).ToString.Substring(22) = "true" Then
NetPermPhysicalAddress.Checked = True
End If
End If
If InStr(ConfigValues(x), "ethermulticastmode") <> 0 Then
NetMulticastMode.Text = ConfigValues(x).ToString.Substring(19)
End If
If InStr(ConfigValues(x), "routerenabled") <> 0 Then
If ConfigValues(x).ToString.Substring(14) = "true" Then
NetRouterEnabled.Checked = True
Else
NetRouterEnabled.Checked = False
End If
End If
If InStr(ConfigValues(x), "ftp_port:list") <> 0 Then
NetFTPPorts.Text = ConfigValues(x).ToString.Substring(14)
End If
If InStr(ConfigValues(x), "tcp_port") <> 0 Then
NetServerPorts.Text = ConfigValues(x).ToString.Substring(9)
End If
If InStr(ConfigValues(x), "portfile0") <> 0 Then
SAFilePath.Text = ConfigValues(x).ToString.Substring(10)
End If
If InStr(ConfigValues(x), "portfile1") <> 0 Then
SBFilePath.Text = ConfigValues(x).ToString.Substring(10)
End If
If InStr(ConfigValues(x), "displaycolordepth") <> 0 Then
End If
If ConfigValues(x).ToString.Substring(0, 4) = "scsi" Then
Select Case ConfigValues(x).ToString.Substring(0, 5)
Case "scsi0"
Case "scsi1"
Case "scsi2"
Case "scsi3"
Case "scsi4"
Case "scsi5"
Case "scsi6"
End Select
End If
EMCEditor.Items.Add(ConfigValues(x))
Next
End Sub
Private Sub CollectAndSave()
Dim Options As String = ""
For x As Integer = 0 To DriveList.Items.Count
Select Case DriveList.Items.Item(x).SubItems(1).Text
Case "Disk"
Options = Options & vbCrLf & "disk " & DriveList.Items.Item(x).Text
Case "Floppy"
Options = Options & vbCrLf & "floppy " & DriveList.Items.Item(x).Text
Case "CD"
Options = Options & vbCrLf & "cdrom " & DriveList.Items.Item(x).Text
End Select
Next
Select Case ScrMode.SelectedItem.ToString
Case "Window"
Options = Options & vbCrLf & "screen win/" & ScrResX.SelectedItem.ToString & "/" & ScrResY.SelectedItem.ToString
Case "Fullscreen"
Options = Options & vbCrLf & "screen dga/" & ScrResX.SelectedItem.ToString & "/" & ScrResY.SelectedItem.ToString
End Select
'For x As Integer = 0 To EMCEditor.Items.Count - 1
' Options = Options & EMCEditor.Items.Item(x).Text & vbCrLf
'Next
ConfigFileHandler.Write(Options, ConfigFile)
End Sub
Private Sub frmSettingsBasiliskVM_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
SetInitialData()
Settings()
End Sub
Private Sub OptionList_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OptionList.SelectedIndexChanged
HidePages()
Select Case OptionList.FocusedItem.Index
Case 0
MacNameFrame.Visible = True
Case 1
IconFrame.Visible = True
Case 2
MemoryFrame.Visible = True
Case 3
DriveFrame.Visible = True
Case 4
NetworkFrame.Visible = True
Case 5
ScreenFrame.Visible = True
Case 6
InputFrame.Visible = True
Case 7
SerialFrame.Visible = True
Case 8
MiscHwFrame.Visible = True
Case 9
ExtFSFrame.Visible = True
Case 10
MiscFrame.Visible = True
Case 11
JITFrame.Visible = True
Case 12
EMCFrame.Visible = True
End Select
End Sub
Public Sub HidePages()
MacNameFrame.Visible = False
IconFrame.Visible = False
MemoryFrame.Visible = False
DriveFrame.Visible = False
NetworkFrame.Visible = False
ScreenFrame.Visible = False
InputFrame.Visible = False
SerialFrame.Visible = False
MiscHwFrame.Visible = False
ExtFSFrame.Visible = False
MiscFrame.Visible = False
JITFrame.Visible = False
EMCFrame.Visible = False
End Sub
Public Sub SetInitialData()
Dim SysMem As Long = (My.Computer.Info.TotalPhysicalMemory / 1024) / 1024
MacName.Text = VMName
If SysMem < 1024 Then
MemoryTracker.Maximum = SysMem
End If
NetType.SelectedIndex = 0
End Sub
Private Sub ScrResCust_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ScrResCust.CheckedChanged
If ScrResCust.Checked = True Then
ScrResX.DropDownStyle = ComboBoxStyle.DropDown
ScrResY.DropDownStyle = ComboBoxStyle.DropDown
Else
ScrResX.DropDownStyle = ComboBoxStyle.DropDownList
ScrResY.DropDownStyle = ComboBoxStyle.DropDownList
End If
End Sub
Private Sub MemoryBox_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MemoryBox.TextChanged
MemoryTracker.Value = MemoryBox.Text
End Sub
Private Sub MemoryTracker_Scroll(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MemoryTracker.Scroll
MemoryBox.Text = MemoryTracker.Value
End Sub
Private Sub MiscHwCPU_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MiscHwCPU.SelectedIndexChanged
If MiscHwCPU.SelectedIndex = 2 Then
MiscHwFPU.Enabled = False
MiscHwFPU.Checked = True
Else
MiscHwFPU.Enabled = True
End If
End Sub
Private Sub DriveList_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DriveList.SelectedIndexChanged
If DriveList.FocusedItem.Index <> -1 Then
ContextSelectedDrive(True)
Else
ContextSelectedDrive(False)
End If
End Sub
Public Sub ContextSelectedDrive(ByVal IsSelected As Boolean)
If IsSelected = True Then
DriveListContext.Items.Item(3).Enabled = True
DriveListContext.Items.Item(4).Enabled = True
Else
DriveListContext.Items.Item(3).Enabled = False
DriveListContext.Items.Item(4).Enabled = False
End If
End Sub
Private Sub SetAsBootDriveToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DriveContxSetAsBoot.Click
For x As Integer = 0 To DriveList.Items.Count - 1
If DriveList.Items.Item(x).SubItems.Item(2).Text = "*" Then
DriveList.Items.Item(x).SubItems.Item(2).Text = ""
End If
Next
DriveList.FocusedItem.SubItems.Item(2).Text = "*"
End Sub
Private Sub ContextRemoveDrive_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DriveContxRemoveDrive.Click
Dim Remove As Integer = MsgBox("Are you sure you want to remove ''" & DriveList.FocusedItem.Text & "'' from the drives list?", MsgBoxStyle.Exclamation + MsgBoxStyle.YesNo, "Remove drive")
If Remove = 6 Then
DriveList.FocusedItem.Remove()
End If
End Sub
Private Sub NetEnableUDP_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NetEnableUDP.CheckedChanged
If NetEnableUDP.Checked = False Then
NetUPDPort.Enabled = False
NetUPDPortLabel.Enabled = False
Else
NetUPDPort.Enabled = True
NetUPDPortLabel.Enabled = True
End If
End Sub
Private Sub NetType_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NetType.SelectedIndexChanged
If NetType.SelectedIndex = 1 Then
NetRouterConfig.Visible = True
NetRouterEnabled.Enabled = True
Else
NetRouterConfig.Visible = False
NetRouterEnabled.Enabled = False
End If
End Sub
Private Sub InputEnableKeycodes_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles InputKeycodesEnable.CheckedChanged
If InputKeycodesEnable.Checked = False Then
InputKeyCodesPathPanel.Enabled = False
Else
InputKeyCodesPathPanel.Enabled = True
End If
End Sub
Private Sub DriveRemove_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DriveRemove.Click
Dim Remove As Integer = MsgBox("Are you sure you want to remove ''" & DriveList.FocusedItem.Text & "'' from the drives list?", MsgBoxStyle.Exclamation + MsgBoxStyle.YesNo, "Remove drive")
If Remove = 6 Then
DriveList.FocusedItem.Remove()
End If
End Sub
Private Sub DriveSetBootDrive_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DriveSetBootDrive.Click
For x As Integer = 0 To DriveList.Items.Count - 1
If DriveList.Items.Item(x).SubItems.Item(2).Text = "*" Then
DriveList.Items.Item(x).SubItems.Item(2).Text = ""
End If
Next
DriveList.FocusedItem.SubItems.Item(2).Text = "*"
End Sub
Private Sub ExtFSEnable_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ExtFSEnable.CheckedChanged
If ExtFSEnable.Checked = True Then
ExtFSDrivesLabel.Visible = True
ExtFSDrives.Visible = True
Else
ExtFSDrivesLabel.Visible = False
ExtFSDrives.Visible = False
End If
End Sub
Private Sub EMCEditor_ItemActivate(ByVal sender As Object, ByVal e As System.EventArgs) Handles EMCEditor.ItemActivate
EMCEditor.FocusedItem.BeginEdit()
End Sub
Private Sub cmdOK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdOK.Click
CollectAndSave()
Me.Close()
End Sub
End Class

1016
frmSettingsPearPCVM.Designer.vb generated Normal file

File diff suppressed because it is too large Load Diff

View File

@ -0,0 +1,289 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="OptionList.Items" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0JAAAA
BFRleHQKSW1hZ2VJbmRleAxTdWJJdGVtQ291bnQIU3ViSXRlbTEJQmFja0NvbG9yB0NoZWNrZWQERm9u
dAlGb3JlQ29sb3IXVXNlSXRlbVN0eWxlRm9yU3ViSXRlbXMBAAAEBAAEBAAICDFTeXN0ZW0uV2luZG93
cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtAgAAABRTeXN0ZW0uRHJhd2luZy5Db2xv
cgMAAAABE1N5c3RlbS5EcmF3aW5nLkZvbnQDAAAAFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAECAAAA
BgQAAAAETmFtZf////8CAAAACQUAAAAF+v///xRTeXN0ZW0uRHJhd2luZy5Db2xvcgQAAAAEbmFtZQV2
YWx1ZQprbm93bkNvbG9yBXN0YXRlAQAAAAkHBwMAAAAKAAAAAAAAAAAYAAEAAAkHAAAAAfj////6////
CgAAAAAAAAAAGgABAAEMCQAAAEttc2NvcmxpYiwgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRy
YWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFBQAAADFTeXN0ZW0uV2luZG93cy5Gb3Jt
cy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtBAAAAAR0ZXh0BG5hbWUFc3R5bGUIdXNlckRhdGEB
AQQCPlN5c3RlbS5XaW5kb3dzLkZvcm1zLkxpc3RWaWV3SXRlbStMaXN0Vmlld1N1Ykl0ZW0rU3ViSXRl
bVN0eWxlAgAAAAIAAAAGCgAAAAAKCgoFBwAAABNTeXN0ZW0uRHJhd2luZy5Gb250BAAAAAROYW1lBFNp
emUFU3R5bGUEVW5pdAEABAQLGFN5c3RlbS5EcmF3aW5nLkZvbnRTdHlsZQMAAAAbU3lzdGVtLkRyYXdp
bmcuR3JhcGhpY3NVbml0AwAAAAMAAAAGCwAAAAZUYWhvbWEAAARBBfT///8YU3lzdGVtLkRyYXdpbmcu
Rm9udFN0eWxlAQAAAAd2YWx1ZV9fAAgDAAAAAAAAAAXz////G1N5c3RlbS5EcmF3aW5nLkdyYXBoaWNz
VW5pdAEAAAAHdmFsdWVfXwAIAwAAAAMAAAAL
</value>
</data>
<data name="OptionList.Items1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0JAAAA
BFRleHQKSW1hZ2VJbmRleAxTdWJJdGVtQ291bnQIU3ViSXRlbTEJQmFja0NvbG9yB0NoZWNrZWQERm9u
dAlGb3JlQ29sb3IXVXNlSXRlbVN0eWxlRm9yU3ViSXRlbXMBAAAEBAAEBAAICDFTeXN0ZW0uV2luZG93
cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtAgAAABRTeXN0ZW0uRHJhd2luZy5Db2xv
cgMAAAABE1N5c3RlbS5EcmF3aW5nLkZvbnQDAAAAFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAECAAAA
BgQAAAAESWNvbv////8CAAAACQUAAAAF+v///xRTeXN0ZW0uRHJhd2luZy5Db2xvcgQAAAAEbmFtZQV2
YWx1ZQprbm93bkNvbG9yBXN0YXRlAQAAAAkHBwMAAAAKAAAAAAAAAAAYAAEAAAkHAAAAAfj////6////
CgAAAAAAAAAAGgABAAEMCQAAAEttc2NvcmxpYiwgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRy
YWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFBQAAADFTeXN0ZW0uV2luZG93cy5Gb3Jt
cy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtBAAAAAR0ZXh0BG5hbWUFc3R5bGUIdXNlckRhdGEB
AQQCPlN5c3RlbS5XaW5kb3dzLkZvcm1zLkxpc3RWaWV3SXRlbStMaXN0Vmlld1N1Ykl0ZW0rU3ViSXRl
bVN0eWxlAgAAAAIAAAAGCgAAAAAKCgoFBwAAABNTeXN0ZW0uRHJhd2luZy5Gb250BAAAAAROYW1lBFNp
emUFU3R5bGUEVW5pdAEABAQLGFN5c3RlbS5EcmF3aW5nLkZvbnRTdHlsZQMAAAAbU3lzdGVtLkRyYXdp
bmcuR3JhcGhpY3NVbml0AwAAAAMAAAAGCwAAAAZUYWhvbWEAAARBBfT///8YU3lzdGVtLkRyYXdpbmcu
Rm9udFN0eWxlAQAAAAd2YWx1ZV9fAAgDAAAAAAAAAAXz////G1N5c3RlbS5EcmF3aW5nLkdyYXBoaWNz
VW5pdAEAAAAHdmFsdWVfXwAIAwAAAAMAAAAL
</value>
</data>
<data name="OptionList.Items2" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0HAAAA
BFRleHQKSW1hZ2VJbmRleAlCYWNrQ29sb3IHQ2hlY2tlZARGb250CUZvcmVDb2xvchdVc2VJdGVtU3R5
bGVGb3JTdWJJdGVtcwEABAAEBAAIFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAETU3lzdGVtLkRyYXdp
bmcuRm9udAMAAAAUU3lzdGVtLkRyYXdpbmcuQ29sb3IDAAAAAQIAAAAGBAAAAA9Cb2FyZCAmIGNoaXBz
ZXT/////Bfv///8UU3lzdGVtLkRyYXdpbmcuQ29sb3IEAAAABG5hbWUFdmFsdWUKa25vd25Db2xvcgVz
dGF0ZQEAAAAJBwcDAAAACgAAAAAAAAAAGAABAAAJBgAAAAH5////+////woAAAAAAAAAABoAAQABBQYA
AAATU3lzdGVtLkRyYXdpbmcuRm9udAQAAAAETmFtZQRTaXplBVN0eWxlBFVuaXQBAAQECxhTeXN0ZW0u
RHJhd2luZy5Gb250U3R5bGUDAAAAG1N5c3RlbS5EcmF3aW5nLkdyYXBoaWNzVW5pdAMAAAADAAAABggA
AAAUTWljcm9zb2Z0IFNhbnMgU2VyaWYAAARBBff///8YU3lzdGVtLkRyYXdpbmcuRm9udFN0eWxlAQAA
AAd2YWx1ZV9fAAgDAAAAAAAAAAX2////G1N5c3RlbS5EcmF3aW5nLkdyYXBoaWNzVW5pdAEAAAAHdmFs
dWVfXwAIAwAAAAMAAAAL
</value>
</data>
<data name="OptionList.Items3" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0JAAAA
BFRleHQKSW1hZ2VJbmRleAxTdWJJdGVtQ291bnQIU3ViSXRlbTEJQmFja0NvbG9yB0NoZWNrZWQERm9u
dAlGb3JlQ29sb3IXVXNlSXRlbVN0eWxlRm9yU3ViSXRlbXMBAAAEBAAEBAAICDFTeXN0ZW0uV2luZG93
cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtAgAAABRTeXN0ZW0uRHJhd2luZy5Db2xv
cgMAAAABE1N5c3RlbS5EcmF3aW5nLkZvbnQDAAAAFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAECAAAA
BgQAAAAGRHJpdmVz/////wIAAAAJBQAAAAX6////FFN5c3RlbS5EcmF3aW5nLkNvbG9yBAAAAARuYW1l
BXZhbHVlCmtub3duQ29sb3IFc3RhdGUBAAAACQcHAwAAAAoAAAAAAAAAABgAAQAACQcAAAAB+P////r/
//8KAAAAAAAAAAAaAAEAAQwJAAAAS21zY29ybGliLCBWZXJzaW9uPTIuMC4wLjAsIEN1bHR1cmU9bmV1
dHJhbCwgUHVibGljS2V5VG9rZW49Yjc3YTVjNTYxOTM0ZTA4OQUFAAAAMVN5c3RlbS5XaW5kb3dzLkZv
cm1zLkxpc3RWaWV3SXRlbStMaXN0Vmlld1N1Ykl0ZW0EAAAABHRleHQEbmFtZQVzdHlsZQh1c2VyRGF0
YQEBBAI+U3lzdGVtLldpbmRvd3MuRm9ybXMuTGlzdFZpZXdJdGVtK0xpc3RWaWV3U3ViSXRlbStTdWJJ
dGVtU3R5bGUCAAAAAgAAAAYKAAAAAAoKCgUHAAAAE1N5c3RlbS5EcmF3aW5nLkZvbnQEAAAABE5hbWUE
U2l6ZQVTdHlsZQRVbml0AQAEBAsYU3lzdGVtLkRyYXdpbmcuRm9udFN0eWxlAwAAABtTeXN0ZW0uRHJh
d2luZy5HcmFwaGljc1VuaXQDAAAAAwAAAAYLAAAABlRhaG9tYQAABEEF9P///xhTeXN0ZW0uRHJhd2lu
Zy5Gb250U3R5bGUBAAAAB3ZhbHVlX18ACAMAAAAAAAAABfP///8bU3lzdGVtLkRyYXdpbmcuR3JhcGhp
Y3NVbml0AQAAAAd2YWx1ZV9fAAgDAAAAAwAAAAs=
</value>
</data>
<data name="OptionList.Items4" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0JAAAA
BFRleHQKSW1hZ2VJbmRleAxTdWJJdGVtQ291bnQIU3ViSXRlbTEJQmFja0NvbG9yB0NoZWNrZWQERm9u
dAlGb3JlQ29sb3IXVXNlSXRlbVN0eWxlRm9yU3ViSXRlbXMBAAAEBAAEBAAICDFTeXN0ZW0uV2luZG93
cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtAgAAABRTeXN0ZW0uRHJhd2luZy5Db2xv
cgMAAAABE1N5c3RlbS5EcmF3aW5nLkZvbnQDAAAAFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAECAAAA
BgQAAAAHTmV0d29ya/////8CAAAACQUAAAAF+v///xRTeXN0ZW0uRHJhd2luZy5Db2xvcgQAAAAEbmFt
ZQV2YWx1ZQprbm93bkNvbG9yBXN0YXRlAQAAAAkHBwMAAAAKAAAAAAAAAAAYAAEAAAkHAAAAAfj////6
////CgAAAAAAAAAAGgABAAEMCQAAAEttc2NvcmxpYiwgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5l
dXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFBQAAADFTeXN0ZW0uV2luZG93cy5G
b3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtBAAAAAR0ZXh0BG5hbWUFc3R5bGUIdXNlckRh
dGEBAQQCPlN5c3RlbS5XaW5kb3dzLkZvcm1zLkxpc3RWaWV3SXRlbStMaXN0Vmlld1N1Ykl0ZW0rU3Vi
SXRlbVN0eWxlAgAAAAIAAAAGCgAAAAAKCgoFBwAAABNTeXN0ZW0uRHJhd2luZy5Gb250BAAAAAROYW1l
BFNpemUFU3R5bGUEVW5pdAEABAQLGFN5c3RlbS5EcmF3aW5nLkZvbnRTdHlsZQMAAAAbU3lzdGVtLkRy
YXdpbmcuR3JhcGhpY3NVbml0AwAAAAMAAAAGCwAAAAZUYWhvbWEAAARBBfT///8YU3lzdGVtLkRyYXdp
bmcuRm9udFN0eWxlAQAAAAd2YWx1ZV9fAAgDAAAAAAAAAAXz////G1N5c3RlbS5EcmF3aW5nLkdyYXBo
aWNzVW5pdAEAAAAHdmFsdWVfXwAIAwAAAAMAAAAL
</value>
</data>
<data name="OptionList.Items5" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0JAAAA
BFRleHQKSW1hZ2VJbmRleAxTdWJJdGVtQ291bnQIU3ViSXRlbTEJQmFja0NvbG9yB0NoZWNrZWQERm9u
dAlGb3JlQ29sb3IXVXNlSXRlbVN0eWxlRm9yU3ViSXRlbXMBAAAEBAAEBAAICDFTeXN0ZW0uV2luZG93
cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtAgAAABRTeXN0ZW0uRHJhd2luZy5Db2xv
cgMAAAABE1N5c3RlbS5EcmF3aW5nLkZvbnQDAAAAFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAECAAAA
BgQAAAAHRGlzcGxhef////8CAAAACQUAAAAF+v///xRTeXN0ZW0uRHJhd2luZy5Db2xvcgQAAAAEbmFt
ZQV2YWx1ZQprbm93bkNvbG9yBXN0YXRlAQAAAAkHBwMAAAAKAAAAAAAAAAAYAAEAAAkHAAAAAfj////6
////CgAAAAAAAAAAGgABAAEMCQAAAEttc2NvcmxpYiwgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5l
dXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFBQAAADFTeXN0ZW0uV2luZG93cy5G
b3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtBAAAAAR0ZXh0BG5hbWUFc3R5bGUIdXNlckRh
dGEBAQQCPlN5c3RlbS5XaW5kb3dzLkZvcm1zLkxpc3RWaWV3SXRlbStMaXN0Vmlld1N1Ykl0ZW0rU3Vi
SXRlbVN0eWxlAgAAAAIAAAAGCgAAAAAKCgoFBwAAABNTeXN0ZW0uRHJhd2luZy5Gb250BAAAAAROYW1l
BFNpemUFU3R5bGUEVW5pdAEABAQLGFN5c3RlbS5EcmF3aW5nLkZvbnRTdHlsZQMAAAAbU3lzdGVtLkRy
YXdpbmcuR3JhcGhpY3NVbml0AwAAAAMAAAAGCwAAAAZUYWhvbWEAAARBBfT///8YU3lzdGVtLkRyYXdp
bmcuRm9udFN0eWxlAQAAAAd2YWx1ZV9fAAgDAAAAAAAAAAXz////G1N5c3RlbS5EcmF3aW5nLkdyYXBo
aWNzVW5pdAEAAAAHdmFsdWVfXwAIAwAAAAMAAAAL
</value>
</data>
<data name="OptionList.Items6" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0HAAAA
BFRleHQKSW1hZ2VJbmRleAlCYWNrQ29sb3IHQ2hlY2tlZARGb250CUZvcmVDb2xvchdVc2VJdGVtU3R5
bGVGb3JTdWJJdGVtcwEABAAEBAAIFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAETU3lzdGVtLkRyYXdp
bmcuRm9udAMAAAAUU3lzdGVtLkRyYXdpbmcuQ29sb3IDAAAAAQIAAAAGBAAAAAxNaXNjZWxhbmVvdXP/
////Bfv///8UU3lzdGVtLkRyYXdpbmcuQ29sb3IEAAAABG5hbWUFdmFsdWUKa25vd25Db2xvcgVzdGF0
ZQEAAAAJBwcDAAAACgAAAAAAAAAAGAABAAAJBgAAAAH5////+////woAAAAAAAAAABoAAQABBQYAAAAT
U3lzdGVtLkRyYXdpbmcuRm9udAQAAAAETmFtZQRTaXplBVN0eWxlBFVuaXQBAAQECxhTeXN0ZW0uRHJh
d2luZy5Gb250U3R5bGUDAAAAG1N5c3RlbS5EcmF3aW5nLkdyYXBoaWNzVW5pdAMAAAADAAAABggAAAAU
TWljcm9zb2Z0IFNhbnMgU2VyaWYAAARBBff///8YU3lzdGVtLkRyYXdpbmcuRm9udFN0eWxlAQAAAAd2
YWx1ZV9fAAgDAAAAAAAAAAX2////G1N5c3RlbS5EcmF3aW5nLkdyYXBoaWNzVW5pdAEAAAAHdmFsdWVf
XwAIAwAAAAMAAAAL
</value>
</data>
<data name="OptionList.Items7" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0HAAAA
BFRleHQKSW1hZ2VJbmRleAlCYWNrQ29sb3IHQ2hlY2tlZARGb250CUZvcmVDb2xvchdVc2VJdGVtU3R5
bGVGb3JTdWJJdGVtcwEABAAEBAAIFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAETU3lzdGVtLkRyYXdp
bmcuRm9udAMAAAAUU3lzdGVtLkRyYXdpbmcuQ29sb3IDAAAAAQIAAAAGBAAAABlFZGl0IE1hbnVhbGx5
IENvbmZpZyBGaWxl/////wX7////FFN5c3RlbS5EcmF3aW5nLkNvbG9yBAAAAARuYW1lBXZhbHVlCmtu
b3duQ29sb3IFc3RhdGUBAAAACQcHAwAAAAoAAAAAAAAAABgAAQAACQYAAAAB+f////v///8KAAAAAAAA
AAAaAAEAAQUGAAAAE1N5c3RlbS5EcmF3aW5nLkZvbnQEAAAABE5hbWUEU2l6ZQVTdHlsZQRVbml0AQAE
BAsYU3lzdGVtLkRyYXdpbmcuRm9udFN0eWxlAwAAABtTeXN0ZW0uRHJhd2luZy5HcmFwaGljc1VuaXQD
AAAAAwAAAAYIAAAAFE1pY3Jvc29mdCBTYW5zIFNlcmlmAAAEQQX3////GFN5c3RlbS5EcmF3aW5nLkZv
bnRTdHlsZQEAAAAHdmFsdWVfXwAIAwAAAAAAAAAF9v///xtTeXN0ZW0uRHJhd2luZy5HcmFwaGljc1Vu
aXQBAAAAB3ZhbHVlX18ACAMAAAADAAAACw==
</value>
</data>
</root>

View File

@ -0,0 +1,564 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="MiscPageTable.Location" type="System.Drawing.Point, System.Drawing">
<value>121, 250</value>
</data>
<data name="MiscPageTable.Size" type="System.Drawing.Size, System.Drawing">
<value>235, 21</value>
</data>
<data name="MiscPageTableLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>105, 13</value>
</data>
<data name="MiscPageTableLabel.Text" xml:space="preserve">
<value>Tabla de asignación:</value>
</data>
<data name="MiscNVRAMFileLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>85, 13</value>
</data>
<data name="MiscNVRAMFileLabel.Text" xml:space="preserve">
<value>Archivo NVRAM:</value>
</data>
<data name="MiscNVRAMFile.Location" type="System.Drawing.Point, System.Drawing">
<value>100, 220</value>
</data>
<data name="MiscNVRAMFile.Size" type="System.Drawing.Size, System.Drawing">
<value>222, 21</value>
</data>
<data name="MiscBootModeLabel.Location" type="System.Drawing.Point, System.Drawing">
<value>10, 49</value>
</data>
<data name="MiscBootModeLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>99, 13</value>
</data>
<data name="MiscBootModeLabel.Text" xml:space="preserve">
<value>Modo de arranque:</value>
</data>
<data name="MiscBootModeAuto.Location" type="System.Drawing.Point, System.Drawing">
<value>115, 47</value>
</data>
<data name="MiscBootModeSelect.Location" type="System.Drawing.Point, System.Drawing">
<value>177, 47</value>
</data>
<data name="MiscBootModeSelect.Size" type="System.Drawing.Size, System.Drawing">
<value>62, 17</value>
</data>
<data name="MiscBootModeSelect.Text" xml:space="preserve">
<value>Asistido</value>
</data>
<data name="MiscBootModeForce.Location" type="System.Drawing.Point, System.Drawing">
<value>245, 47</value>
</data>
<data name="MiscBootModeForce.Size" type="System.Drawing.Size, System.Drawing">
<value>59, 17</value>
</data>
<data name="MiscBootModeForce.Text" xml:space="preserve">
<value>Manual</value>
</data>
<data name="MiscFrame.Text" xml:space="preserve">
<value>Configuraciones miscelaneas</value>
</data>
<data name="MiscInfo.Size" type="System.Drawing.Size, System.Drawing">
<value>260, 13</value>
</data>
<data name="MiscInfo.Text" xml:space="preserve">
<value>Se recomienda que no cambie estas configuraciones.</value>
</data>
<data name="MiscAdvancedInfo.Location" type="System.Drawing.Point, System.Drawing">
<value>10, 68</value>
</data>
<data name="MiscAdvancedInfo.Size" type="System.Drawing.Size, System.Drawing">
<value>350, 26</value>
</data>
<data name="MiscAdvancedInfo.Text" xml:space="preserve">
<value>¡Advertencia! NO cambie las configuraciones de abajo A MENOS de que
sepa lo que está haciendo.</value>
</data>
<data name="MiscPROMBootArgs.Location" type="System.Drawing.Point, System.Drawing">
<value>112, 160</value>
</data>
<data name="MiscPROMBootArgs.Size" type="System.Drawing.Size, System.Drawing">
<value>244, 21</value>
</data>
<data name="MiscPROMBootArgsLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>101, 13</value>
</data>
<data name="MiscPROMBootArgsLabel.Text" xml:space="preserve">
<value>Argumentos PROM:</value>
</data>
<data name="MiscMachArguments.Location" type="System.Drawing.Point, System.Drawing">
<value>125, 190</value>
</data>
<data name="MiscMachArguments.Size" type="System.Drawing.Size, System.Drawing">
<value>231, 21</value>
</data>
<data name="MiscMachArgumentsLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>115, 13</value>
</data>
<data name="MiscMachArgumentsLabel.Text" xml:space="preserve">
<value>Parametros del kernel:</value>
</data>
<data name="MiscPROMBootPath.Location" type="System.Drawing.Point, System.Drawing">
<value>78, 130</value>
</data>
<data name="MiscPROMBootPath.Size" type="System.Drawing.Size, System.Drawing">
<value>244, 21</value>
</data>
<data name="MiscPROMBootPathLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>62, 13</value>
</data>
<data name="MiscPROMBootPathLabel.Text" xml:space="preserve">
<value>Ruta PROM</value>
</data>
<data name="MiscPROMFile.Location" type="System.Drawing.Point, System.Drawing">
<value>91, 100</value>
</data>
<data name="MiscPROMFile.Size" type="System.Drawing.Size, System.Drawing">
<value>231, 21</value>
</data>
<data name="MiscPROMFileLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>79, 13</value>
</data>
<data name="MiscPROMFileLabel.Text" xml:space="preserve">
<value>Archivo PROM:</value>
</data>
<data name="DisplayDriver.Location" type="System.Drawing.Point, System.Drawing">
<value>148, 90</value>
</data>
<data name="DisplayDriver.Size" type="System.Drawing.Size, System.Drawing">
<value>169, 21</value>
</data>
<data name="DisplayDriverLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>76, 13</value>
</data>
<data name="DisplayDriverLabel.Text" xml:space="preserve">
<value>Driver gráfico:</value>
</data>
<data name="DisplayRedrawLabel.Location" type="System.Drawing.Point, System.Drawing">
<value>148, 146</value>
</data>
<data name="NetworkFrame.Text" xml:space="preserve">
<value>Red</value>
</data>
<data name="Net8139Enable.Size" type="System.Drawing.Size, System.Drawing">
<value>175, 17</value>
</data>
<data name="Net8139Enable.Text" xml:space="preserve">
<value>Activar tarjeta de red RTL8139</value>
</data>
<data name="Net3c90xEnable.Size" type="System.Drawing.Size, System.Drawing">
<value>162, 17</value>
</data>
<data name="Net3c90xEnable.Text" xml:space="preserve">
<value>Activar tarjeta de red 3c90x</value>
</data>
<data name="DisplayRedraw.Size" type="System.Drawing.Size, System.Drawing">
<value>124, 13</value>
</data>
<data name="DisplayRedraw.Text" xml:space="preserve">
<value>Intervalo de redibujado:</value>
</data>
<data name="DisplayFullscreenKey.Location" type="System.Drawing.Point, System.Drawing">
<value>148, 120</value>
</data>
<data name="DisplayFullscreenKey.Size" type="System.Drawing.Size, System.Drawing">
<value>169, 21</value>
</data>
<data name="DisplayFrame.Text" xml:space="preserve">
<value>Pantalla</value>
</data>
<data name="DisplayResLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>62, 13</value>
</data>
<data name="DisplayResLabel.Text" xml:space="preserve">
<value>Resolución:</value>
</data>
<data name="DisplayFullscreenStart.Size" type="System.Drawing.Size, System.Drawing">
<value>157, 17</value>
</data>
<data name="DisplayFullscreenStart.Text" xml:space="preserve">
<value>Iniciar en pantalla completa</value>
</data>
<data name="DisplayResCustom.Size" type="System.Drawing.Size, System.Drawing">
<value>168, 17</value>
</data>
<data name="DisplayResCustom.Text" xml:space="preserve">
<value>Usar resolución personalizada</value>
</data>
<data name="DisplayFullscreenKeyLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>134, 13</value>
</data>
<data name="DisplayFullscreenKeyLabel.Text" xml:space="preserve">
<value>Tecla de pantalla completa</value>
</data>
<data name="DriveFrame.Text" xml:space="preserve">
<value>Unidades de disco</value>
</data>
<data name="DriveMasterEnabled.Size" type="System.Drawing.Size, System.Drawing">
<value>137, 17</value>
</data>
<data name="DriveMasterEnabled.Text" xml:space="preserve">
<value>Activar unidad Maestra</value>
</data>
<data name="DriveMasterType.Location" type="System.Drawing.Point, System.Drawing">
<value>100, 60</value>
</data>
<data name="DriveMasterTypeLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>81, 13</value>
</data>
<data name="DriveMasterTypeLabel.Text" xml:space="preserve">
<value>Tipo de unidad:</value>
</data>
<data name="DriveMasterPathLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>34, 13</value>
</data>
<data name="DriveMasterPathLabel.Text" xml:space="preserve">
<value>Ruta:</value>
</data>
<data name="DriveSlaveEnabled.Size" type="System.Drawing.Size, System.Drawing">
<value>137, 17</value>
</data>
<data name="DriveSlaveEnabled.Text" xml:space="preserve">
<value>Activar unidad Esclava</value>
</data>
<data name="DriveSlaveType.Location" type="System.Drawing.Point, System.Drawing">
<value>100, 150</value>
</data>
<data name="DriveSlaveTypeLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>81, 13</value>
</data>
<data name="DriveSlaveTypeLabel.Text" xml:space="preserve">
<value>Tipo de unidad:</value>
</data>
<data name="DriveSlavePathLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>34, 13</value>
</data>
<data name="DriveSlavePathLabel.Text" xml:space="preserve">
<value>Ruta:</value>
</data>
<data name="OptionList.Items" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0JAAAA
BFRleHQKSW1hZ2VJbmRleAxTdWJJdGVtQ291bnQIU3ViSXRlbTEJQmFja0NvbG9yB0NoZWNrZWQERm9u
dAlGb3JlQ29sb3IXVXNlSXRlbVN0eWxlRm9yU3ViSXRlbXMBAAAEBAAEBAAICDFTeXN0ZW0uV2luZG93
cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtAgAAABRTeXN0ZW0uRHJhd2luZy5Db2xv
cgMAAAABE1N5c3RlbS5EcmF3aW5nLkZvbnQDAAAAFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAECAAAA
BgQAAAAGTm9tYnJl/////wIAAAAJBQAAAAX6////FFN5c3RlbS5EcmF3aW5nLkNvbG9yBAAAAARuYW1l
BXZhbHVlCmtub3duQ29sb3IFc3RhdGUBAAAACQcHAwAAAAoAAAAAAAAAABgAAQAACQcAAAAB+P////r/
//8KAAAAAAAAAAAaAAEAAQwJAAAAS21zY29ybGliLCBWZXJzaW9uPTIuMC4wLjAsIEN1bHR1cmU9bmV1
dHJhbCwgUHVibGljS2V5VG9rZW49Yjc3YTVjNTYxOTM0ZTA4OQUFAAAAMVN5c3RlbS5XaW5kb3dzLkZv
cm1zLkxpc3RWaWV3SXRlbStMaXN0Vmlld1N1Ykl0ZW0EAAAABHRleHQEbmFtZQVzdHlsZQh1c2VyRGF0
YQEBBAI+U3lzdGVtLldpbmRvd3MuRm9ybXMuTGlzdFZpZXdJdGVtK0xpc3RWaWV3U3ViSXRlbStTdWJJ
dGVtU3R5bGUCAAAAAgAAAAYKAAAAAAoKCgUHAAAAE1N5c3RlbS5EcmF3aW5nLkZvbnQEAAAABE5hbWUE
U2l6ZQVTdHlsZQRVbml0AQAEBAsYU3lzdGVtLkRyYXdpbmcuRm9udFN0eWxlAwAAABtTeXN0ZW0uRHJh
d2luZy5HcmFwaGljc1VuaXQDAAAAAwAAAAYLAAAABlRhaG9tYQAABEEF9P///xhTeXN0ZW0uRHJhd2lu
Zy5Gb250U3R5bGUBAAAAB3ZhbHVlX18ACAMAAAAAAAAABfP///8bU3lzdGVtLkRyYXdpbmcuR3JhcGhp
Y3NVbml0AQAAAAd2YWx1ZV9fAAgDAAAAAwAAAAs=
</value>
</data>
<data name="OptionList.Items1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0JAAAA
BFRleHQKSW1hZ2VJbmRleAxTdWJJdGVtQ291bnQIU3ViSXRlbTEJQmFja0NvbG9yB0NoZWNrZWQERm9u
dAlGb3JlQ29sb3IXVXNlSXRlbVN0eWxlRm9yU3ViSXRlbXMBAAAEBAAEBAAICDFTeXN0ZW0uV2luZG93
cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtAgAAABRTeXN0ZW0uRHJhd2luZy5Db2xv
cgMAAAABE1N5c3RlbS5EcmF3aW5nLkZvbnQDAAAAFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAECAAAA
BgQAAAAGw41jb25v/////wIAAAAJBQAAAAX6////FFN5c3RlbS5EcmF3aW5nLkNvbG9yBAAAAARuYW1l
BXZhbHVlCmtub3duQ29sb3IFc3RhdGUBAAAACQcHAwAAAAoAAAAAAAAAABgAAQAACQcAAAAB+P////r/
//8KAAAAAAAAAAAaAAEAAQwJAAAAS21zY29ybGliLCBWZXJzaW9uPTIuMC4wLjAsIEN1bHR1cmU9bmV1
dHJhbCwgUHVibGljS2V5VG9rZW49Yjc3YTVjNTYxOTM0ZTA4OQUFAAAAMVN5c3RlbS5XaW5kb3dzLkZv
cm1zLkxpc3RWaWV3SXRlbStMaXN0Vmlld1N1Ykl0ZW0EAAAABHRleHQEbmFtZQVzdHlsZQh1c2VyRGF0
YQEBBAI+U3lzdGVtLldpbmRvd3MuRm9ybXMuTGlzdFZpZXdJdGVtK0xpc3RWaWV3U3ViSXRlbStTdWJJ
dGVtU3R5bGUCAAAAAgAAAAYKAAAAAAoKCgUHAAAAE1N5c3RlbS5EcmF3aW5nLkZvbnQEAAAABE5hbWUE
U2l6ZQVTdHlsZQRVbml0AQAEBAsYU3lzdGVtLkRyYXdpbmcuRm9udFN0eWxlAwAAABtTeXN0ZW0uRHJh
d2luZy5HcmFwaGljc1VuaXQDAAAAAwAAAAYLAAAABlRhaG9tYQAABEEF9P///xhTeXN0ZW0uRHJhd2lu
Zy5Gb250U3R5bGUBAAAAB3ZhbHVlX18ACAMAAAAAAAAABfP///8bU3lzdGVtLkRyYXdpbmcuR3JhcGhp
Y3NVbml0AQAAAAd2YWx1ZV9fAAgDAAAAAwAAAAs=
</value>
</data>
<data name="OptionList.Items2" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0HAAAA
BFRleHQKSW1hZ2VJbmRleAlCYWNrQ29sb3IHQ2hlY2tlZARGb250CUZvcmVDb2xvchdVc2VJdGVtU3R5
bGVGb3JTdWJJdGVtcwEABAAEBAAIFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAETU3lzdGVtLkRyYXdp
bmcuRm9udAMAAAAUU3lzdGVtLkRyYXdpbmcuQ29sb3IDAAAAAQIAAAAGBAAAABpQbGFjYSBiYXNlIHkg
Y29udHJvbGFkb3Jlc/////8F+////xRTeXN0ZW0uRHJhd2luZy5Db2xvcgQAAAAEbmFtZQV2YWx1ZQpr
bm93bkNvbG9yBXN0YXRlAQAAAAkHBwMAAAAKAAAAAAAAAAAYAAEAAAkGAAAAAfn////7////CgAAAAAA
AAAAGgABAAEFBgAAABNTeXN0ZW0uRHJhd2luZy5Gb250BAAAAAROYW1lBFNpemUFU3R5bGUEVW5pdAEA
BAQLGFN5c3RlbS5EcmF3aW5nLkZvbnRTdHlsZQMAAAAbU3lzdGVtLkRyYXdpbmcuR3JhcGhpY3NVbml0
AwAAAAMAAAAGCAAAABRNaWNyb3NvZnQgU2FucyBTZXJpZgAABEEF9////xhTeXN0ZW0uRHJhd2luZy5G
b250U3R5bGUBAAAAB3ZhbHVlX18ACAMAAAAAAAAABfb///8bU3lzdGVtLkRyYXdpbmcuR3JhcGhpY3NV
bml0AQAAAAd2YWx1ZV9fAAgDAAAAAwAAAAs=
</value>
</data>
<data name="OptionList.Items3" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0JAAAA
BFRleHQKSW1hZ2VJbmRleAxTdWJJdGVtQ291bnQIU3ViSXRlbTEJQmFja0NvbG9yB0NoZWNrZWQERm9u
dAlGb3JlQ29sb3IXVXNlSXRlbVN0eWxlRm9yU3ViSXRlbXMBAAAEBAAEBAAICDFTeXN0ZW0uV2luZG93
cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtAgAAABRTeXN0ZW0uRHJhd2luZy5Db2xv
cgMAAAABE1N5c3RlbS5EcmF3aW5nLkZvbnQDAAAAFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAECAAAA
BgQAAAARVW5pZGFkZXMgZGUgZGlzY2//////AgAAAAkFAAAABfr///8UU3lzdGVtLkRyYXdpbmcuQ29s
b3IEAAAABG5hbWUFdmFsdWUKa25vd25Db2xvcgVzdGF0ZQEAAAAJBwcDAAAACgAAAAAAAAAAGAABAAAJ
BwAAAAH4////+v///woAAAAAAAAAABoAAQABDAkAAABLbXNjb3JsaWIsIFZlcnNpb249Mi4wLjAuMCwg
Q3VsdHVyZT1uZXV0cmFsLCBQdWJsaWNLZXlUb2tlbj1iNzdhNWM1NjE5MzRlMDg5BQUAAAAxU3lzdGVt
LldpbmRvd3MuRm9ybXMuTGlzdFZpZXdJdGVtK0xpc3RWaWV3U3ViSXRlbQQAAAAEdGV4dARuYW1lBXN0
eWxlCHVzZXJEYXRhAQEEAj5TeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdT
dWJJdGVtK1N1Ykl0ZW1TdHlsZQIAAAACAAAABgoAAAAACgoKBQcAAAATU3lzdGVtLkRyYXdpbmcuRm9u
dAQAAAAETmFtZQRTaXplBVN0eWxlBFVuaXQBAAQECxhTeXN0ZW0uRHJhd2luZy5Gb250U3R5bGUDAAAA
G1N5c3RlbS5EcmF3aW5nLkdyYXBoaWNzVW5pdAMAAAADAAAABgsAAAAGVGFob21hAAAEQQX0////GFN5
c3RlbS5EcmF3aW5nLkZvbnRTdHlsZQEAAAAHdmFsdWVfXwAIAwAAAAAAAAAF8////xtTeXN0ZW0uRHJh
d2luZy5HcmFwaGljc1VuaXQBAAAAB3ZhbHVlX18ACAMAAAADAAAACw==
</value>
</data>
<data name="OptionList.Items4" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0JAAAA
BFRleHQKSW1hZ2VJbmRleAxTdWJJdGVtQ291bnQIU3ViSXRlbTEJQmFja0NvbG9yB0NoZWNrZWQERm9u
dAlGb3JlQ29sb3IXVXNlSXRlbVN0eWxlRm9yU3ViSXRlbXMBAAAEBAAEBAAICDFTeXN0ZW0uV2luZG93
cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtAgAAABRTeXN0ZW0uRHJhd2luZy5Db2xv
cgMAAAABE1N5c3RlbS5EcmF3aW5nLkZvbnQDAAAAFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAECAAAA
BgQAAAADUmVk/////wIAAAAJBQAAAAX6////FFN5c3RlbS5EcmF3aW5nLkNvbG9yBAAAAARuYW1lBXZh
bHVlCmtub3duQ29sb3IFc3RhdGUBAAAACQcHAwAAAAoAAAAAAAAAABgAAQAACQcAAAAB+P////r///8K
AAAAAAAAAAAaAAEAAQwJAAAAS21zY29ybGliLCBWZXJzaW9uPTIuMC4wLjAsIEN1bHR1cmU9bmV1dHJh
bCwgUHVibGljS2V5VG9rZW49Yjc3YTVjNTYxOTM0ZTA4OQUFAAAAMVN5c3RlbS5XaW5kb3dzLkZvcm1z
Lkxpc3RWaWV3SXRlbStMaXN0Vmlld1N1Ykl0ZW0EAAAABHRleHQEbmFtZQVzdHlsZQh1c2VyRGF0YQEB
BAI+U3lzdGVtLldpbmRvd3MuRm9ybXMuTGlzdFZpZXdJdGVtK0xpc3RWaWV3U3ViSXRlbStTdWJJdGVt
U3R5bGUCAAAAAgAAAAYKAAAAAAoKCgUHAAAAE1N5c3RlbS5EcmF3aW5nLkZvbnQEAAAABE5hbWUEU2l6
ZQVTdHlsZQRVbml0AQAEBAsYU3lzdGVtLkRyYXdpbmcuRm9udFN0eWxlAwAAABtTeXN0ZW0uRHJhd2lu
Zy5HcmFwaGljc1VuaXQDAAAAAwAAAAYLAAAABlRhaG9tYQAABEEF9P///xhTeXN0ZW0uRHJhd2luZy5G
b250U3R5bGUBAAAAB3ZhbHVlX18ACAMAAAAAAAAABfP///8bU3lzdGVtLkRyYXdpbmcuR3JhcGhpY3NV
bml0AQAAAAd2YWx1ZV9fAAgDAAAAAwAAAAs=
</value>
</data>
<data name="OptionList.Items5" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0JAAAA
BFRleHQKSW1hZ2VJbmRleAxTdWJJdGVtQ291bnQIU3ViSXRlbTEJQmFja0NvbG9yB0NoZWNrZWQERm9u
dAlGb3JlQ29sb3IXVXNlSXRlbVN0eWxlRm9yU3ViSXRlbXMBAAAEBAAEBAAICDFTeXN0ZW0uV2luZG93
cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtAgAAABRTeXN0ZW0uRHJhd2luZy5Db2xv
cgMAAAABE1N5c3RlbS5EcmF3aW5nLkZvbnQDAAAAFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAECAAAA
BgQAAAAIUGFudGFsbGH/////AgAAAAkFAAAABfr///8UU3lzdGVtLkRyYXdpbmcuQ29sb3IEAAAABG5h
bWUFdmFsdWUKa25vd25Db2xvcgVzdGF0ZQEAAAAJBwcDAAAACgAAAAAAAAAAGAABAAAJBwAAAAH4////
+v///woAAAAAAAAAABoAAQABDAkAAABLbXNjb3JsaWIsIFZlcnNpb249Mi4wLjAuMCwgQ3VsdHVyZT1u
ZXV0cmFsLCBQdWJsaWNLZXlUb2tlbj1iNzdhNWM1NjE5MzRlMDg5BQUAAAAxU3lzdGVtLldpbmRvd3Mu
Rm9ybXMuTGlzdFZpZXdJdGVtK0xpc3RWaWV3U3ViSXRlbQQAAAAEdGV4dARuYW1lBXN0eWxlCHVzZXJE
YXRhAQEEAj5TeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtK1N1
Ykl0ZW1TdHlsZQIAAAACAAAABgoAAAAACgoKBQcAAAATU3lzdGVtLkRyYXdpbmcuRm9udAQAAAAETmFt
ZQRTaXplBVN0eWxlBFVuaXQBAAQECxhTeXN0ZW0uRHJhd2luZy5Gb250U3R5bGUDAAAAG1N5c3RlbS5E
cmF3aW5nLkdyYXBoaWNzVW5pdAMAAAADAAAABgsAAAAGVGFob21hAAAEQQX0////GFN5c3RlbS5EcmF3
aW5nLkZvbnRTdHlsZQEAAAAHdmFsdWVfXwAIAwAAAAAAAAAF8////xtTeXN0ZW0uRHJhd2luZy5HcmFw
aGljc1VuaXQBAAAAB3ZhbHVlX18ACAMAAAADAAAACw==
</value>
</data>
<data name="OptionList.Items6" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0HAAAA
BFRleHQKSW1hZ2VJbmRleAlCYWNrQ29sb3IHQ2hlY2tlZARGb250CUZvcmVDb2xvchdVc2VJdGVtU3R5
bGVGb3JTdWJJdGVtcwEABAAEBAAIFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAETU3lzdGVtLkRyYXdp
bmcuRm9udAMAAAAUU3lzdGVtLkRyYXdpbmcuQ29sb3IDAAAAAQIAAAAGBAAAAApNaXNjZWxhbmVv////
/wX7////FFN5c3RlbS5EcmF3aW5nLkNvbG9yBAAAAARuYW1lBXZhbHVlCmtub3duQ29sb3IFc3RhdGUB
AAAACQcHAwAAAAoAAAAAAAAAABgAAQAACQYAAAAB+f////v///8KAAAAAAAAAAAaAAEAAQUGAAAAE1N5
c3RlbS5EcmF3aW5nLkZvbnQEAAAABE5hbWUEU2l6ZQVTdHlsZQRVbml0AQAEBAsYU3lzdGVtLkRyYXdp
bmcuRm9udFN0eWxlAwAAABtTeXN0ZW0uRHJhd2luZy5HcmFwaGljc1VuaXQDAAAAAwAAAAYIAAAAFE1p
Y3Jvc29mdCBTYW5zIFNlcmlmAAAEQQX3////GFN5c3RlbS5EcmF3aW5nLkZvbnRTdHlsZQEAAAAHdmFs
dWVfXwAIAwAAAAAAAAAF9v///xtTeXN0ZW0uRHJhd2luZy5HcmFwaGljc1VuaXQBAAAAB3ZhbHVlX18A
CAMAAAADAAAACw==
</value>
</data>
<data name="OptionList.Items7" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0HAAAA
BFRleHQKSW1hZ2VJbmRleAlCYWNrQ29sb3IHQ2hlY2tlZARGb250CUZvcmVDb2xvchdVc2VJdGVtU3R5
bGVGb3JTdWJJdGVtcwEABAAEBAAIFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAETU3lzdGVtLkRyYXdp
bmcuRm9udAMAAAAUU3lzdGVtLkRyYXdpbmcuQ29sb3IDAAAAAQIAAAAGBAAAABJFZGl0YXIgbWFudWFs
bWVudGX/////Bfv///8UU3lzdGVtLkRyYXdpbmcuQ29sb3IEAAAABG5hbWUFdmFsdWUKa25vd25Db2xv
cgVzdGF0ZQEAAAAJBwcDAAAACgAAAAAAAAAAGAABAAAJBgAAAAH5////+////woAAAAAAAAAABoAAQAB
BQYAAAATU3lzdGVtLkRyYXdpbmcuRm9udAQAAAAETmFtZQRTaXplBVN0eWxlBFVuaXQBAAQECxhTeXN0
ZW0uRHJhd2luZy5Gb250U3R5bGUDAAAAG1N5c3RlbS5EcmF3aW5nLkdyYXBoaWNzVW5pdAMAAAADAAAA
BggAAAAUTWljcm9zb2Z0IFNhbnMgU2VyaWYAAARBBff///8YU3lzdGVtLkRyYXdpbmcuRm9udFN0eWxl
AQAAAAd2YWx1ZV9fAAgDAAAAAAAAAAX2////G1N5c3RlbS5EcmF3aW5nLkdyYXBoaWNzVW5pdAEAAAAH
dmFsdWVfXwAIAwAAAAMAAAAL
</value>
</data>
<data name="Options.Text" xml:space="preserve">
<value>Opciones</value>
</data>
<data name="Value.Text" xml:space="preserve">
<value>Valores</value>
</data>
<data name="cmdCancel.Text" xml:space="preserve">
<value>Cancelar</value>
</data>
<data name="cmdOK.Text" xml:space="preserve">
<value>Aceptar</value>
</data>
<data name="IconFrame.Text" xml:space="preserve">
<value>Ícono</value>
</data>
<data name="IconAdd.Size" type="System.Drawing.Size, System.Drawing">
<value>58, 23</value>
</data>
<data name="IconAdd.Text" xml:space="preserve">
<value>Agregar</value>
</data>
<data name="IconInfo.Size" type="System.Drawing.Size, System.Drawing">
<value>355, 52</value>
</data>
<data name="IconInfo.Text" xml:space="preserve">
<value>Algo de personalización para su Mac le podría venir muy bien. En esta
página, usted puede cambiar a un ícono de su elección para su Mac
emulada. Deslice la barra para ver más íconos, o haga click en "Agregar"
para agregar una imagen de su elección.</value>
</data>
<data name="MacNameFrame.Text" xml:space="preserve">
<value>Nombre</value>
</data>
<data name="MacNameLabel.Text" xml:space="preserve">
<value>La cosa más importante para cualquier ordenador. El nombre puede ser lo que sea, tal como Performa, Mac OS 7, o sencillamente Mac.</value>
</data>
<data name="$this.Text" xml:space="preserve">
<value>Configuración para %s</value>
</data>
</root>

289
frmSettingsPearPCVM.es.resx Normal file
View File

@ -0,0 +1,289 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="OptionList.Items" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0JAAAA
BFRleHQKSW1hZ2VJbmRleAxTdWJJdGVtQ291bnQIU3ViSXRlbTEJQmFja0NvbG9yB0NoZWNrZWQERm9u
dAlGb3JlQ29sb3IXVXNlSXRlbVN0eWxlRm9yU3ViSXRlbXMBAAAEBAAEBAAICDFTeXN0ZW0uV2luZG93
cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtAgAAABRTeXN0ZW0uRHJhd2luZy5Db2xv
cgMAAAABE1N5c3RlbS5EcmF3aW5nLkZvbnQDAAAAFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAECAAAA
BgQAAAAETmFtZf////8CAAAACQUAAAAF+v///xRTeXN0ZW0uRHJhd2luZy5Db2xvcgQAAAAEbmFtZQV2
YWx1ZQprbm93bkNvbG9yBXN0YXRlAQAAAAkHBwMAAAAKAAAAAAAAAAAYAAEAAAkHAAAAAfj////6////
CgAAAAAAAAAAGgABAAEMCQAAAEttc2NvcmxpYiwgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRy
YWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFBQAAADFTeXN0ZW0uV2luZG93cy5Gb3Jt
cy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtBAAAAAR0ZXh0BG5hbWUFc3R5bGUIdXNlckRhdGEB
AQQCPlN5c3RlbS5XaW5kb3dzLkZvcm1zLkxpc3RWaWV3SXRlbStMaXN0Vmlld1N1Ykl0ZW0rU3ViSXRl
bVN0eWxlAgAAAAIAAAAGCgAAAAAKCgoFBwAAABNTeXN0ZW0uRHJhd2luZy5Gb250BAAAAAROYW1lBFNp
emUFU3R5bGUEVW5pdAEABAQLGFN5c3RlbS5EcmF3aW5nLkZvbnRTdHlsZQMAAAAbU3lzdGVtLkRyYXdp
bmcuR3JhcGhpY3NVbml0AwAAAAMAAAAGCwAAAAZUYWhvbWEAAARBBfT///8YU3lzdGVtLkRyYXdpbmcu
Rm9udFN0eWxlAQAAAAd2YWx1ZV9fAAgDAAAAAAAAAAXz////G1N5c3RlbS5EcmF3aW5nLkdyYXBoaWNz
VW5pdAEAAAAHdmFsdWVfXwAIAwAAAAMAAAAL
</value>
</data>
<data name="OptionList.Items1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0JAAAA
BFRleHQKSW1hZ2VJbmRleAxTdWJJdGVtQ291bnQIU3ViSXRlbTEJQmFja0NvbG9yB0NoZWNrZWQERm9u
dAlGb3JlQ29sb3IXVXNlSXRlbVN0eWxlRm9yU3ViSXRlbXMBAAAEBAAEBAAICDFTeXN0ZW0uV2luZG93
cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtAgAAABRTeXN0ZW0uRHJhd2luZy5Db2xv
cgMAAAABE1N5c3RlbS5EcmF3aW5nLkZvbnQDAAAAFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAECAAAA
BgQAAAAESWNvbv////8CAAAACQUAAAAF+v///xRTeXN0ZW0uRHJhd2luZy5Db2xvcgQAAAAEbmFtZQV2
YWx1ZQprbm93bkNvbG9yBXN0YXRlAQAAAAkHBwMAAAAKAAAAAAAAAAAYAAEAAAkHAAAAAfj////6////
CgAAAAAAAAAAGgABAAEMCQAAAEttc2NvcmxpYiwgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRy
YWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFBQAAADFTeXN0ZW0uV2luZG93cy5Gb3Jt
cy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtBAAAAAR0ZXh0BG5hbWUFc3R5bGUIdXNlckRhdGEB
AQQCPlN5c3RlbS5XaW5kb3dzLkZvcm1zLkxpc3RWaWV3SXRlbStMaXN0Vmlld1N1Ykl0ZW0rU3ViSXRl
bVN0eWxlAgAAAAIAAAAGCgAAAAAKCgoFBwAAABNTeXN0ZW0uRHJhd2luZy5Gb250BAAAAAROYW1lBFNp
emUFU3R5bGUEVW5pdAEABAQLGFN5c3RlbS5EcmF3aW5nLkZvbnRTdHlsZQMAAAAbU3lzdGVtLkRyYXdp
bmcuR3JhcGhpY3NVbml0AwAAAAMAAAAGCwAAAAZUYWhvbWEAAARBBfT///8YU3lzdGVtLkRyYXdpbmcu
Rm9udFN0eWxlAQAAAAd2YWx1ZV9fAAgDAAAAAAAAAAXz////G1N5c3RlbS5EcmF3aW5nLkdyYXBoaWNz
VW5pdAEAAAAHdmFsdWVfXwAIAwAAAAMAAAAL
</value>
</data>
<data name="OptionList.Items2" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0HAAAA
BFRleHQKSW1hZ2VJbmRleAlCYWNrQ29sb3IHQ2hlY2tlZARGb250CUZvcmVDb2xvchdVc2VJdGVtU3R5
bGVGb3JTdWJJdGVtcwEABAAEBAAIFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAETU3lzdGVtLkRyYXdp
bmcuRm9udAMAAAAUU3lzdGVtLkRyYXdpbmcuQ29sb3IDAAAAAQIAAAAGBAAAAA9Cb2FyZCAmIGNoaXBz
ZXT/////Bfv///8UU3lzdGVtLkRyYXdpbmcuQ29sb3IEAAAABG5hbWUFdmFsdWUKa25vd25Db2xvcgVz
dGF0ZQEAAAAJBwcDAAAACgAAAAAAAAAAGAABAAAJBgAAAAH5////+////woAAAAAAAAAABoAAQABBQYA
AAATU3lzdGVtLkRyYXdpbmcuRm9udAQAAAAETmFtZQRTaXplBVN0eWxlBFVuaXQBAAQECxhTeXN0ZW0u
RHJhd2luZy5Gb250U3R5bGUDAAAAG1N5c3RlbS5EcmF3aW5nLkdyYXBoaWNzVW5pdAMAAAADAAAABggA
AAAUTWljcm9zb2Z0IFNhbnMgU2VyaWYAAARBBff///8YU3lzdGVtLkRyYXdpbmcuRm9udFN0eWxlAQAA
AAd2YWx1ZV9fAAgDAAAAAAAAAAX2////G1N5c3RlbS5EcmF3aW5nLkdyYXBoaWNzVW5pdAEAAAAHdmFs
dWVfXwAIAwAAAAMAAAAL
</value>
</data>
<data name="OptionList.Items3" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0JAAAA
BFRleHQKSW1hZ2VJbmRleAxTdWJJdGVtQ291bnQIU3ViSXRlbTEJQmFja0NvbG9yB0NoZWNrZWQERm9u
dAlGb3JlQ29sb3IXVXNlSXRlbVN0eWxlRm9yU3ViSXRlbXMBAAAEBAAEBAAICDFTeXN0ZW0uV2luZG93
cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtAgAAABRTeXN0ZW0uRHJhd2luZy5Db2xv
cgMAAAABE1N5c3RlbS5EcmF3aW5nLkZvbnQDAAAAFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAECAAAA
BgQAAAAGRHJpdmVz/////wIAAAAJBQAAAAX6////FFN5c3RlbS5EcmF3aW5nLkNvbG9yBAAAAARuYW1l
BXZhbHVlCmtub3duQ29sb3IFc3RhdGUBAAAACQcHAwAAAAoAAAAAAAAAABgAAQAACQcAAAAB+P////r/
//8KAAAAAAAAAAAaAAEAAQwJAAAAS21zY29ybGliLCBWZXJzaW9uPTIuMC4wLjAsIEN1bHR1cmU9bmV1
dHJhbCwgUHVibGljS2V5VG9rZW49Yjc3YTVjNTYxOTM0ZTA4OQUFAAAAMVN5c3RlbS5XaW5kb3dzLkZv
cm1zLkxpc3RWaWV3SXRlbStMaXN0Vmlld1N1Ykl0ZW0EAAAABHRleHQEbmFtZQVzdHlsZQh1c2VyRGF0
YQEBBAI+U3lzdGVtLldpbmRvd3MuRm9ybXMuTGlzdFZpZXdJdGVtK0xpc3RWaWV3U3ViSXRlbStTdWJJ
dGVtU3R5bGUCAAAAAgAAAAYKAAAAAAoKCgUHAAAAE1N5c3RlbS5EcmF3aW5nLkZvbnQEAAAABE5hbWUE
U2l6ZQVTdHlsZQRVbml0AQAEBAsYU3lzdGVtLkRyYXdpbmcuRm9udFN0eWxlAwAAABtTeXN0ZW0uRHJh
d2luZy5HcmFwaGljc1VuaXQDAAAAAwAAAAYLAAAABlRhaG9tYQAABEEF9P///xhTeXN0ZW0uRHJhd2lu
Zy5Gb250U3R5bGUBAAAAB3ZhbHVlX18ACAMAAAAAAAAABfP///8bU3lzdGVtLkRyYXdpbmcuR3JhcGhp
Y3NVbml0AQAAAAd2YWx1ZV9fAAgDAAAAAwAAAAs=
</value>
</data>
<data name="OptionList.Items4" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0JAAAA
BFRleHQKSW1hZ2VJbmRleAxTdWJJdGVtQ291bnQIU3ViSXRlbTEJQmFja0NvbG9yB0NoZWNrZWQERm9u
dAlGb3JlQ29sb3IXVXNlSXRlbVN0eWxlRm9yU3ViSXRlbXMBAAAEBAAEBAAICDFTeXN0ZW0uV2luZG93
cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtAgAAABRTeXN0ZW0uRHJhd2luZy5Db2xv
cgMAAAABE1N5c3RlbS5EcmF3aW5nLkZvbnQDAAAAFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAECAAAA
BgQAAAAHTmV0d29ya/////8CAAAACQUAAAAF+v///xRTeXN0ZW0uRHJhd2luZy5Db2xvcgQAAAAEbmFt
ZQV2YWx1ZQprbm93bkNvbG9yBXN0YXRlAQAAAAkHBwMAAAAKAAAAAAAAAAAYAAEAAAkHAAAAAfj////6
////CgAAAAAAAAAAGgABAAEMCQAAAEttc2NvcmxpYiwgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5l
dXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFBQAAADFTeXN0ZW0uV2luZG93cy5G
b3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtBAAAAAR0ZXh0BG5hbWUFc3R5bGUIdXNlckRh
dGEBAQQCPlN5c3RlbS5XaW5kb3dzLkZvcm1zLkxpc3RWaWV3SXRlbStMaXN0Vmlld1N1Ykl0ZW0rU3Vi
SXRlbVN0eWxlAgAAAAIAAAAGCgAAAAAKCgoFBwAAABNTeXN0ZW0uRHJhd2luZy5Gb250BAAAAAROYW1l
BFNpemUFU3R5bGUEVW5pdAEABAQLGFN5c3RlbS5EcmF3aW5nLkZvbnRTdHlsZQMAAAAbU3lzdGVtLkRy
YXdpbmcuR3JhcGhpY3NVbml0AwAAAAMAAAAGCwAAAAZUYWhvbWEAAARBBfT///8YU3lzdGVtLkRyYXdp
bmcuRm9udFN0eWxlAQAAAAd2YWx1ZV9fAAgDAAAAAAAAAAXz////G1N5c3RlbS5EcmF3aW5nLkdyYXBo
aWNzVW5pdAEAAAAHdmFsdWVfXwAIAwAAAAMAAAAL
</value>
</data>
<data name="OptionList.Items5" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0JAAAA
BFRleHQKSW1hZ2VJbmRleAxTdWJJdGVtQ291bnQIU3ViSXRlbTEJQmFja0NvbG9yB0NoZWNrZWQERm9u
dAlGb3JlQ29sb3IXVXNlSXRlbVN0eWxlRm9yU3ViSXRlbXMBAAAEBAAEBAAICDFTeXN0ZW0uV2luZG93
cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtAgAAABRTeXN0ZW0uRHJhd2luZy5Db2xv
cgMAAAABE1N5c3RlbS5EcmF3aW5nLkZvbnQDAAAAFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAECAAAA
BgQAAAAHRGlzcGxhef////8CAAAACQUAAAAF+v///xRTeXN0ZW0uRHJhd2luZy5Db2xvcgQAAAAEbmFt
ZQV2YWx1ZQprbm93bkNvbG9yBXN0YXRlAQAAAAkHBwMAAAAKAAAAAAAAAAAYAAEAAAkHAAAAAfj////6
////CgAAAAAAAAAAGgABAAEMCQAAAEttc2NvcmxpYiwgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5l
dXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFBQAAADFTeXN0ZW0uV2luZG93cy5G
b3Jtcy5MaXN0Vmlld0l0ZW0rTGlzdFZpZXdTdWJJdGVtBAAAAAR0ZXh0BG5hbWUFc3R5bGUIdXNlckRh
dGEBAQQCPlN5c3RlbS5XaW5kb3dzLkZvcm1zLkxpc3RWaWV3SXRlbStMaXN0Vmlld1N1Ykl0ZW0rU3Vi
SXRlbVN0eWxlAgAAAAIAAAAGCgAAAAAKCgoFBwAAABNTeXN0ZW0uRHJhd2luZy5Gb250BAAAAAROYW1l
BFNpemUFU3R5bGUEVW5pdAEABAQLGFN5c3RlbS5EcmF3aW5nLkZvbnRTdHlsZQMAAAAbU3lzdGVtLkRy
YXdpbmcuR3JhcGhpY3NVbml0AwAAAAMAAAAGCwAAAAZUYWhvbWEAAARBBfT///8YU3lzdGVtLkRyYXdp
bmcuRm9udFN0eWxlAQAAAAd2YWx1ZV9fAAgDAAAAAAAAAAXz////G1N5c3RlbS5EcmF3aW5nLkdyYXBo
aWNzVW5pdAEAAAAHdmFsdWVfXwAIAwAAAAMAAAAL
</value>
</data>
<data name="OptionList.Items6" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0HAAAA
BFRleHQKSW1hZ2VJbmRleAlCYWNrQ29sb3IHQ2hlY2tlZARGb250CUZvcmVDb2xvchdVc2VJdGVtU3R5
bGVGb3JTdWJJdGVtcwEABAAEBAAIFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAETU3lzdGVtLkRyYXdp
bmcuRm9udAMAAAAUU3lzdGVtLkRyYXdpbmcuQ29sb3IDAAAAAQIAAAAGBAAAAAxNaXNjZWxhbmVvdXP/
////Bfv///8UU3lzdGVtLkRyYXdpbmcuQ29sb3IEAAAABG5hbWUFdmFsdWUKa25vd25Db2xvcgVzdGF0
ZQEAAAAJBwcDAAAACgAAAAAAAAAAGAABAAAJBgAAAAH5////+////woAAAAAAAAAABoAAQABBQYAAAAT
U3lzdGVtLkRyYXdpbmcuRm9udAQAAAAETmFtZQRTaXplBVN0eWxlBFVuaXQBAAQECxhTeXN0ZW0uRHJh
d2luZy5Gb250U3R5bGUDAAAAG1N5c3RlbS5EcmF3aW5nLkdyYXBoaWNzVW5pdAMAAAADAAAABggAAAAU
TWljcm9zb2Z0IFNhbnMgU2VyaWYAAARBBff///8YU3lzdGVtLkRyYXdpbmcuRm9udFN0eWxlAQAAAAd2
YWx1ZV9fAAgDAAAAAAAAAAX2////G1N5c3RlbS5EcmF3aW5nLkdyYXBoaWNzVW5pdAEAAAAHdmFsdWVf
XwAIAwAAAAMAAAAL
</value>
</data>
<data name="OptionList.Items7" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkMAwAAAFFTeXN0
ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2Vu
PWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACFTeXN0ZW0uV2luZG93cy5Gb3Jtcy5MaXN0Vmlld0l0ZW0HAAAA
BFRleHQKSW1hZ2VJbmRleAlCYWNrQ29sb3IHQ2hlY2tlZARGb250CUZvcmVDb2xvchdVc2VJdGVtU3R5
bGVGb3JTdWJJdGVtcwEABAAEBAAIFFN5c3RlbS5EcmF3aW5nLkNvbG9yAwAAAAETU3lzdGVtLkRyYXdp
bmcuRm9udAMAAAAUU3lzdGVtLkRyYXdpbmcuQ29sb3IDAAAAAQIAAAAGBAAAABlFZGl0IE1hbnVhbGx5
IENvbmZpZyBGaWxl/////wX7////FFN5c3RlbS5EcmF3aW5nLkNvbG9yBAAAAARuYW1lBXZhbHVlCmtu
b3duQ29sb3IFc3RhdGUBAAAACQcHAwAAAAoAAAAAAAAAABgAAQAACQYAAAAB+f////v///8KAAAAAAAA
AAAaAAEAAQUGAAAAE1N5c3RlbS5EcmF3aW5nLkZvbnQEAAAABE5hbWUEU2l6ZQVTdHlsZQRVbml0AQAE
BAsYU3lzdGVtLkRyYXdpbmcuRm9udFN0eWxlAwAAABtTeXN0ZW0uRHJhd2luZy5HcmFwaGljc1VuaXQD
AAAAAwAAAAYIAAAAFE1pY3Jvc29mdCBTYW5zIFNlcmlmAAAEQQX3////GFN5c3RlbS5EcmF3aW5nLkZv
bnRTdHlsZQEAAAAHdmFsdWVfXwAIAwAAAAAAAAAF9v///xtTeXN0ZW0uRHJhd2luZy5HcmFwaGljc1Vu
aXQBAAAAB3ZhbHVlX18ACAMAAAADAAAACw==
</value>
</data>
</root>

3679
frmSettingsPearPCVM.resx Normal file

File diff suppressed because it is too large Load Diff

762
frmSettingsPearPCVM.vb Normal file
View File

@ -0,0 +1,762 @@
Imports System.IO
Imports System.Globalization
Imports System.Threading
Public Class frmSettingsPearPCVM
Public ConfigFile As String
Public VMName As String
Public SelectedItem As Integer
Public Sub LoadSettingsFrom(Item As Integer)
ConfigFile = frmMain.VMList.Items.Item(Item).SubItems(1).Text
VMName = frmMain.VMList.Items.Item(Item).Text
SelectedItem = Item
End Sub
Private Sub Settings()
Dim Reader As New StreamReader(ConfigFile)
Dim ConfigValues As New ArrayList()
Dim strContainer As String = ""
MacName.Text = frmMain.VMList.Items.Item(SelectedItem).Text
Do
strContainer = Reader.ReadLine()
If Not strContainer Is Nothing Then
ConfigValues.Add(strContainer)
End If
Loop Until strContainer Is Nothing
Reader.Close()
For x As Integer = 0 To ConfigValues.Count - 1
ConfigValues(x) = Replace(ConfigValues(x), Chr(34).ToString, "")
If InStr(ConfigValues(x), "ppc_start_resolution = ") <> 0 Then
Dim a As String = ConfigValues(x).ToString.Substring(23)
Dim b() As String = Split(a, "x")
Dim FoundX As Boolean = False
Dim FoundY As Boolean = False
For c As Integer = 0 To DisplayResY.Items.Count - 1
If FoundX = True And FoundY = True Then
Exit For
End If
If InStr(DisplayResX.Items.Item(c).ToString, b(0)) <> 0 Then
DisplayResX.SelectedIndex = c
FoundX = True
ElseIf c = DisplayResX.Items.Count - 1 And FoundX = False Then
DisplayResX.Items.Add(b(0))
DisplayResX.SelectedIndex = DisplayResX.Items.Count - 1
End If
If InStr(DisplayResY.Items.Item(c).ToString, b(1)) <> 0 Then
DisplayResY.SelectedIndex = c
FoundY = True
ElseIf c = DisplayResY.Items.Count - 1 And FoundY = False Then
DisplayResY.Items.Add(b(1))
DisplayResY.SelectedIndex = DisplayResY.Items.Count - 1
End If
If b.Length > 2 Then
'If InStr(b(2), "@") <> 0 Then
' If b(2).Substring(InStr(b(2), "@"), 2) <= DisplayFrequency.Maximum Then
' DisplayFrequency.Value = b(2).Substring(InStr(b(2), "@"))
' Select Case b(2).Substring(0, 2)
' Case "15"
' DisplayColourDepth.SelectedIndex = 0
' Case "32"
' DisplayColourDepth.SelectedIndex = 1
' Case Else
' DisplayColourDepth.SelectedIndex = 0
' End Select
' End If
'Else
Select Case b(2).Substring(0, 2)
Case "15"
DisplayColourDepth.SelectedIndex = 0
Case "32"
DisplayColourDepth.SelectedIndex = 1
Case Else
DisplayColourDepth.SelectedIndex = 0
End Select
'End If
End If
Next
End If
If InStr(ConfigValues(x), "ppc_start_full_screen = ") <> 0 Then
If ConfigValues(x).ToString.Substring(24) <> 0 Then
DisplayFullscreenStart.Checked = True
End If
End If
If InStr(ConfigValues(x), "redraw_interval_msec = ") <> 0 Then
DisplayRedrawLabel.Text = ConfigValues(x).ToString.Substring(23)
End If
If InStr(ConfigValues(x), "key_compose_dialog = ") <> 0 Then
BoardComposeDialogKey.Text = ConfigValues(x).ToString.Substring(21)
End If
If InStr(ConfigValues(x), "key_change_cd_0 = ") <> 0 Then
BoardChangeCDKey.Text = ConfigValues(x).ToString.Substring(18)
End If
If InStr(ConfigValues(x), "key_toggle_mouse_grab = ") <> 0 Then
BoardMouseGrabKey.Text = ConfigValues(x).ToString.Substring(24)
End If
If InStr(ConfigValues(x), "key_toggle_full_screen = ") <> 0 Then
DisplayFullscreenKey.Text = ConfigValues(x).ToString.Substring(25)
End If
If InStr(ConfigValues(x), "prom_bootmethod = ") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(18)
Case "auto"
MiscBootModeAuto.Checked = True
Case "select"
MiscBootModeSelect.Checked = True
Case "force"
MiscBootModeForce.Checked = True
End Select
End If
If InStr(ConfigValues(x), "prom_loadfile = ") <> 0 Then
MiscPROMFile.Text = ConfigValues(x).ToString.Substring(16)
End If
If InStr(ConfigValues(x), "prom_env_bootpath = ") <> 0 Then
MiscPROMBootPath.Text = ConfigValues(x).ToString.Substring(20)
End If
If InStr(ConfigValues(x), "prom_env_bootargs = ") <> 0 Then
MiscPROMBootArgs.Text = ConfigValues(x).ToString.Substring(20)
End If
If InStr(ConfigValues(x), "prom_env_machargs = ") <> 0 Then
MiscMachArguments.Text = ConfigValues(x).ToString.Substring(20)
End If
If InStr(ConfigValues(x), "prom_driver_graphic = ") <> 0 Then
DisplayDriver.Text = ConfigValues(x).ToString.Substring(22)
End If
If InStr(ConfigValues(x), "page_table_pa = ") <> 0 Then
MiscPageTable.Text = ConfigValues(x).ToString.Substring(16)
End If
If InStr(ConfigValues(x), "cpu_pvr = ") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(10)
Case "0x00088302"
BoardProcessorG3.Checked = True
Case "0x000c0201"
BoardProcessorG4.Checked = True
End Select
End If
If InStr(ConfigValues(x), "memory_size = ") <> 0 Then
Dim MemorySize As UInteger = Replace(ConfigValues(x).ToString.Substring(14), "0x", "")
MemorySize = MemorySize * 0.0000256
If MemorySize < BoardRAMSlider.Maximum Then
BoardRAMSlider.Value = MemorySize
End If
End If
If InStr(ConfigValues(x), "pci_ide0_master_installed = ") <> 0 Then
If ConfigValues(x).ToString.Substring(28) <> 0 Then
DriveMasterEnabled.Checked = True
End If
End If
If InStr(ConfigValues(x), "pci_ide0_master_image = ") <> 0 Then
DriveMasterPath.Text = ConfigValues(x).ToString.Substring(24)
End If
If InStr(ConfigValues(x), "pci_ide0_master_type = ") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(23)
Case "hd"
DriveMasterType.SelectedIndex = 0
Case "cdrom"
DriveMasterType.SelectedIndex = 1
Case "nativecdrom"
DriveMasterType.SelectedIndex = 2
End Select
End If
If InStr(ConfigValues(x), "pci_ide0_slave_installed = ") <> 0 Then
If ConfigValues(x).ToString.Substring(27) <> 0 Then
DriveSlaveEnabled.Checked = True
End If
End If
If InStr(ConfigValues(x), "pci_ide0_slave_image = ") <> 0 Then
DriveSlavePath.Text = ConfigValues(x).ToString.Substring(23)
End If
If InStr(ConfigValues(x), "pci_ide0_slave_type = ") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(22)
Case "hd"
DriveSlaveType.SelectedIndex = 0
Case "cdrom"
DriveSlaveType.SelectedIndex = 1
Case "nativecdrom"
DriveSlaveType.SelectedIndex = 2
End Select
End If
If InStr(ConfigValues(x), "pci_3c90x_installed = ") <> 0 Then
If ConfigValues(x).ToString.Substring(22) <> 0 Then
Net3c90xEnable.Checked = True
End If
End If
If InStr(ConfigValues(x), "pci_3c90x_mac = ") <> 0 Then
Dim PhAddr() As String = Split(ConfigValues(x).ToString.Substring(16), ":")
For y As Integer = 0 To PhAddr.Length - 1
Select Case y
Case 0
Net3c90Mac1.Text = PhAddr(y)
Case 1
Net3c90Mac2.Text = PhAddr(y)
Case 2
Net3c90Mac3.Text = PhAddr(y)
Case 3
Net3c90Mac4.Text = PhAddr(y)
Case 4
Net3c90Mac5.Text = PhAddr(y)
Case 5
Net3c90Mac6.Text = PhAddr(y)
End Select
Next
End If
If InStr(ConfigValues(x), "pci_rtl8139_installed = ") <> 0 Then
If ConfigValues(x).ToString.Substring(24) <> 0 Then
Net8139Enable.Checked = True
End If
End If
If InStr(ConfigValues(x), "pci_rtl8139_mac = ") <> 0 Then
Dim PhAddr() As String = Split(ConfigValues(x).ToString.Substring(18), ":")
For y As Integer = 0 To PhAddr.Length - 1
Select Case y
Case 0
Net8139Mac1.Text = PhAddr(y)
Case 1
Net8139Mac2.Text = PhAddr(y)
Case 2
Net8139Mac3.Text = PhAddr(y)
Case 3
Net8139Mac4.Text = PhAddr(y)
Case 4
Net8139Mac5.Text = PhAddr(y)
Case 5
Net8139Mac6.Text = PhAddr(y)
End Select
Next
End If
If InStr(ConfigValues(x), "pci_usb_installed = ") <> 0 Then
If ConfigValues(x).ToString.Substring(20) <> 0 Then
BoardUSBEnable.Checked = True
End If
End If
If InStr(ConfigValues(x), "pci_serial_installed = ") <> 0 Then
If ConfigValues(x).ToString.Substring(23) <> 0 Then
BoardSerialEnable.Checked = True
End If
End If
If InStr(ConfigValues(x), "nvram_file = ") <> 0 Then
MiscNVRAMFile.Text = ConfigValues(x).ToString.Substring(13)
End If
Next
End Sub
Private Sub SaveSettings()
On Error GoTo ErrorHandler
If VerifyData() = True Then
MsgBox("Incomplete data, please fill all the required fields.", MsgBoxStyle.Exclamation)
Exit Sub
End If
Dim Config As String = ""
Dim DataArray() As String = Split(GetData(), ",")
'Formatting the text with a function, which returns
'the text formatted as the documentation says
Config = FormatLine("ppc_start_resolution = ", DataArray(0), False) 'Emulator Resolution
Config = Config & FormatLine("ppc_start_full_screen = ", DataArray(1), True) 'Full screen (Enabled or disabled)
Config = Config & FormatLine("redraw_interval_msec = ", DataArray(2), True) 'Image redraw time
If DataArray(3) <> "" Then
Config = Config & FormatLine("key_compose_dialog = ", DataArray(3), False) 'Compose dialog key
End If
If DataArray(4) <> "" Then
Config = Config & FormatLine("key_change_cd_0 = ", DataArray(4), False) 'Change CD Key
End If
If DataArray(5) <> "" Then
Config = Config & FormatLine("key_toggle_mouse_grab = ", DataArray(5), False) 'Release/Capture mouse key
End If
If DataArray(6) <> "" Then
Config = Config & FormatLine("key_toggle_full_screen = ", DataArray(6), False) 'Toggle Fullscreen/Windowed modes key
End If
Config = Config & FormatLine("prom_bootmethod = ", DataArray(7), False) 'Boot mode (Auto, select or force)
If DataArray(7) = "force" Then
Config = Config & FormatLine("prom_loadfile = ", DataArray(8), False) 'PROM file (File to load in case BootMethod = Force)
Config = Config & FormatLine("prom_env_bootpath = ", DataArray(9), False) 'PROM Booth Path (Directory where PROM/PearPC boots)(Used with PROMFile)
Config = Config & FormatLine("prom_env_bootargs = ", DataArray(10), False) 'Boot Arguments
End If
Config = Config & FormatLine("prom_env_machargs = ", DataArray(11), False) 'Mach Arguments
Config = Config & FormatLine("prom_driver_graphic = ", DataArray(12), False) 'Graphic driver (video.x is recommended OS X)
Config = Config & FormatLine("page_table_pa = ", DataArray(13), True) 'Initial page table(Don't change)
Config = Config & FormatLine("cpu_pvr = ", DataArray(14), True) 'Processor Version Register (To emulate G3 or G4)
Config = Config & FormatLine("memory_size = ", DataArray(15), True) 'Memory size (must be >= 64 MiB)
Config = Config & FormatLine("pci_ide0_master_installed = ", DataArray(16), True) 'Master drive Installed (Yes or No , 1 or 0)
Config = Config & FormatLine("pci_ide0_master_image = ", DataArray(17), False) 'Route to the Master drive image
Config = Config & FormatLine("pci_ide0_master_type = ", DataArray(18), False) 'Master Drive Type(Hard disk or CD-ROM)
Config = Config & FormatLine("pci_ide0_slave_installed = ", DataArray(19), True) 'Slave drive Installed (Yes or No , 1 or 0)
Config = Config & FormatLine("pci_ide0_slave_image = ", DataArray(20), False) 'Route to the Slave drive image
Config = Config & FormatLine("pci_ide0_slave_type = ", DataArray(21), False) 'Slave Drive Type(Hard disk or CD-ROM)
Config = Config & FormatLine("pci_3c90x_installed = ", DataArray(22), True) 'Network card 3c90x Installed (Yes or No)
Config = Config & FormatLine("pci_3c90x_mac = ", DataArray(23), False) 'MAC of this card (3c90x)
Config = Config & FormatLine("pci_rtl8139_installed = ", DataArray(24), True) 'Network card RTL8139 installed (Yes or No)
Config = Config & FormatLine("pci_rtl8139_mac = ", DataArray(25), False) 'MAC of this card (RTL8139)
Config = Config & FormatLine("pci_usb_installed = ", DataArray(26), True) 'PCI USB capability installed (Yes or No)
Config = Config & FormatLine("pci_serial_installed = ", DataArray(27), True) 'PCI Serial port installed installed (Yes or No)(For debugging only)
Config = Config & FormatLine("nvram_file = ", DataArray(28), False) 'NVRAM file route
If SaveConfigFile.FileName <> "" Then
ConfigFileHandler.Write(Config, ConfigFile)
End If
frmMain.VMList.Items(SelectedItem).Text = MacName.Text
ErrorHandler:
If Err.Number <> 0 Then
MsgBox(Err.Description)
End If
End Sub
Private Function GetData() As String
Dim Data As String = ""
Dim Resolution As String = DisplayResX.SelectedItem.ToString & "x" & DisplayResY.SelectedItem.ToString & "x" & DisplayColourDepth.SelectedItem.ToString & "@" & DisplayFrequency.Value
Dim FullScreen As Long
Dim RedrawTime As Long = Me.DisplayRedrawLabel.Text
Dim ComposeDialogKey As String = Me.BoardComposeDialogKey.Text
Dim ChangeCDKey As String = Me.BoardChangeCDKey.Text
Dim ReleaseMouse As String = BoardMouseGrabKey.Text
Dim SwitchFullScreen As String = DisplayFullscreenKey.Text
Dim BootMode As String = "auto"
Dim PROMFile As String = Me.MiscPROMFile.Text
Dim PROMBootPath As String = Me.MiscPROMBootPath.Text
Dim BootArgs As String = MiscPROMBootArgs.Text
Dim MachArgs As String = MiscMachArguments.Text
Dim GraphicDriver As String = Me.DisplayDriver.Text
Dim PageTable As String = Me.MiscPageTable.Text
Dim CPUPvr As String = "0x00088302"
Dim Memory As String = "0x" & (BoardRAM.Text / 0.0000256)
Dim MasterInstalled As Long = 0
Dim MasterImage As String = DriveMasterPath.Text
Dim MasterType As String = "hd"
Dim SlaveInstalled As Long = 0
Dim SlaveImage As String = DriveSlavePath.Text
Dim SlaveType As String = "cdrom"
Dim Net3c90xInstalled As Long
Dim Net3c90xMac As String = Net3c90Mac1.Text & ":" & Net3c90Mac2.Text & ":" & Net3c90Mac3.Text & ":" & Net3c90Mac4.Text & ":" & Net3c90Mac5.Text & ":" & Net3c90Mac6.Text
Dim NetRTL8139Installed As Long
Dim NetRTL8139Mac As String = Net8139Mac1.Text & ":" & Net8139Mac2.Text & ":" & Net8139Mac3.Text & ":" & Net8139Mac4.Text & ":" & Net8139Mac5.Text & ":" & Net8139Mac6.Text
Dim USBInstalled As Long = 0
Dim SerialInstalled As Long = 0
Dim NVRAMFile As String = Me.MiscNVRAMFile.Text
If DisplayFullscreenStart.Checked = True Then
FullScreen = 1
End If
If MiscBootModeAuto.Checked = True Then
BootMode = "auto"
End If
If MiscBootModeSelect.Checked = True Then
BootMode = "select"
End If
If MiscBootModeForce.Checked = True Then
BootMode = "force"
End If
If BoardProcessorG3.Checked = True Then
CPUPvr = "0x00088302"
ElseIf BoardProcessorG4.Checked = True Then
CPUPvr = "0x000c0201"
End If
If DriveMasterEnabled.Checked = True Then
MasterInstalled = 1
End If
Select Case DriveMasterType.SelectedIndex
Case 0
MasterType = "hd"
Case 1
MasterType = "cdrom"
Case 2
MasterType = "nativecdrom"
End Select
If DriveSlaveEnabled.Checked = True Then
SlaveInstalled = 1
End If
Select Case DriveSlaveType.SelectedIndex
Case 0
SlaveType = "hd"
Case 1
SlaveType = "cdrom"
Case 2
SlaveType = "nativecdrom"
End Select
If Net3c90xEnable.Checked = True Then
Net3c90xInstalled = 1
End If
If Net8139Enable.Checked = True Then
NetRTL8139Installed = 1
End If
If BoardUSBEnable.Checked = True Then
USBInstalled = 1
End If
If BoardSerialEnable.Checked = True Then
SerialInstalled = 1
End If
Data = Resolution & "," & FullScreen & "," & RedrawTime & "," & ComposeDialogKey & "," & ChangeCDKey & "," & _
ReleaseMouse & "," & SwitchFullScreen & "," & BootMode & "," & PROMFile & "," & PROMBootPath & "," & _
BootArgs & "," & MachArgs & "," & GraphicDriver & "," & PageTable & "," & CPUPvr & "," & Memory & "," & _
MasterInstalled & "," & MasterImage & "," & MasterType & "," & SlaveInstalled & "," & SlaveImage & "," & _
SlaveType & "," & Net3c90xInstalled & "," & Net3c90xMac & "," & NetRTL8139Installed & "," & _
NetRTL8139Mac & "," & USBInstalled & "," & SerialInstalled & "," & NVRAMFile
Return Data
End Function
Private Function VerifyData() As Boolean
Dim Incomplete As Boolean = False
If DriveMasterEnabled.Checked = True Then
If DriveMasterPath.Text = "" Then
Incomplete = True
End If
End If
If DriveSlaveEnabled.Checked = True Then
If DriveSlavePath.Text = "" Then
Incomplete = True
End If
End If
If Net3c90xEnable.Checked = True Then
If Net3c90Mac1.Text = "" Then
Incomplete = True
End If
If Net3c90Mac2.Text = "" Then
Incomplete = True
End If
If Net3c90Mac3.Text = "" Then
Incomplete = True
End If
If Net3c90Mac4.Text = "" Then
Incomplete = True
End If
If Net3c90Mac5.Text = "" Then
Incomplete = True
End If
If Net3c90Mac6.Text = "" Then
Incomplete = True
End If
End If
If Net8139Enable.Checked = True Then
If Net8139Mac1.Text = "" Then
Incomplete = True
End If
If Net8139Mac2.Text = "" Then
Incomplete = True
End If
If Net8139Mac3.Text = "" Then
Incomplete = True
End If
If Net8139Mac4.Text = "" Then
Incomplete = True
End If
If Net8139Mac5.Text = "" Then
Incomplete = True
End If
If Net8139Mac6.Text = "" Then
Incomplete = True
End If
End If
If DisplayDriver.Text = "" Then
Incomplete = True
End If
If MiscNVRAMFile.Text = "" Then
Incomplete = True
End If
Return Incomplete
End Function
Private Function FormatLine(ByVal Config As String, ByVal Value As String, ByVal NoQuotes As Boolean) As String
Dim NewLine As String
If NoQuotes = True Then
NewLine = Config & Value & vbCrLf
Else
NewLine = Config & Chr(34) & Value & Chr(34) & vbCrLf
End If
EndFunction:
Return NewLine
End Function
Private Sub cmdCancel_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles cmdCancel.Click
Me.Close() 'Saves nothing and closes the dialog
End Sub
Private Sub cmdOK_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles cmdOK.Click
'Save the config file and/or update the item in the console and leave
SaveSettings()
Me.Close()
End Sub
Private Sub OptionList_SelectedIndexChanged(sender As System.Object, e As System.EventArgs) Handles OptionList.SelectedIndexChanged
Select Case OptionList.FocusedItem.Index
Case 0
SwitchPages(MacNameFrame)
Case 1
SwitchPages(IconFrame)
Case 2
SwitchPages(BoardFrame)
Case 3
SwitchPages(DriveFrame)
Case 4
SwitchPages(NetworkFrame)
Case 5
SwitchPages(DisplayFrame)
Case 6
SwitchPages(MiscFrame)
Case 7
End Select
End Sub
Private Sub SwitchPages(NewPage As System.Windows.Forms.GroupBox)
MacNameFrame.Visible = False
IconFrame.Visible = False
BoardFrame.Visible = False
DriveFrame.Visible = False
NetworkFrame.Visible = False
DisplayFrame.Visible = False
MiscFrame.Visible = False
NewPage.Visible = True
End Sub
Private Sub frmSettingsPearPCVM_Load(sender As Object, e As System.EventArgs) Handles Me.Load
InitializeData()
Settings()
End Sub
Private Sub InitializeData()
Dim HostMemory As Long = (My.Computer.Info.TotalPhysicalMemory / 1024) / 1024
BoardRAMSlider.Maximum = HostMemory
BoardRAMSlider.TickFrequency = HostMemory / 20
Me.Text = "Settings for " & frmMain.VMList.Items.Item(SelectedItem).Text
End Sub
Private Sub BoardRAMSlider_ValueChanged(sender As Object, e As System.EventArgs) Handles BoardRAMSlider.ValueChanged
BoardRAM.Text = BoardRAMSlider.Value
End Sub
Private Sub BoardRAM_TextChanged(sender As Object, e As System.EventArgs) Handles BoardRAM.TextChanged
BoardRAMSlider.Value = BoardRAM.Text
End Sub
Private Sub DriveMasterEnabled_CheckedChanged(sender As Object, e As System.EventArgs) Handles DriveMasterEnabled.CheckedChanged
If DriveMasterEnabled.Checked Then
DriveMasterPath.Enabled = True
DriveMasterPathLabel.Enabled = True
DriveMasterBrowse.Enabled = True
DriveMasterType.Enabled = True
DriveMasterTypeLabel.Enabled = True
Else
DriveMasterPath.Enabled = False
DriveMasterPathLabel.Enabled = False
DriveMasterBrowse.Enabled = False
DriveMasterType.Enabled = False
DriveMasterTypeLabel.Enabled = False
End If
End Sub
Private Sub DriveSlaveEnabled_CheckedChanged(sender As Object, e As System.EventArgs) Handles DriveSlaveEnabled.CheckedChanged
If DriveSlaveEnabled.Checked Then
DriveSlavePath.Enabled = True
DriveSlavePathLabel.Enabled = True
DriveSlaveBrowse.Enabled = True
DriveSlaveType.Enabled = True
DriveSlaveTypeLabel.Enabled = True
Else
DriveSlavePath.Enabled = False
DriveSlavePathLabel.Enabled = False
DriveSlaveBrowse.Enabled = False
DriveSlaveType.Enabled = False
DriveSlaveTypeLabel.Enabled = False
End If
End Sub
Private Sub MiscBootModeForce_CheckedChanged(sender As Object, e As System.EventArgs) Handles MiscBootModeForce.CheckedChanged
If MiscBootModeForce.Checked = True Then
MiscPROMFile.Enabled = True
MiscPROMFileLabel.Enabled = True
MiscPROMFileBrowse.Enabled = True
MiscPROMBootPath.Enabled = True
MiscPROMBootPathLabel.Enabled = True
MiscPROMBootPathBrowse.Enabled = True
MiscPROMBootArgs.Enabled = True
MiscPROMBootArgsLabel.Enabled = True
Else
MiscPROMFile.Enabled = False
MiscPROMFileLabel.Enabled = False
MiscPROMFileBrowse.Enabled = False
MiscPROMBootPath.Enabled = False
MiscPROMBootPathLabel.Enabled = False
MiscPROMBootPathBrowse.Enabled = False
MiscPROMBootArgs.Enabled = False
MiscPROMBootArgsLabel.Enabled = False
End If
End Sub
Private Sub Net8139Enable_CheckedChanged(sender As Object, e As System.EventArgs) Handles Net8139Enable.CheckedChanged
If Net8139Enable.Checked = True Then
Net8139MacLabel.Enabled = True
Net8139Mac1.Enabled = True
Net8139Mac2.Enabled = True
Net8139Mac3.Enabled = True
Net8139Mac4.Enabled = True
Net8139Mac5.Enabled = True
Net8139Mac6.Enabled = True
Else
Net8139MacLabel.Enabled = False
Net8139Mac1.Enabled = False
Net8139Mac2.Enabled = False
Net8139Mac3.Enabled = False
Net8139Mac4.Enabled = False
Net8139Mac5.Enabled = False
Net8139Mac6.Enabled = False
End If
End Sub
Private Sub Net3c90xEnable_CheckedChanged(sender As Object, e As System.EventArgs) Handles Net3c90xEnable.CheckedChanged
If Net3c90xEnable.Checked = True Then
Net3c90MacLabel.Enabled = True
Net3c90Mac1.Enabled = True
Net3c90Mac2.Enabled = True
Net3c90Mac3.Enabled = True
Net3c90Mac4.Enabled = True
Net3c90Mac5.Enabled = True
Net3c90Mac6.Enabled = True
Else
Net3c90MacLabel.Enabled = False
Net3c90Mac1.Enabled = False
Net3c90Mac2.Enabled = False
Net3c90Mac3.Enabled = False
Net3c90Mac4.Enabled = False
Net3c90Mac5.Enabled = False
Net3c90Mac6.Enabled = False
End If
End Sub
Private Sub BoardMouseGrabKey_KeyDown(sender As Object, e As System.Windows.Forms.KeyEventArgs) Handles BoardMouseGrabKey.KeyDown, BoardChangeCDKey.KeyDown, BoardComposeDialogKey.KeyDown, DisplayFullscreenKey.KeyDown
Dim KeyStrokes As String = ""
If e.Modifiers = Keys.Control Then
KeyStrokes = KeyStrokes & "CTRL"
ElseIf e.Modifiers = Keys.Alt Then
e.Handled = True
KeyStrokes = KeyStrokes & "ALT"
ElseIf e.Modifiers = Keys.Shift Then
KeyStrokes = KeyStrokes & "SHIFT"
ElseIf e.Modifiers = Keys.Alt + Keys.Control Then
KeyStrokes = KeyStrokes & "CTRL + ALT"
ElseIf e.Modifiers = Keys.Shift + Keys.Control Then
KeyStrokes = KeyStrokes & "CTRL + SHIFT"
ElseIf e.Modifiers = Keys.Alt + Keys.Shift Then
KeyStrokes = KeyStrokes & "SHIFT + ALT"
ElseIf e.Modifiers = Keys.Shift + Keys.Alt + Keys.Control Then
KeyStrokes = KeyStrokes & "CTRL + SHIFT + ALT"
ElseIf e.Modifiers = Keys.Control + Keys.Delete Then
KeyStrokes = ""
GoTo SetKey
ElseIf e.Modifiers = Keys.None Then
e.Handled = True
Else
KeyStrokes = KeyStrokes & e.Modifiers.ToString
End If
If e.KeyCode <> Keys.ControlKey And e.KeyCode <> Keys.Menu And e.KeyCode <> Keys.ShiftKey And e.Modifiers <> Keys.None Then
KeyStrokes = KeyStrokes & " + " & e.KeyCode.ToString
End If
SetKey:
sender.Text = KeyStrokes
End Sub
Private Sub DriveMasterBrowse_Click(sender As System.Object, e As System.EventArgs) Handles DriveMasterBrowse.Click
If FileBrowserDialog.ShowDialog = Forms.DialogResult.OK Then
DriveMasterPath.Text = FileBrowserDialog.FileName
End If
End Sub
Private Sub DriveSlaveBrowse_Click(sender As System.Object, e As System.EventArgs) Handles DriveSlaveBrowse.Click
If FileBrowserDialog.ShowDialog = Forms.DialogResult.OK Then
DriveSlavePath.Text = FileBrowserDialog.FileName
End If
End Sub
Private Sub DisplayDriverBrowse_Click(sender As System.Object, e As System.EventArgs) Handles DisplayDriverBrowse.Click
If FileBrowserDialog.ShowDialog = Forms.DialogResult.OK Then
DisplayDriver.Text = FileBrowserDialog.FileName
End If
End Sub
Private Sub MiscPROMFileBrowse_Click(sender As System.Object, e As System.EventArgs) Handles MiscPROMFileBrowse.Click
If FileBrowserDialog.ShowDialog = Forms.DialogResult.OK Then
MiscPROMFile.Text = FileBrowserDialog.FileName
End If
End Sub
Private Sub MiscPROMBootPathBrowse_Click(sender As System.Object, e As System.EventArgs) Handles MiscPROMBootPathBrowse.Click
If SelectDrive.ShowDialog = Forms.DialogResult.OK Then
MiscPROMBootPath.Text = SelectDrive.SelectedPath
End If
End Sub
Private Sub MiscNVRAMFileBrowse_Click(sender As System.Object, e As System.EventArgs) Handles MiscNVRAMFileBrowse.Click
If FileBrowserDialog.ShowDialog = Forms.DialogResult.OK Then
MiscNVRAMFile.Text = FileBrowserDialog.FileName
End If
End Sub
End Class

932
frmSettingsQemuVM.Designer.vb generated Normal file
View File

@ -0,0 +1,932 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmSettingsQemuVM
Inherits System.Windows.Forms.Form
'Form reemplaza a Dispose para limpiar la lista de componentes.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
'Requerido por el Diseñador de Windows Forms
Private components As System.ComponentModel.IContainer
'NOTA: el Diseñador de Windows Forms necesita el siguiente procedimiento
'Se puede modificar usando el Diseñador de Windows Forms.
'No lo modifique con el editor de código.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Dim ListViewItem10 As System.Windows.Forms.ListViewItem = New System.Windows.Forms.ListViewItem(New String() {"Name", ""}, -1, System.Drawing.SystemColors.WindowText, System.Drawing.SystemColors.Window, New System.Drawing.Font("Tahoma", 8.25!))
Dim ListViewItem11 As System.Windows.Forms.ListViewItem = New System.Windows.Forms.ListViewItem(New String() {"Icon", ""}, -1, System.Drawing.SystemColors.WindowText, System.Drawing.SystemColors.Window, New System.Drawing.Font("Tahoma", 8.25!))
Dim ListViewItem12 As System.Windows.Forms.ListViewItem = New System.Windows.Forms.ListViewItem("Memory")
Dim ListViewItem13 As System.Windows.Forms.ListViewItem = New System.Windows.Forms.ListViewItem(New String() {"Drives", ""}, -1, System.Drawing.SystemColors.WindowText, System.Drawing.SystemColors.Window, New System.Drawing.Font("Tahoma", 8.25!))
Dim ListViewItem14 As System.Windows.Forms.ListViewItem = New System.Windows.Forms.ListViewItem(New String() {"Network", ""}, -1, System.Drawing.SystemColors.WindowText, System.Drawing.SystemColors.Window, New System.Drawing.Font("Tahoma", 8.25!))
Dim ListViewItem15 As System.Windows.Forms.ListViewItem = New System.Windows.Forms.ListViewItem(New String() {"Screen", ""}, -1, System.Drawing.SystemColors.WindowText, System.Drawing.SystemColors.Window, New System.Drawing.Font("Tahoma", 8.25!))
Dim ListViewItem16 As System.Windows.Forms.ListViewItem = New System.Windows.Forms.ListViewItem("Mouse and keyboard")
Dim ListViewItem17 As System.Windows.Forms.ListViewItem = New System.Windows.Forms.ListViewItem("Serial ports")
Dim ListViewItem18 As System.Windows.Forms.ListViewItem = New System.Windows.Forms.ListViewItem("Miscelaneous")
Me.BrowseIcon = New System.Windows.Forms.Button
Me.OptionPanel = New System.Windows.Forms.Panel
Me.SerialFrame = New System.Windows.Forms.GroupBox
Me.PrinterPort = New System.Windows.Forms.ComboBox
Me.PrinterPortLabel = New System.Windows.Forms.Label
Me.PrinterOutputFile = New System.Windows.Forms.Panel
Me.PrinterOutputPath = New System.Windows.Forms.TextBox
Me.BrowsePOFile = New System.Windows.Forms.Button
Me.ModemPort = New System.Windows.Forms.ComboBox
Me.Label2 = New System.Windows.Forms.Label
Me.ModemOutputFile = New System.Windows.Forms.Panel
Me.ModemOutputPath = New System.Windows.Forms.TextBox
Me.BrowseMOFile = New System.Windows.Forms.Button
Me.MiscFrame = New System.Windows.Forms.GroupBox
Me.IgnoreIllegal = New System.Windows.Forms.CheckBox
Me.IdleCPU = New System.Windows.Forms.CheckBox
Me.Enable68kEmu = New System.Windows.Forms.CheckBox
Me.EnableJIT = New System.Windows.Forms.CheckBox
Me.NetworkFrame = New System.Windows.Forms.GroupBox
Me.NetInterfaceLabel = New System.Windows.Forms.Label
Me.NetInterface = New System.Windows.Forms.ComboBox
Me.RouterPanel = New System.Windows.Forms.Panel
Me.FTPPortsLabel = New System.Windows.Forms.Label
Me.ServerPortsLabel = New System.Windows.Forms.Label
Me.FTPPorts = New System.Windows.Forms.TextBox
Me.ServerPorts = New System.Windows.Forms.TextBox
Me.InputFrame = New System.Windows.Forms.GroupBox
Me.KeyboardGroup = New System.Windows.Forms.GroupBox
Me.KeyCodesPathLabel = New System.Windows.Forms.Label
Me.KeyCodesPath = New System.Windows.Forms.TextBox
Me.UseKeycodes = New System.Windows.Forms.CheckBox
Me.BrowseKeyCodes = New System.Windows.Forms.Button
Me.MouseGroup = New System.Windows.Forms.GroupBox
Me.ScrollLinesLabel = New System.Windows.Forms.Label
Me.WheelFunctionLabel = New System.Windows.Forms.Label
Me.WheelFunction = New System.Windows.Forms.ComboBox
Me.ScrollLines = New System.Windows.Forms.NumericUpDown
Me.ScreenFrame = New System.Windows.Forms.GroupBox
Me.CustResolution = New System.Windows.Forms.CheckBox
Me.VMResHeight = New System.Windows.Forms.ComboBox
Me.VMResWidth = New System.Windows.Forms.ComboBox
Me.VMResLabel = New System.Windows.Forms.Label
Me.VMResDef = New System.Windows.Forms.ComboBox
Me.RefeshRateLabel = New System.Windows.Forms.Label
Me.RefreshRate = New System.Windows.Forms.ComboBox
Me.StartModeLabel = New System.Windows.Forms.Label
Me.StartMode = New System.Windows.Forms.ComboBox
Me.IconFrame = New System.Windows.Forms.GroupBox
Me.IconDescription = New System.Windows.Forms.Label
Me.IconList = New System.Windows.Forms.ListView
Me.DrivesFrame = New System.Windows.Forms.GroupBox
Me.DrivesList = New System.Windows.Forms.ListBox
Me.MoveItemDown = New System.Windows.Forms.Button
Me.MoveItemUp = New System.Windows.Forms.Button
Me.AddDisk = New System.Windows.Forms.Button
Me.AddCD = New System.Windows.Forms.Button
Me.DeleteItem = New System.Windows.Forms.Button
Me.MemoryFrame = New System.Windows.Forms.GroupBox
Me.Memory = New System.Windows.Forms.TextBox
Me.MegabyteLabel = New System.Windows.Forms.Label
Me.MemoryLabel = New System.Windows.Forms.Label
Me.MemorySlider = New System.Windows.Forms.TrackBar
Me.VMNameFrame = New System.Windows.Forms.GroupBox
Me.VMNameHelp = New System.Windows.Forms.Label
Me.VMName = New System.Windows.Forms.TextBox
Me.OptionList = New System.Windows.Forms.ListView
Me.Options = New System.Windows.Forms.ColumnHeader
Me.Value = New System.Windows.Forms.ColumnHeader
Me.cmdCancel = New System.Windows.Forms.Button
Me.cmdOK = New System.Windows.Forms.Button
Me.OptionPanel.SuspendLayout()
Me.SerialFrame.SuspendLayout()
Me.PrinterOutputFile.SuspendLayout()
Me.ModemOutputFile.SuspendLayout()
Me.MiscFrame.SuspendLayout()
Me.NetworkFrame.SuspendLayout()
Me.RouterPanel.SuspendLayout()
Me.InputFrame.SuspendLayout()
Me.KeyboardGroup.SuspendLayout()
Me.MouseGroup.SuspendLayout()
CType(Me.ScrollLines, System.ComponentModel.ISupportInitialize).BeginInit()
Me.ScreenFrame.SuspendLayout()
Me.IconFrame.SuspendLayout()
Me.DrivesFrame.SuspendLayout()
Me.MemoryFrame.SuspendLayout()
CType(Me.MemorySlider, System.ComponentModel.ISupportInitialize).BeginInit()
Me.VMNameFrame.SuspendLayout()
Me.SuspendLayout()
'
'BrowseIcon
'
Me.BrowseIcon.Location = New System.Drawing.Point(286, 12)
Me.BrowseIcon.Name = "BrowseIcon"
Me.BrowseIcon.Size = New System.Drawing.Size(75, 23)
Me.BrowseIcon.TabIndex = 6
Me.BrowseIcon.Text = "Browse..."
Me.BrowseIcon.UseVisualStyleBackColor = True
'
'OptionPanel
'
Me.OptionPanel.Controls.Add(Me.SerialFrame)
Me.OptionPanel.Controls.Add(Me.MiscFrame)
Me.OptionPanel.Controls.Add(Me.NetworkFrame)
Me.OptionPanel.Controls.Add(Me.InputFrame)
Me.OptionPanel.Controls.Add(Me.ScreenFrame)
Me.OptionPanel.Controls.Add(Me.IconFrame)
Me.OptionPanel.Controls.Add(Me.DrivesFrame)
Me.OptionPanel.Controls.Add(Me.MemoryFrame)
Me.OptionPanel.Controls.Add(Me.VMNameFrame)
Me.OptionPanel.Location = New System.Drawing.Point(371, 1)
Me.OptionPanel.Name = "OptionPanel"
Me.OptionPanel.Size = New System.Drawing.Size(373, 294)
Me.OptionPanel.TabIndex = 29
'
'SerialFrame
'
Me.SerialFrame.Controls.Add(Me.PrinterPort)
Me.SerialFrame.Controls.Add(Me.PrinterPortLabel)
Me.SerialFrame.Controls.Add(Me.PrinterOutputFile)
Me.SerialFrame.Controls.Add(Me.ModemPort)
Me.SerialFrame.Controls.Add(Me.Label2)
Me.SerialFrame.Controls.Add(Me.ModemOutputFile)
Me.SerialFrame.Location = New System.Drawing.Point(0, 3)
Me.SerialFrame.Name = "SerialFrame"
Me.SerialFrame.Size = New System.Drawing.Size(367, 279)
Me.SerialFrame.TabIndex = 8
Me.SerialFrame.TabStop = False
Me.SerialFrame.Text = "Serial ports"
'
'PrinterPort
'
Me.PrinterPort.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.PrinterPort.FormattingEnabled = True
Me.PrinterPort.Items.AddRange(New Object() {"COM 1", "COM 2", "COM 3", "COM 4", "COM 5", "COM 6", "LPT 1", "LPT 2", "LPT 3", "LPT 4", "LPT 5", "LPT 6", "File"})
Me.PrinterPort.Location = New System.Drawing.Point(76, 80)
Me.PrinterPort.Name = "PrinterPort"
Me.PrinterPort.Size = New System.Drawing.Size(69, 21)
Me.PrinterPort.TabIndex = 8
'
'PrinterPortLabel
'
Me.PrinterPortLabel.AutoSize = True
Me.PrinterPortLabel.Location = New System.Drawing.Point(6, 84)
Me.PrinterPortLabel.Name = "PrinterPortLabel"
Me.PrinterPortLabel.Size = New System.Drawing.Size(62, 13)
Me.PrinterPortLabel.TabIndex = 7
Me.PrinterPortLabel.Text = "Printer Port:"
'
'PrinterOutputFile
'
Me.PrinterOutputFile.Controls.Add(Me.PrinterOutputPath)
Me.PrinterOutputFile.Controls.Add(Me.BrowsePOFile)
Me.PrinterOutputFile.Location = New System.Drawing.Point(6, 100)
Me.PrinterOutputFile.Name = "PrinterOutputFile"
Me.PrinterOutputFile.Size = New System.Drawing.Size(360, 31)
Me.PrinterOutputFile.TabIndex = 9
'
'PrinterOutputPath
'
Me.PrinterOutputPath.Location = New System.Drawing.Point(3, 5)
Me.PrinterOutputPath.Name = "PrinterOutputPath"
Me.PrinterOutputPath.Size = New System.Drawing.Size(274, 20)
Me.PrinterOutputPath.TabIndex = 0
'
'BrowsePOFile
'
Me.BrowsePOFile.Location = New System.Drawing.Point(283, 4)
Me.BrowsePOFile.Name = "BrowsePOFile"
Me.BrowsePOFile.Size = New System.Drawing.Size(75, 23)
Me.BrowsePOFile.TabIndex = 4
Me.BrowsePOFile.Text = "Browse"
Me.BrowsePOFile.UseVisualStyleBackColor = True
'
'ModemPort
'
Me.ModemPort.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.ModemPort.FormattingEnabled = True
Me.ModemPort.Items.AddRange(New Object() {"COM 1", "COM 2", "COM 3", "COM 4", "COM 5", "COM 6", "LPT 1", "LPT 2", "LPT 3", "LPT 4", "LPT 5", "LPT 6", "File"})
Me.ModemPort.Location = New System.Drawing.Point(76, 20)
Me.ModemPort.Name = "ModemPort"
Me.ModemPort.Size = New System.Drawing.Size(69, 21)
Me.ModemPort.TabIndex = 5
'
'Label2
'
Me.Label2.AutoSize = True
Me.Label2.Location = New System.Drawing.Point(6, 24)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(67, 13)
Me.Label2.TabIndex = 3
Me.Label2.Text = "Modem Port:"
'
'ModemOutputFile
'
Me.ModemOutputFile.Controls.Add(Me.ModemOutputPath)
Me.ModemOutputFile.Controls.Add(Me.BrowseMOFile)
Me.ModemOutputFile.Location = New System.Drawing.Point(6, 40)
Me.ModemOutputFile.Name = "ModemOutputFile"
Me.ModemOutputFile.Size = New System.Drawing.Size(360, 31)
Me.ModemOutputFile.TabIndex = 6
'
'ModemOutputPath
'
Me.ModemOutputPath.Location = New System.Drawing.Point(3, 5)
Me.ModemOutputPath.Name = "ModemOutputPath"
Me.ModemOutputPath.Size = New System.Drawing.Size(274, 20)
Me.ModemOutputPath.TabIndex = 0
'
'BrowseMOFile
'
Me.BrowseMOFile.Location = New System.Drawing.Point(283, 4)
Me.BrowseMOFile.Name = "BrowseMOFile"
Me.BrowseMOFile.Size = New System.Drawing.Size(75, 23)
Me.BrowseMOFile.TabIndex = 4
Me.BrowseMOFile.Text = "Browse"
Me.BrowseMOFile.UseVisualStyleBackColor = True
'
'MiscFrame
'
Me.MiscFrame.Controls.Add(Me.IgnoreIllegal)
Me.MiscFrame.Controls.Add(Me.IdleCPU)
Me.MiscFrame.Controls.Add(Me.Enable68kEmu)
Me.MiscFrame.Controls.Add(Me.EnableJIT)
Me.MiscFrame.Location = New System.Drawing.Point(0, 3)
Me.MiscFrame.Name = "MiscFrame"
Me.MiscFrame.Size = New System.Drawing.Size(367, 279)
Me.MiscFrame.TabIndex = 8
Me.MiscFrame.TabStop = False
Me.MiscFrame.Text = "Miscelaneous"
'
'IgnoreIllegal
'
Me.IgnoreIllegal.AutoSize = True
Me.IgnoreIllegal.Location = New System.Drawing.Point(3, 86)
Me.IgnoreIllegal.Name = "IgnoreIllegal"
Me.IgnoreIllegal.Size = New System.Drawing.Size(172, 17)
Me.IgnoreIllegal.TabIndex = 3
Me.IgnoreIllegal.Text = "Ignore illegal memory accesses"
Me.IgnoreIllegal.UseVisualStyleBackColor = True
'
'IdleCPU
'
Me.IdleCPU.AutoSize = True
Me.IdleCPU.Location = New System.Drawing.Point(3, 63)
Me.IdleCPU.Name = "IdleCPU"
Me.IdleCPU.Size = New System.Drawing.Size(144, 17)
Me.IdleCPU.TabIndex = 2
Me.IdleCPU.Text = "Don't use CPU when idle"
Me.IdleCPU.UseVisualStyleBackColor = True
'
'Enable68kEmu
'
Me.Enable68kEmu.AutoSize = True
Me.Enable68kEmu.Enabled = False
Me.Enable68kEmu.Location = New System.Drawing.Point(3, 40)
Me.Enable68kEmu.Name = "Enable68kEmu"
Me.Enable68kEmu.Size = New System.Drawing.Size(191, 17)
Me.Enable68kEmu.TabIndex = 1
Me.Enable68kEmu.Text = "Enable 68k emulator (experimental)"
Me.Enable68kEmu.UseVisualStyleBackColor = True
'
'EnableJIT
'
Me.EnableJIT.AutoSize = True
Me.EnableJIT.Location = New System.Drawing.Point(3, 17)
Me.EnableJIT.Name = "EnableJIT"
Me.EnableJIT.Size = New System.Drawing.Size(120, 17)
Me.EnableJIT.TabIndex = 0
Me.EnableJIT.Text = "Enable JIT Compiler"
Me.EnableJIT.UseVisualStyleBackColor = True
'
'NetworkFrame
'
Me.NetworkFrame.Controls.Add(Me.NetInterfaceLabel)
Me.NetworkFrame.Controls.Add(Me.NetInterface)
Me.NetworkFrame.Controls.Add(Me.RouterPanel)
Me.NetworkFrame.Location = New System.Drawing.Point(0, 3)
Me.NetworkFrame.Name = "NetworkFrame"
Me.NetworkFrame.Size = New System.Drawing.Size(367, 279)
Me.NetworkFrame.TabIndex = 8
Me.NetworkFrame.TabStop = False
Me.NetworkFrame.Text = "Network"
'
'NetInterfaceLabel
'
Me.NetInterfaceLabel.AutoSize = True
Me.NetInterfaceLabel.Location = New System.Drawing.Point(14, 30)
Me.NetInterfaceLabel.Name = "NetInterfaceLabel"
Me.NetInterfaceLabel.Size = New System.Drawing.Size(95, 13)
Me.NetInterfaceLabel.TabIndex = 2
Me.NetInterfaceLabel.Text = "Network Interface:"
'
'NetInterface
'
Me.NetInterface.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.NetInterface.FormattingEnabled = True
Me.NetInterface.Items.AddRange(New Object() {"Slirp", "Router", "Disabled"})
Me.NetInterface.Location = New System.Drawing.Point(119, 27)
Me.NetInterface.Name = "NetInterface"
Me.NetInterface.Size = New System.Drawing.Size(242, 21)
Me.NetInterface.TabIndex = 1
'
'RouterPanel
'
Me.RouterPanel.Controls.Add(Me.FTPPortsLabel)
Me.RouterPanel.Controls.Add(Me.ServerPortsLabel)
Me.RouterPanel.Controls.Add(Me.FTPPorts)
Me.RouterPanel.Controls.Add(Me.ServerPorts)
Me.RouterPanel.Location = New System.Drawing.Point(9, 51)
Me.RouterPanel.Name = "RouterPanel"
Me.RouterPanel.Size = New System.Drawing.Size(360, 62)
Me.RouterPanel.TabIndex = 8
'
'FTPPortsLabel
'
Me.FTPPortsLabel.AutoSize = True
Me.FTPPortsLabel.Location = New System.Drawing.Point(5, 6)
Me.FTPPortsLabel.Name = "FTPPortsLabel"
Me.FTPPortsLabel.Size = New System.Drawing.Size(54, 13)
Me.FTPPortsLabel.TabIndex = 4
Me.FTPPortsLabel.Text = "FTP Ports"
'
'ServerPortsLabel
'
Me.ServerPortsLabel.AutoSize = True
Me.ServerPortsLabel.Location = New System.Drawing.Point(5, 33)
Me.ServerPortsLabel.Name = "ServerPortsLabel"
Me.ServerPortsLabel.Size = New System.Drawing.Size(65, 13)
Me.ServerPortsLabel.TabIndex = 6
Me.ServerPortsLabel.Text = "Server Ports"
'
'FTPPorts
'
Me.FTPPorts.Location = New System.Drawing.Point(110, 3)
Me.FTPPorts.Name = "FTPPorts"
Me.FTPPorts.Size = New System.Drawing.Size(242, 20)
Me.FTPPorts.TabIndex = 3
'
'ServerPorts
'
Me.ServerPorts.Location = New System.Drawing.Point(110, 30)
Me.ServerPorts.Name = "ServerPorts"
Me.ServerPorts.Size = New System.Drawing.Size(242, 20)
Me.ServerPorts.TabIndex = 5
'
'InputFrame
'
Me.InputFrame.Controls.Add(Me.KeyboardGroup)
Me.InputFrame.Controls.Add(Me.MouseGroup)
Me.InputFrame.Location = New System.Drawing.Point(0, 3)
Me.InputFrame.Name = "InputFrame"
Me.InputFrame.Size = New System.Drawing.Size(367, 279)
Me.InputFrame.TabIndex = 8
Me.InputFrame.TabStop = False
Me.InputFrame.Text = "Mouse and keyboard"
'
'KeyboardGroup
'
Me.KeyboardGroup.Controls.Add(Me.KeyCodesPathLabel)
Me.KeyboardGroup.Controls.Add(Me.KeyCodesPath)
Me.KeyboardGroup.Controls.Add(Me.UseKeycodes)
Me.KeyboardGroup.Controls.Add(Me.BrowseKeyCodes)
Me.KeyboardGroup.Location = New System.Drawing.Point(6, 126)
Me.KeyboardGroup.Name = "KeyboardGroup"
Me.KeyboardGroup.Size = New System.Drawing.Size(355, 147)
Me.KeyboardGroup.TabIndex = 0
Me.KeyboardGroup.TabStop = False
Me.KeyboardGroup.Text = "Keyboard"
'
'KeyCodesPathLabel
'
Me.KeyCodesPathLabel.AutoSize = True
Me.KeyCodesPathLabel.Location = New System.Drawing.Point(3, 49)
Me.KeyCodesPathLabel.Name = "KeyCodesPathLabel"
Me.KeyCodesPathLabel.Size = New System.Drawing.Size(109, 13)
Me.KeyCodesPathLabel.TabIndex = 3
Me.KeyCodesPathLabel.Text = "Path to keycodes file:"
'
'KeyCodesPath
'
Me.KeyCodesPath.Location = New System.Drawing.Point(3, 70)
Me.KeyCodesPath.Name = "KeyCodesPath"
Me.KeyCodesPath.Size = New System.Drawing.Size(307, 20)
Me.KeyCodesPath.TabIndex = 2
'
'UseKeycodes
'
Me.UseKeycodes.AutoSize = True
Me.UseKeycodes.Location = New System.Drawing.Point(6, 20)
Me.UseKeycodes.Name = "UseKeycodes"
Me.UseKeycodes.Size = New System.Drawing.Size(110, 17)
Me.UseKeycodes.TabIndex = 0
Me.UseKeycodes.Text = "Use keycodes file"
Me.UseKeycodes.UseVisualStyleBackColor = True
'
'BrowseKeyCodes
'
Me.BrowseKeyCodes.Location = New System.Drawing.Point(316, 68)
Me.BrowseKeyCodes.Name = "BrowseKeyCodes"
Me.BrowseKeyCodes.Size = New System.Drawing.Size(33, 23)
Me.BrowseKeyCodes.TabIndex = 1
Me.BrowseKeyCodes.Text = "..."
Me.BrowseKeyCodes.UseVisualStyleBackColor = True
'
'MouseGroup
'
Me.MouseGroup.Controls.Add(Me.ScrollLinesLabel)
Me.MouseGroup.Controls.Add(Me.WheelFunctionLabel)
Me.MouseGroup.Controls.Add(Me.WheelFunction)
Me.MouseGroup.Controls.Add(Me.ScrollLines)
Me.MouseGroup.Location = New System.Drawing.Point(6, 20)
Me.MouseGroup.Name = "MouseGroup"
Me.MouseGroup.Size = New System.Drawing.Size(355, 100)
Me.MouseGroup.TabIndex = 5
Me.MouseGroup.TabStop = False
Me.MouseGroup.Text = "Mouse"
'
'ScrollLinesLabel
'
Me.ScrollLinesLabel.AutoSize = True
Me.ScrollLinesLabel.Location = New System.Drawing.Point(6, 47)
Me.ScrollLinesLabel.Name = "ScrollLinesLabel"
Me.ScrollLinesLabel.Size = New System.Drawing.Size(74, 13)
Me.ScrollLinesLabel.TabIndex = 6
Me.ScrollLinesLabel.Text = "Lines to scroll:"
'
'WheelFunctionLabel
'
Me.WheelFunctionLabel.AutoSize = True
Me.WheelFunctionLabel.Location = New System.Drawing.Point(6, 21)
Me.WheelFunctionLabel.Name = "WheelFunctionLabel"
Me.WheelFunctionLabel.Size = New System.Drawing.Size(82, 13)
Me.WheelFunctionLabel.TabIndex = 5
Me.WheelFunctionLabel.Text = "Wheel function:"
'
'WheelFunction
'
Me.WheelFunction.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.WheelFunction.FormattingEnabled = True
Me.WheelFunction.Items.AddRange(New Object() {"Cursor Up/Down", "Page Up/Down"})
Me.WheelFunction.Location = New System.Drawing.Point(95, 18)
Me.WheelFunction.Name = "WheelFunction"
Me.WheelFunction.Size = New System.Drawing.Size(76, 21)
Me.WheelFunction.TabIndex = 3
'
'ScrollLines
'
Me.ScrollLines.Location = New System.Drawing.Point(95, 45)
Me.ScrollLines.Maximum = New Decimal(New Integer() {50, 0, 0, 0})
Me.ScrollLines.Name = "ScrollLines"
Me.ScrollLines.Size = New System.Drawing.Size(76, 20)
Me.ScrollLines.TabIndex = 4
'
'ScreenFrame
'
Me.ScreenFrame.Controls.Add(Me.CustResolution)
Me.ScreenFrame.Controls.Add(Me.VMResHeight)
Me.ScreenFrame.Controls.Add(Me.VMResWidth)
Me.ScreenFrame.Controls.Add(Me.VMResLabel)
Me.ScreenFrame.Controls.Add(Me.VMResDef)
Me.ScreenFrame.Controls.Add(Me.RefeshRateLabel)
Me.ScreenFrame.Controls.Add(Me.RefreshRate)
Me.ScreenFrame.Controls.Add(Me.StartModeLabel)
Me.ScreenFrame.Controls.Add(Me.StartMode)
Me.ScreenFrame.Location = New System.Drawing.Point(0, 3)
Me.ScreenFrame.Name = "ScreenFrame"
Me.ScreenFrame.Size = New System.Drawing.Size(367, 279)
Me.ScreenFrame.TabIndex = 5
Me.ScreenFrame.TabStop = False
Me.ScreenFrame.Text = "Screen"
'
'CustResolution
'
Me.CustResolution.AutoSize = True
Me.CustResolution.Location = New System.Drawing.Point(189, 23)
Me.CustResolution.Name = "CustResolution"
Me.CustResolution.Size = New System.Drawing.Size(114, 17)
Me.CustResolution.TabIndex = 8
Me.CustResolution.Text = "Custom Resolution"
Me.CustResolution.UseVisualStyleBackColor = True
'
'VMResHeight
'
Me.VMResHeight.FlatStyle = System.Windows.Forms.FlatStyle.System
Me.VMResHeight.FormattingEnabled = True
Me.VMResHeight.Items.AddRange(New Object() {"384", "480", "600", "768", "864", "1024"})
Me.VMResHeight.Location = New System.Drawing.Point(139, 21)
Me.VMResHeight.Name = "VMResHeight"
Me.VMResHeight.Size = New System.Drawing.Size(46, 21)
Me.VMResHeight.TabIndex = 7
Me.VMResHeight.Visible = False
'
'VMResWidth
'
Me.VMResWidth.FlatStyle = System.Windows.Forms.FlatStyle.System
Me.VMResWidth.FormattingEnabled = True
Me.VMResWidth.Items.AddRange(New Object() {"512", "640", "800", "1024", "1152", "1280"})
Me.VMResWidth.Location = New System.Drawing.Point(87, 21)
Me.VMResWidth.Name = "VMResWidth"
Me.VMResWidth.Size = New System.Drawing.Size(46, 21)
Me.VMResWidth.TabIndex = 6
Me.VMResWidth.Visible = False
'
'VMResLabel
'
Me.VMResLabel.AutoSize = True
Me.VMResLabel.Location = New System.Drawing.Point(6, 24)
Me.VMResLabel.Name = "VMResLabel"
Me.VMResLabel.Size = New System.Drawing.Size(60, 13)
Me.VMResLabel.TabIndex = 5
Me.VMResLabel.Text = "Resolution:"
'
'VMResDef
'
Me.VMResDef.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.VMResDef.FlatStyle = System.Windows.Forms.FlatStyle.System
Me.VMResDef.FormattingEnabled = True
Me.VMResDef.Items.AddRange(New Object() {"512x384", "640x480", "800x600", "1024x768", "1152x864", "1280x1024", "Maximum"})
Me.VMResDef.Location = New System.Drawing.Point(87, 21)
Me.VMResDef.Name = "VMResDef"
Me.VMResDef.Size = New System.Drawing.Size(98, 21)
Me.VMResDef.TabIndex = 4
'
'RefeshRateLabel
'
Me.RefeshRateLabel.AutoSize = True
Me.RefeshRateLabel.Location = New System.Drawing.Point(6, 78)
Me.RefeshRateLabel.Name = "RefeshRateLabel"
Me.RefeshRateLabel.Size = New System.Drawing.Size(73, 13)
Me.RefeshRateLabel.TabIndex = 3
Me.RefeshRateLabel.Text = "Refresh Rate:"
'
'RefreshRate
'
Me.RefreshRate.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.RefreshRate.FlatStyle = System.Windows.Forms.FlatStyle.System
Me.RefreshRate.FormattingEnabled = True
Me.RefreshRate.Items.AddRange(New Object() {"5 Hz", "7.5 Hz", "10 Hz", "15 Hz", "30 Hz", "60 Hz", "Dynamic"})
Me.RefreshRate.Location = New System.Drawing.Point(87, 75)
Me.RefreshRate.Name = "RefreshRate"
Me.RefreshRate.Size = New System.Drawing.Size(98, 21)
Me.RefreshRate.TabIndex = 2
'
'StartModeLabel
'
Me.StartModeLabel.AutoSize = True
Me.StartModeLabel.Location = New System.Drawing.Point(6, 51)
Me.StartModeLabel.Name = "StartModeLabel"
Me.StartModeLabel.Size = New System.Drawing.Size(43, 13)
Me.StartModeLabel.TabIndex = 1
Me.StartModeLabel.Text = "Start in:"
'
'StartMode
'
Me.StartMode.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.StartMode.FlatStyle = System.Windows.Forms.FlatStyle.System
Me.StartMode.FormattingEnabled = True
Me.StartMode.Items.AddRange(New Object() {"Window", "Fullscreen"})
Me.StartMode.Location = New System.Drawing.Point(87, 48)
Me.StartMode.Name = "StartMode"
Me.StartMode.Size = New System.Drawing.Size(98, 21)
Me.StartMode.TabIndex = 0
'
'IconFrame
'
Me.IconFrame.Controls.Add(Me.BrowseIcon)
Me.IconFrame.Controls.Add(Me.IconDescription)
Me.IconFrame.Controls.Add(Me.IconList)
Me.IconFrame.Location = New System.Drawing.Point(0, 3)
Me.IconFrame.Name = "IconFrame"
Me.IconFrame.Size = New System.Drawing.Size(367, 279)
Me.IconFrame.TabIndex = 3
Me.IconFrame.TabStop = False
Me.IconFrame.Text = "Icon"
'
'IconDescription
'
Me.IconDescription.Location = New System.Drawing.Point(6, 17)
Me.IconDescription.Name = "IconDescription"
Me.IconDescription.Size = New System.Drawing.Size(261, 18)
Me.IconDescription.TabIndex = 7
Me.IconDescription.Text = "If you want an icon that isn't in the list, click Browse."
'
'IconList
'
Me.IconList.Location = New System.Drawing.Point(9, 38)
Me.IconList.Name = "IconList"
Me.IconList.Size = New System.Drawing.Size(352, 235)
Me.IconList.TabIndex = 6
Me.IconList.UseCompatibleStateImageBehavior = False
'
'DrivesFrame
'
Me.DrivesFrame.Controls.Add(Me.DrivesList)
Me.DrivesFrame.Controls.Add(Me.MoveItemDown)
Me.DrivesFrame.Controls.Add(Me.MoveItemUp)
Me.DrivesFrame.Controls.Add(Me.AddDisk)
Me.DrivesFrame.Controls.Add(Me.AddCD)
Me.DrivesFrame.Controls.Add(Me.DeleteItem)
Me.DrivesFrame.Location = New System.Drawing.Point(0, 3)
Me.DrivesFrame.Name = "DrivesFrame"
Me.DrivesFrame.Size = New System.Drawing.Size(367, 279)
Me.DrivesFrame.TabIndex = 8
Me.DrivesFrame.TabStop = False
Me.DrivesFrame.Text = "Drives"
'
'DrivesList
'
Me.DrivesList.FormattingEnabled = True
Me.DrivesList.Items.AddRange(New Object() {"C:\Users\Usuario\Documents\ISOs\Mac OS 8.5 Spanish.iso", "C:\Users\Usuario\Documents\My Macs\Mac OS 8\Mac OS 8.dsk", "C:\Users\Usuario\Documents\My Macs\Mac OS 8\Data.dsk"})
Me.DrivesList.Location = New System.Drawing.Point(3, 17)
Me.DrivesList.Name = "DrivesList"
Me.DrivesList.Size = New System.Drawing.Size(358, 186)
Me.DrivesList.TabIndex = 6
'
'MoveItemDown
'
Me.MoveItemDown.Enabled = False
Me.MoveItemDown.Location = New System.Drawing.Point(328, 213)
Me.MoveItemDown.Name = "MoveItemDown"
Me.MoveItemDown.Size = New System.Drawing.Size(33, 23)
Me.MoveItemDown.TabIndex = 5
Me.MoveItemDown.Text = "\/"
Me.MoveItemDown.UseVisualStyleBackColor = True
'
'MoveItemUp
'
Me.MoveItemUp.Enabled = False
Me.MoveItemUp.Location = New System.Drawing.Point(294, 213)
Me.MoveItemUp.Name = "MoveItemUp"
Me.MoveItemUp.Size = New System.Drawing.Size(33, 23)
Me.MoveItemUp.TabIndex = 4
Me.MoveItemUp.Text = "/\"
Me.MoveItemUp.UseVisualStyleBackColor = True
'
'AddDisk
'
Me.AddDisk.Location = New System.Drawing.Point(6, 213)
Me.AddDisk.Name = "AddDisk"
Me.AddDisk.Size = New System.Drawing.Size(56, 23)
Me.AddDisk.TabIndex = 3
Me.AddDisk.Text = "Add disk"
Me.AddDisk.UseVisualStyleBackColor = True
'
'AddCD
'
Me.AddCD.Location = New System.Drawing.Point(68, 213)
Me.AddCD.Name = "AddCD"
Me.AddCD.Size = New System.Drawing.Size(56, 23)
Me.AddCD.TabIndex = 2
Me.AddCD.Text = "Add CD"
Me.AddCD.UseVisualStyleBackColor = True
'
'DeleteItem
'
Me.DeleteItem.Location = New System.Drawing.Point(130, 213)
Me.DeleteItem.Name = "DeleteItem"
Me.DeleteItem.Size = New System.Drawing.Size(90, 23)
Me.DeleteItem.TabIndex = 1
Me.DeleteItem.Text = "Delete selected"
Me.DeleteItem.UseVisualStyleBackColor = True
'
'MemoryFrame
'
Me.MemoryFrame.Controls.Add(Me.Memory)
Me.MemoryFrame.Controls.Add(Me.MegabyteLabel)
Me.MemoryFrame.Controls.Add(Me.MemoryLabel)
Me.MemoryFrame.Controls.Add(Me.MemorySlider)
Me.MemoryFrame.Location = New System.Drawing.Point(0, 3)
Me.MemoryFrame.Name = "MemoryFrame"
Me.MemoryFrame.Size = New System.Drawing.Size(367, 279)
Me.MemoryFrame.TabIndex = 8
Me.MemoryFrame.TabStop = False
Me.MemoryFrame.Text = "Memory"
'
'Memory
'
Me.Memory.Location = New System.Drawing.Point(273, 61)
Me.Memory.Name = "Memory"
Me.Memory.Size = New System.Drawing.Size(43, 20)
Me.Memory.TabIndex = 5
'
'MegabyteLabel
'
Me.MegabyteLabel.AutoSize = True
Me.MegabyteLabel.Location = New System.Drawing.Point(322, 63)
Me.MegabyteLabel.Name = "MegabyteLabel"
Me.MegabyteLabel.Size = New System.Drawing.Size(23, 13)
Me.MegabyteLabel.TabIndex = 4
Me.MegabyteLabel.Text = "MB"
'
'MemoryLabel
'
Me.MemoryLabel.AutoSize = True
Me.MemoryLabel.Location = New System.Drawing.Point(6, 35)
Me.MemoryLabel.Name = "MemoryLabel"
Me.MemoryLabel.Size = New System.Drawing.Size(257, 13)
Me.MemoryLabel.TabIndex = 2
Me.MemoryLabel.Text = "Set the amount of RAM to dedicate to this Macintosh"
'
'MemorySlider
'
Me.MemorySlider.Location = New System.Drawing.Point(3, 60)
Me.MemorySlider.Maximum = 100
Me.MemorySlider.Name = "MemorySlider"
Me.MemorySlider.Size = New System.Drawing.Size(264, 45)
Me.MemorySlider.TabIndex = 0
Me.MemorySlider.TickFrequency = 5
'
'VMNameFrame
'
Me.VMNameFrame.Controls.Add(Me.VMNameHelp)
Me.VMNameFrame.Controls.Add(Me.VMName)
Me.VMNameFrame.Location = New System.Drawing.Point(0, 3)
Me.VMNameFrame.Name = "VMNameFrame"
Me.VMNameFrame.Size = New System.Drawing.Size(367, 279)
Me.VMNameFrame.TabIndex = 4
Me.VMNameFrame.TabStop = False
Me.VMNameFrame.Text = "Name"
'
'VMNameHelp
'
Me.VMNameHelp.Location = New System.Drawing.Point(6, 17)
Me.VMNameHelp.Name = "VMNameHelp"
Me.VMNameHelp.Size = New System.Drawing.Size(363, 18)
Me.VMNameHelp.TabIndex = 7
Me.VMNameHelp.Text = "Do you want a change? Why not start with the name?"
'
'VMName
'
Me.VMName.Location = New System.Drawing.Point(9, 38)
Me.VMName.Name = "VMName"
Me.VMName.Size = New System.Drawing.Size(352, 20)
Me.VMName.TabIndex = 6
'
'OptionList
'
Me.OptionList.Columns.AddRange(New System.Windows.Forms.ColumnHeader() {Me.Options, Me.Value})
Me.OptionList.FullRowSelect = True
Me.OptionList.HeaderStyle = System.Windows.Forms.ColumnHeaderStyle.Nonclickable
Me.OptionList.Items.AddRange(New System.Windows.Forms.ListViewItem() {ListViewItem10, ListViewItem11, ListViewItem12, ListViewItem13, ListViewItem14, ListViewItem15, ListViewItem16, ListViewItem17, ListViewItem18})
Me.OptionList.Location = New System.Drawing.Point(12, 11)
Me.OptionList.Name = "OptionList"
Me.OptionList.Size = New System.Drawing.Size(353, 376)
Me.OptionList.TabIndex = 28
Me.OptionList.UseCompatibleStateImageBehavior = False
Me.OptionList.View = System.Windows.Forms.View.Details
'
'Options
'
Me.Options.Text = "Options"
Me.Options.Width = 173
'
'Value
'
Me.Value.Text = "Value"
Me.Value.Width = 176
'
'cmdCancel
'
Me.cmdCancel.BackColor = System.Drawing.SystemColors.Control
Me.cmdCancel.Cursor = System.Windows.Forms.Cursors.Default
Me.cmdCancel.DialogResult = System.Windows.Forms.DialogResult.Cancel
Me.cmdCancel.ForeColor = System.Drawing.SystemColors.ControlText
Me.cmdCancel.Location = New System.Drawing.Point(665, 366)
Me.cmdCancel.Name = "cmdCancel"
Me.cmdCancel.RightToLeft = System.Windows.Forms.RightToLeft.No
Me.cmdCancel.Size = New System.Drawing.Size(73, 22)
Me.cmdCancel.TabIndex = 27
Me.cmdCancel.Text = "Cancel"
Me.cmdCancel.UseVisualStyleBackColor = True
'
'cmdOK
'
Me.cmdOK.BackColor = System.Drawing.SystemColors.Control
Me.cmdOK.Cursor = System.Windows.Forms.Cursors.Default
Me.cmdOK.ForeColor = System.Drawing.SystemColors.ControlText
Me.cmdOK.Location = New System.Drawing.Point(585, 366)
Me.cmdOK.Name = "cmdOK"
Me.cmdOK.RightToLeft = System.Windows.Forms.RightToLeft.No
Me.cmdOK.Size = New System.Drawing.Size(73, 22)
Me.cmdOK.TabIndex = 26
Me.cmdOK.Text = "OK"
Me.cmdOK.UseVisualStyleBackColor = True
'
'frmSettingsQemuVM
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(750, 400)
Me.Controls.Add(Me.OptionPanel)
Me.Controls.Add(Me.OptionList)
Me.Controls.Add(Me.cmdCancel)
Me.Controls.Add(Me.cmdOK)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.Name = "frmSettingsQemuVM"
Me.Text = "Settings for %s"
Me.OptionPanel.ResumeLayout(False)
Me.SerialFrame.ResumeLayout(False)
Me.SerialFrame.PerformLayout()
Me.PrinterOutputFile.ResumeLayout(False)
Me.PrinterOutputFile.PerformLayout()
Me.ModemOutputFile.ResumeLayout(False)
Me.ModemOutputFile.PerformLayout()
Me.MiscFrame.ResumeLayout(False)
Me.MiscFrame.PerformLayout()
Me.NetworkFrame.ResumeLayout(False)
Me.NetworkFrame.PerformLayout()
Me.RouterPanel.ResumeLayout(False)
Me.RouterPanel.PerformLayout()
Me.InputFrame.ResumeLayout(False)
Me.KeyboardGroup.ResumeLayout(False)
Me.KeyboardGroup.PerformLayout()
Me.MouseGroup.ResumeLayout(False)
Me.MouseGroup.PerformLayout()
CType(Me.ScrollLines, System.ComponentModel.ISupportInitialize).EndInit()
Me.ScreenFrame.ResumeLayout(False)
Me.ScreenFrame.PerformLayout()
Me.IconFrame.ResumeLayout(False)
Me.DrivesFrame.ResumeLayout(False)
Me.MemoryFrame.ResumeLayout(False)
Me.MemoryFrame.PerformLayout()
CType(Me.MemorySlider, System.ComponentModel.ISupportInitialize).EndInit()
Me.VMNameFrame.ResumeLayout(False)
Me.VMNameFrame.PerformLayout()
Me.ResumeLayout(False)
End Sub
Friend WithEvents BrowseIcon As System.Windows.Forms.Button
Friend WithEvents OptionPanel As System.Windows.Forms.Panel
Friend WithEvents SerialFrame As System.Windows.Forms.GroupBox
Friend WithEvents PrinterPort As System.Windows.Forms.ComboBox
Friend WithEvents PrinterPortLabel As System.Windows.Forms.Label
Friend WithEvents PrinterOutputFile As System.Windows.Forms.Panel
Friend WithEvents PrinterOutputPath As System.Windows.Forms.TextBox
Friend WithEvents BrowsePOFile As System.Windows.Forms.Button
Friend WithEvents ModemPort As System.Windows.Forms.ComboBox
Friend WithEvents Label2 As System.Windows.Forms.Label
Friend WithEvents ModemOutputFile As System.Windows.Forms.Panel
Friend WithEvents ModemOutputPath As System.Windows.Forms.TextBox
Friend WithEvents BrowseMOFile As System.Windows.Forms.Button
Friend WithEvents MiscFrame As System.Windows.Forms.GroupBox
Friend WithEvents IgnoreIllegal As System.Windows.Forms.CheckBox
Friend WithEvents IdleCPU As System.Windows.Forms.CheckBox
Friend WithEvents Enable68kEmu As System.Windows.Forms.CheckBox
Friend WithEvents EnableJIT As System.Windows.Forms.CheckBox
Friend WithEvents NetworkFrame As System.Windows.Forms.GroupBox
Friend WithEvents NetInterfaceLabel As System.Windows.Forms.Label
Friend WithEvents NetInterface As System.Windows.Forms.ComboBox
Friend WithEvents RouterPanel As System.Windows.Forms.Panel
Friend WithEvents FTPPortsLabel As System.Windows.Forms.Label
Friend WithEvents ServerPortsLabel As System.Windows.Forms.Label
Friend WithEvents FTPPorts As System.Windows.Forms.TextBox
Friend WithEvents ServerPorts As System.Windows.Forms.TextBox
Friend WithEvents InputFrame As System.Windows.Forms.GroupBox
Friend WithEvents KeyboardGroup As System.Windows.Forms.GroupBox
Friend WithEvents KeyCodesPathLabel As System.Windows.Forms.Label
Friend WithEvents KeyCodesPath As System.Windows.Forms.TextBox
Friend WithEvents UseKeycodes As System.Windows.Forms.CheckBox
Friend WithEvents BrowseKeyCodes As System.Windows.Forms.Button
Friend WithEvents MouseGroup As System.Windows.Forms.GroupBox
Friend WithEvents ScrollLinesLabel As System.Windows.Forms.Label
Friend WithEvents WheelFunctionLabel As System.Windows.Forms.Label
Friend WithEvents WheelFunction As System.Windows.Forms.ComboBox
Friend WithEvents ScrollLines As System.Windows.Forms.NumericUpDown
Friend WithEvents ScreenFrame As System.Windows.Forms.GroupBox
Friend WithEvents CustResolution As System.Windows.Forms.CheckBox
Friend WithEvents VMResHeight As System.Windows.Forms.ComboBox
Friend WithEvents VMResWidth As System.Windows.Forms.ComboBox
Friend WithEvents VMResLabel As System.Windows.Forms.Label
Friend WithEvents VMResDef As System.Windows.Forms.ComboBox
Friend WithEvents RefeshRateLabel As System.Windows.Forms.Label
Friend WithEvents RefreshRate As System.Windows.Forms.ComboBox
Friend WithEvents StartModeLabel As System.Windows.Forms.Label
Friend WithEvents StartMode As System.Windows.Forms.ComboBox
Friend WithEvents IconFrame As System.Windows.Forms.GroupBox
Friend WithEvents IconDescription As System.Windows.Forms.Label
Friend WithEvents IconList As System.Windows.Forms.ListView
Friend WithEvents DrivesFrame As System.Windows.Forms.GroupBox
Friend WithEvents DrivesList As System.Windows.Forms.ListBox
Friend WithEvents MoveItemDown As System.Windows.Forms.Button
Friend WithEvents MoveItemUp As System.Windows.Forms.Button
Friend WithEvents AddDisk As System.Windows.Forms.Button
Friend WithEvents AddCD As System.Windows.Forms.Button
Friend WithEvents DeleteItem As System.Windows.Forms.Button
Friend WithEvents MemoryFrame As System.Windows.Forms.GroupBox
Friend WithEvents Memory As System.Windows.Forms.TextBox
Friend WithEvents MegabyteLabel As System.Windows.Forms.Label
Friend WithEvents MemoryLabel As System.Windows.Forms.Label
Friend WithEvents MemorySlider As System.Windows.Forms.TrackBar
Friend WithEvents VMNameFrame As System.Windows.Forms.GroupBox
Friend WithEvents VMNameHelp As System.Windows.Forms.Label
Friend WithEvents VMName As System.Windows.Forms.TextBox
Friend WithEvents OptionList As System.Windows.Forms.ListView
Friend WithEvents Options As System.Windows.Forms.ColumnHeader
Friend WithEvents Value As System.Windows.Forms.ColumnHeader
Public WithEvents cmdCancel As System.Windows.Forms.Button
Public WithEvents cmdOK As System.Windows.Forms.Button
End Class

120
frmSettingsQemuVM.resx Normal file
View File

@ -0,0 +1,120 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
</root>

12
frmSettingsQemuVM.vb Normal file
View File

@ -0,0 +1,12 @@
Public Class frmSettingsQemuVM
Private Sub frmSettingsQemuVM_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
LoadSettings()
End Sub
Public Sub LoadSettings()
Dim x As String
x = "qemu-system-ppc.exe -L pc-bios -boot d -m " _
+ 1024 + " -M mac99 -prom-env " & Chr(34) & "auto-boot?=true" & Chr(34) & " -prom-env " & Chr(34) & "boot-args=-v" & Chr(34) & " -prom-env " & Chr(34) & "vga-ndrv?=true" & Chr(34) & " -drive file=MacOS9.2.iso,format=raw,media=cdrom -drive file=MacOS9.2.img,format=raw,media=disk -sdl -netdev user,id=network01 -device sungem,netdev=network01 "
End Sub
End Class

1408
frmSettingsSheepVM.Designer.vb generated Normal file

File diff suppressed because it is too large Load Diff

241
frmSettingsSheepVM.resX Normal file
View File

@ -0,0 +1,241 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="ControlInfo.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>5, 7</value>
</metadata>
<metadata name="Icons.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>184, 6</value>
</metadata>
<metadata name="Browser.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>103, 8</value>
</metadata>
<metadata name="DriveListContext.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>252, 5</value>
</metadata>
<metadata name="DriveIcons.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>380, 6</value>
</metadata>
<data name="DriveIcons.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAACq
DwAAAk1TRnQBSQFMAgEBAwEAAdABAQHQAQEBEAEAARABAAT/ASEBAAj/AUIBTQE2BwABNgMAASgDAAFA
AwABEAMAAQEBAAEgBgABEBIAAy0BRQFaAVcBWgHFAVwBWQFcAcwBWwFZAVsBxAGQAYsBjgH/A10B0gNd
AdIDXQHSA10B0gNdAdIDXQHSAV4CXAHOAVgCVgG7AVgCVgG7AVwBWgFcAc0DQgF0QAADOgFgA14BzgFA
AjgB/wFAAjgB/wFAAjgB/wFAAjgB/wFAAjgB/wFAAjgB/wFAAjgB/wFAAjgB/wFAAjgB/wFAAjgB/wFA
AjgB/wFAAjgB/wNYAbkDOgFgQAADXwHoAdEBOAGuAf8BzAEuAacB/wHBAYgBrAH/Ab8CvQH/Ab8CvQH/
AaoCpgH/AaACnAH/AZQCkAH/AY0BigGJAf8BiwGJAYgB/wGBAkMB/wGSAQ0BPwH/AaUBHQGNAf8BuQEm
AZoB/wFRAlABnxAAAw4BEwM3AVsDUQGiA18B2wNcAeoDXwHbA1IBowM4AV0DDwEUDAADZQHlASMCHgH/
AbQBrwGwAf8BtAGvAbAB/wG0Aa8BsAH/AbQBrwGwAf8BtAGvAbAB/wG0Aa8BsAH/AbQBrwGwAf8BtAGv
AbAB/wG0Aa8BsAH/AbQBrwGwAf8BlwHGAaUB/wG0Aa8BsAH/ASMCHgH/A2UB5UAAA2QB8QHAATUBpAH/
Ab8BKQGdAf8BwAGLAa0B/wHTAtIB/wGsAR4BjwH/Aa4BIQGRAf8BqgKmAf8BnQKaAf8BkAKNAf8BiQKF
Af8BPAE5ATgB/wGKAQsBNwH/AZ0BGAGGAf8BsQEhAZMB/wNOAZkMAAMqAUADVAGsBP8B+gH7AfoB/wPn
Af8D1gH/AsoBywH/AcABvgG/Af8BsAG9AbgB/wNUAawDKAE8CAABQAI4Af8BtAGvAbAB/wHYAdYB1QH/
AeUB2QHYAf8B5QHZAdgB/wHlAdkB2AH/AeUB2QHYAf8B5QHZAdgB/wHlAdkB2AH/AeUB2QHYAf8B5QHZ
AdgB/wE+AjoB/wECAbEBJwH/ASQCIQH/AbQBrwGwAf8BQAI4Af9AAANhAe4BxQE3AaYB/wHAASwBnwH/
AccBkgG1Af8D8gH/AbEBIQGTAf8BtAEjAZUB/wHFAsIB/wG6ArgB/wGoAqYB/wGdAZoBmQH/AYYCggH/
AY8BDQE8Af8BngEZAYUB/wGyASIBlAH/A04BmQgAAyoBQQNZAccE/wP9Af8D7QH/A94B/wPOAf8BvAG7
AbwB/wGyArMB/wGpAqwB/wOfAf8DWQHHAyUBNwQAAUACOAH/AbQBrwGwAf8B2AHWAdUB/wHlAdkB2AH/
AeUB2QHYAf8B5QHZAdgB/wHlAdkB2AH/AeUB2QHYAf8B5QHZAdgB/wHlAdkB2AH/AeUB2QHYAf8BJgGO
ATMB/wEAAeoBGQH/ARkCFgH/AbQBrwGwAf8BQAI4Af9AAANhAe4BxwE6AakB/wHAAS8BoAH/AccBlQG1
Bf8BtgEvAZsB/wG6ATABmwH/AfQC8wH/A+0B/wHTAtIB/wHCAsAB/wGiAqAB/wGTAQ8BPgH/AZ0BGAGE
Af8BsgEiAZQB/wNOAZkEAAMPARQDVAGsAdsB2gHYAf8B4AHfAd4B/wP3Af8D9wH/AeUC5gH/A88B/wK5
AboB/wOzAf8BmQKYAf8DjQH/AaQBpQGkAf8DVQGtAwwBEAFAAjgB/wG9AbgBuQH/AdgB1gHVAf8B5QHZ
AdgB/wHlAdkB2AH/AeUB2QHYAf8B5QHZAdgB/wHlAdkB2AH/AeUB2QHYAf8B5QHZAdgB/wHlAdkB2AH/
AT4COgH/AQABwAElAf8BKQEqASgB/wG1AbABsQH/AUACOAH/QAADYQHuAcgBPQGqAf8ByAE3AagB/wGz
ATIBnAH/AbgBiQGqAf8BpAE0AZMB/wGkATIBkgH/AbsBiwGsAf8BuQGKAakB/wG0AYIBpQH/Aa4BRQGe
Af8BogE1AY8B/wGTAQ4BQAH/AZoBFgGCAf8BswEfAZMB/wNOAZkEAAM6AWABXwFgAWIB+wHBAc8B2QH/
AckCygH/Ad8B4QHdAf8B+QH6AfkB/wNnAfIDYQHkA18B8wKgAaEB/wGOAY8BjgH/AZ4BnwGdAf8BsAGv
AbEB/wHEAcABxgH/AzUBVgFAAjgB/wHEAr8B/wHYAdYB1SX/AckB9wHZAf8B2QLWAf8BxgHCAcEB/wFA
AjgB/0AAA2EB7gHEATwBqQH/Ab4BQwGlAf8BwAFCAacB/wG5ATcBnQH/AbwBOwGiAf8BvAE3AZ8B/wG3
ATABmQH/AbYBLgGYAf8BtQEtAZcB/wGzASsBlQH/AbMBKQGSAf8BswEvAZUB/wGzASUBlAH/AbUBHAGS
Af8DTgGZBAADUwGlAbMB3QHkAf8BugHQAeoB/wHKAcYB5gH/AdEBxwHaAf8DXgHZA1ABngNOAZUDUQGi
A1wB3wGrAaYBrQH/AbYBrgG6Af8BrAGmAbAB/wGtAagBsAH/A1EBnAM6AWADZQHlAbQBrwGwAf8BtAGv
AbAB/wG0Aa8BsAH/AbQBrwGwAf8BtAGvAbAB/wG0Aa8BsAH/AbQBrwGwAf8BtAGvAbAB/wG0Aa8BsAH/
AbQBrwGwAf8BtQGwAbEB/wG0Aa8BsAH/A2UB5QM6AWBAAANhAe4BwAFEAagB/wGwATwBnQH/Ad0BxgHR
Af8B+AH2AfEB/wH4AfUB8AH/AfgB9QHuAf8B+AH0Ae0B/wH4AfQB6wH/AfgB8wHqAf8B+AHzAekB/wH4
AfIB5wH/Ad0BxgHRAf8BvgGIAaYB/wG2ARgBkwH/A04BmQQAA14BzgGVAZQBlgH/AZMBlQGZAf8BowGe
Aa4B/wNZAfUDUgGhAz4BawMrAUMDQAFxA1UBsANNAfoBmQGVAZsB/wGSAZABkQH/A5QB/wNYAbwEAAM/
AW0DVQG1A2IB9gHhAeAB4QH/AusB7QH/Au0B7wH/Au0B7wH/Au0B7wH/Au0B7wH/AuwB7gH/Ad8B3gHf
Af8DbQH3A1UBtQM/AW1EAANhAe4BwwGCAasB/wGwATwBnQH/AfoB+wH4Af8B+QH4AfUB/wH5AfgB9AH/
AfkB9wHzAf8B+QH3AfIB/wH5AfYB8QH/AfkB9gHwAf8B+QH1Ae8B/wH5AfUB7gH/AfsB/AH0Af8BvgGI
AaYB/wG6ARwBlQH/A04BmQQAA2AB1AKTAZEB/wGIAYkBhgH/AYcBiAGGAf8DYgHvA1EBnwM6AWEDGAEi
AzoBYQNTAagDbQH3AaYBpQGiAf8BrAGjAagB/wG0AaYBrAH/A1sBxAwAAwoBDQNRAaADWwHEA14B2ANe
AdgDXgHYA14B2ANaAb0DUQGgAwQBBUwAA2EB7gHDAYUBrAH/AbABPAGdAf8C+gH4Af8B+QH3AfUB/wH5
AfcB9AH/AfkB9gHyAf8B+QH2AfIB/wH5AfYB8AH/AfkB9QHvAf8B+QH1Ae4B/wH4AfQB7QH/AvsB8wH/
Ab4BiAGmAf8BvgEgAZsB/wNOAZkEAANbAcMBmAGXAZgB/wGWAZABlwH/AZgBkgGcAf8DXwH7A1cBuANI
AYMDQwF4A0gBgwNZAcIBpgGiAUAB/QGKAbkBPAH/AUEBxQGVAf8BkQHJAbEB/wNUAa+AAANhAe4BxQGJ
Aa8B/wGwATwBnQH/AvoB+AH/AfkB+AH1Af8B+QH3AfQB/wH5AfcB9AH/AfkB9wHyAf8B+QH2AfEB/wH5
AfUB8AH/AfkB9QHvAf8B+QH1Ae4B/wL7AfQB/wG+AYgBpgH/AcABJAGeAf8DTgGZBAADTgGUAaYBnwGp
Af8BmAGSAZwB/wGSAZABkwH/AZwBmwGcAf8DZQH0A1oBxQNWAbYDWwHGA2UB9AGbAZ0BkQH/AYEBqQFD
Af8BBQHTAYEB/wEAAf8BpAH/AUUCRgF/gAADYQHuAcUBjAGwAf8BsAE8AZ0B/wL6AfkB/wH5AfgB9gH/
AfkB+AH1Af8B+QH4AfUB/wH5AfcB8wH/AfkB9gHyAf8B+QH2AfEB/wH5AfUB8AH/AfkB9QHvAf8B+gH7
AfQB/wG+AYgBpgH/AcQBKAGiAf8DTgGZBAADLwFJA2QB7AGVAZYBlQH/AZ8BoAGfAf8BuAG5AbcB/wHd
AdwB3QH/AfcC+AH/A18B+wPPAf8CuwG8Af8CqwGuAf8BogGdAaIB/wGOAaQBmwH/AVkCZwHyAyABL4AA
A2cB8gHHAY8BsgH/AbABPAGdAf8C+gH5Af8B+QH4AfcB/wH5AfgB9gH/AfkB+AH1Af8B+QH3AfQB/wH5
AfcB8wH/AfkB9gHyAf8B+QH2AfEB/wH5AfUB8AH/AfoB+wH1Af8BvgGIAaYB/wHLAS0BqAH/A04BmAQA
AwwBEANIAYYCtQG0Af8DuQH/Ac8BzgHPAf8B7AHrAewB/wP7Af8D6wH/A9YB/wPFAf8DtQH/Aa8BrgGv
Af8BswGuAbEB/wNDAXiEAANcAdED1QH/AbABPAGdAf8D+gH/AfoC+QH/AvoB+AH/AfoB+QH4Af8B+wH5
AfcB/wH6AfkB9gH/AfoB+AH1Af8B+gH4AfMB/wH6AfcB8gH/AvwB9wH/Ab4BiAGmAf8D1QH/AUwBSwFM
AY8IAAMOARMDUAGbAdgB1wHYAf8B6gHoAeoB/wP1Af8D+AH/AegC6QH/A9kB/wPLAf8DxwH/AcECwAH/
A0wBkAMHAQmEAANVAbUBPAERATEB/wGwATwBnQH/AvoB+AH/AfcB9QHzAf8B9AHyAfAB/wHzAe8B7AH/
AfAB7AHpAf8B7wHrAecB/wHvAesB5gH/Ae8B6wHmAf8B7wHqAeYB/wHxAfAB6wH/Ab4BiAGmAf8BPAER
ATEB/wNKAY0MAAMKAQ4DPwFtA2EB4gj/AfcC9gH/A+sB/wPfAf8DXgHdAz0BaAMEAQaIAANdAdMB0AGh
AcAB/wHQAaEBwAH/Ad0BxgHRAf8B3QHGAdEB/wHdAcYB0QH/Ad0BxgHRAf8B3QHGAdEB/wHdAcYB0QH/
Ad0BxgHRAf8B3QHGAdEB/wHdAcYB0QH/Ad0BxgHRAf8B0AGhAcAB/wNZAfUDQQFyEAADAgEDAxYBHgM2
AVkDTQGRA1QBpgNMAZIDNAFUAxABFpAAAUIBTQE+BwABPgMAASgDAAFAAwABEAMAAQEBAAEBBQABgBcA
A/8DAAL/BgAB8AEHBgAB4AEDBgABwAEBBgABgAcAAYAHAAGABwABgAEAAYABAQQAAYABAAHgAQcEAAGA
AQAC/wQAAYABAAL/BAABgAEAAv8EAAGAAQEC/wQAAcABAQL/BAAB4AEDAv8EAAHwAQ8C/wIACw==
</value>
</data>
<data name="IconInfo.Text" xml:space="preserve">
<value>Some personalization to your Mac could come very handy. In this page
you can change an icon of your desire for your emulated Mac. Scroll
the bar to see more icons, or click in "Add" to add a picture and set it as
the icon for your Mac</value>
</data>
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>44</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAIAICAQAAEABADoAgAAJgAAABAQEAABAAQAKAEAAA4DAAAoAAAAIAAAAEAAAAABAAQAAAAAAIAC
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAgAAAAICAAIAAAACAAIAAgIAAAMDAwACAgIAAAAD/AAD/
AAAA//8A/wAAAP8A/wD//wAA////AAAAAAAAAAAAAAAAAAAAAAAAAAB3d3d3d3d3d3d3cAAAAAAAd3d3
d3d3d3d3d3AAAAAAAHd3d3d3d3d3d3dwAAAAAAAAAAAAAAAAAAAAAAAAAAAHd3d3d3d3d3d3d3cAAAAA
B3d3d3d3d3d3d3d3AAAAAAd3d3d3d3d3d3d3dwAAAAAHd3d3d3d3d3d3d3cAAAAAB3AHd3d3d3AAAAd3
AAAAAAd3d3d3d3d3d3d3dwAAAAAHd3d3d3d3d3d3d3cAAAAAB3d3d3d3d3d3d3d3AAAAAAd3d3d3d3d3
d3d3dwAAAAAHdwAAAAAAAAAAB3cAAAAAB3B3d3d3d3d3d3B3AAAAAAdwd3d3d3d3d3dwdwAAAAAHcHd3
dwAAd3d3cHcAAAAAB3B3d3B3dwd3d3B3AAAAAAdwd3d3d3d3d3dwdwAAAAAHcHd3d3AHd3d3cHcAAAAA
B3B3d3d3B3d3d3B3AAAAAAdwd3d3dwd3d3dwdwAAAAAHcHd3B3cHdwd3cHcAAAAAB3B3dwd3B3cHd3B3
AAAAAAdwd3d3d3d3d3dwdwAAAAAHcHd3d3d3d3d3cHcAAAAAB3B3d3d3d3d3d3B3AAAAAAd3AAAAAAAA
AAAHdwAAAAAHd3d3d3d3d3d3d3cAAAAAAHd3d3d3d3d3d3dwAAAAAAAAAAAAAAAAAAAAAAAA+AAAD/gA
AA/4AAAP+AAAD/AAAAfwAAAH8AAAB/AAAAfwAAAH8AAAB/AAAAfwAAAH8AAAB/AAAAfwAAAH8AAAB/AA
AAfwAAAH8AAAB/AAAAfwAAAH8AAAB/AAAAfwAAAH8AAAB/AAAAfwAAAH8AAAB/AAAAfwAAAH8AAAB/gA
AA8oAAAAEAAAACAAAAABAAQAAAAAAMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAgAAAAICAAIAA
AACAAIAAgIAAAMDAwACAgIAAAAD/AAD/AAAA//8A/wAAAP8A/wD//wAA////AAAAAAAAAAAAAAd3d3d3
AAAAAAAAAAAAAAB3d3d3d3AAAHB3d3AAcAAAd3d3d3dwAABwAAAAAHAAAHB3d3dwcAAAcHcAB3BwAABw
cHdwcHAAAHB3cHdwcAAAcHBwcHBwAABwd3d3cHAAAHAAAAAAcAAAd3d3d3dwAAAAAAAAAAAAwAcAAMAH
AACAAwAAgAMAAIADAACAAwAAgAMAAIADAACAAwAAgAMAAIADAACAAwAAgAMAAIADAACAAwAAwAcAAA==
</value>
</data>
</root>

943
frmSettingsSheepVM.vb Normal file
View File

@ -0,0 +1,943 @@
Imports System.IO
Friend Class frmSettingsSheepVM
Inherits System.Windows.Forms.Form
Public ConfigFilePath As String
Public VMName As String
Public SelectedItem As Integer
Public Sub LoadSettingsFrom(Item As Integer)
ConfigFilePath = frmMain.VMList.Items.Item(Item).SubItems(1).Text
VMName = frmMain.VMList.Items.Item(Item).Text
SelectedItem = Item
End Sub
Public Sub Settings()
Dim Reader As New StreamReader(ConfigFilePath)
Dim ConfigValues As New ArrayList()
Dim strContainer As String = ""
MacName.Text = frmMain.VMList.Items.Item(SelectedItem).Text
Do
strContainer = Reader.ReadLine()
If Not strContainer Is Nothing Then
ConfigValues.Add(strContainer)
End If
Loop Until strContainer Is Nothing
Reader.Close()
For x As Integer = 0 To ConfigValues.Count - 1
If InStr(ConfigValues(x), "disk") <> 0 Then
With DriveList.Items.Add(ConfigValues(x).ToString.Substring(5))
.ImageKey = "Drive"
.SubItems.Add("Disk")
.SubItems.Add("")
End With
End If
If InStr(ConfigValues(x), "floppy") <> 0 Then
With DriveList.Items.Add(ConfigValues(x).ToString.Substring(7))
.ImageKey = "Floppy"
.SubItems.Add("Floppy")
.SubItems.Add("")
End With
End If
If ConfigValues(x).ToString.Substring(0, 5) = "cdrom" Then
With DriveList.Items.Add(ConfigValues(x).ToString.Substring(6))
.ImageKey = "Disc"
.SubItems.Add("CD")
.SubItems.Add("")
End With
End If
If ConfigValues(x).ToString.Substring(0, 5) = "extfs" Then
End If
If ConfigValues(x).ToString.Substring(0, 4) = "scsi" Then
Select Case ConfigValues(x).ToString.Substring(0, 5)
Case "scsi0"
Case "scsi1"
Case "scsi2"
Case "scsi3"
Case "scsi4"
Case "scsi5"
Case "scsi6"
End Select
End If
If ConfigValues(x).ToString.Length > 7 Then
If ConfigValues(x).ToString.Substring(0, 7) = "screen " Then
Dim a As String = ConfigValues(x).ToString.Substring(7)
Dim b() As String = Split(a, "/")
Dim FoundX As Boolean = False
Dim FoundY As Boolean = False
Select Case b(0)
Case "win"
MediaMode.SelectedIndex = 0
Case "dga"
MediaMode.SelectedIndex = 1
End Select
For c As Integer = 0 To MediaResY.Items.Count - 1
If FoundX = True And FoundY = True Then
Exit For
End If
If InStr(MediaResX.Items.Item(c).ToString, b(1)) <> 0 Then
MediaResX.SelectedIndex = c
FoundX = True
ElseIf c = MediaResX.Items.Count - 1 And FoundX = False Then
MediaResX.Items.Add(b(1))
MediaResX.SelectedIndex = MediaResX.Items.Count - 1
End If
If InStr(MediaResY.Items.Item(c).ToString, b(2)) <> 0 Then
MediaResY.SelectedIndex = c
FoundY = True
ElseIf c = MediaResY.Items.Count - 1 And FoundY = False Then
MediaResY.Items.Add(b(2))
MediaResY.SelectedIndex = MediaResY.Items.Count - 1
End If
Next
End If
End If
If InStr(ConfigValues(x), "windowsmodes") <> 0 Then
End If
If InStr(ConfigValues(x), "screenmodes") <> 0 Then
End If
If InStr(ConfigValues(x), "seriala") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(8)
Case "COM1"
SerialA.SelectedIndex = 0
Case "COM2"
SerialA.SelectedIndex = 1
Case "COM3"
SerialA.SelectedIndex = 2
Case "COM4"
SerialA.SelectedIndex = 3
Case "COM5"
SerialA.SelectedIndex = 4
Case "COM6"
SerialA.SelectedIndex = 5
Case "LPT1"
SerialA.SelectedIndex = 6
Case "LPT2"
SerialA.SelectedIndex = 7
Case "LPT3"
SerialA.SelectedIndex = 8
Case "LPT4"
SerialA.SelectedIndex = 9
Case "LPT5"
SerialA.SelectedIndex = 10
Case "LPT6"
SerialA.SelectedIndex = 11
Case "FILE"
SerialA.SelectedIndex = 12
End Select
End If
If InStr(ConfigValues(x), "serialb") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(8)
Case "COM1"
SerialB.SelectedIndex = 0
Case "COM2"
SerialB.SelectedIndex = 1
Case "COM3"
SerialB.SelectedIndex = 2
Case "COM4"
SerialB.SelectedIndex = 3
Case "COM5"
SerialB.SelectedIndex = 4
Case "COM6"
SerialB.SelectedIndex = 5
Case "LPT1"
SerialB.SelectedIndex = 6
Case "LPT2"
SerialB.SelectedIndex = 7
Case "LPT3"
SerialB.SelectedIndex = 8
Case "LPT4"
SerialB.SelectedIndex = 9
Case "LPT5"
SerialB.SelectedIndex = 10
Case "LPT6"
SerialB.SelectedIndex = 11
Case "FILE"
SerialB.SelectedIndex = 12
End Select
End If
If ConfigValues(x).ToString.Substring(0, 3) = "rom" Then
MiscROM.Text = ConfigValues(x).ToString.Substring(4)
End If
If InStr(ConfigValues(x), "bootdrive") <> 0 Then
Dim bd As Integer = ConfigValues(x).ToString.Substring(10)
If bd <= DriveList.Items.Count Then
DriveList.Items.Item(bd).SubItems.Item(2).Text = "*"
End If
End If
If InStr(ConfigValues(x), "bootdriver") <> 0 Then
Dim BootDriver As Integer = ConfigValues(x).ToString.Substring(11)
Select Case BootDriver
Case 0
DriveBootDisk.Checked = True
Case -62
DriveBootCD.Checked = True
End Select
End If
If InStr(ConfigValues(x), "ramsize") <> 0 Then
Dim RAMMiB As Long = ConfigValues(x).ToString.Substring(7)
RAMMiB = (RAMMiB / 1024) / 1024
MemoryBox.Text = RAMMiB
End If
If InStr(ConfigValues(x), "frameskip") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(10)
Case "12"
MediaRefresh.SelectedIndex = 0
Case "8"
MediaRefresh.SelectedIndex = 1
Case "6"
MediaRefresh.SelectedIndex = 2
Case "4"
MediaRefresh.SelectedIndex = 3
Case "2"
MediaRefresh.SelectedIndex = 4
Case "1"
MediaRefresh.SelectedIndex = 5
End Select
End If
If InStr(ConfigValues(x), "gfxaccel") <> 0 Then
If ConfigValues(x).ToString.Substring(9) = "true" Then
MediaEnableQuickDraw.Checked = True
End If
End If
If InStr(ConfigValues(x), "nocdrom") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(8)
Case "false"
MediaEnableCD.Checked = True
Case "true"
MediaEnableCD.Checked = False
End Select
End If
If InStr(ConfigValues(x), "nonet") <> 0 Then
If ConfigValues(x).ToString.Substring(6) = "true" Then
NetEnable.Checked = False
End If
End If
If InStr(ConfigValues(x), "nosound") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(8)
Case "false"
MediaEnableSound.Checked = True
Case "true"
MediaEnableSound.Checked = False
End Select
End If
If InStr(ConfigValues(x), "nogui") <> 0 Then
If ConfigValues(x).ToString.Substring(6) = "true" Then
MiscEnableGUI.Checked = True
End If
End If
If InStr(ConfigValues(x), "noclipconversion") <> 0 Then
If ConfigValues(x).ToString.Substring(17, 4) = "true" Then
MiscClipConv.Checked = True
End If
End If
If InStr(ConfigValues(x), "ignoresegv") <> 0 Then
If ConfigValues(x).ToString.Substring(11) = "true" Then
MiscIgnoreSegv.Checked = True
End If
End If
If InStr(ConfigValues(x), "ignoreillegal") <> 0 Then
If ConfigValues(x).ToString.Substring(14) = "true" Then
MiscIgnoreIllegal.Checked = True
End If
End If
If InStr(ConfigValues(x), "jit") <> 0 Then
If ConfigValues(x).ToString.Substring(4) = "true" Then
JITEnable.Checked = True
End If
End If
If InStr(ConfigValues(x), "jit68k") <> 0 Then
If ConfigValues(x).ToString.Substring(7) = "true" Then
JIT68kEnable.Checked = True
End If
End If
If InStr(ConfigValues(x), "keyboardtype") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(13)
Case "5"
InputEmuKbdType.SelectedIndex = 0
Case "6"
Case "7"
Case "8"
Case "9"
Case "10"
Case "11"
InputEmuKbdType.SelectedIndex = 1
Case "12"
Case "13"
InputEmuKbdType.SelectedIndex = 2
End Select
End If
If InStr(ConfigValues(x), "ether") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(6)
Case "slirp"
NetType.SelectedIndex = 0
Case "router"
NetType.SelectedIndex = 1
End Select
End If
If InStr(ConfigValues(x), "keycodes") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(9)
Case "true"
InputKeycodesEnable.Checked = True
Case "false"
InputKeycodesEnable.Checked = False
End Select
End If
If InStr(ConfigValues(x), "keycodefile") <> 0 Then
InputKeyCodesPath.Text = ConfigValues(x).ToString.Substring(13)
End If
If InStr(ConfigValues(x), "mousewheelmode") <> 0 Then
Select Case ConfigValues(x).ToString.Substring(15, 1)
Case "0"
InputMouseWheelMode.SelectedIndex = 0
Case "1"
InputMouseWheelMode.SelectedIndex = 1
End Select
End If
If InStr(ConfigValues(x), "mousewheellines") <> 0 Then
Dim Number As Integer = ConfigValues(x).ToString.Substring(15)
InputMouseWheelLines.Value = Number
End If
If InStr(ConfigValues(x), "enableextfs") <> 0 Then
If ConfigValues(x).ToString.Substring(12) = "true" Then
ExtFSEnable.Checked = True
End If
End If
If InStr(ConfigValues(x), "debugextfs") <> 0 Then
If ConfigValues(x).ToString.Substring(11) = "true" Then
JITDebugExtFS.Checked = True
End If
End If
If InStr(ConfigValues(x), "extdrives") <> 0 Then
Dim StringValue As String = ConfigValues(x).ToString.Substring(10)
For a As Integer = 0 To StringValue.Length - 1
Select Case StringValue.Substring(a, 1)
Case "C"
ExtFSDrives.SetItemCheckState(0, CheckState.Checked)
Case "D"
ExtFSDrives.SetItemCheckState(1, CheckState.Checked)
Case "E"
ExtFSDrives.SetItemCheckState(2, CheckState.Checked)
Case "F"
ExtFSDrives.SetItemCheckState(3, CheckState.Checked)
Case "G"
ExtFSDrives.SetItemCheckState(4, CheckState.Checked)
Case "H"
ExtFSDrives.SetItemCheckState(5, CheckState.Checked)
Case "I"
ExtFSDrives.SetItemCheckState(6, CheckState.Checked)
Case "J"
ExtFSDrives.SetItemCheckState(7, CheckState.Checked)
Case "K"
ExtFSDrives.SetItemCheckState(8, CheckState.Checked)
Case "L"
ExtFSDrives.SetItemCheckState(9, CheckState.Checked)
Case "M"
ExtFSDrives.SetItemCheckState(10, CheckState.Checked)
Case "N"
ExtFSDrives.SetItemCheckState(11, CheckState.Checked)
Case "O"
ExtFSDrives.SetItemCheckState(12, CheckState.Checked)
Case "P"
ExtFSDrives.SetItemCheckState(13, CheckState.Checked)
Case "Q"
ExtFSDrives.SetItemCheckState(14, CheckState.Checked)
Case "R"
ExtFSDrives.SetItemCheckState(15, CheckState.Checked)
Case "S"
ExtFSDrives.SetItemCheckState(16, CheckState.Checked)
Case "T"
ExtFSDrives.SetItemCheckState(17, CheckState.Checked)
Case "U"
ExtFSDrives.SetItemCheckState(18, CheckState.Checked)
Case "V"
ExtFSDrives.SetItemCheckState(19, CheckState.Checked)
Case "W"
ExtFSDrives.SetItemCheckState(20, CheckState.Checked)
Case "X"
ExtFSDrives.SetItemCheckState(21, CheckState.Checked)
Case "Y"
ExtFSDrives.SetItemCheckState(22, CheckState.Checked)
Case "Z"
ExtFSDrives.SetItemCheckState(23, CheckState.Checked)
End Select
Next
End If
If InStr(ConfigValues(x), "pollmedia") <> 0 Then
If ConfigValues(x).ToString.Substring(10) = "true" Then
DrivePollMedia.Checked = True
End If
End If
If InStr(ConfigValues(x), "etherguid") <> 0 Then
End If
If InStr(ConfigValues(x), "etherpermanentaddress") <> 0 Then
If ConfigValues(x).ToString.Substring(22) = "true" Then
NetPermPhysicalAddress.Checked = True
End If
End If
If InStr(ConfigValues(x), "etherfakeaddress") <> 0 Then
NetFakeAddress.Text = ConfigValues(x).ToString.Substring(17)
End If
If InStr(ConfigValues(x), "ethermulticastmode") <> 0 Then
NetMulticastMode.Text = ConfigValues(x).ToString.Substring(19)
End If
If InStr(ConfigValues(x), "routerenabled") <> 0 Then
If ConfigValues(x).ToString.Substring(14) = "true" Then
NetRouterEnabled.Checked = True
Else
NetRouterEnabled.Checked = False
End If
End If
If InStr(ConfigValues(x), "tcp_port") <> 0 Then
NetServerPorts.Text = ConfigValues(x).ToString.Substring(9)
End If
If InStr(ConfigValues(x), "ftp_port_list") <> 0 Then
NetFTPPorts.Text = ConfigValues(x).ToString.Substring(14)
End If
If InStr(ConfigValues(x), "portfile0") <> 0 Then
SerialAFilePath.Text = ConfigValues(x).ToString.Substring(10)
End If
If InStr(ConfigValues(x), "portfile1") <> 0 Then
SerialBFilePath.Text = ConfigValues(x).ToString.Substring(10)
End If
EMCEditor.Items.Add(ConfigValues(x))
Next
End Sub
Public Sub SaveSettings()
Dim ConfigFile As String = ""
'Set the Text of the TextBox as the Mac name
'frmMain.VMList.Items.Item(VMName).Text = MacName.Text
'Recollect data
For x As Integer = 0 To DriveList.Items.Count - 1
Select Case DriveList.Items.Item(x).SubItems(1).Text
Case "CD"
ConfigFile = ConfigFile & "cdrom " & DriveList.Items.Item(x).Text & vbCrLf
Case "Disk"
ConfigFile = ConfigFile & "disk " & DriveList.Items.Item(x).Text & vbCrLf
Case "Floppy"
ConfigFile = ConfigFile & "floppy " & DriveList.Items.Item(x).Text & vbCrLf
End Select
If DriveList.Items.Item(x).SubItems(2).Text = "*" Then
ConfigFile = ConfigFile & "bootdrive " & x & vbCrLf
End If
Next
ConfigFile = ConfigFile & "screen "
If MediaMode.SelectedIndex = 0 Then
ConfigFile = ConfigFile & "win/"
Else
ConfigFile = ConfigFile & "dga/"
End If
ConfigFile = ConfigFile & MediaResX.SelectedItem.ToString & "/"
ConfigFile = ConfigFile & MediaResY.SelectedItem.ToString & vbCrLf
If SerialA.SelectedItem.ToString <> "None" Then
Select Case SerialA.SelectedIndex
Case 0
ConfigFile = ConfigFile & "seriala COM1" & vbCrLf
Case 1
ConfigFile = ConfigFile & "seriala COM2" & vbCrLf
Case 2
ConfigFile = ConfigFile & "seriala COM3" & vbCrLf
Case 3
ConfigFile = ConfigFile & "seriala COM4" & vbCrLf
Case 4
ConfigFile = ConfigFile & "seriala COM5" & vbCrLf
Case 5
ConfigFile = ConfigFile & "seriala COM6" & vbCrLf
Case 6
ConfigFile = ConfigFile & "seriala LPT1" & vbCrLf
Case 7
ConfigFile = ConfigFile & "seriala LP2" & vbCrLf
Case 8
ConfigFile = ConfigFile & "seriala LPT3" & vbCrLf
Case 9
ConfigFile = ConfigFile & "seriala LPT4" & vbCrLf
Case 10
ConfigFile = ConfigFile & "seriala LPT5" & vbCrLf
Case 11
ConfigFile = ConfigFile & "seriala LPT6" & vbCrLf
Case 12
If SerialAFilePath.Text <> "" Then
ConfigFile = ConfigFile & "seriala FILE" & vbCrLf
ConfigFile = ConfigFile & "portfile0 " & SerialAFilePath.Text & vbCrLf
End If
End Select
End If
If SerialB.SelectedItem.ToString <> "None" Then
Select Case SerialB.SelectedIndex
Case 0
ConfigFile = ConfigFile & "serialb COM1" & vbCrLf
Case 1
ConfigFile = ConfigFile & "serialb COM2" & vbCrLf
Case 2
ConfigFile = ConfigFile & "serialb COM3" & vbCrLf
Case 3
ConfigFile = ConfigFile & "serialb COM4" & vbCrLf
Case 4
ConfigFile = ConfigFile & "serialb COM5" & vbCrLf
Case 5
ConfigFile = ConfigFile & "serialb COM6" & vbCrLf
Case 6
ConfigFile = ConfigFile & "serialb LPT1" & vbCrLf
Case 7
ConfigFile = ConfigFile & "serialb LP2" & vbCrLf
Case 8
ConfigFile = ConfigFile & "serialb LPT3" & vbCrLf
Case 9
ConfigFile = ConfigFile & "serialb LPT4" & vbCrLf
Case 10
ConfigFile = ConfigFile & "serialb LPT5" & vbCrLf
Case 11
ConfigFile = ConfigFile & "serialb LPT6" & vbCrLf
Case 12
If SerialBFilePath.Text <> "" Then
ConfigFile = ConfigFile & "serialb FILE" & vbCrLf
ConfigFile = ConfigFile & "portfile1 " & SerialBFilePath.Text & vbCrLf
End If
End Select
End If
ConfigFile = ConfigFile & "rom " & MiscROM.Text & vbCrLf
If DriveBootDisk.Checked = True Then
ConfigFile = ConfigFile & "bootdriver 0" & vbCrLf
Else
ConfigFile = ConfigFile & "bootdriver -62" & vbCrLf
End If
ConfigFile = ConfigFile & "ramsize " & (MemoryBox.Text * 1024) * 1024 & vbCrLf
Select Case MediaRefresh.SelectedIndex
Case 0
ConfigFile = ConfigFile & "frameskip 12" & vbCrLf
Case 1
ConfigFile = ConfigFile & "frameskip 8" & vbCrLf
Case 2
ConfigFile = ConfigFile & "frameskip 6" & vbCrLf
Case 3
ConfigFile = ConfigFile & "frameskip 4" & vbCrLf
Case 4
ConfigFile = ConfigFile & "frameskip 2" & vbCrLf
Case 5
ConfigFile = ConfigFile & "frameskip 1" & vbCrLf
End Select
If MediaEnableQuickDraw.Checked = True Then
ConfigFile = ConfigFile & "gfxaccel true" & vbCrLf
Else
ConfigFile = ConfigFile & "gfxaccel false" & vbCrLf
End If
If MediaEnableCD.Checked = True Then
ConfigFile = ConfigFile & "nocdrom false" & vbCrLf
Else
ConfigFile = ConfigFile & "nocdrom true" & vbCrLf
End If
If MediaEnableSound.Checked = True Then
ConfigFile = ConfigFile & "nosound false" & vbCrLf
Else
ConfigFile = ConfigFile & "nosound true" & vbCrLf
End If
If NetEnable.Checked = True Then
ConfigFile = ConfigFile & "nonet false" & vbCrLf
Else
ConfigFile = ConfigFile & "nonet true" & vbCrLf
End If
If MiscEnableGUI.Checked = True Then
ConfigFile = ConfigFile & "nogui false" & vbCrLf
Else
ConfigFile = ConfigFile & "nogui true" & vbCrLf
End If
If MiscClipConv.Checked = True Then
ConfigFile = ConfigFile & "noclipconversion false" & vbCrLf
Else
ConfigFile = ConfigFile & "noclipconversion true" & vbCrLf
End If
If MiscIgnoreSegv.Checked = True Then
ConfigFile = ConfigFile & "ignoresegv true" & vbCrLf
Else
ConfigFile = ConfigFile & "ignoresegv false" & vbCrLf
End If
If MiscIgnoreIllegal.Checked = True Then
ConfigFile = ConfigFile & "ignoreillegal true" & vbCrLf
Else
ConfigFile = ConfigFile & "ignoreillegal false" & vbCrLf
End If
If JITEnable.Checked = True Then
ConfigFile = ConfigFile & "jit true" & vbCrLf
Else
ConfigFile = ConfigFile & "jit false" & vbCrLf
End If
If JIT68kEnable.Checked = True Then
ConfigFile = ConfigFile & "jit68k true" & vbCrLf
Else
ConfigFile = ConfigFile & "jit68k false" & vbCrLf
End If
Select Case InputEmuKbdType.SelectedIndex
Case 0
ConfigFile = ConfigFile & "keyboardtype 5" & vbCrLf
Case 1
ConfigFile = ConfigFile & "keyboardtype 11" & vbCrLf
Case 2
ConfigFile = ConfigFile & "keyboardtype 13" & vbCrLf
End Select
Select Case NetType.SelectedIndex
Case 0
ConfigFile = ConfigFile & "ether slirp" & vbCrLf
Case 1
ConfigFile = ConfigFile & "ether router" & vbCrLf
End Select
If InputKeycodesEnable.Checked = True Then
ConfigFile = ConfigFile & "keycodes true" & vbCrLf
ConfigFile = ConfigFile & "keycodesfile " & InputKeyCodesPath.Text & vbCrLf
End If
Select Case InputMouseWheelMode.SelectedIndex = 0
Case 0
ConfigFile = ConfigFile & "mousewheelmode 0" & vbCrLf
Case 1
ConfigFile = ConfigFile & "mousewheelmode 1" & vbCrLf
ConfigFile = ConfigFile & "mousewheellines " & InputMouseWheelLines.Value & vbCrLf
End Select
If ExtFSEnable.Checked = True Then
ConfigFile = ConfigFile & "enableextfs true" & vbCrLf
ConfigFile = ConfigFile & "extfsdrives "
For x As Integer = 0 To ExtFSDrives.Items.Count
If ExtFSDrives.CheckedIndices.Contains(x) = True Then
ConfigFile = ConfigFile & ExtFSDrives.Items.Item(x).ToString()
End If
Next
ConfigFile = ConfigFile & vbCrLf
Else
ConfigFile = ConfigFile & "enableextfs false" & vbCrLf
End If
If JITDebugExtFS.Checked = True Then
ConfigFile = ConfigFile & "debugextfs true" & vbCrLf
Else
ConfigFile = ConfigFile & "debugextfs false" & vbCrLf
End If
If DrivePollMedia.Checked = True Then
ConfigFile = ConfigFile & "pollmedia true" & vbCrLf
Else
ConfigFile = ConfigFile & "pollmedia false" & vbCrLf
End If
If NetPermPhysicalAddress.Checked = True Then
ConfigFile = ConfigFile & "etherpermanentaddress true" & vbCrLf
Else
ConfigFile = ConfigFile & "etherpermanentaddress false" & vbCrLf
End If
If NetFakeAddress.Text <> "" Then
ConfigFile = ConfigFile & "etherfakeaddress " & NetFakeAddress.Text & vbCrLf
End If
If NetMulticastMode.Text <> "" Then
ConfigFile = ConfigFile & "ethermulticast " & NetMulticastMode.Text & vbCrLf
End If
If NetRouterEnabled.Checked = True Then
ConfigFile = ConfigFile & "routerenabled true" & vbCrLf
Else
ConfigFile = ConfigFile & "routerenabled false" & vbCrLf
End If
If NetFTPPorts.Text <> "" Then
ConfigFile = ConfigFile & "ftp_port_list " & NetFTPPorts.Text & vbCrLf
End If
If NetFTPPorts.Text <> "" Then
ConfigFile = ConfigFile & "tcp_port " & NetServerPorts.Text & vbCrLf
End If
ConfigFile = ConfigFile & "portfile0 " & SerialAFilePath.Text & vbCrLf
ConfigFile = ConfigFile & "portfile1 " & SerialBFilePath.Text & vbCrLf
MsgBox(ConfigFile)
ConfigFileHandler.Write(ConfigFile, ConfigFilePath)
End Sub
Private Sub SwitchPages(ByVal NewPage As System.Windows.Forms.GroupBox)
MacNameFrame.Visible = False
IconFrame.Visible = False
MemoryFrame.Visible = False
DriveFrame.Visible = False
NetworkFrame.Visible = False
MediaFrame.Visible = False
InputFrame.Visible = False
SerialFrame.Visible = False
ExtFSFrame.Visible = False
MiscFrame.Visible = False
JITFrame.Visible = False
EMCFrame.Visible = False
NewPage.Visible = True
End Sub
Private Sub cmdCancel_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles cmdCancel.Click
Me.Close() 'Saves nothing and closes the dialog
End Sub
Private Sub cmdOK_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles cmdOK.Click
'Save the config file and/or update the item in the console and leave
SaveSettings()
Me.Close()
End Sub
Private Sub frmSettingsSheepVM_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
'Set up some things
InitializeData()
'Load the config file into the respective groups
Settings()
End Sub
Public Sub InitializeData()
'Quite self explanatory, it gets the RAM in the host, divides it into MBs and sets the maximum values for the RAM controls
Dim HostRAM As Long = (My.Computer.Info.TotalPhysicalMemory / 1024) / 1024
MemoryTracker.Maximum = HostRAM
MemoryTracker.TickFrequency = HostRAM / 20
Me.Text = "Settings for " & frmMain.VMList.Items.Item(SelectedItem).Text
MediaRefresh.SelectedIndex = MediaRefresh.Items.Count - 1
'Code used to load icons
For x As Integer = 0 To frmMain.MacIcons.Images.Count - 1
Icons.Images.Add(frmMain.MacIcons.Images.Item(x).ToString, frmMain.MacIcons.Images.Item(x))
With IconList.Items.Add(x)
.ImageIndex = x
End With
Next
End Sub
Private Sub IconAdd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles IconAdd.Click
'If the user did choose a valid file, then execute the code
If Browser.ShowDialog() = Forms.DialogResult.OK Then
Dim ImgName As String = System.IO.Path.GetFileNameWithoutExtension(Browser.FileName) 'Get the Name without extension for the pic name
Dim Img As System.Drawing.Image = Image.FromFile(Browser.FileName) 'Set a variable for the pic assign to it the image selected
frmMain.MacIcons.Images.Add(ImgName, Img) 'Add the icon to the console ImageList, so it can be shown with this dialog closed
My.Settings.x = My.Settings.x & Browser.FileName & "," 'Add the icon to the settings, so the icon can be loaded after closing and reopening the program
IconList.Items.Add(ImgName, Icons.Images.Count - 1) 'Add the icon to the form's ImageList
Icons.Images.Add(ImgName, Img) 'Add the icon to the form's ListView
IconList.Items.Item(Icons.Images.Count - 1).Focused = True 'Focus the item, so the user sees it has been added
End If
End Sub
Private Sub MemoryTracker_Scroll(ByVal sender As Object, ByVal e As System.EventArgs) Handles MemoryTracker.Scroll
'Set the same value in both Slider and NumericUpDown
MemoryBox.Text = MemoryTracker.Value
End Sub
Private Sub OptionList_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles OptionList.SelectedIndexChanged
'If the selected index changes (The user selects another "tab"), switch the tab visible
Select Case OptionList.FocusedItem.Index
Case 0
SwitchPages(MacNameFrame)
Case 1
SwitchPages(IconFrame)
Case 2
SwitchPages(MemoryFrame)
Case 3
SwitchPages(DriveFrame)
Case 4
SwitchPages(NetworkFrame)
Case 5
SwitchPages(MediaFrame)
Case 6
SwitchPages(InputFrame)
Case 7
SwitchPages(SerialFrame)
Case 8
SwitchPages(ExtFSFrame)
Case 9
SwitchPages(MiscFrame)
Case 10
SwitchPages(JITFrame)
Case 11
SwitchPages(EMCFrame)
End Select
End Sub
Private Sub ScrResCust_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MediaResCust.CheckedChanged
'If the user marks the checkbox of "Custom resolution", make visible the CustomResolution controls
If MediaResCust.Checked = True Then
MediaResX.Visible = True
MediaResY.Visible = True
Else
MediaResX.Visible = False
MediaResY.Visible = False
End If
End Sub
Private Sub NetType_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NetType.SelectedIndexChanged
If NetType.SelectedIndex = 1 Then
NetRouterConfig.Enabled = True
Else
NetRouterConfig.Enabled = False
End If
End Sub
Private Sub SerialA_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SerialA.SelectedIndexChanged
If SerialA.SelectedIndex = 12 Then
SerialAFilePath.Enabled = True
SerialAFileBrowse.Enabled = True
Else
SerialAFilePath.Enabled = False
SerialAFileBrowse.Enabled = False
End If
End Sub
Private Sub SerialB_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SerialB.SelectedIndexChanged
If SerialB.SelectedIndex = 12 Then
SerialBFilePath.Enabled = True
SerialBFileBrowse.Enabled = True
Else
SerialBFileBrowse.Enabled = False
SerialBFilePath.Enabled = False
End If
End Sub
Private Sub EMCEditor_ItemActivate(sender As Object, e As System.EventArgs) Handles EMCEditor.ItemActivate
EMCEditor.FocusedItem.BeginEdit()
End Sub
Private Sub MiscROMBrowse_Click(sender As System.Object, e As System.EventArgs) Handles MiscROMBrowse.Click
If Browser.ShowDialog = Forms.DialogResult.OK Then
MiscROM.Text = Browser.FileName
End If
End Sub
Private Sub NetEnable_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles NetEnable.CheckedChanged
If NetEnable.Checked = True Then
NetContainer.Enabled = True
Else
NetContainer.Enabled = False
End If
End Sub
Private Sub NetFakeAddress_GotFocus(sender As Object, e As System.EventArgs) Handles NetFakeAddress.GotFocus
If NetFakeAddress.Text = "No phisical address set." Then
NetFakeAddress.ForeColor = Color.Black
NetFakeAddress.Text = ""
End If
End Sub
Private Sub NetFakeAddress_LostFocus(sender As Object, e As System.EventArgs) Handles NetFakeAddress.LostFocus
If NetFakeAddress.Text = "" Then
NetFakeAddress.ForeColor = Color.Gray
NetFakeAddress.Text = "No phisical address set."
End If
End Sub
Private Sub MemoryBox_TextChanged(sender As System.Object, e As System.EventArgs) Handles MemoryBox.TextChanged
MemoryTracker.Value = MemoryBox.Text
End Sub
Private Sub ExtFSEnable_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles ExtFSEnable.CheckedChanged
If ExtFSEnable.Checked Then
ExtFSDrives.Visible = True
Else
ExtFSDrives.Visible = False
End If
End Sub
Private Sub InputKeycodesEnable_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles InputKeycodesEnable.CheckedChanged
If InputKeycodesEnable.Checked Then
InputKeyCodesPathPanel.Enabled = True
Else
InputKeyCodesPathPanel.Enabled = False
End If
End Sub
End Class

290
frmSettingsvMacVM.Designer.vb generated Normal file
View File

@ -0,0 +1,290 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmSettingsvMacVM
Inherits System.Windows.Forms.Form
'Form reemplaza a Dispose para limpiar la lista de componentes.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
'Requerido por el Diseñador de Windows Forms
Private components As System.ComponentModel.IContainer
'NOTA: el Diseñador de Windows Forms necesita el siguiente procedimiento
'Se puede modificar usando el Diseñador de Windows Forms.
'No lo modifique con el editor de código.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Dim ListViewItem1 As System.Windows.Forms.ListViewItem = New System.Windows.Forms.ListViewItem(New String() {"Name", ""}, -1, System.Drawing.SystemColors.WindowText, System.Drawing.SystemColors.Window, New System.Drawing.Font("Tahoma", 8.25!))
Dim ListViewItem2 As System.Windows.Forms.ListViewItem = New System.Windows.Forms.ListViewItem(New String() {"Icon", ""}, -1, System.Drawing.SystemColors.WindowText, System.Drawing.SystemColors.Window, New System.Drawing.Font("Tahoma", 8.25!))
Dim ListViewItem3 As System.Windows.Forms.ListViewItem = New System.Windows.Forms.ListViewItem(New String() {"Drives", ""}, -1, System.Drawing.SystemColors.WindowText, System.Drawing.SystemColors.Window, New System.Drawing.Font("Tahoma", 8.25!))
Me.OptionPanel = New System.Windows.Forms.Panel
Me.IconFrame = New System.Windows.Forms.GroupBox
Me.BrowseIcon = New System.Windows.Forms.Button
Me.IconDescription = New System.Windows.Forms.Label
Me.IconList = New System.Windows.Forms.ListView
Me.DrivesFrame = New System.Windows.Forms.GroupBox
Me.DrivesList = New System.Windows.Forms.ListBox
Me.MoveItemDown = New System.Windows.Forms.Button
Me.MoveItemUp = New System.Windows.Forms.Button
Me.AddDisk = New System.Windows.Forms.Button
Me.AddCD = New System.Windows.Forms.Button
Me.DeleteItem = New System.Windows.Forms.Button
Me.VMNameFrame = New System.Windows.Forms.GroupBox
Me.VMNameHelp = New System.Windows.Forms.Label
Me.VMName = New System.Windows.Forms.TextBox
Me.OptionList = New System.Windows.Forms.ListView
Me.Options = New System.Windows.Forms.ColumnHeader
Me.Value = New System.Windows.Forms.ColumnHeader
Me.cmdCancel = New System.Windows.Forms.Button
Me.cmdOK = New System.Windows.Forms.Button
Me.OptionPanel.SuspendLayout()
Me.IconFrame.SuspendLayout()
Me.DrivesFrame.SuspendLayout()
Me.VMNameFrame.SuspendLayout()
Me.SuspendLayout()
'
'OptionPanel
'
Me.OptionPanel.Controls.Add(Me.IconFrame)
Me.OptionPanel.Controls.Add(Me.DrivesFrame)
Me.OptionPanel.Controls.Add(Me.VMNameFrame)
Me.OptionPanel.Location = New System.Drawing.Point(371, 1)
Me.OptionPanel.Name = "OptionPanel"
Me.OptionPanel.Size = New System.Drawing.Size(373, 294)
Me.OptionPanel.TabIndex = 29
'
'IconFrame
'
Me.IconFrame.Controls.Add(Me.BrowseIcon)
Me.IconFrame.Controls.Add(Me.IconDescription)
Me.IconFrame.Controls.Add(Me.IconList)
Me.IconFrame.Location = New System.Drawing.Point(0, 3)
Me.IconFrame.Name = "IconFrame"
Me.IconFrame.Size = New System.Drawing.Size(367, 279)
Me.IconFrame.TabIndex = 3
Me.IconFrame.TabStop = False
Me.IconFrame.Text = "Icon"
'
'BrowseIcon
'
Me.BrowseIcon.Location = New System.Drawing.Point(286, 12)
Me.BrowseIcon.Name = "BrowseIcon"
Me.BrowseIcon.Size = New System.Drawing.Size(75, 23)
Me.BrowseIcon.TabIndex = 6
Me.BrowseIcon.Text = "Browse..."
Me.BrowseIcon.UseVisualStyleBackColor = True
'
'IconDescription
'
Me.IconDescription.Location = New System.Drawing.Point(6, 17)
Me.IconDescription.Name = "IconDescription"
Me.IconDescription.Size = New System.Drawing.Size(261, 18)
Me.IconDescription.TabIndex = 7
Me.IconDescription.Text = "If you want an icon that isn't in the list, click Browse."
'
'IconList
'
Me.IconList.Location = New System.Drawing.Point(9, 38)
Me.IconList.Name = "IconList"
Me.IconList.Size = New System.Drawing.Size(352, 235)
Me.IconList.TabIndex = 6
Me.IconList.UseCompatibleStateImageBehavior = False
'
'DrivesFrame
'
Me.DrivesFrame.Controls.Add(Me.DrivesList)
Me.DrivesFrame.Controls.Add(Me.MoveItemDown)
Me.DrivesFrame.Controls.Add(Me.MoveItemUp)
Me.DrivesFrame.Controls.Add(Me.AddDisk)
Me.DrivesFrame.Controls.Add(Me.AddCD)
Me.DrivesFrame.Controls.Add(Me.DeleteItem)
Me.DrivesFrame.Location = New System.Drawing.Point(0, 3)
Me.DrivesFrame.Name = "DrivesFrame"
Me.DrivesFrame.Size = New System.Drawing.Size(367, 279)
Me.DrivesFrame.TabIndex = 8
Me.DrivesFrame.TabStop = False
Me.DrivesFrame.Text = "Drives"
'
'DrivesList
'
Me.DrivesList.FormattingEnabled = True
Me.DrivesList.Items.AddRange(New Object() {"C:\Users\Usuario\Documents\ISOs\Mac OS 8.5 Spanish.iso", "C:\Users\Usuario\Documents\My Macs\Mac OS 8\Mac OS 8.dsk", "C:\Users\Usuario\Documents\My Macs\Mac OS 8\Data.dsk"})
Me.DrivesList.Location = New System.Drawing.Point(3, 17)
Me.DrivesList.Name = "DrivesList"
Me.DrivesList.Size = New System.Drawing.Size(358, 186)
Me.DrivesList.TabIndex = 6
'
'MoveItemDown
'
Me.MoveItemDown.Enabled = False
Me.MoveItemDown.Location = New System.Drawing.Point(328, 213)
Me.MoveItemDown.Name = "MoveItemDown"
Me.MoveItemDown.Size = New System.Drawing.Size(33, 23)
Me.MoveItemDown.TabIndex = 5
Me.MoveItemDown.Text = "\/"
Me.MoveItemDown.UseVisualStyleBackColor = True
'
'MoveItemUp
'
Me.MoveItemUp.Enabled = False
Me.MoveItemUp.Location = New System.Drawing.Point(294, 213)
Me.MoveItemUp.Name = "MoveItemUp"
Me.MoveItemUp.Size = New System.Drawing.Size(33, 23)
Me.MoveItemUp.TabIndex = 4
Me.MoveItemUp.Text = "/\"
Me.MoveItemUp.UseVisualStyleBackColor = True
'
'AddDisk
'
Me.AddDisk.Location = New System.Drawing.Point(6, 213)
Me.AddDisk.Name = "AddDisk"
Me.AddDisk.Size = New System.Drawing.Size(56, 23)
Me.AddDisk.TabIndex = 3
Me.AddDisk.Text = "Add disk"
Me.AddDisk.UseVisualStyleBackColor = True
'
'AddCD
'
Me.AddCD.Location = New System.Drawing.Point(68, 213)
Me.AddCD.Name = "AddCD"
Me.AddCD.Size = New System.Drawing.Size(56, 23)
Me.AddCD.TabIndex = 2
Me.AddCD.Text = "Add CD"
Me.AddCD.UseVisualStyleBackColor = True
'
'DeleteItem
'
Me.DeleteItem.Location = New System.Drawing.Point(130, 213)
Me.DeleteItem.Name = "DeleteItem"
Me.DeleteItem.Size = New System.Drawing.Size(90, 23)
Me.DeleteItem.TabIndex = 1
Me.DeleteItem.Text = "Delete selected"
Me.DeleteItem.UseVisualStyleBackColor = True
'
'VMNameFrame
'
Me.VMNameFrame.Controls.Add(Me.VMNameHelp)
Me.VMNameFrame.Controls.Add(Me.VMName)
Me.VMNameFrame.Location = New System.Drawing.Point(0, 3)
Me.VMNameFrame.Name = "VMNameFrame"
Me.VMNameFrame.Size = New System.Drawing.Size(367, 279)
Me.VMNameFrame.TabIndex = 4
Me.VMNameFrame.TabStop = False
Me.VMNameFrame.Text = "Name"
'
'VMNameHelp
'
Me.VMNameHelp.Location = New System.Drawing.Point(6, 17)
Me.VMNameHelp.Name = "VMNameHelp"
Me.VMNameHelp.Size = New System.Drawing.Size(363, 18)
Me.VMNameHelp.TabIndex = 7
Me.VMNameHelp.Text = "Do you want a change? Why not start with the name?"
'
'VMName
'
Me.VMName.Location = New System.Drawing.Point(9, 38)
Me.VMName.Name = "VMName"
Me.VMName.Size = New System.Drawing.Size(352, 20)
Me.VMName.TabIndex = 6
'
'OptionList
'
Me.OptionList.Columns.AddRange(New System.Windows.Forms.ColumnHeader() {Me.Options, Me.Value})
Me.OptionList.FullRowSelect = True
Me.OptionList.HeaderStyle = System.Windows.Forms.ColumnHeaderStyle.Nonclickable
Me.OptionList.Items.AddRange(New System.Windows.Forms.ListViewItem() {ListViewItem1, ListViewItem2, ListViewItem3})
Me.OptionList.Location = New System.Drawing.Point(12, 11)
Me.OptionList.Name = "OptionList"
Me.OptionList.Size = New System.Drawing.Size(353, 376)
Me.OptionList.TabIndex = 28
Me.OptionList.UseCompatibleStateImageBehavior = False
Me.OptionList.View = System.Windows.Forms.View.Details
'
'Options
'
Me.Options.Text = "Options"
Me.Options.Width = 173
'
'Value
'
Me.Value.Text = "Value"
Me.Value.Width = 176
'
'cmdCancel
'
Me.cmdCancel.BackColor = System.Drawing.SystemColors.Control
Me.cmdCancel.Cursor = System.Windows.Forms.Cursors.Default
Me.cmdCancel.DialogResult = System.Windows.Forms.DialogResult.Cancel
Me.cmdCancel.ForeColor = System.Drawing.SystemColors.ControlText
Me.cmdCancel.Location = New System.Drawing.Point(665, 366)
Me.cmdCancel.Name = "cmdCancel"
Me.cmdCancel.RightToLeft = System.Windows.Forms.RightToLeft.No
Me.cmdCancel.Size = New System.Drawing.Size(73, 22)
Me.cmdCancel.TabIndex = 27
Me.cmdCancel.Text = "Cancel"
Me.cmdCancel.UseVisualStyleBackColor = True
'
'cmdOK
'
Me.cmdOK.BackColor = System.Drawing.SystemColors.Control
Me.cmdOK.Cursor = System.Windows.Forms.Cursors.Default
Me.cmdOK.ForeColor = System.Drawing.SystemColors.ControlText
Me.cmdOK.Location = New System.Drawing.Point(585, 366)
Me.cmdOK.Name = "cmdOK"
Me.cmdOK.RightToLeft = System.Windows.Forms.RightToLeft.No
Me.cmdOK.Size = New System.Drawing.Size(73, 22)
Me.cmdOK.TabIndex = 26
Me.cmdOK.Text = "OK"
Me.cmdOK.UseVisualStyleBackColor = True
'
'frmSettingsvMacVM
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(750, 400)
Me.Controls.Add(Me.OptionPanel)
Me.Controls.Add(Me.OptionList)
Me.Controls.Add(Me.cmdCancel)
Me.Controls.Add(Me.cmdOK)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.MaximizeBox = False
Me.MinimizeBox = False
Me.Name = "frmSettingsvMacVM"
Me.Text = "Settings for %s"
Me.OptionPanel.ResumeLayout(False)
Me.IconFrame.ResumeLayout(False)
Me.DrivesFrame.ResumeLayout(False)
Me.VMNameFrame.ResumeLayout(False)
Me.VMNameFrame.PerformLayout()
Me.ResumeLayout(False)
End Sub
Friend WithEvents OptionPanel As System.Windows.Forms.Panel
Friend WithEvents IconFrame As System.Windows.Forms.GroupBox
Friend WithEvents BrowseIcon As System.Windows.Forms.Button
Friend WithEvents IconDescription As System.Windows.Forms.Label
Friend WithEvents IconList As System.Windows.Forms.ListView
Friend WithEvents DrivesFrame As System.Windows.Forms.GroupBox
Friend WithEvents DrivesList As System.Windows.Forms.ListBox
Friend WithEvents MoveItemDown As System.Windows.Forms.Button
Friend WithEvents MoveItemUp As System.Windows.Forms.Button
Friend WithEvents AddDisk As System.Windows.Forms.Button
Friend WithEvents AddCD As System.Windows.Forms.Button
Friend WithEvents DeleteItem As System.Windows.Forms.Button
Friend WithEvents VMNameFrame As System.Windows.Forms.GroupBox
Friend WithEvents VMNameHelp As System.Windows.Forms.Label
Friend WithEvents VMName As System.Windows.Forms.TextBox
Friend WithEvents OptionList As System.Windows.Forms.ListView
Friend WithEvents Options As System.Windows.Forms.ColumnHeader
Friend WithEvents Value As System.Windows.Forms.ColumnHeader
Public WithEvents cmdCancel As System.Windows.Forms.Button
Public WithEvents cmdOK As System.Windows.Forms.Button
End Class

120
frmSettingsvMacVM.resx Normal file
View File

@ -0,0 +1,120 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
</root>

14
frmSettingsvMacVM.vb Normal file
View File

@ -0,0 +1,14 @@
Public Class frmSettingsvMacVM
Private Sub frmSettingsvMacVM_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
End Sub
Public Sub Settings(ByVal File As String)
End Sub
Public Sub LoadSettiings()
End Sub
End Class

104
frmSplash.Designer.vb generated Normal file
View File

@ -0,0 +1,104 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> Partial Class frmSplash
#Region "Windows Form Designer generated code "
<System.Diagnostics.DebuggerNonUserCode()> Public Sub New()
MyBase.New()
'This call is required by the Windows Form Designer.
InitializeComponent()
End Sub
'Form overrides dispose to clean up the component list.
<System.Diagnostics.DebuggerNonUserCode()> Protected Overloads Overrides Sub Dispose(ByVal Disposing As Boolean)
If Disposing Then
If Not components Is Nothing Then
components.Dispose()
End If
End If
MyBase.Dispose(Disposing)
End Sub
'Required by the Windows Form Designer
Private components As System.ComponentModel.IContainer
Public WithEvents Mac As System.Windows.Forms.Label
Public WithEvents Starting As System.Windows.Forms.Label
Public WithEvents Virtual As System.Windows.Forms.Label
'NOTE: The following procedure is required by the Windows Form Designer
'It can be modified using the Windows Form Designer.
'Do not modify it using the code editor.
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmSplash))
Me.Mac = New System.Windows.Forms.Label()
Me.Starting = New System.Windows.Forms.Label()
Me.Virtual = New System.Windows.Forms.Label()
Me.Version = New System.Windows.Forms.Label()
Me.ProgressBar = New System.Windows.Forms.ProgressBar()
Me.SuspendLayout()
'
'Mac
'
resources.ApplyResources(Me.Mac, "Mac")
Me.Mac.BackColor = System.Drawing.Color.Transparent
Me.Mac.Cursor = System.Windows.Forms.Cursors.WaitCursor
Me.Mac.ForeColor = System.Drawing.Color.FromArgb(CType(CType(58, Byte), Integer), CType(CType(108, Byte), Integer), CType(CType(192, Byte), Integer))
Me.Mac.Name = "Mac"
Me.Mac.UseWaitCursor = True
'
'Starting
'
resources.ApplyResources(Me.Starting, "Starting")
Me.Starting.BackColor = System.Drawing.Color.Transparent
Me.Starting.Cursor = System.Windows.Forms.Cursors.WaitCursor
Me.Starting.ForeColor = System.Drawing.SystemColors.ControlText
Me.Starting.Name = "Starting"
Me.Starting.UseWaitCursor = True
'
'Virtual
'
resources.ApplyResources(Me.Virtual, "Virtual")
Me.Virtual.BackColor = System.Drawing.Color.Transparent
Me.Virtual.Cursor = System.Windows.Forms.Cursors.WaitCursor
Me.Virtual.ForeColor = System.Drawing.SystemColors.ControlText
Me.Virtual.Name = "Virtual"
Me.Virtual.UseWaitCursor = True
'
'Version
'
resources.ApplyResources(Me.Version, "Version")
Me.Version.BackColor = System.Drawing.Color.White
Me.Version.ForeColor = System.Drawing.Color.Silver
Me.Version.Name = "Version"
Me.Version.UseWaitCursor = True
'
'ProgressBar
'
resources.ApplyResources(Me.ProgressBar, "ProgressBar")
Me.ProgressBar.ForeColor = System.Drawing.SystemColors.MenuBar
Me.ProgressBar.Name = "ProgressBar"
Me.ProgressBar.Step = 5
Me.ProgressBar.Style = System.Windows.Forms.ProgressBarStyle.Marquee
Me.ProgressBar.UseWaitCursor = True
Me.ProgressBar.Value = 20
'
'frmSplash
'
resources.ApplyResources(Me, "$this")
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer))
Me.ControlBox = False
Me.Controls.Add(Me.ProgressBar)
Me.Controls.Add(Me.Version)
Me.Controls.Add(Me.Mac)
Me.Controls.Add(Me.Starting)
Me.Controls.Add(Me.Virtual)
Me.ForeColor = System.Drawing.Color.Black
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
Me.MaximizeBox = False
Me.MinimizeBox = False
Me.Name = "frmSplash"
Me.ShowInTaskbar = False
Me.UseWaitCursor = True
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents Version As System.Windows.Forms.Label
Friend WithEvents ProgressBar As System.Windows.Forms.ProgressBar
#End Region
End Class

322
frmSplash.es-MX.resx Normal file
View File

@ -0,0 +1,322 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="Starting.Text" xml:space="preserve">
<value>Arrancando...</value>
</data>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="$this.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAaYAAAFDCAIAAAD+mj1lAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAEvNJREFUeF7t3YtV
48gSgGFS2BQ2BVLYFEiBFCaFSYEUJgVSIIVJgRS4zZjLGAmQLEv9qPp05uzeWdvqrr/K/63Wyzc3NgQQ
QCAVgRcbAgggEJ3A8/Pzm9hLpL9tCCCAQGgCv379orzQGRYcAgicEaA85YAAAokIUF6iZAsVAQQoTw0g
gEAiApSXKNlCRQABylMDCCCQiADlJUq2UBFAgPLUAAIIJCJAeYmSLVQEEKA8NYAAAokIUF6iZAsVAQQo
Tw0ggEAiApSXKNlCRQABylMDCCCQiADlJUq2UBFAgPLUAAIIJCJAeYmSLVQEEKA8NYAAAokIUF6iZAsV
AQQoTw0ggEAiApSXKNlCRQABylMDCCCQiADlJUq2UBFAoLbyyng2BBBAYEKgmosbKO/td3P9CwEEEPg/
gZeXlzrWa6O8Ep4NAQQQOBEo3qM8xYAAAlkIUF6WTIsTAQR0eWoAAQRyEdDl5cq3aBFIToDykheA8BHI
RYDycuVbtAgkJ0B5yQtA+AjkIkB5ufItWgSSE6C85AUgfARyEaC8XPkWLQLJCVBe8gIQPgK5CFBernyL
FoHkBCgveQEIH4FcBCgvV75Fi0ByApSXvACEj0AuApSXK9+iRSA5AcpLXgDC/4TA4+MjLlEJUF7UzIpr
I4GfP3+Wb8X9/f3z8/PGXfhYxwQor+PkmFp1An9/rODm5r///iu/kFB9CgY8lgDlHcvX3gci8PT09M8/
/5z/Ks6///7LegNlcM1UKW8NJe+JT6CorQhu8itglrfxEk958XIqoosJlMN2ZRk78V35LxfvyAe6J0B5
3afIBI8n8OPHj4nvLGmPp95mBMprw92o/RA4P2VxEl85oleO6/UzQzPZkQDl7QjTrsYjUJa080N4Dw8P
40VixusIUN46Tt4VlMDd3d38lEXQWIX1SoDy1EFeAqerjs+329tbVyDHLgjKi51f0X1JoBytm/jOIbwM
5UJ5GbIsximB0sqVhm6iPIfwMhQK5WXIshinBOZL2nLVMUwZCFBehiyL8QOB+ZK2nLTFKAkBykuS6GPD
vL1/ur9/GuWf86tSyqXI5eq8+4eXtv88Nkn2/ocA5SmEHQgM5Lvb24f5jWVtTfc++g6ZsIslApS3RMjr
KwiM0t+VeU6elVL+2onvSo9pq0CA8ipAjj/EKF3efElbzmM0X8/q8mp+QyivJu2wYw3R5X26pO3Hd7q8
Ol8PyqvDOfgoQ3R5kyVtKf2ufFd6veBV0kd4lNdHHgafxQBd3uysRbm7tp+jeKeZ2CoQoLwKkOMP0X+X
1/NZC8fyan5DKK8m7bBjdd7lzY/ilQvxelvV6vLqfD0orw7n4KN03uXNf8SnQ985llfnS0J5dTgHH6Xr
Lm/2+IBO7rWYH0kMXiV9hEd5feRh8Fn03OVNWrzyAJXezlo4llez/CmvJu2wY3Xb5c2P4pUnRPW5qnUs
r87Xg/LqcA4+Srdd3qTFK7/T2K3vHMur8yWhvDqcg4+ye5d3c1Me0f7hzxarzq7F23AUb/IMgvLX49bF
waukj/Aor488DD6LLT769nlTc+VtsOouR/HmyjuuTxy8CsaYPuWNkafOZ7nBR99b8voub34Ub9sTBHR5
ndfepdOjvEuJef8nBDrs8iYPTSl/3dad6fKCVTzlBUtom3C66/JmR/HKT1tsOwany2tTUoeNSnmHoc20
4966vMmvl5UWb5vvyqd0ecEKmfKCJbRNOL11eZMTF+WhKdtWteVTurw2JXXYqJR3GNpMO+6ry5uvaq/4
HR9dXrBCprxgCW0TTldd3uTExZV3mOny2pTUYaNS3mFoM+24qy5vIqlt16a8H/vT5QUrZMoLltA24XTU
5X1c1ZaDepuP4p2sp8trU1KHjUp5h6HNtON+urzJqrbcVLv5XO3Jlbq8YIVMecES2iacfrq8ybnaK1e1
urw29XTkqJR3JN00+969y9vo0L1XtVd2iJeuqdPUS8tAKa8l/TBjbzTUt08W2LDPfc/VVvad5+XV+TpQ
Xh3OwUfppMubrGr7/E2fb0wavEr6CI/y+sjD4LPY0JHtb8ldr0C+dE26y/sHr4Ixpk95Y+Sp81nu76/L
17yTp0Vdc1/tLv7asC7uPMsxpkd5MfLYOIoeurzJgbxr7qvdYKtdLNk4izmGp7wceT44yh66vPmBvFbm
2jzuwVmy+1cClKcOdiDQvMubPwN5s3d26de2jb5DJuxiiQDlLRHy+goC7bu8j+cuNj8DuaHv/MLZikLb
4S2UtwNEu+igy7s9vzPs+vvMmrhPIVUgQHkVIMcfonmXNzl3MdwVeSfDxi+UDiKkvA6SMP4Umnd5Ac5d
uPuizveA8upwDj5K8y7vfFVb9Lft7EHzTwWvkj7Co7w+8jD4LBp3eSHOXejy6nwJKK8O5+CjtO3yJleo
XPnk94a9XvAq6SM8yusjD4PPonWX9+F07Yj3XZw8a6tAgPIqQI4/RNsub36rWcNO7ZqrW+IXSgcRUl4H
SRh/Cm27vInyrn8Scitjjl8IA0RAeQMkqf8ptu3yYlyh4rq8OnVOeXU4Bx+lbZc3Ud78B3rW/5e2HWLw
KukjPMrrIw+Dz6KrLm+94Gr+etmaY3yDV8EY06e8MfLU+SxjdHnNr27pPMsxpkd5MfLYOIq2Xd41bd35
Z+/L9ude11b/bJzFHMNTXo48Hxxl2y5vL+WVhxE09J3r8g4u0rfdU14dzsFHadvlbRt9cs9GD3fmBq+S
PsKjvD7yMPgs2nZ5G0fv787cwatgjOlT3hh56nyW2/qstp+adHk9PFW08yzHmB7lxchj4yg29lmX/3Lj
jpbs8KmijbOYY3jKy5Hng6Pc0UTV7NnhPRsHZ8nuXwlQnjrYgUA1T+3o1sl53rbnaj1JZYcqXLcLylvH
ybu+JbDdRLcP5ZhaA2N+PHdROr69rsUrj67afNeaKqtAgPIqQI4/xEZnvXrnZ/nzar3bh+3evPyY4OTc
RTmud32XVy5kPi2WN1/vEr9QOoiQ8jpIwvhT2Gark+/O/9Tr+D52eeV07eYur/R05U61yTJ5m0PHL4QB
IqC8AZLU/xQ3dHl/+qyp8t7/y9Huu/4KlYeHhyLKyWnfc/FtuOql/0QHmCHlBUhi+xA2dHnf+K5G3/ex
L1v/7PjS0xWXrXlc1fp9vq+p2ycywQwoL0GSjw9xQ5f3ask/h/BWue/27c1loI1jfTzet/7Z8cVxRV6n
hm6N6co3qry59IAbVsrHJ8oILlJRA3sQ2NDlvZtrrfXOV8HvBtx6tvfT65CLp8qTBcpWnHWR407r2dfT
vtc9i2WPVNjHAgFdnhLZgcAundcW933lwdO1L1//mfRr5a8rO7j5U1vKB1/PftzfX3/Od4dM2MUSAcpb
IuT1FQSu6fKmn12/2v367MeKxfK1T5za0XSO5a0osd3eQnm7ocy8o126vLk3X/u+26cV/vryzO/Xn92i
vKK5siIuh/YOerJe5hKqFjvlVUMdeaA9u7zPrit+PWtx6v52M+Ba5RXHlXXrNfdUrD+PEblEuomN8rpJ
xcgTOajL+8qk7wa8woNT5RW1nexWttNJjG1nXa85ojdyCQwzd8obJlU9T/ToLm/b/tefvrjyTOv6Pu77
d/ac4jBzo7wwqWwZSOUub5sBzz81uUWsrFuv6c72+mzLFKYZm/LSpPrIQK93UO09bL37Yi+7fbqfI1Nk
328EKE8p7EBgwC6v3PXxd9twP+wR7tshE3axRIDylgh5fQWB2j3a5U+Lml/9d668ss7d63jcNftZQdpb
riVAedcS9PlCYPQub9uznq6x26efVUsVCFBeBcjxhxi9y9vxqcjXeDB+oXQQIeV1kITxpzBcl1ccPbmp
9ohjc5fuc/xCGCACyhsgSf1Pcbwub6a8g+4hu8h6/Sc6wAwpL0AS24cwYpfnd2zb102LGVBeC+rhxhyx
y5tcjdzDdSrh6qLHgCivx6wMN6cRu7z5j5xdc+Zhl88Ol/cRJ0x5I2atuzmP2eV9uBp58y8xXnS0zj22
zWuX8pqnIMIEhuzy+juDEaEUuo+B8rpP0QgTHLHLK3Oe/+jPLuvTzX3fCKkefo6UN3wKewhg0C5vfjhv
s612cWUPqQw/B8oLn2IBfkng8fFx8qTQojy8YhOgvNj5Fd13BJ6fnydr2/KrtZDFJkB5sfMrugUC5XnI
k6dIQRabAOXFzq/oFgjM17ZPT0+oBSZAeYGTK7RlAvO1bbnZdvlj3jEsAcobNnUmvhOB4rjztW05ulc8
uNO+7aY7ApTXXUpMqDIB520rA287HOW15W/09gRKTzd/xED7aZnBMQQo7xiu9joUgXJtyuQCPScxhkrg
BZOlvAtgeWtUAr9//548JLlcvBI12ORxUV7yAhD+G4HJBXrli6HRC1kclBcyrYK6mEAR3GRte3d3d/Fe
fKB7ApTXfYpMsBaB4rhz65W/ulqlFvt641BePdZG6pzA+9UqRXblf/Nd5/naNj3K28bNp2ISeHh4KLKL
GZuo/hCgPIWAAAKJCFBeomQLFQEEKE8NIIBAIgKUlyjZQkUAAcpTAwggkIgA5SVKtlARQIDy1AACCCQi
QHmJki1UBBCgPDWAAAKJCFBeomQLFQEEKE8NIIBAIgKUlyjZQkUAAcpTAwggkIgA5SVKtlARQIDy1AAC
CCQiQHmJki1UBBCgPDWAAAKJCFBeomQLFQEEKE8NIIBAIgKUlyjZQkUAAcpTAwggkIgA5SVKtlARQIDy
1AACCCQiQHmJki1UBBCgPDWAAAKJCFBeomQLFQEEKE8NIIBAIgKUlyjZQkUAAcpTAwggkIgA5SVKtlAR
QIDy1AACCCQiQHmJki1UBBCgPDWAAAKJCFBeomQLFQEEKE8NIIBAIgKUlyjZQkUAAcpTAwggkIgA5SVK
tlARQIDy1AACCCQiQHmJki1UBBCgPDWAAAKJCFBeomQLFQEEKE8NIIBAIgKUlyjZQkUAAcpTAwggkIgA
5SVKtlARQIDy1AACCCQiQHmJki1UBBCgPDWAAAKJCFBeomQLFQEEKE8NIIBAIgKUlyjZQkUAAcpTAwgg
kIgA5SVKtlARQIDy1AACCCQiQHmJki1UBBCgPDWAAAKJCFBeomQLFQEEKE8NIIBAIgKUlyjZQkUAAcpT
AwggkIgA5SVKtlARQIDy1AACCCQiQHmJki1UBBCgPDWAAAKJCFBeomQLFQEEKE8NIIBAIgKUlyjZQkUA
AcpTAwggkIgA5SVKtlARQIDy1AACCCQiQHmJki1UBBCgPDWAAAKJCFBeomQLFQEEKE8NIIBAIgKUlyjZ
QkUAAcpTAwggkIgA5SVKtlARQIDy1AACCCQiQHmJki1UBBCgPDWAAAKJCFBeomQLFQEEKE8NIIBAIgKU
lyjZQkUAAcpTAwggkIgA5SVKtlARQIDy1AACCCQiQHmJki1UBBCIr7wSoQ0BBBB4J1C8/7vK9uvXr7dB
qw3p/9MQQACBOYEqxvvdQHl1AjMKAgggMCdAeaoCAQQSEaC8RMkWKgIIUJ4aQACBRAQoL1GyhYoAApSn
BhBAIBEBykuUbKEigADlqQEEEEhEgPISJVuoCCBAeWoAAQQSEaC8RMkWKgIIUJ4aQACBRAQoL1GyhYoA
ApSnBhBAIBEBykuUbKEigADlqQEEEEhEgPISJVuoCCBAeWoAAQQSEaC8RMkWKgIIUJ4aQACBRAQoL1Gy
hYoAApSnBhBAIBEBykuUbKEigADlqQEEEEhEgPISJVuoCCBAeWoAAQQSEaC8RMkWKgIIUJ4aQACBRAQo
L1GyhYoAApSnBhBAIBEBykuUbKEigADlqQEEEEhEgPISJVuoCCBAeWoAAQQSEaC8RMkWKgIIUJ4aQACB
RAQoL1GyhYoAApSnBhBAIBEBykuUbKEigADlqQEEEEhEgPI6SnZJhi02gY6qLetUKK+jzP9Nxo0tJoGX
l5eOCi7lVCivo7SXZNzd3f20RSTw+PhYLE55zb9vlNc8BX8n8K688vWwBSNQ0kx5PXzZKK+HLLzNgfKC
ae48HMrr5JtGeZ0k4nUalEd5HZVj0KlQXkeJpTzK66gcg06F8jpKLOVRXkflGHQqlNdRYimP8joqx6BT
obyOEkt5lNdROQadCuV1lFjKo7yOyjHoVCivo8S+K6+jOZnKfgRcl7cfy+17orzt7Hb/pBvOYt5ldhaV
uy92/9ZcukPKu5TYse8vXwlbbALHFpC9LxGgvCVCXkcAgUAEKC9QMoWCAAJLBChviZDXEUAgEAHKC5RM
oSCAwBIBylsi5HUEEAhEgPICJVMoCCCwRIDylgh5HQEEAhGgvEDJFAoCCCwRoLwlQl5HAIFABCgvUDKF
ggACSwQob4mQ1xFAIBAByguUTKEggMASAcpbIuR1BBAIRIDyAiVTKAggsESA8pYIeR0BBAIRoLxAyRQK
AggsEaC8JUJeRwCBQAT+Ku/5+bn8xYYAAgjEJhD+9wYEiAACCHwg8D+ly8wEQqLt5QAAAABJRU5ErkJg
gg==
</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAMAEBAQAAAAAAAoAQAANgAAACAgAAAAAAAAqAgAAF4BAAAwMAAAAAAAAKgOAAAGCgAAKAAAABAA
AAAgAAAAAQAEAAAAAADAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAAIAAAACAgACAAAAAgACAAICA
AADAwMAAgICAAAAA/wAA/wAAAP//AP8AAAD/AP8A//8AAP///wAAAAd3d3AAAAAAAHd3AAAAAAAAd3cA
AAB3d3d4d3d3d3d3d3d3d3d3AAAAAAAAAAAIiIiIiIiIgAiIiIiIiIiACIiIiIiIiIAIiIiIiIiIgAiI
iIiIiIiACIiIiIiIiIAIiIiIiIiIgAiIiIiIiIiACIiIiIiIiIAAAAAAAAAAAPgfAAD8PwAA/D8AAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAoAAAAIAAAAEAA
AAABAAgAAAAAAIAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAgAAAAICAAIAAAACAAIAAgIAAAMDA
wADA3MAA8MqmAAQEBAAICAgADAwMABEREQAWFhYAHBwcACIiIgApKSkAVVVVAE1NTQBCQkIAOTk5AIB8
/wBQUP8AkwDWAP/szADG1u8A1ufnAJCprQAAADMAAABmAAAAmQAAAMwAADMAAAAzMwAAM2YAADOZAAAz
zAAAM/8AAGYAAABmMwAAZmYAAGaZAABmzAAAZv8AAJkAAACZMwAAmWYAAJmZAACZzAAAmf8AAMwAAADM
MwAAzGYAAMyZAADMzAAAzP8AAP9mAAD/mQAA/8wAMwAAADMAMwAzAGYAMwCZADMAzAAzAP8AMzMAADMz
MwAzM2YAMzOZADMzzAAzM/8AM2YAADNmMwAzZmYAM2aZADNmzAAzZv8AM5kAADOZMwAzmWYAM5mZADOZ
zAAzmf8AM8wAADPMMwAzzGYAM8yZADPMzAAzzP8AM/8zADP/ZgAz/5kAM//MADP//wBmAAAAZgAzAGYA
ZgBmAJkAZgDMAGYA/wBmMwAAZjMzAGYzZgBmM5kAZjPMAGYz/wBmZgAAZmYzAGZmZgBmZpkAZmbMAGaZ
AABmmTMAZplmAGaZmQBmmcwAZpn/AGbMAABmzDMAZsyZAGbMzABmzP8AZv8AAGb/MwBm/5kAZv/MAMwA
/wD/AMwAmZkAAJkzmQCZAJkAmQDMAJkAAACZMzMAmQBmAJkzzACZAP8AmWYAAJlmMwCZM2YAmWaZAJlm
zACZM/8AmZkzAJmZZgCZmZkAmZnMAJmZ/wCZzAAAmcwzAGbMZgCZzJkAmczMAJnM/wCZ/wAAmf8zAJnM
ZgCZ/5kAmf/MAJn//wDMAAAAmQAzAMwAZgDMAJkAzADMAJkzAADMMzMAzDNmAMwzmQDMM8wAzDP/AMxm
AADMZjMAmWZmAMxmmQDMZswAmWb/AMyZAADMmTMAzJlmAMyZmQDMmcwAzJn/AMzMAADMzDMAzMxmAMzM
mQDMzMwAzMz/AMz/AADM/zMAmf9mAMz/mQDM/8wAzP//AMwAMwD/AGYA/wCZAMwzAAD/MzMA/zNmAP8z
mQD/M8wA/zP/AP9mAAD/ZjMAzGZmAP9mmQD/ZswAzGb/AP+ZAAD/mTMA/5lmAP+ZmQD/mcwA/5n/AP/M
AAD/zDMA/8xmAP/MmQD/zMwA/8z/AP//MwDM/2YA//+ZAP//zABmZv8AZv9mAGb//wD/ZmYA/2b/AP//
ZgAhAKUAX19fAHd3dwCGhoYAlpaWAMvLywCysrIA19fXAN3d3QDj4+MA6urqAPHx8QD4+PgA8Pv/AKSg
oACAgIAAAAD/AAD/AAAA//8A/wAAAP8A/wD//wAA////AAoKCgoKCgoKCgoKBwcHBwcHBwcHBwoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoHBwcHBwcHBwoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcH
BwcKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHCgcHBwcHBwcHBwcHBwcH
B+zsBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH7OwHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoK
EhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhIS
CgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoKEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKChISEhISEhISEhISEhISEhISEhIS
EhISEhISEhIKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhIS
EhISEhISEhISEhISCgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoKEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKChISEhISEhIS
EhISEhISEhISEhISEhISEhISEhIKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhIS
EhISEhISEhISEhISEhISEhISEhISEhISCgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoK
EhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhIS
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgr/4Af///AP///wD///8A////AP/4AA
AAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAAAB/////ygAAAAwAAAAYAAAAAEA
CAAAAAAAgAoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAACAAAAAgIAAgAAAAIAAgACAgAAAwMDAAMDc
wADwyqYABAQEAAgICAAMDAwAERERABYWFgAcHBwAIiIiACkpKQBVVVUATU1NAEJCQgA5OTkAgHz/AFBQ
/wCTANYA/+zMAMbW7wDW5+cAkKmtAAAAMwAAAGYAAACZAAAAzAAAMwAAADMzAAAzZgAAM5kAADPMAAAz
/wAAZgAAAGYzAABmZgAAZpkAAGbMAABm/wAAmQAAAJkzAACZZgAAmZkAAJnMAACZ/wAAzAAAAMwzAADM
ZgAAzJkAAMzMAADM/wAA/2YAAP+ZAAD/zAAzAAAAMwAzADMAZgAzAJkAMwDMADMA/wAzMwAAMzMzADMz
ZgAzM5kAMzPMADMz/wAzZgAAM2YzADNmZgAzZpkAM2bMADNm/wAzmQAAM5kzADOZZgAzmZkAM5nMADOZ
/wAzzAAAM8wzADPMZgAzzJkAM8zMADPM/wAz/zMAM/9mADP/mQAz/8wAM///AGYAAABmADMAZgBmAGYA
mQBmAMwAZgD/AGYzAABmMzMAZjNmAGYzmQBmM8wAZjP/AGZmAABmZjMAZmZmAGZmmQBmZswAZpkAAGaZ
MwBmmWYAZpmZAGaZzABmmf8AZswAAGbMMwBmzJkAZszMAGbM/wBm/wAAZv8zAGb/mQBm/8wAzAD/AP8A
zACZmQAAmTOZAJkAmQCZAMwAmQAAAJkzMwCZAGYAmTPMAJkA/wCZZgAAmWYzAJkzZgCZZpkAmWbMAJkz
/wCZmTMAmZlmAJmZmQCZmcwAmZn/AJnMAACZzDMAZsxmAJnMmQCZzMwAmcz/AJn/AACZ/zMAmcxmAJn/
mQCZ/8wAmf//AMwAAACZADMAzABmAMwAmQDMAMwAmTMAAMwzMwDMM2YAzDOZAMwzzADMM/8AzGYAAMxm
MwCZZmYAzGaZAMxmzACZZv8AzJkAAMyZMwDMmWYAzJmZAMyZzADMmf8AzMwAAMzMMwDMzGYAzMyZAMzM
zADMzP8AzP8AAMz/MwCZ/2YAzP+ZAMz/zADM//8AzAAzAP8AZgD/AJkAzDMAAP8zMwD/M2YA/zOZAP8z
zAD/M/8A/2YAAP9mMwDMZmYA/2aZAP9mzADMZv8A/5kAAP+ZMwD/mWYA/5mZAP+ZzAD/mf8A/8wAAP/M
MwD/zGYA/8yZAP/MzAD/zP8A//8zAMz/ZgD//5kA///MAGZm/wBm/2YAZv//AP9mZgD/Zv8A//9mACEA
pQBfX18Ad3d3AIaGhgCWlpYAy8vLALKysgDX19cA3d3dAOPj4wDq6uoA8fHxAPj4+ADw+/8ApKCgAICA
gAAAAP8AAP8AAAD//wD/AAAA/wD/AP//AAD///8ACgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHBwcH
BwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgcHBwcHBwcHBwcHBwcHBwcKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
BwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcH
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoHBwcH
BwcHBwcHBwcHBwcHBwcHBwfs7AcHBwcHBwcHBwcHBwcHBwcHBwcHBwoKCgcHBwcHBwcHBwcHBwcHBwcH
BwcHB+zs7OwHBwcHBwcHBwcHBwcHBwcHBwcHBwcKBwcHBwcHBwcHBwcHBwcHBwcHBwcHB+zs7OwHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHB+zs7OwHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK//4AAH//
AAD//wAA//8AAP//wAP//wAA///AA///AAD//8AD//8AAP//wAP//wAA///AA///AAD//8AD//8AAMAA
AAAAAwAAgAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAAAAB
AADAAAAAAAMAAP///////wAA
</value>
</data>
</root>

504
frmSplash.resx Normal file
View File

@ -0,0 +1,504 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="Virtual.Font" type="System.Drawing.Font, System.Drawing">
<value>David, 48pt</value>
</data>
<data name="Starting.Location" type="System.Drawing.Point, System.Drawing">
<value>154, 272</value>
</data>
<assembly alias="mscorlib" name="mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
<data name="Starting.TabIndex" type="System.Int32, mscorlib">
<value>1</value>
</data>
<assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
<data name="$this.StartPosition" type="System.Windows.Forms.FormStartPosition, System.Windows.Forms">
<value>CenterScreen</value>
</data>
<data name="$this.AutoScaleDimensions" type="System.Drawing.SizeF, System.Drawing">
<value>20, 45</value>
</data>
<data name="Mac.Font" type="System.Drawing.Font, System.Drawing">
<value>David, 48pt</value>
</data>
<data name="Virtual.TabIndex" type="System.Int32, mscorlib">
<value>0</value>
</data>
<data name="&gt;&gt;Starting.ZOrder" xml:space="preserve">
<value>3</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAMAEBAQAAAAAAAoAQAANgAAACAgAAAAAAAAqAgAAF4BAAAwMAAAAAAAAKgOAAAGCgAAKAAAABAA
AAAgAAAAAQAEAAAAAADAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAAIAAAACAgACAAAAAgACAAICA
AADAwMAAgICAAAAA/wAA/wAAAP//AP8AAAD/AP8A//8AAP///wAAAAd3d3AAAAAAAHd3AAAAAAAAd3cA
AAB3d3d4d3d3d3d3d3d3d3d3AAAAAAAAAAAIiIiIiIiIgAiIiIiIiIiACIiIiIiIiIAIiIiIiIiIgAiI
iIiIiIiACIiIiIiIiIAIiIiIiIiIgAiIiIiIiIiACIiIiIiIiIAAAAAAAAAAAPgfAAD8PwAA/D8AAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAoAAAAIAAAAEAA
AAABAAgAAAAAAIAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAgAAAAICAAIAAAACAAIAAgIAAAMDA
wADA3MAA8MqmAAQEBAAICAgADAwMABEREQAWFhYAHBwcACIiIgApKSkAVVVVAE1NTQBCQkIAOTk5AIB8
/wBQUP8AkwDWAP/szADG1u8A1ufnAJCprQAAADMAAABmAAAAmQAAAMwAADMAAAAzMwAAM2YAADOZAAAz
zAAAM/8AAGYAAABmMwAAZmYAAGaZAABmzAAAZv8AAJkAAACZMwAAmWYAAJmZAACZzAAAmf8AAMwAAADM
MwAAzGYAAMyZAADMzAAAzP8AAP9mAAD/mQAA/8wAMwAAADMAMwAzAGYAMwCZADMAzAAzAP8AMzMAADMz
MwAzM2YAMzOZADMzzAAzM/8AM2YAADNmMwAzZmYAM2aZADNmzAAzZv8AM5kAADOZMwAzmWYAM5mZADOZ
zAAzmf8AM8wAADPMMwAzzGYAM8yZADPMzAAzzP8AM/8zADP/ZgAz/5kAM//MADP//wBmAAAAZgAzAGYA
ZgBmAJkAZgDMAGYA/wBmMwAAZjMzAGYzZgBmM5kAZjPMAGYz/wBmZgAAZmYzAGZmZgBmZpkAZmbMAGaZ
AABmmTMAZplmAGaZmQBmmcwAZpn/AGbMAABmzDMAZsyZAGbMzABmzP8AZv8AAGb/MwBm/5kAZv/MAMwA
/wD/AMwAmZkAAJkzmQCZAJkAmQDMAJkAAACZMzMAmQBmAJkzzACZAP8AmWYAAJlmMwCZM2YAmWaZAJlm
zACZM/8AmZkzAJmZZgCZmZkAmZnMAJmZ/wCZzAAAmcwzAGbMZgCZzJkAmczMAJnM/wCZ/wAAmf8zAJnM
ZgCZ/5kAmf/MAJn//wDMAAAAmQAzAMwAZgDMAJkAzADMAJkzAADMMzMAzDNmAMwzmQDMM8wAzDP/AMxm
AADMZjMAmWZmAMxmmQDMZswAmWb/AMyZAADMmTMAzJlmAMyZmQDMmcwAzJn/AMzMAADMzDMAzMxmAMzM
mQDMzMwAzMz/AMz/AADM/zMAmf9mAMz/mQDM/8wAzP//AMwAMwD/AGYA/wCZAMwzAAD/MzMA/zNmAP8z
mQD/M8wA/zP/AP9mAAD/ZjMAzGZmAP9mmQD/ZswAzGb/AP+ZAAD/mTMA/5lmAP+ZmQD/mcwA/5n/AP/M
AAD/zDMA/8xmAP/MmQD/zMwA/8z/AP//MwDM/2YA//+ZAP//zABmZv8AZv9mAGb//wD/ZmYA/2b/AP//
ZgAhAKUAX19fAHd3dwCGhoYAlpaWAMvLywCysrIA19fXAN3d3QDj4+MA6urqAPHx8QD4+PgA8Pv/AKSg
oACAgIAAAAD/AAD/AAAA//8A/wAAAP8A/wD//wAA////AAoKCgoKCgoKCgoKBwcHBwcHBwcHBwoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoHBwcHBwcHBwoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcH
BwcKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHCgcHBwcHBwcHBwcHBwcH
B+zsBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH7OwHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoK
EhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhIS
CgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoKEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKChISEhISEhISEhISEhISEhISEhIS
EhISEhISEhIKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhIS
EhISEhISEhISEhISCgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoKEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKChISEhISEhIS
EhISEhISEhISEhISEhISEhISEhIKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhIS
EhISEhISEhISEhISEhISEhISEhISEhISCgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoK
EhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhIS
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgr/4Af///AP///wD///8A////AP/4AA
AAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAAAB/////ygAAAAwAAAAYAAAAAEA
CAAAAAAAgAoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAACAAAAAgIAAgAAAAIAAgACAgAAAwMDAAMDc
wADwyqYABAQEAAgICAAMDAwAERERABYWFgAcHBwAIiIiACkpKQBVVVUATU1NAEJCQgA5OTkAgHz/AFBQ
/wCTANYA/+zMAMbW7wDW5+cAkKmtAAAAMwAAAGYAAACZAAAAzAAAMwAAADMzAAAzZgAAM5kAADPMAAAz
/wAAZgAAAGYzAABmZgAAZpkAAGbMAABm/wAAmQAAAJkzAACZZgAAmZkAAJnMAACZ/wAAzAAAAMwzAADM
ZgAAzJkAAMzMAADM/wAA/2YAAP+ZAAD/zAAzAAAAMwAzADMAZgAzAJkAMwDMADMA/wAzMwAAMzMzADMz
ZgAzM5kAMzPMADMz/wAzZgAAM2YzADNmZgAzZpkAM2bMADNm/wAzmQAAM5kzADOZZgAzmZkAM5nMADOZ
/wAzzAAAM8wzADPMZgAzzJkAM8zMADPM/wAz/zMAM/9mADP/mQAz/8wAM///AGYAAABmADMAZgBmAGYA
mQBmAMwAZgD/AGYzAABmMzMAZjNmAGYzmQBmM8wAZjP/AGZmAABmZjMAZmZmAGZmmQBmZswAZpkAAGaZ
MwBmmWYAZpmZAGaZzABmmf8AZswAAGbMMwBmzJkAZszMAGbM/wBm/wAAZv8zAGb/mQBm/8wAzAD/AP8A
zACZmQAAmTOZAJkAmQCZAMwAmQAAAJkzMwCZAGYAmTPMAJkA/wCZZgAAmWYzAJkzZgCZZpkAmWbMAJkz
/wCZmTMAmZlmAJmZmQCZmcwAmZn/AJnMAACZzDMAZsxmAJnMmQCZzMwAmcz/AJn/AACZ/zMAmcxmAJn/
mQCZ/8wAmf//AMwAAACZADMAzABmAMwAmQDMAMwAmTMAAMwzMwDMM2YAzDOZAMwzzADMM/8AzGYAAMxm
MwCZZmYAzGaZAMxmzACZZv8AzJkAAMyZMwDMmWYAzJmZAMyZzADMmf8AzMwAAMzMMwDMzGYAzMyZAMzM
zADMzP8AzP8AAMz/MwCZ/2YAzP+ZAMz/zADM//8AzAAzAP8AZgD/AJkAzDMAAP8zMwD/M2YA/zOZAP8z
zAD/M/8A/2YAAP9mMwDMZmYA/2aZAP9mzADMZv8A/5kAAP+ZMwD/mWYA/5mZAP+ZzAD/mf8A/8wAAP/M
MwD/zGYA/8yZAP/MzAD/zP8A//8zAMz/ZgD//5kA///MAGZm/wBm/2YAZv//AP9mZgD/Zv8A//9mACEA
pQBfX18Ad3d3AIaGhgCWlpYAy8vLALKysgDX19cA3d3dAOPj4wDq6uoA8fHxAPj4+ADw+/8ApKCgAICA
gAAAAP8AAP8AAAD//wD/AAAA/wD/AP//AAD///8ACgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHBwcH
BwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgcHBwcHBwcHBwcHBwcHBwcKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
BwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcH
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoHBwcH
BwcHBwcHBwcHBwcHBwcHBwfs7AcHBwcHBwcHBwcHBwcHBwcHBwcHBwoKCgcHBwcHBwcHBwcHBwcHBwcH
BwcHB+zs7OwHBwcHBwcHBwcHBwcHBwcHBwcHBwcKBwcHBwcHBwcHBwcHBwcHBwcHBwcHB+zs7OwHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHB+zs7OwHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK//4AAH//
AAD//wAA//8AAP//wAP//wAA///AA///AAD//8AD//8AAP//wAP//wAA///AA///AAD//8AD//8AAMAA
AAAAAwAAgAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAAAAB
AADAAAAAAAMAAP///////wAA
</value>
</data>
<data name="Starting.Size" type="System.Drawing.Size, System.Drawing">
<value>113, 17</value>
</data>
<data name="Version.TabIndex" type="System.Int32, mscorlib">
<value>3</value>
</data>
<data name="&gt;&gt;Starting.Name" xml:space="preserve">
<value>Starting</value>
</data>
<data name="&gt;&gt;Version.ZOrder" xml:space="preserve">
<value>1</value>
</data>
<data name="Version.Size" type="System.Drawing.Size, System.Drawing">
<value>24, 13</value>
</data>
<data name="&gt;&gt;Version.Name" xml:space="preserve">
<value>Version</value>
</data>
<data name="Version.Font" type="System.Drawing.Font, System.Drawing">
<value>Tahoma, 8.25pt, style=Bold</value>
</data>
<data name="&gt;&gt;Virtual.Name" xml:space="preserve">
<value>Virtual</value>
</data>
<data name="&gt;&gt;Version.Type" xml:space="preserve">
<value>System.Windows.Forms.Label, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="Mac.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
<value>TopCenter</value>
</data>
<data name="Starting.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
<value>TopCenter</value>
</data>
<data name="&gt;&gt;Mac.Type" xml:space="preserve">
<value>System.Windows.Forms.Label, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="Starting.RightToLeft" type="System.Windows.Forms.RightToLeft, System.Windows.Forms">
<value>No</value>
</data>
<data name="$this.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
<value>None</value>
</data>
<data name="ProgressBar.Size" type="System.Drawing.Size, System.Drawing">
<value>161, 15</value>
</data>
<data name="&gt;&gt;Virtual.Type" xml:space="preserve">
<value>System.Windows.Forms.Label, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="Virtual.Size" type="System.Drawing.Size, System.Drawing">
<value>216, 65</value>
</data>
<data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
<value>421, 323</value>
</data>
<data name="Starting.Text" xml:space="preserve">
<value>Starting...</value>
</data>
<data name="&gt;&gt;Virtual.ZOrder" xml:space="preserve">
<value>4</value>
</data>
<data name="&gt;&gt;Starting.Type" xml:space="preserve">
<value>System.Windows.Forms.Label, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="ProgressBar.TabIndex" type="System.Int32, mscorlib">
<value>4</value>
</data>
<data name="Mac.RightToLeft" type="System.Windows.Forms.RightToLeft, System.Windows.Forms">
<value>No</value>
</data>
<data name="Virtual.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
<value>TopCenter</value>
</data>
<data name="Version.AutoSize" type="System.Boolean, mscorlib">
<value>True</value>
</data>
<data name="&gt;&gt;Starting.Parent" xml:space="preserve">
<value>$this</value>
</data>
<data name="&gt;&gt;ProgressBar.Parent" xml:space="preserve">
<value>$this</value>
</data>
<data name="&gt;&gt;$this.Type" xml:space="preserve">
<value>System.Windows.Forms.Form, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;Version.Parent" xml:space="preserve">
<value>$this</value>
</data>
<data name="Mac.Location" type="System.Drawing.Point, System.Drawing">
<value>228, 168</value>
</data>
<data name="$this.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAaYAAAFDCAIAAAD+mj1lAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAEvNJREFUeF7t3YtV
48gSgGFS2BQ2BVLYFEiBFCaFSYEUJgVSIIVJgRS4zZjLGAmQLEv9qPp05uzeWdvqrr/K/63Wyzc3NgQQ
QCAVgRcbAgggEJ3A8/Pzm9hLpL9tCCCAQGgCv379orzQGRYcAgicEaA85YAAAokIUF6iZAsVAQQoTw0g
gEAiApSXKNlCRQABylMDCCCQiADlJUq2UBFAgPLUAAIIJCJAeYmSLVQEEKA8NYAAAokIUF6iZAsVAQQo
Tw0ggEAiApSXKNlCRQABylMDCCCQiADlJUq2UBFAgPLUAAIIJCJAeYmSLVQEEKA8NYAAAokIUF6iZAsV
AQQoTw0ggEAiApSXKNlCRQABylMDCCCQiADlJUq2UBFAoLbyyng2BBBAYEKgmosbKO/td3P9CwEEEPg/
gZeXlzrWa6O8Ep4NAQQQOBEo3qM8xYAAAlkIUF6WTIsTAQR0eWoAAQRyEdDl5cq3aBFIToDykheA8BHI
RYDycuVbtAgkJ0B5yQtA+AjkIkB5ufItWgSSE6C85AUgfARyEaC8XPkWLQLJCVBe8gIQPgK5CFBernyL
FoHkBCgveQEIH4FcBCgvV75Fi0ByApSXvACEj0AuApSXK9+iRSA5AcpLXgDC/4TA4+MjLlEJUF7UzIpr
I4GfP3+Wb8X9/f3z8/PGXfhYxwQor+PkmFp1An9/rODm5r///iu/kFB9CgY8lgDlHcvX3gci8PT09M8/
/5z/Ks6///7LegNlcM1UKW8NJe+JT6CorQhu8itglrfxEk958XIqoosJlMN2ZRk78V35LxfvyAe6J0B5
3afIBI8n8OPHj4nvLGmPp95mBMprw92o/RA4P2VxEl85oleO6/UzQzPZkQDl7QjTrsYjUJa080N4Dw8P
40VixusIUN46Tt4VlMDd3d38lEXQWIX1SoDy1EFeAqerjs+329tbVyDHLgjKi51f0X1JoBytm/jOIbwM
5UJ5GbIsximB0sqVhm6iPIfwMhQK5WXIshinBOZL2nLVMUwZCFBehiyL8QOB+ZK2nLTFKAkBykuS6GPD
vL1/ur9/GuWf86tSyqXI5eq8+4eXtv88Nkn2/ocA5SmEHQgM5Lvb24f5jWVtTfc++g6ZsIslApS3RMjr
KwiM0t+VeU6elVL+2onvSo9pq0CA8ipAjj/EKF3efElbzmM0X8/q8mp+QyivJu2wYw3R5X26pO3Hd7q8
Ol8PyqvDOfgoQ3R5kyVtKf2ufFd6veBV0kd4lNdHHgafxQBd3uysRbm7tp+jeKeZ2CoQoLwKkOMP0X+X
1/NZC8fyan5DKK8m7bBjdd7lzY/ilQvxelvV6vLqfD0orw7n4KN03uXNf8SnQ985llfnS0J5dTgHH6Xr
Lm/2+IBO7rWYH0kMXiV9hEd5feRh8Fn03OVNWrzyAJXezlo4llez/CmvJu2wY3Xb5c2P4pUnRPW5qnUs
r87Xg/LqcA4+Srdd3qTFK7/T2K3vHMur8yWhvDqcg4+ye5d3c1Me0f7hzxarzq7F23AUb/IMgvLX49bF
waukj/Aor488DD6LLT769nlTc+VtsOouR/HmyjuuTxy8CsaYPuWNkafOZ7nBR99b8voub34Ub9sTBHR5
ndfepdOjvEuJef8nBDrs8iYPTSl/3dad6fKCVTzlBUtom3C66/JmR/HKT1tsOwany2tTUoeNSnmHoc20
4966vMmvl5UWb5vvyqd0ecEKmfKCJbRNOL11eZMTF+WhKdtWteVTurw2JXXYqJR3GNpMO+6ry5uvaq/4
HR9dXrBCprxgCW0TTldd3uTExZV3mOny2pTUYaNS3mFoM+24qy5vIqlt16a8H/vT5QUrZMoLltA24XTU
5X1c1ZaDepuP4p2sp8trU1KHjUp5h6HNtON+urzJqrbcVLv5XO3Jlbq8YIVMecES2iacfrq8ybnaK1e1
urw29XTkqJR3JN00+969y9vo0L1XtVd2iJeuqdPUS8tAKa8l/TBjbzTUt08W2LDPfc/VVvad5+XV+TpQ
Xh3OwUfppMubrGr7/E2fb0wavEr6CI/y+sjD4LPY0JHtb8ldr0C+dE26y/sHr4Ixpk95Y+Sp81nu76/L
17yTp0Vdc1/tLv7asC7uPMsxpkd5MfLYOIoeurzJgbxr7qvdYKtdLNk4izmGp7wceT44yh66vPmBvFbm
2jzuwVmy+1cClKcOdiDQvMubPwN5s3d26de2jb5DJuxiiQDlLRHy+goC7bu8j+cuNj8DuaHv/MLZikLb
4S2UtwNEu+igy7s9vzPs+vvMmrhPIVUgQHkVIMcfonmXNzl3MdwVeSfDxi+UDiKkvA6SMP4Umnd5Ac5d
uPuizveA8upwDj5K8y7vfFVb9Lft7EHzTwWvkj7Co7w+8jD4LBp3eSHOXejy6nwJKK8O5+CjtO3yJleo
XPnk94a9XvAq6SM8yusjD4PPonWX9+F07Yj3XZw8a6tAgPIqQI4/RNsub36rWcNO7ZqrW+IXSgcRUl4H
SRh/Cm27vInyrn8Scitjjl8IA0RAeQMkqf8ptu3yYlyh4rq8OnVOeXU4Bx+lbZc3Ud78B3rW/5e2HWLw
KukjPMrrIw+Dz6KrLm+94Gr+etmaY3yDV8EY06e8MfLU+SxjdHnNr27pPMsxpkd5MfLYOIq2Xd41bd35
Z+/L9ude11b/bJzFHMNTXo48Hxxl2y5vL+WVhxE09J3r8g4u0rfdU14dzsFHadvlbRt9cs9GD3fmBq+S
PsKjvD7yMPgs2nZ5G0fv787cwatgjOlT3hh56nyW2/qstp+adHk9PFW08yzHmB7lxchj4yg29lmX/3Lj
jpbs8KmijbOYY3jKy5Hng6Pc0UTV7NnhPRsHZ8nuXwlQnjrYgUA1T+3o1sl53rbnaj1JZYcqXLcLylvH
ybu+JbDdRLcP5ZhaA2N+PHdROr69rsUrj67afNeaKqtAgPIqQI4/xEZnvXrnZ/nzar3bh+3evPyY4OTc
RTmud32XVy5kPi2WN1/vEr9QOoiQ8jpIwvhT2Gark+/O/9Tr+D52eeV07eYur/R05U61yTJ5m0PHL4QB
IqC8AZLU/xQ3dHl/+qyp8t7/y9Huu/4KlYeHhyLKyWnfc/FtuOql/0QHmCHlBUhi+xA2dHnf+K5G3/ex
L1v/7PjS0xWXrXlc1fp9vq+p2ycywQwoL0GSjw9xQ5f3ask/h/BWue/27c1loI1jfTzet/7Z8cVxRV6n
hm6N6co3qry59IAbVsrHJ8oILlJRA3sQ2NDlvZtrrfXOV8HvBtx6tvfT65CLp8qTBcpWnHWR407r2dfT
vtc9i2WPVNjHAgFdnhLZgcAundcW933lwdO1L1//mfRr5a8rO7j5U1vKB1/PftzfX3/Od4dM2MUSAcpb
IuT1FQSu6fKmn12/2v367MeKxfK1T5za0XSO5a0osd3eQnm7ocy8o126vLk3X/u+26cV/vryzO/Xn92i
vKK5siIuh/YOerJe5hKqFjvlVUMdeaA9u7zPrit+PWtx6v52M+Ba5RXHlXXrNfdUrD+PEblEuomN8rpJ
xcgTOajL+8qk7wa8woNT5RW1nexWttNJjG1nXa85ojdyCQwzd8obJlU9T/ToLm/b/tefvrjyTOv6Pu77
d/ac4jBzo7wwqWwZSOUub5sBzz81uUWsrFuv6c72+mzLFKYZm/LSpPrIQK93UO09bL37Yi+7fbqfI1Nk
328EKE8p7EBgwC6v3PXxd9twP+wR7tshE3axRIDylgh5fQWB2j3a5U+Lml/9d668ss7d63jcNftZQdpb
riVAedcS9PlCYPQub9uznq6x26efVUsVCFBeBcjxhxi9y9vxqcjXeDB+oXQQIeV1kITxpzBcl1ccPbmp
9ohjc5fuc/xCGCACyhsgSf1Pcbwub6a8g+4hu8h6/Sc6wAwpL0AS24cwYpfnd2zb102LGVBeC+rhxhyx
y5tcjdzDdSrh6qLHgCivx6wMN6cRu7z5j5xdc+Zhl88Ol/cRJ0x5I2atuzmP2eV9uBp58y8xXnS0zj22
zWuX8pqnIMIEhuzy+juDEaEUuo+B8rpP0QgTHLHLK3Oe/+jPLuvTzX3fCKkefo6UN3wKewhg0C5vfjhv
s612cWUPqQw/B8oLn2IBfkng8fFx8qTQojy8YhOgvNj5Fd13BJ6fnydr2/KrtZDFJkB5sfMrugUC5XnI
k6dIQRabAOXFzq/oFgjM17ZPT0+oBSZAeYGTK7RlAvO1bbnZdvlj3jEsAcobNnUmvhOB4rjztW05ulc8
uNO+7aY7ApTXXUpMqDIB520rA287HOW15W/09gRKTzd/xED7aZnBMQQo7xiu9joUgXJtyuQCPScxhkrg
BZOlvAtgeWtUAr9//548JLlcvBI12ORxUV7yAhD+G4HJBXrli6HRC1kclBcyrYK6mEAR3GRte3d3d/Fe
fKB7ApTXfYpMsBaB4rhz65W/ulqlFvt641BePdZG6pzA+9UqRXblf/Nd5/naNj3K28bNp2ISeHh4KLKL
GZuo/hCgPIWAAAKJCFBeomQLFQEEKE8NIIBAIgKUlyjZQkUAAcpTAwggkIgA5SVKtlARQIDy1AACCCQi
QHmJki1UBBCgPDWAAAKJCFBeomQLFQEEKE8NIIBAIgKUlyjZQkUAAcpTAwggkIgA5SVKtlARQIDy1AAC
CCQiQHmJki1UBBCgPDWAAAKJCFBeomQLFQEEKE8NIIBAIgKUlyjZQkUAAcpTAwggkIgA5SVKtlARQIDy
1AACCCQiQHmJki1UBBCgPDWAAAKJCFBeomQLFQEEKE8NIIBAIgKUlyjZQkUAAcpTAwggkIgA5SVKtlAR
QIDy1AACCCQiQHmJki1UBBCgPDWAAAKJCFBeomQLFQEEKE8NIIBAIgKUlyjZQkUAAcpTAwggkIgA5SVK
tlARQIDy1AACCCQiQHmJki1UBBCgPDWAAAKJCFBeomQLFQEEKE8NIIBAIgKUlyjZQkUAAcpTAwggkIgA
5SVKtlARQIDy1AACCCQiQHmJki1UBBCgPDWAAAKJCFBeomQLFQEEKE8NIIBAIgKUlyjZQkUAAcpTAwgg
kIgA5SVKtlARQIDy1AACCCQiQHmJki1UBBCgPDWAAAKJCFBeomQLFQEEKE8NIIBAIgKUlyjZQkUAAcpT
AwggkIgA5SVKtlARQIDy1AACCCQiQHmJki1UBBCgPDWAAAKJCFBeomQLFQEEKE8NIIBAIgKUlyjZQkUA
AcpTAwggkIgA5SVKtlARQIDy1AACCCQiQHmJki1UBBCgPDWAAAKJCFBeomQLFQEEKE8NIIBAIgKUlyjZ
QkUAAcpTAwggkIgA5SVKtlARQIDy1AACCCQiQHmJki1UBBCgPDWAAAKJCFBeomQLFQEEKE8NIIBAIgKU
lyjZQkUAAcpTAwggkIgA5SVKtlARQIDy1AACCCQiQHmJki1UBBCIr7wSoQ0BBBB4J1C8/7vK9uvXr7dB
qw3p/9MQQACBOYEqxvvdQHl1AjMKAgggMCdAeaoCAQQSEaC8RMkWKgIIUJ4aQACBRAQoL1GyhYoAApSn
BhBAIBEBykuUbKEigADlqQEEEEhEgPISJVuoCCBAeWoAAQQSEaC8RMkWKgIIUJ4aQACBRAQoL1GyhYoA
ApSnBhBAIBEBykuUbKEigADlqQEEEEhEgPISJVuoCCBAeWoAAQQSEaC8RMkWKgIIUJ4aQACBRAQoL1Gy
hYoAApSnBhBAIBEBykuUbKEigADlqQEEEEhEgPISJVuoCCBAeWoAAQQSEaC8RMkWKgIIUJ4aQACBRAQo
L1GyhYoAApSnBhBAIBEBykuUbKEigADlqQEEEEhEgPISJVuoCCBAeWoAAQQSEaC8RMkWKgIIUJ4aQACB
RAQoL1GyhYoAApSnBhBAIBEBykuUbKEigADlqQEEEEhEgPI6SnZJhi02gY6qLetUKK+jzP9Nxo0tJoGX
l5eOCi7lVCivo7SXZNzd3f20RSTw+PhYLE55zb9vlNc8BX8n8K688vWwBSNQ0kx5PXzZKK+HLLzNgfKC
ae48HMrr5JtGeZ0k4nUalEd5HZVj0KlQXkeJpTzK66gcg06F8jpKLOVRXkflGHQqlNdRYimP8joqx6BT
obyOEkt5lNdROQadCuV1lFjKo7yOyjHoVCivo8S+K6+jOZnKfgRcl7cfy+17orzt7Hb/pBvOYt5ldhaV
uy92/9ZcukPKu5TYse8vXwlbbALHFpC9LxGgvCVCXkcAgUAEKC9QMoWCAAJLBChviZDXEUAgEAHKC5RM
oSCAwBIBylsi5HUEEAhEgPICJVMoCCCwRIDylgh5HQEEAhGgvEDJFAoCCCwRoLwlQl5HAIFABCgvUDKF
ggACSwQob4mQ1xFAIBAByguUTKEggMASAcpbIuR1BBAIRIDyAiVTKAggsESA8pYIeR0BBAIRoLxAyRQK
AggsEaC8JUJeRwCBQAT+Ku/5+bn8xYYAAgjEJhD+9wYEiAACCHwg8D+ly8wEQqLt5QAAAABJRU5ErkJg
gg==
</value>
</data>
<data name="&gt;&gt;$this.Name" xml:space="preserve">
<value>frmSplash</value>
</data>
<data name="&gt;&gt;Mac.ZOrder" xml:space="preserve">
<value>2</value>
</data>
<data name="Version.Text" xml:space="preserve">
<value>0.0</value>
</data>
<data name="&gt;&gt;Virtual.Parent" xml:space="preserve">
<value>$this</value>
</data>
<data name="$this.RightToLeft" type="System.Windows.Forms.RightToLeft, System.Windows.Forms">
<value>No</value>
</data>
<data name="&gt;&gt;ProgressBar.Type" xml:space="preserve">
<value>System.Windows.Forms.ProgressBar, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;Mac.Parent" xml:space="preserve">
<value>$this</value>
</data>
<data name="&gt;&gt;ProgressBar.Name" xml:space="preserve">
<value>ProgressBar</value>
</data>
<data name="Version.Location" type="System.Drawing.Point, System.Drawing">
<value>358, 29</value>
</data>
<data name="ProgressBar.Location" type="System.Drawing.Point, System.Drawing">
<value>130, 288</value>
</data>
<data name="$this.Location" type="System.Drawing.Point, System.Drawing">
<value>3, 3</value>
</data>
<data name="&gt;&gt;ProgressBar.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<data name="Mac.Size" type="System.Drawing.Size, System.Drawing">
<value>149, 65</value>
</data>
<data name="Virtual.RightToLeft" type="System.Windows.Forms.RightToLeft, System.Windows.Forms">
<value>No</value>
</data>
<data name="Starting.Font" type="System.Drawing.Font, System.Drawing">
<value>Tahoma, 9.75pt, style=Bold</value>
</data>
<data name="Virtual.Location" type="System.Drawing.Point, System.Drawing">
<value>38, 168</value>
</data>
<data name="Mac.TabIndex" type="System.Int32, mscorlib">
<value>2</value>
</data>
<data name="Virtual.Text" xml:space="preserve">
<value>Virtual</value>
</data>
<data name="&gt;&gt;Mac.Name" xml:space="preserve">
<value>Mac</value>
</data>
<data name="Mac.Text" xml:space="preserve">
<value>Mac</value>
</data>
<data name="$this.Font" type="System.Drawing.Font, System.Drawing">
<value>Tahoma, 27.75pt</value>
</data>
<metadata name="$this.Localizable" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="$this.Language" type="System.Globalization.CultureInfo, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>es-MX</value>
</metadata>
</root>

18
frmSplash.vb Normal file
View File

@ -0,0 +1,18 @@
Option Strict Off
Option Explicit On
Friend Class frmSplash
Inherits System.Windows.Forms.Form
Private Sub frmSplash_Load(sender As Object, e As System.EventArgs) Handles Me.Load
Me.Version.Text = My.Application.Info.Version.Major & "." & My.Application.Info.Version.Minor
'This has to be included here too, so that this setting also affects the loading form
Select Case My.Settings.Lang
Case "en-US"
My.Application.ChangeUICulture("en-US")
Case "es-MX"
My.Application.ChangeUICulture("es-MX")
Case "de-DE"
My.Application.ChangeUICulture("de-DE")
End Select
End Sub
End Class

231
frmVirtualMacintosh.Designer.vb generated Normal file
View File

@ -0,0 +1,231 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> Partial Class frmVirtualMacintosh
#Region "Windows Form Designer generated code "
<System.Diagnostics.DebuggerNonUserCode()> Public Sub New()
MyBase.New()
'This call is required by the Windows Form Designer.
InitializeComponent()
End Sub
'Form overrides dispose to clean up the component list.
<System.Diagnostics.DebuggerNonUserCode()> Protected Overloads Overrides Sub Dispose(ByVal Disposing As Boolean)
If Disposing Then
If Not components Is Nothing Then
components.Dispose()
End If
End If
MyBase.Dispose(Disposing)
End Sub
'Required by the Windows Form Designer
Private components As System.ComponentModel.IContainer
Public ToolTip1 As System.Windows.Forms.ToolTip
Public FloppyBrowser As System.Windows.Forms.OpenFileDialog
Public WithEvents VMScreen As System.Windows.Forms.PictureBox
'NOTE: The following procedure is required by the Windows Form Designer
'It can be modified using the Windows Form Designer.
'Do not modify it using the code editor.
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmVirtualMacintosh))
Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components)
Me.FloppyBrowser = New System.Windows.Forms.OpenFileDialog
Me.VMScreen = New System.Windows.Forms.PictureBox
Me.VMStatusBar = New System.Windows.Forms.StatusStrip
Me.CDBrowser = New System.Windows.Forms.OpenFileDialog
Me.MainMenu2 = New System.Windows.Forms.MainMenu(Me.components)
Me.mnuAction = New System.Windows.Forms.MenuItem
Me.mnuActionFullScreen = New System.Windows.Forms.MenuItem
Me.mnuActionBar0 = New System.Windows.Forms.MenuItem
Me.mnuActionClose = New System.Windows.Forms.MenuItem
Me.mnuCD = New System.Windows.Forms.MenuItem
Me.mnuCDCapture = New System.Windows.Forms.MenuItem
Me.mnuCDBar0 = New System.Windows.Forms.MenuItem
Me.mnuCDRelease = New System.Windows.Forms.MenuItem
Me.mnuFloppy = New System.Windows.Forms.MenuItem
Me.mnuFloppyCapture = New System.Windows.Forms.MenuItem
Me.mnuFloppyBar0 = New System.Windows.Forms.MenuItem
Me.mnuFloppyRelease = New System.Windows.Forms.MenuItem
Me.mnuHelp = New System.Windows.Forms.MenuItem
Me.mnuHelpContents = New System.Windows.Forms.MenuItem
Me.mnuHelpBar0 = New System.Windows.Forms.MenuItem
Me.mnuHelpOnline = New System.Windows.Forms.MenuItem
Me.mnuHelpBar1 = New System.Windows.Forms.MenuItem
Me.mnuHelpAbout = New System.Windows.Forms.MenuItem
CType(Me.VMScreen, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'FloppyBrowser
'
Me.FloppyBrowser.Filter = "Floppy Images (*.img;*.ima)|*.img;*.ima|All files (*.*)|*.*"
'
'VMScreen
'
Me.VMScreen.BackColor = System.Drawing.SystemColors.Control
Me.VMScreen.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D
Me.VMScreen.Cursor = System.Windows.Forms.Cursors.Default
Me.VMScreen.ForeColor = System.Drawing.SystemColors.ControlText
Me.VMScreen.Image = CType(resources.GetObject("VMScreen.Image"), System.Drawing.Image)
Me.VMScreen.Location = New System.Drawing.Point(0, -5)
Me.VMScreen.Name = "VMScreen"
Me.VMScreen.RightToLeft = System.Windows.Forms.RightToLeft.No
Me.VMScreen.Size = New System.Drawing.Size(803, 605)
Me.VMScreen.SizeMode = System.Windows.Forms.PictureBoxSizeMode.AutoSize
Me.VMScreen.TabIndex = 0
Me.VMScreen.TabStop = False
'
'VMStatusBar
'
Me.VMStatusBar.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
Me.VMStatusBar.GripStyle = System.Windows.Forms.ToolStripGripStyle.Visible
Me.VMStatusBar.Location = New System.Drawing.Point(0, 599)
Me.VMStatusBar.Name = "VMStatusBar"
Me.VMStatusBar.Size = New System.Drawing.Size(803, 22)
Me.VMStatusBar.TabIndex = 3
Me.VMStatusBar.Text = "StatusStrip1"
'
'CDBrowser
'
Me.CDBrowser.Filter = "Disc Images (*.iso)|*.iso|All files (*.*)|*.*"
'
'MainMenu2
'
Me.MainMenu2.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnuAction, Me.mnuCD, Me.mnuFloppy, Me.mnuHelp})
'
'mnuAction
'
Me.mnuAction.Index = 0
Me.mnuAction.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnuActionFullScreen, Me.mnuActionBar0, Me.mnuActionClose})
Me.mnuAction.Text = "Action"
'
'mnuActionFullScreen
'
Me.mnuActionFullScreen.Index = 0
Me.mnuActionFullScreen.Text = "Full screen mode"
'
'mnuActionBar0
'
Me.mnuActionBar0.Index = 1
Me.mnuActionBar0.Text = "-"
'
'mnuActionClose
'
Me.mnuActionClose.Index = 2
Me.mnuActionClose.Text = "Close"
'
'mnuCD
'
Me.mnuCD.Index = 1
Me.mnuCD.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnuCDCapture, Me.mnuCDBar0, Me.mnuCDRelease})
Me.mnuCD.Text = "CD"
'
'mnuCDCapture
'
Me.mnuCDCapture.Index = 0
Me.mnuCDCapture.Text = "Capture ISO image..."
'
'mnuCDBar0
'
Me.mnuCDBar0.Index = 1
Me.mnuCDBar0.Text = "-"
'
'mnuCDRelease
'
Me.mnuCDRelease.Index = 2
Me.mnuCDRelease.Text = "Release CD"
'
'mnuFloppy
'
Me.mnuFloppy.Index = 2
Me.mnuFloppy.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnuFloppyCapture, Me.mnuFloppyBar0, Me.mnuFloppyRelease})
Me.mnuFloppy.Text = "Floppy"
'
'mnuFloppyCapture
'
Me.mnuFloppyCapture.Index = 0
Me.mnuFloppyCapture.Text = "Capture floppy disk image..."
'
'mnuFloppyBar0
'
Me.mnuFloppyBar0.Index = 1
Me.mnuFloppyBar0.Text = "-"
'
'mnuFloppyRelease
'
Me.mnuFloppyRelease.Index = 2
Me.mnuFloppyRelease.Text = "Release disk"
'
'mnuHelp
'
Me.mnuHelp.Index = 3
Me.mnuHelp.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnuHelpContents, Me.mnuHelpBar0, Me.mnuHelpOnline, Me.mnuHelpBar1, Me.mnuHelpAbout})
Me.mnuHelp.Text = "Help"
'
'mnuHelpContents
'
Me.mnuHelpContents.Index = 0
Me.mnuHelpContents.Text = "Virtual Mac Help"
'
'mnuHelpBar0
'
Me.mnuHelpBar0.Index = 1
Me.mnuHelpBar0.Text = "-"
'
'mnuHelpOnline
'
Me.mnuHelpOnline.Index = 2
Me.mnuHelpOnline.Text = "Virtual Mac Online"
'
'mnuHelpBar1
'
Me.mnuHelpBar1.Index = 3
Me.mnuHelpBar1.Text = "-"
'
'mnuHelpAbout
'
Me.mnuHelpAbout.Index = 4
Me.mnuHelpAbout.Text = "About Virtual Mac..."
'
'frmVirtualMacintosh
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.BackColor = System.Drawing.Color.White
Me.ClientSize = New System.Drawing.Size(803, 621)
Me.Controls.Add(Me.VMStatusBar)
Me.Controls.Add(Me.VMScreen)
Me.Cursor = System.Windows.Forms.Cursors.Default
Me.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Location = New System.Drawing.Point(10, 56)
Me.MaximizeBox = False
Me.Menu = Me.MainMenu2
Me.Name = "frmVirtualMacintosh"
Me.RightToLeft = System.Windows.Forms.RightToLeft.No
Me.Text = "Macintosh - Virtual Mac"
CType(Me.VMScreen, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents VMStatusBar As System.Windows.Forms.StatusStrip
Friend WithEvents CDBrowser As System.Windows.Forms.OpenFileDialog
Friend WithEvents MainMenu2 As System.Windows.Forms.MainMenu
Friend WithEvents mnuAction As System.Windows.Forms.MenuItem
Friend WithEvents mnuActionFullScreen As System.Windows.Forms.MenuItem
Friend WithEvents mnuActionBar0 As System.Windows.Forms.MenuItem
Friend WithEvents mnuActionClose As System.Windows.Forms.MenuItem
Friend WithEvents mnuCD As System.Windows.Forms.MenuItem
Friend WithEvents mnuCDCapture As System.Windows.Forms.MenuItem
Friend WithEvents mnuCDBar0 As System.Windows.Forms.MenuItem
Friend WithEvents mnuCDRelease As System.Windows.Forms.MenuItem
Friend WithEvents mnuFloppy As System.Windows.Forms.MenuItem
Friend WithEvents mnuFloppyCapture As System.Windows.Forms.MenuItem
Friend WithEvents mnuFloppyBar0 As System.Windows.Forms.MenuItem
Friend WithEvents mnuFloppyRelease As System.Windows.Forms.MenuItem
Friend WithEvents mnuHelp As System.Windows.Forms.MenuItem
Friend WithEvents mnuHelpContents As System.Windows.Forms.MenuItem
Friend WithEvents mnuHelpBar0 As System.Windows.Forms.MenuItem
Friend WithEvents mnuHelpOnline As System.Windows.Forms.MenuItem
Friend WithEvents mnuHelpBar1 As System.Windows.Forms.MenuItem
Friend WithEvents mnuHelpAbout As System.Windows.Forms.MenuItem
#End Region
End Class

935
frmVirtualMacintosh.resx Normal file
View File

@ -0,0 +1,935 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="ToolTip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>243, 17</value>
</metadata>
<metadata name="FloppyBrowser.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>125, 17</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="VMScreen.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAx8AAAJZCAIAAABHsB83AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAn0JJREFUeF7tvWty
3Ma2trmn4CloCpqCBkCKoiiKom6fNy2J1IW6TkG2ZVmWZdmyex8f25K3LYXtf93R4SG0oqOjI/rnmYKn
sPsprGQ6mbgUCgVkFqreFY/TKCCRCaw3mXgFFMF//L//3//5f/3f/7vx/v/5P1ri68+6oxBjx8a8EEII
Ucc/ovhf/+t/E0IIIYQQM+GMVBRRJSGEEEIIMRPOVFlE24QQQgghRAdkrYQQQgghekbuSgghhBCiT2St
hBBCCCH6RO5KCCGEEKJP5K6EEEIIIfpE7koIIYQQok/kroQQQggh+kTuSgghhBCiT+SuhBBCCCH6RO5K
CCGEEKJP5K6EEEIIIfpE7koIIYQQok/kroQQQggh+kTuSgghhBCiT+SuhBBCCCH6RO5KCCGEEKJP5K6E
EEIIIfpE7koIIYQQok/kroQQQggh+kTuSgghhBCiT+SuhBBCCCH6RO5KCCGEEKJP5K6EEEIIIfpE7koI
IYQQok/kroQQQggh+kTuSgghhBCiT+SuhBBCCCH6RO5KCCGEEKJPxu2uPvzwXxCtFMlQ/vOi/OdF+c+L
8p8X5b+ZEburf/7zv27c+Gl///Xe3vfRJpEA5T8vyn9elP+8KP95Uf6nMlZ3hWVG1/v3f7t9+xdkvnLl
W4jqiOFQ/vOi/OdF+c+L8p8X5b8NY3VXKHrv3ruHD//APu/uvtzefn758quojhgO5T8vyn9elP+8KP95
Uf7bMFZ3haiPHv1x586vWOZz577Y2Hgyj7o4cYhWigaU/7wo/3lR/vOi/OdF+W/DKN0VxhldMc7Xr/9o
0uKdr179LqrWDPX39r5nlNy69e+DgzcMjkuXvonqiEqU/7wo/3lR/vOi/OdF+W/JKN3VtWs/3L377t69
dywjLbQUBkUZGYwJ5ETU27d/obx582ca3Nl5sbX1LKovKlH+86L850X5z4vynxflvyXjc1cffvgvtME4
o8qFC18hLfYZ2aJqHjaxy0cf/ff+/mtTFNiXj8iMrmyiwvnzX66tfbyU9yf7RfnPi/KfF+U/L8p/XpT/
9ozPXWF+79z59cGD31Hl7NnPkWR39yUSRgKjk7/x6BVlWLDGFGUrTRlUphGauqJffJiG8p8X5T8vyn9e
lP+8KP/tGZ+7QhuMM1y69M36+ienT3+KMF4VpAoVZcEUxSZHioagLq1hw3HQviNRifKfF+U/L8p/XpT/
vCj/7RmZu0IGLDDS3rv3bnv7OW53c/Mp0iI5KpqolNQJbzxGWlaC9d7aenbmzGdRjyJE+c+L8p8X5T8v
yn9elP+ZGJm7QjB0ffToj7t33509+zne+cKFrxDSREVgbHJ7RUNofGfnBcMl7E5EKP95Uf7zovznRfnP
i/I/EwvtrvCz4Uc0Q9QHD35HXRQ9ffpTs7rIaYrW3XhsA6784sWvUfdSu19/WAWU/7wo/3lR/vOi/OdF
+Z+TEbgrZMMy37z58+HhW5MWjS9ffrWx8RT7TJ1Ip26gLm0yXLa3n4fHsMoo/3lR/vOi/OdF+c+L8j8n
C+quSDd2+ODgze2jL8eZukgLGOdz577AO+/svLDKvcBAodmNjScoHR7MCkI2lP+MkA3lPyNkQ/nPCNlQ
/jNCNpT/+Vkgd0VOsckoh5ZeVAS2R7nAGqTFPlMTk4t33t19yXIkEtCO7cJCtKkBmmK4rK19jMzRsa0C
yn9elP+8KP95Uf7zovz3Tmp3FSWOhO7tfW83Hk3UUFG08Y9yWTZ17bYkxnlz8ykLXhhboD773rnzK9Vo
ir0q5a+Emhcvfr2+/gmDJjzIZUL5z4vynxflPy/Kf16U/5TkuXdlGkSK4pqROVQ0hPUIhrpUvnDhKzQ4
V7wiNqrGmLAbmA8fTm5gXrnyLSOgpcBUoz6DZmvZ/ySC8p8X5T8vyn9elP+8KP9pSOeuyB3ioaJXFHVN
USRBvCjXEYyGB8VX6tgFXfHOO1UPfanGIEBa7DNbqWNGOKpWBzW3t58zdFhYMpT/vCj/eVH+86L850X5
T88g7gpLawsoinJkHCFRFFhAYNaYopU2uRJERTNgr7NnPz9z5jMcNO1H1WiWXhCY+hhhpEJgFqJqddAg
za6N/JX8yn9elP+8KP95Uf7zovznxed/EHeFZuhnHhlY6Kaoh10YFhjn+/d/49CRFi5d+qasLu1T8/Dw
LSVHgrQITM2oWh00SOWNjSfsGJ7RuFD+86L850X5z4vynxflPy8+/z27K1R88OB3kkvT5BcDazcepypa
1imCUYK6tEz2kRb7fPnoK3UhdESnd+78Sn2WMcKoe/Hi11PbN6iGa97aekb70amNAuU/L8p/XpT/vCj/
eVH+8xLlv2d3hWW7d+8d7aIoNjbKXR3IQOUGW80mjhh10Wx39+XGxtNzVV+pMxhPVENgjgFdqYnGdZXL
cBbnz3+5Ns5X8iv/eVH+86L850X5z4vyn5co/z27K7wnMtBHlLI6kBMxOBr0oOSAKk0ux3q3+IUF6iAV
3hkB6C6qZtAIzpEGWdjZeUFlBMYRt7fPDCDUxZuHpzYKlP+8KP95Uf7zovznRfnPS5T//r93RVoPDt4g
m89XA8iGyUW2hw8nyrE7JrcsA4d7//5v1GEBXREM2agcVTMQdX//NTXtHub6+ifb28/be2d6R9eNjSfs
5U9qRCj/eVH+86L850X5z4vyn5cw//27KzKLdSXFYcoq4QhMNtTF8ZFWfDGS0EhUk2oPHvyOuowGjDCa
UbNczaBZYCsj4OzZzxGJNssjpgGGgvViZzQulP+8KP95Uf7zovznRfnPS5j//t0V7WKHr1//McxXHVSj
8t3iFzhxrPhiZCO5YR2kYivqAo2T983Npw3qGmylQWBhJmmB+oyMtXE++lX+86L850X5z4vynxflPy9h
/vt3V6SG1tEjzFcdHApGD+N8cPAGUVEXkCSs49XFZfMRO4y6uzV/4agXaPli8Up+yujsFh/lPy/Kf16U
/7wo/3lR/vMS5r9nd4VClDdv/gyoEqasEtTlOFAXjTksHHH5RiLtoP3Dh5O/cETjSAuz3mycCVq+UryS
H5/uT20UKP95Uf7zovznRfnPi/Kflyj//d+7ghs3frp9+5dr136IslaGI6AyXo/6KI0jJqFoTCNhHY7V
q4t3Bvz1cOoCHTHOTp/+1M5oXCj/eVH+86L850X5z4vynxef/0HcFXogGH1EKauEg8A4m7roimMlrVhX
XyFUF2+ItIwA1PUVhoChw8GsrX1sbnRcKP95Uf7zovznRfnPi/KfF5//QdwV0PrBwZsoZZUg6v7+a0Aw
pF0v/vh2Wd0HxStQrY6piwC+Tu/Q+KVL3+CdsfPRqY0C5T8vyn9elP+8KP95Uf7zYvkfyl2hFpKg3FQN
EM+q7ey8QLmtrWf2XbawgqnLEadUlxGGT+d4wvMaC8p/XpT/vCj/eVH+86L858XyP5S7ulb8rWzKKGt1
sAteFZCN5XBTqG6yO5PAYZwf7Sv5lf+8KP95Uf7zovznRfnPi+V/KHdFdg5neSU/XtWI1oOpe//+bzSI
upjZZnX78tS0s1u8kh8THZ3d4sPxK/8Z4fiV/4xw/Mp/Rjh+5T8jHL/ynxGOn3QN5a4A73bQ+pX8DdDC
/v5rU5dmvbp9qVgH7ePlNzae7BRv/R8dyn9elP+8KP95Uf7zovznhfwP6K6Q5Fa7V/I3E6pLxpEWgcn7
0OoCrpm+NjefRqc2CpT/vCj/eVH+86L850X5zwtJG9Bd2aPHlq/kb8DUvXv3HeryEXWhTl0qM56AhWhT
BziLsT/6Vf5zofznRfnPi/KfF+U/L+R/QHdFdu60fiV/A+h048ZPSIvAyEa6I3VNUU6GvnDrDClKPlbK
72nealDHHv1eLr7rNy44fuU/Ixy/8p8Rjl/5zwjHr/xnhONX/jPC8Q/oroAs9/LoF6kYKKiLE9+58BXq
Xrz4ta1H+Js3f2br/fu/PXz4x6NHf1Cy5urV75CkjYQNsDuNbGw8YUhFpzYKlP+8KP95Uf7zovznRfnP
y7DuyswsxjbK2qzQAo743r3Jn/JGV8s1ErLGFDVYZg09spU62F4WoqbKMPhoHypHIaOEwXTmzGd2RuNC
+c+L8p8X5T8vyn9elP+8DOuuSBmuFsMbpWxWaAfNvHJkHGlNV1MU7RHeRKL+hQtfnT37OSWVw3YikBPr
TZtgu0cVAPu8s/NibZyPfpX/vCj/eVH+86L850X5z8uw7orUoC6Ji1I2K8hwcPDm7t13tGYS8tEkYdPl
y68Qcnv7uclpeqAuJR+jpjw0whC5f/83hgjjA5nZ0XYPq/ERt76+/gmlndSIUP7zovznRfnPi/KfF+U/
LwO6KxwuJRqQRDQIUzYr7E72Dw/f4pFNzkuXvjFFNzefbmw8PX36UxZYSTWsOpv4eP78lxxD1BTQwrXi
9ylMWkpGiQ0RWuCYw8qoe+XKt7R27twX/tRGgfKfF+U/L8p/XpT/vCj/eeHch713BaSbPJLNMGUdoAVG
Ccrt7r70isKZM59hkxESYdiKv6YaPrdOXSwzWlINXU1aPxqg8lExaxhG9OVPakQo/3lR/vOi/OdF+c+L
8p+Rwd0VRvXOnV/ROErZrKAKoBYeFkVRggVUQVS8rXWErqiFW2dlpC5b2d2GGnVMWsw4m1Buff0ToEEc
NGbZdvGwho7W1j6mtfDURoHynxflPy/Kf16U/7wo/xkZ3F0B6h4cvIlSNpVylgEh8cWIhwy0HNZBPNTF
FKMuWzHUyGbqIi0GmfVeVxZw0DYI0BVfjLR8pE3foIde2EQdNPYnNSKU/7wo/3lR/vOi/OdF+c9FCndF
0oHsR1nrAImuVB2QEMFQF3dMp6iFd2bh2rUfGFus97oiM/XZimA4YgTe2XnBgKhrmfWMKoYL+JMaEcp/
XpT/vCj/eVH+86L85yKFu8K3knGyHGWtd27c+AmfDiiNYLu7L1lzePjWfncUXVlmkGGBURTLDAwCzDgH
WSetQQVGA/X9SY0I5T8vyn9elP+8KP95Uf5zkcJdkR0yTqLDfPUOipqWqMgCXpg1WGY+Ii0LDC+7FYlf
RicWGAENljmEOowVdqR+dHaLD8ev/GeE41f+M8LxK/8Z4fiV/4xw/Mp/FlK4K8A7H/TxSv4ytIlsyHkz
eB//reIFtfv7r1ljyxhk5ERUOHPmM4yw6dRGWqAaI2Nj4wkDIjyvsaD850X5z4vynxflPy/KfxYSuSuk
tSzXZZNNiHT9+o+ULBsoF+LXW00UpVnGjRlkRMUjs8BHdLXd6fpC8d5Y0xWB0RWdWB8dQDMc9tWr321t
PWNk+JMaEcp/XpT/vCj/eVH+86L8ZyGRu0IPZECSKGsGSqATqhwevmUQAEYYWAlIRclH20Q7OOJQUS+q
7Y7q6IoeqOh1RRV0nckvR7AjxnltnK/k7z3//1AoFIqVCWZRzf9+/tf1tw2J3BUJRRJ0ilJmoAfymEhU
QyRALQ/rPQ8e/O65d2/ybn4UNbNMRyh68eLX+FyWcc2nizeebW8/Zz0ru+lqsC8to65Z73HRe/6Zbv6j
UCgUyx5//fUX053mf8NffEHX32YSuStAAyywudowa6xBG1wwylHBbjmyJjLLlPbR2qEOctLUlSvfkm6E
PHfui83ifa9oSXc0ixh4Zz5imTvryo60xsigEfPOW1vP/EmNCMtbX/k3d/U/CoVCsdTx9u1bpjvN//bR
2tH1tw3p3BWCIcy10u+Fmrq2iQwiFbBAQg3bnQWEtAq7uy/Pn/8SORHPFD1z5jNggZVUoCnaRBhUB3aP
Om2GHcF6DIfO+vonGxtPRvrT1W/+5a4UCsUqhLkrzf+6/s5KOneF1cUCVz76ZRMaoxzmFNlwuwY5tRLI
qRFqibpWh73QALNMIzSIufbDhaFAyQGEPZYxRalmirIXzdI+cpqodET7/nRGR7/5l7tSKBSrEOauNP+H
87+uv21I564AdbG0UVoNMuvTCkiFYIaX2WNaUo36KMeOZrFphKbMjN++/QslK5EEqGNbI7yitEM1WmYA
MXRQ9PTpT1mmI+/fx06P+Ze7UigUqxDmrqK5dIzo+puYpIPm5tEr+esSbbkGEgqWdNPP43Nt9ctNoe6N
Gz/hna0vdrdxwC5WwXqhHVMUw87oQVHkRFT8MmvYZL0sEz3mX+5KoVCsQiyNu9L1NzFJB8214vdCKb0S
A4GoGGcEvn79R/o1M+7HB0rzEQ++ufl0Y+PJ2trHSMtHGwFLTI/5l7tSKBSrEEvjrnT9TUzSQYOrvTP8
K/mBjhhDeGf7LQm88NbWMwwy+Ee5OGU+Irw340tPj/mXu1IoFKsQS+OudP1NTOpBg7pkPBKjR+xepfVl
Apt9No+MWbZHuThoq7Nq9JV/uSuFQrEKsTTuCnT9TUnqQYO0txpfyd8NUzR8lLtdvHVjf/81YJ/5yMql
f/Y3lb7yL3elUChWIZbJXen6m5LUgwY/e7v+lfwzgaKAouGjXLvxaDaZNXSHumafUZ1qVF6dR4Fl+sq/
3JVCoViFWCZ3petvSlIPGlQ5PHzb+dGvKUo7puhu8Vqzuke51GQXpKU77LPtYgL741k1SEgv+Ze7UigU
qxDL5K6Yw3X9TUaGQYN3Pii+7BbK1oxX1G48Rm/FQF1scvQ7nF7gj4q/6W33QldQ4DK95F/uSqFQrEIs
k7sCXX+TkWHQ7Be/q0m6IwkjTFFEQjb0QD988ebmU+S0G4877d6KQVNeYD5aa5Qm/wrSS/7lrhQKxSrE
krkrXX+TkWHQkOU7Na/kR1Eg72ZyUXT76K0Y2GRKPuKdacS0bwktm8As0Dgt2zPgVRC4TC/5l7tSKBSr
EEvmrnT9TUaGQYMwqIuDDhVlvSlqj3K3tp6Zojjl8FFuZ/b2vkdgSpZpjTYZKCtyfzKil/zLXSkUilWI
JXNXvcz/s7Ka1988g+bWrX8fFG/dIL+Xi0e5O8ULx+xRLpw9eh2+CT8/tGODiR7piC4QeOnVrWP+/Mtd
KRSKVYglc1eg628a8gwa+z0CnDIptke5pBtp8bOsjCr3hQ0UjDM9wnAdLT7z51/uSqFQrEIsn7vS9TcN
eQYNHvbq1e9IMYoiMBmPKgwEneLT6Q5XPuetzlEzf/7lrhQKxSrE8rkrXX/TkG3QXFntt3pmZ878y10p
FIpViOVzV6DrbwKWbdCINMhdKRSKVYildFciARo0ogtyVwqFYhVC7kp0Q4NGdEHuSqFQrELIXYluaNCI
LshdKRSKVQi5K9ENDRrRBbkrhUKxCiF3JbqhQSO6kMxdMbUpFApFFG6CGD7oS+5KdECDRnQhpbuiL4VC
oQgj2b1zuSvRDQ0a0YVks5tNbfSlUCgUFnJXYvHRoBFdkLtSKBS5Qu5KLD4aNKILclcKhSJXyF2JxUeD
RnRB7kqhUOQKuSux+GjQiC7IXSkUilwhdyUWHw0a0QW5K4VCkSvkrsTio0EjuiB3pVAocoXclVh8NGhE
F+SuFApFrpC7EouPBo3ogtyVQqHIFXJXYvHRoBFdkLtSKBS5Qu5KLD4aNKILclcKhSJXyF2JxUeDRnRB
7kqhUOQKuSux+GjQiC7IXSkUilwhdyUWHw0a0QW5K4VCkSvkrsTio0EjuiB3pVAocoXclVh8NGhEF+Su
FApFrpC7EouPBo3ogtyVQqHIFXJXYvHRoBFdkLtSLHj8+eefbkmxdCF3JRYfDRrRBbkrxSLH48ePGTZ7
e3t//fWXW6VYopC7EouPBo3ogtyVYmHDxozFqVOnGEVug2JZAmUpbYoYOuSuRDc0aEQXks1ucleKmeL9
+/cffPABY8bHiRMnGEhus2IpAlkpbYoYOuSuRDc0aEQXks1ucleK9sGAwUsxYMLQ88HlC2SltCli6JC7
Et3QoBFdSDa7yV0pWgYW6tSpU4yWMFjjNiuWKFCW0s0RA4fcleiGBo3oQrLZTe5K0TIePXrEUAlDzwSX
NRCX0qaIoUPuSnRDg0Z0IdnsJnelaBM2TsL44IMP3r9/7zYrlivQl9LNEQOH3JXohgaN6EKy2U3uSjE1
/vrrr/LXrV69euU2K5Yu0JfSzREDh9yV6IYGjehCstlN7koxNTY3NxkkYezt7bltimUMJKZ0c8TAIXcl
uqFBI7qQbHaTu1I0h704NIyTJ0/qlwSXO1CZ0s0RA4fcleiGBo3oQrLZTe5K0RDv379neIShr1utQiA0
pZsjBg65K9ENDRrRhWSzm9yVoi7++uuvkydPMjzC0NetViEQmtLNEQOH3JXohgaN6EKy2U3uSlEX5WeC
+rrVigRaU7o5YuCQuxLd0KARXUg2u8ldKSqj/EzwxIkTbpti2QO5Kd0cMXDIXYluaNCILiSb3eSuksXJ
vfd7e+/HUpZfwfDo0SNGy96rybuvMpaKBIHclG6OGDiQle6iCVCIqWjQiC4km91saitmVMWw0WBlFq48
+YpREcapU6fKRidL6bKpGDJQnNLNEQMHmtJdNAEKMRUNGtGFZLObTW3FjKoYNqYYmkUqP/jgA0aFDz5G
FidjqUgQiE7p5oiBA1npLpoAhZiKBo3oQrLZzaa2YkZVDBvNhmZxyvIzwcePHzfYncSly6ZiyEB0SjdH
DBxoSnfRBCjEVDRoRBeSzW42tRUzqmLYaDA0i1NWPhNstjuJS0WCQHdKN0cMHMhKd9EEKMRUNGhEF5LN
bja1FTOqYthotjULUkbPBIkGo5OldNlUDBnoTunmiIEDTekumgCFmIoGjehCstnNprZiRlUMG822ZiHK
0o2rzc3NyNxkLxUJAukp3RwxcCAr3UUToBBT0aARXUg2u9nUVsyoimGjydYsRrnIX2b3pcumYshAfUo3
RwwcaEp30QQoxFQ0aEQXks1uNrUVM6pi2GiwNYtQlm9cPXr0qNnoZCkVCQL1Kd0cMXAgK91FE6AQU9Gg
EV1INrvZ1FbMqIpho9ncZC+jG1cnTpxosDgZS5dNxZDBAKB0c8TAgaZ0F02AQkxFg0Z0IdnsZlNbMaMq
ho1mc5O5LP215gV5M3u5VCQIBgClmyMGDmSlu2gCFGIqGjSiC8lmN5vaihlVMWw0mZvcZXTjCrNVtjUL
UrpsKoYMxgClmyMGDjSlu2gCFGIqGjSiC8lmN5vaihlVMWw0mJu8ZfkbV69evWq2OBlLRYJgDFC6OWLg
QFa6iyZAIaaiQSO6kGx2s6mtmFEVw0azxclYRjeuFu31oVHpsqkYMhgGlG6OGDjQlO6iCVCIqWjQiC4k
m91saitmVMWw0WxxOpT/+MfjiOb61WXVrwpGhmZq6fYMorn+PKUiQaAgpZsjBg5kpbtoAhRiKho0ogvJ
Zjeb2ooZVTFsNFmcTmVkraC5fmXZyzeu3M5BNNefp3TZVAwZKEjp5oiBA03pLpoAhZjKuAfNhx/+C6KV
IgHJZjeb2ooZVTFsNFicbmVkraC5frks37jq9geb3c5BNNefp1QkCBSkdHPEwIGsdBdNgAJ0/W1mxIPm
n//8rxs3ftrff7239320SQxNstnNprZiRlUMG81Gp0MZ+iqjuX65PHHiBOr76PyOK7d/EM315yldNhVD
BgpSujli4EBTuosmQKHr71TGOmiwzOh6//5vt2//gsxXrnwLUR0xHMlmN5vaihlVMWw0G50OZWStoLl+
XJZuXO3t7UVWpmXp9g+iuf48pSJBoCClmyMGDmSlu2gCXHF0/W3DWAcNit679+7hwz+wz7u7L7e3n1++
/CqqI4Yj2exmU1sxoyqGjSaj06mMrBU014/K6A2iJ06cKFuZlqVrIojm+vOULpuKIQMFKd0cMXCgKd1F
E+CKo+tvG8Y6aBD10aM/7tz5Fct87twXGxtP5lFXz49nJdnsZlNbMaMqho0Go9OtjKwVNNePyuj77Jub
m822pqF0TQTRXH+eUpEgUJDSzREDB7LSXTQBrji6/rZhlIMG44yuGOfr1380afHOV69+F1Vrhvp7e98z
Sm7d+vfBwRsGx6VL30R1RCXkP9nsZlNbMaMqho0Go9OtjKwVNNc/VpYfC06zNQ2layKI5vrzlC6biiED
BSndHDFwoCndRXPgKqPrb0tGOWiuXfvh7t139+69YxlpoaUwKMrIYEwgJ6Levv0L5c2bP9Pgzs6Lra1n
UX1RCelKNrvZ1FbMqIphY4rdmb2MrBU01w/L6Pvsc/7pG9dKEM315ykVCQIFKd0cMXAgK91Fc+Aqo+tv
S8Y3aD788F9og3FGlQsXvkJa7HODcWYTu3z00X/v7782RYF9+YjM6MomKpw//+Xa2sdLeX+yXyz/yWY3
m9qKGVUxbDTbnQ5lZK2guX5YInoY3V7E4EvXShDN9ecpXTYVQwYKUro5YuBAU7qLpsGVRdff9oxv0Nht
yQcPfkeVs2c/R5Ld3ZdIGAmMTv7Go1eUYcEaU5StNGVQmUZoSr/4MBXLf7LZzaa2YkZVDBvNdqdDGfoq
o7n+3+Xxx4IffPBBs6GZWrqGgmiuP0+pSBAoSOnmiIEDWekumgZXFl1/2zO+QYM2GGe4dOmb9fVPTp/+
FGG8KkgVKsqCKYpNjhQNQV1aw4bjoH1HohLLf7LZzaa2YkZVDBtNdqdTGVkraK7vy+ix4KlTp8omZqbS
NRREc/15SpdNxZCBgpRujhg40JTuomlwZdH1tz0jGzTIgAVG2nv33m1vP8ftbm4+RVokR0UTlTK68Rhp
WQnWe2vr2Zkzn0U9ihCf/2Szm01txYyqGDYa7E63MrJW0Fzfl9FvC875WJDSNRREc/15SkWCQEFKN0cM
HMhKd9FMuJro+jsTIxs0CIaujx79cffuu7NnP8c7X7jwFUKGNrm9oiE0vrPzguESdicifP6TzW42tRUz
qmLYaLA7Scu+HwsmLl02FUMGA4PSzREDB5rSXTQTria6/s7EQg+a6FEumiHqgwe/oy6Knj79qVld5DRF
6248tgFXfvHi16jb8tcfVoGG/Ceb3WxqK2ZUxbAxxfSkKvv9bcH0pSJBMDAo3RwxcCAr3YUz4Yqg6++c
jMBdIRuW+ebNnw8P35q0aHz58quNjafYZ+pEOnUDdWmT4bK9/Tw8hlWmIf/JZjeb2ooZVTFsNJueZGX0
WPDRo0cNVmYBS5dNxZDBwKB0c8TAgaZ0F06MK4Kuv3OyoIOGdGOHDw7e3D76cpypi7RmnM+d+wLvvLPz
wir3AgPF3o2G0uHBrCBkozn/yWY3m9qKGVUxbDSbnkRlry8RzVIqEgQDg9LNEQMHstJdNEMuN1Pnf11/
27BAg4acYpNRDi29qP5RLrAGabHP1MTk4p13d1+yHIkEtGO7sBBtaoCm7NGvefZVY6b8J5vdbGorZlTF
sNFkelKVkbua528L5ipdNhVDBmOD0s0RAwea0l00Wy4fM83/uv62IfWgiRJHQvf2vrcbjyZqqCja+Ee5
LJu6dlsS47y5+ZQFL4wtUJ9979z5lWo0xV6V8ldCzYsXv15f/4RBEx7kMtFX/pPNbja1FTOqYthoMD3J
yuhLV/P8bcFcpSJBMDYo3RwxcCAr3YXT5njR9TcleQaNaRApimtG5lDRENYjGOpS+cKFr9DAXhEbVWNM
2A3Mhw8nNzCvXPmWEdBSYKpRn0Gz9H8SZ/78J5vdbGorZlTFsNFgepKV5S9dle3Lgpcum4ohg7FB6eaI
gQNN6S6aQkeNrr9pSDdoyB3ioaJXFHVNUbPJUa4jGA32lTp2aXjoSzUGAdJin9lKHTPCUbU6qLm9/Zyh
w8KS0W/+k81uNrUVM6pi2GgwPWnK8peuIuMyilKRIBgblG6OGDiQle6i6XR06PqbnkEGjb/9iKIoR8YR
EkWBBQRmjSlaaZMrQVQ0A/Y6e/bzM2c+w0HTflSNZukFgamPEUYqBGYhqlYHDdLs2shfyZ8g/8lmN5va
ihlVMWw0W58UZelLVw0mZmFLl03FkMHwoHRzxMCBpnTnZ9fFR9ffvPj8DzJo7MajeWRgoZuiHnZhWGCc
79//jUNHWrh06ZuyurRPzcPDt5QcCdIiMDWjanXQoL2S34z5SEmQ/2Szm01txYyqGDamWJ/hy5MnT6K1
j/n/AE6WUpEgGB6Ubo4YOJCV7qI5dpFJMP/r+tuAz3/PgwYVHzz4neTSNPnFwNqNx6mKlnWKYJSgLi2T
faTFPvuv1IXQEZ3eufMr9VnGCKPuxYtfT23foBqueWvrGe1HpzYKkuU/2exmU1sxoyqGjWbrk6CMvtI+
ujddWemyqRgyGB6Ubo4YONCU7qKZdjHR9TcvUf57HjRYtnv33tGu2eQod3UgA5UbbDWbOGLURbPd3Zcb
G08rv1JnMJ6ohsAcA7pSE43rKpfhLM6f/3JtnK/kT5b/ZLObTW3FjKoYNpqtT4JyCb7STqlIEAwPSjdH
DBzISnfRTLuY6Pqblyj/PQ8avCcy0EeUsjqQEzE4GvSg5IAqTS7Har+wQB2kwjvbH9OOqhk0gnOkQRZ2
dl5QGYFxxO3tMwMIdfHm4amNgmT5Tza72dRWzKiKYaPZ+iQoEdoHTqtsXEZRumwqhgxGCKWbIwYONKW7
aKZdTJLN/7r+VhLlv/9BQ1oPDt7UueAIZMPkItvDhxPl2B2TW5aBw71//zfqsICuCGbPZaNqBqLu77+m
pt3DXF//ZHv7eXvvTO/ourHxhL38SY2INPlPNrvZ1FbMqIpho9n6DF4uxVfaKRUJghFC6eaIgQNZ6S6c
YxcZXX/zEua//0FDZrGupDhMWSUcgcmGujg+0oovRhIaiWpS7cGD31GX0YARRjNqlqsZNAtsZQScPfs5
ItFmecQ0wFCwXuyMxkWa/Ceb3WxqK2ZUxbDRZH2GLyN3Nbo/3uxLl03FkMEIoXRzxMCBpnQXzrGLjK6/
eQnz3/+goV3s8PXrP4b5qoNqVLZf4MSx4ouRLfK5SMVW1AUaJ++bm08b1DXYSoN2d3EmaYH6jIyRPvpN
k/9ks5tNbcWMqhg2GqxPivL4LwyO8S3tVioSBCOE0s0RAwey0l00zS4suv7mJcx//4OG1NA6eoT5qoND
wehhnA8O3iAq6gKShHW8urhsPmKHUXe35i8c9QIt2yv5KaOzW3zS5D/Z7GZTWzGjKoaNJuszfFn+Gzhl
4zKK0mVTMWQwQijdHDFwoCndRdPswqLrb17C/Pc8aFCI8ubNnwFVwpRVgrocB+qiMYeFIy7fSKQdtH/4
cPIXjmgcaWHWm40zQctXilfy49P9qY2CZPlPNrvZ1FbMqIpho8H6JCgjd/X48eNmE7OwpSJBMEIo3Rwx
cCAr3fk5dpHR9TcvUf4HGTQ3bvx0+/Yv1679EGWtDEdAZbwe9VEaR0xCo7uO1OFYvbp4Z8BfD6cu0BHj
7PTpT+2MxkWC/Ceb3WxqK2ZUxbDRYH0SlMvxOgZKl03FkMEIoXRzxMCBpnTnZ9fFR9ffvPj8DzJo0APB
6CNKWSUcBMbZ1EVXHCtpxbr6CqG6eEOkZQREdy97h6HDwaytfWxudFwkyH+y2c2mtmJGVQwbDdYnQRm5
q3ki730vRYJAZUo3RwwcyEp30Ry7yOj6mxef/6EGDa0fHLyJUlYJou7vvwYEQ9r14o9vl9V9ULwC1eqY
uoN6Zxq/dOkbvDN2Pjq1UTB0/pPNbja1FTOqYthosD4Jyh7dVYP1SVC6bCqGDFSmdHPEwIGmdBdNsAuO
rr95sfwPNWhQC0lQbqoGiGfVdnZeoNzW1jP7LltYwdTliFOqywjDp3M84XmNhaHzn2x2s6mtmFEVw0aD
9UlQ9uWusr/KQZEgEJrSzREDB7LSXTi7Lj66/ubF8j/UoLlW/K1syihrdbALXhWQjeVwU6husjuTwGGc
H+0r+YfOf7LZzaa2YkZVDBsN1idBicq9xB4xzQANWrpsKoYMhKZ0c8TAgaZ056fWUaDrb14s/0MNGrJz
OMsr+fGqRrQeTN3793+jQdTFzDar25enpp3d4pX8mOjo7BYfjn/Q/Ceb3WxqK2ZUxbDRYH0SlKjcS2T/
OrwiQSA0pZsjBg5kpbtogl1wmLd1/c0Ix0+6Bhw0eLeD1q/kb4AW9vdfm7o069XtS8U6aB8vv7HxZKd4
6//oGDT/yWY3m9qKGVUxbDRYn4Utoze8L8JfJ3TZVAwZaE3p5oiBA03pLpxaR4Guv3kZ8N4VIMmtdq/k
byZUl4wjLQKT96HVBVwzfW1uPo1ObRQMmv9ks5tNbcWMqhg2GkzM4paL99cJFQkCrSndHDFwICvdRbPr
4qPrb15I2oCDxh49tnwlfwOm7t2771CXj6gLdepSmfEELESbOsBZjP3R70D5Tza72dRWzKiKYaPJxCxq
GbmrU6dOle1O4tJlUzFkoDWlmyMGDjSlu2h2XXx0/c0L+R9w0JCdO61fyd8AOt248RPSIjCyke5IXVOU
k6Eve3UHJR+bzXUb600de/R7ufiu37jg+IfLf7LZzaa2YkZVDBsNJmZhy+gN748ePWq2PglKRYJAa0o3
RwwcyEp30ey6+DB16/qbEY5/2EFDlnt59ItUDBTUxYnvXPgKdS9e/NrWI/zNmz+z9f793x4+/OPRoz8o
WXP16nfzPxtmdxrZ2HjCkIpObRQMl/9ks5tNbcWMqhg2GkzMwpYL+IZ3l03FkIHWlG6OGDjQlO6iqXUU
6Pqbl2EHjZlZjG2UtVmhBRzxvXuTP+WNrpZrJGSNKWqwzBp6ZCt17EVkUVNlzHpD5ShklDCYzpz5zM5o
XAyX/2Szm01txYyqGDYaTMzCloyNMCKjk6VUJAi0pnRzxMCBrHQXTa2jQNffvAw7aEgZrnb+R7+0g2Ze
OTKOtKarKYr2CG8iUf/Cha/Onv2cksphOxHIifWmTbDdowqAfd7ZeTHSR7/D5T/Z7GZTWzGjKoaNBhMz
pTz5akJznSHK0i8MNpiemcrNzc3Of07HZVMxZCA3pZsjBg40pbtwXh0Lw83/uv62YdhBQ2pQl8RFKZsV
ZDg4eHP37jtaMwn5aJKw6fLlVwi5vf3c5DQ9UNd+kzNqykMjDJH7939jiDA+kJkdbfewGh9x6+vrn1Da
SY2I4fKfbHazqa2YURXDxhQrU1dOLM5jMI/VVLPvMnJXJ06ciIxOh3Jvb8+eNnZ+uYMiQSAQpZsjBg5k
pTvN/7r+zsqA7gqHS4kGJBENwpTNCruT/cPDt3hkk/PSpW9M0c3NpxsbT0+f/pQFVlINq84mPp4//yXH
EDUFtHCt+H0Kk5aSUWJDhBY45rAy6l658i2tnTv3hT+1UTBo/pPNbja1FTOqYthotjJ1pVmrkInNmrZX
P2XpFwYbTE9z+fgxh33SNXQU3eyay6ZiyEAdSjdHDBxoSnea/3X9nQnOffAbnqSbPJLNMGUdoAVGCcrt
7r70isKZM59hkxESYdiKv6YaPrdOXSwzWlINXU1aPxqg8lExaxhG9OVPakQMlP9ks5tNbcWMqhg2pliZ
qrLwN7G78gxts8ruKjI6U8tXr16xV/SLh2F0aFORIJCG0s0RAwey0p3mf11/Z2Vwd4VRvXPnVzSOUjYr
dkMStew7bijBgrlde1M+HaErauHWWRmpy1Z2t6Fmlhkw42xCufX1T+xvg+OgozuTwBo6Wlv7mNbCUxsF
A+U/2exmU1sxoyqGjWYrU1lGdqqOoWzW8btNm5ubDaYnLB8/foxtin7fsDLat+lLl03FkIE0lG6OGDjQ
lO40/+v6OyspvqyHugcHb6KUTaWcZUBIfDHiIQMth3UQD3UxxajLVgw1spm6SItBZr3XlQUctA0CdMUX
Iy0fadM36KEXNlEHjf1JjYgh8p9sdrOprZhRFcPGFCtTVxZft4rsVDUnXWV2rG1tljK654QTioyOL7FT
bLXbVG1MFUHlV69eVbbWXCoSBAJRujli4EBWutP8D7r+zkQKd0XSgexHWesAia5UHZDQbjnijukUtfDO
LFy79oN9I8/riszUZyuC4YgReGfnRaVrNljPqGK4gD+pETFE/pPNbja1FTOqYthotjLNZVuDFeLNVuG3
mtuvLCN3Za8SxRKxQGCPZrJTFlTeI6ZZqIbSZVMxZKAUpZsjBg40pTvN/+Dn/zK6/pZJ4a7wrb08+p3K
jRs/4dMBpRFsd/claw4P39rvjqIrywwyLLBZZrsbiRnnIOukNajAaKC+P6kRMUT+k81uNrUVM6pi2Gi2
Mi3LLjYrJLRc04hsEx+jNe2DHbFi2KrIKnUoFQkCySjdHDFwICvdaf6fiq6/ESncFdkh4yQ6zFfvoKhp
iYos4IVZg2XmI9KywPCyW5H4ZXSaaplDqMNYYUfqR2e3+HD8vec/2exmU1sxoyqGjWbbNFtZuJ/YOfXP
vNGjqfKly6ZiyEA7SjdHDBxoSnea/5vR9bdMCncFeOeDPl7JX4Y2kQ05bwbv479VvKB2f/81a2wZg+z9
8pkzn2GETac20gLVGBkbG08YEOF5jYXe859sdrOprZhRFcPGFMPUtZzYrJNtv/8+I10CR3XixInNzc1H
w/zZHEWCQEdKN0cMHMhKd5r/K9H1t4FE7gppLct12WQTIl2//iMlywbKhfj1VhNFaZZxYwbZ337kI7ra
7nR9oXhvrOmKwOiKTqyPDqAZDvvq1e+2tp4xMvxJjYje859sdrOprZhRFcNGs0mav5xg97R6M1ttAzt1
6tQpHFXnN7C3L102FUMGmlK6OWLgQFO60/zv11tNXX+nkshdoQcyIEmUNQMl0AlVDg/fMgjAvojHSkAq
Sj7aJtrBEYeKelFtd1RHV/RARa9rB78cwY4Y57VxvpK/9/wnm91saitmVMWwUWmJhisnBF+i6mS54sBF
mZEi7Lvt3X7vb55SkSDQmtLNEQMHstIds6jmfz//6/rbhkTuioQiCTpFKTPQA3lMJKohEqCWh/WeBw9+
99y7N3k3P4qaWaYjFL148Wt8Lsu45tPFG8+2t5+znpXddDXYl5ZR16z3uOg9/8lmN5vaihlVMWw0m6Fc
ZejAIqLvsM/5u359lS6biiEDuSndHDFwoCndaf43/MUXdP1tJpG7AjTAApurDbPGGrTBBaMcFeyWI2si
s0xpH60d6iAnTV258i3pRshz577YLN73ipZ0R7OIgXfmI5a5s67sSGuMDBox77y19cyf1IiwvPWV/2Sz
m01txYyqGDYaLM5iluW3iUZGJ0upSBDITenmiIEDWelO8799tHZ0/W1DOneFYAhzrfR7oaaubSKDSAUs
kFDDdmcBIa3C7u7L8+e/RE7EM0XPnPkMWGAlFWiKNhEG1YHdo06bYUewHsOhs77+ycbGk5H+dPWb/2Sz
m01txYyqGDaarcwill3f1T5o6bKpGDKQm9LNEQMHmhajS/O/rr+zkc5dYXWxwJWPftmExiiHOUU23K5B
Tq0EcmqEWqKu1WEvNMAs0wgNYq79cGEoUHIAYY9lTFGqmaLsRbO0j5wmKh3Rvj+d0dFv/pPNbja1FTOq
YtiYYmUWrzw5eenD33Fq9r8JOESpSBDITenmiIEDWelO8384/+v624Z07gpQF0sbpdUgsz6tgFQIZniZ
PaYl1aiPcuxoFptGaMrM+O3bv1CyEkmAOrY1witKO1SjZQYQQwdFT5/+lGU68v597PSY/2Szm01txYyq
GDaarcwilsfd1cmTJxtMT7LSZVMxZCA3pZsjBg40pbtoLh0juv4mJumguXn0Sv66RFuugYSCJd308/hc
W/1yU6h748ZPeGfri91tHLCLVbBeaMcUxbAzelAUOREVv8waNlkvy0SP+U82u9nUVsyoimFjipVZvDJy
VydOnIiMTpZSkSCQm9LNEQMHstKdTYyjRtffxCQdNNeK3wul9EoMBKJinBH4+vUf6dfMuB8fKM1HPPjm
5tONjSdrax8jLR9tBCwxPeY/2exmU1sxoyqGjWYrs4jlcXf1wQcfNJieZKXLpmLIQG5KN0cMHGhKd9Fc
OkZ0/U1M0kGDq70z/Cv5gY4YQ3hn+y0JvPDW1jMMMvhHuThlPiK8N+NLT4/5Tza72dRWzKiKYWOKlVnI
MnopQ2R0spSKBIHWlG6OGDiQle6iuXSM6PqbmNSDBnXJeCRGj9i9SuvLBDb7bB4Zs2yPcnHQVmfV6Cv/
yWY3m9qKGVUxbDSYmIUtI3c10B+3mal02VQMGWhN6eaIgQNN6S6aSEeKrr8pST1okPZW4yv5u2GKho9y
t4u3buzvvwbsMx9ZufTP/qbSV/6TzW42tRUzqmLYaDAxC1ueOHGC4eEDd9VsfRKUigSB1pRujhg4kJXu
ool0pOj6m5LUgwY/e7v+lfwzgaKAouGjXLvxaDaZNXSHumafUZ1qVF6dR4Fl+sp/stnNprZiRlUMGw0m
ZmHL6JVXi/BSBpdNxZCB1pRujhg40JTuool0pOj6m5LUgwZVDg/fdn70a4rSjim6W7zWrO5RLjXZBWnp
Dvtsu5jA/nhWDRLSS/6TzW42tRUzqmLYaDAxi1uWfm2w2fokKBUJAq0p3RwxcCAr3YWz6HhhDtf1NxkZ
Bg3e+aD4slsoWzNeUbvxGL0VA3WxydHvcHqBPyr+prfdC11Bgcv0kv9ks5tNbcWMqhg2mkzMopblXxss
253EpcumYshAa0o3RwwcaEp34RQ6anT9TUaGQbNf/K4m6Y4kjDBFEQnZ0AP98MWbm0+R02487rR7KwZN
eYH5aK1RmvwrSC/5Tza72dRWzKiKYaPBxCxyuWhfbFckCISmdHPEwIGsdBdOoaNG199kZBg0ZPlOzSv5
URTIu5lcFN0+eisGNpmSj3hnGjHtW0LLJjALNE7L9gx4FQQu00v+k81uNrUVM6pi2Gg2MQtbRl9sz/7X
Bl02FUMGQlO6OWLgQFO6C6fQUaPrbzIyDBqEQV0cdKgo601Re5S7tfXMFMUph49yO7O39z0CU7JMa7TJ
QFmR+5MRveQ/2exmU1sxoyqGjWYTs7Dlor2xXZEgEJrSzREDB7LSXTj7jZpe5v9ZWc3rb55Bc+vWvw+K
t26Q38vFo9yd4oVj9igXzh69Dt+Enx/ascFEj3REFwi89OrWMX/+k81uNrUVM6pCURF//vknIyQMxozb
pljSQGVKN0cMHEvmrkDX3zTkGTT2ewQ4ZVJsj3JJN9LiZ1kZVe4LGygYZ3qE4TpafObPf7LZTe5K0Rx/
/fVX9HDw8ePHbptiSQOVKd0cMXAsn7vS9TcNeQYNHvbq1e9IMYoiMBmPKgwEneLT6Q5XPuetzlEzf/6T
zW5yV4qpsbe3xyDxcerUKbdBsaSBypRujhg4ls9d6fqbhmyD5spqv9UzO3PmP9nsJnelmBrlh4Pv3793
2xTLGEhM6eaIgWP53BXo+puAZRs0Ig3JZje5K8XUKD8cfPTokdumWMZAYko3RwwcS+muRAI0aEQXks1u
cleKNoGdYpz4wGxhudw2xdIFElO6OWLgkLsS3dCgEV1INrvJXSnahH5zcKUCfSndHDFwyF2JbmjQiC4k
m93krhRt4q+//ir/RWe3TbF0gb6Ubo4YOOSuRDc0aEQXks1ucleKlvH48WOGShj6bvuyBuJSujli4JC7
Et3QoBFdSDa7yV0pWgajJfqbg3t7e26bYrkCcSltihg65K5ENzRoRBeSzW5yV4r2Eb34itDtq6UMlKV0
c8TAIXcluqFBI7qQbHaTu1K0D7wUoyWMzc1Nt02xRIGylG6OGDjkrkQ3NGhEF5LNbnJXipkCO8WA8cFH
vZph+QJlKd0cMXDIXYluaNCILiSb3eSuFDOFfzUDvoplWaulDJsT3BwxcMhdiW5o0IguJJvd5K4Us8ar
V6/wVe6DYhlD7kosPho0ogtyVwqFIlfIXYnFR4NGdEHuSqFQ5Aq5K7H4aNCILshdKRSKXCF3JRYfDRrR
BbkrhUKRK+SuxOKjQSO6IHelUChyhdyVWHw0aEQX5K4UCkWukLsSi48GjeiC3JVCocgVcldi8dGgEV2Q
u1IoFLlC7kosPho0ogtyVwqFIlfIXYnFR4NGdEHuSqFQ5Aq5K7H4aNCILshdKRSKXCF3JRYfDRrRBbkr
hUKRK+SuxOKjQSO6IHelWJ3466+/3r9//+effzIa9179h5LgI+OTTa7SAEHjdBH2yzLBwQza7+KH3JVY
fDRoRBfkrnoPTtaunZXR79WU1ly7VcGRuHqrHTb89vbew8n68vHjxyStX4HwT9ip5n4pqbOaYsldicVH
g0Z0Qe6q3+BMT5w4wZnWxebmpqvaR+zt7bl2q4IjWfFbI8hRNjfw6tUr1lsZbaVkrM6fN7rGrh3r9+hu
GTH5WOqX41k1vRillJMJYvgg7XQXTYBCTEWDRnQh2exmU1sxoy5zcKYnT57kTBvi/fv3rvZ8wZX4gw8+
cI1WBUeysu6KE8esHDM3e5NngpUJQbWyzaKy2zx7TG5Z+X5r7kuxMjpCSta4zasRjFJKUpEg5K5ENzRo
RBeSzW4r4q4Irt/25Z7Hjx9X3sdivas6X3Aldi0GgaOyJ1zkfGWtVWhurGxjlUgXozTcC2PUIYf05VtA
Bbe2Jqh8rMe9fpz3WIIRS1nMEIOH3JXohgaN6EKy2W113FUYXObLt5dOnTrlNs8Xm5ubrsWjoC9S7Tav
aoTmxsqZHBKShftSzpTS0Ni17DeydG7tagSDlrKYIQYPuSvRDQ0a0YVks9tquiui7IEIrsFuc9cgpcP5
tvEGw8zbFMputwnJbWh3KFnjtk0Lv1ebu2U+wr5W6o4jg5ZyMkEMH3JXohsaNKILyWa3lXVXlV88n//h
YOVjwX6/Mj+6KN+1chtmD0Zs2A4la9y2+vCP+WbtOjxyuauBQu5KdEODRnQh2ewmdxXGyZMn3eauUXlL
jL7c5tWL8net5rQp5UeEUxukmtXs8OV0v6/c1UAhdyW6oUEjupBsdltZd1Vpg4h5Hg6Sz8rfFlxZd4Uj
MWviy5kezNVF9Dt9e42WCVHm6Z0fENtX7mqgkLsS3dCgEV1INrutrLs6deoUJ17+/cF5Hg7aY0EMVmTd
VvbJIMlsb4Pax0ymzdsjyg7WmZ8R25cFt2oFgkFLWcwQg4fcleiGBo3oQrLZbcXdVfHc6tgjwnm+gW6m
itKy6mM1v9Xuv+00j7mpCzIctkxZd28pfGNWtwNgx4b2lzIYtJRujhg45K5ENzRoRBeSzW6r6a64UtrL
RbncYgJYCKPbNZhk2mNBUmpZ9bGa7iq0PpTz/8ZAGBMFj7df952qsE6355Io26MvHEUwaCmLGWLwsB+W
aAIUYioaNKILyWY3m9qKGXWFInRXLPfycNA/FqRBW/axgu4KHxPaGspuzqYhom9fUTKe3bYgwjp9PZpc
+mDQUtoUMXTIXYluaNCILiSb3VbWXZmjIgN8jB4OdvtLNfao0b5iFbmr+X8VcXQRmh4rO6S0OdAu6qXS
PEV1THFFczBoKScTxPAhdyW6oUEjupBsdltNd8WJf1AEC3y0JIQx640W2rEdaYqPUYPzuCtaxqs9fvz4
0aNHuECCZdqf36zQAqfpW6Zkmb5YOWfj70svTaBZt63XiHqhdBuCiOoMdCRLFgxaSsZegrAflmgCFGIq
GjSiC8lmN5vaihl1hYITD90VZiJ6OIjVsJotA1/CXjRovmR+d0U7tGn3wyqDvqjgas8Y+CdOsPKPLVrQ
OH6r87O88IvkVg70vSWsUmSeysccHQkl6rhtippgDFAWM8TgIXcluqFBI7qQbHZbTXfFxZ6zxl74mzSY
Cdb4mNUPhY8FichdhR1NDfNV3vrQst1PIliP77H1FrMaLBS3X2wkOEd2p9mJ93k/uanDGtvko4OB4/jL
hqb96c8UHHzUV/nhYNnqUcpgNQfSU9oUMXTIXYluaNCILiSb3eSubE3khwiu3LZpapBGMz3+mh211t5d
cWD+fhV7+QZ9cFS21Qe7uG3TIjRnlQ/IOMhHjx5ZBR/t82DB8URWhtJt6zvIfLmvKNWVx0NJBgbyfEsQ
6E5ZzBCDh/2wRBOgEFPRoBFdSDa72dRWzKgrFOauTgbfXmfB3y6yaP9wkOs09dmdfNoaa99HS3eFj/Hu
h13qbFN0m63l7SWqWX26aDZMkcHyN+RaRvleUeWXzfuKqC9Kr4IFmS/X8eWs3nFFAt0pixli8JC7Et3Q
oBFdSDa7raa7sjtA0eO/yFW0tESE3W3C9LjPpTtMGBpS7bbVRLgL9eusFWFmzkcb9xMasvL9sHKEjwhD
D9omyiamTY+dgy6iHsuGiTVRnbCEhmyvZqA7pU0RQ4fcleiGBo3oQrLZbTXdlZ01rsh9LiKyRET5Ol0O
cmiVQw8RNdXslgi2+rtWRPNts6jx6CzK4e9aES1vyIVdTG0/DHxY2b60SWPnmHxd7HiPlQ892RTWKZfs
hZSu9soHulMWM8TgIXcluqFBI7qQbHZbTXdlt3+iuz44gw4PB827RDe6cEvWgkXzvauJIwnuFU290TWT
uwort78bR/jbXTM9GeTIy8Zl0DtDDOCoR3DbguDEbVN0bFG592pS0+2zwoHulJMJYviQuxLd0KARXUg2
u62muzJLFD7Lsyg/HHQb6sMeC0Y+jMSG96KaDdOsT/qiG13R880wIt/W8htaFt4gtrzdZcFpli1Lw7nP
H9jHco9u2/FoabAo+aFw+6xqoDslwiUIuSvRDQ0a0YVks5vcVRjRbSGi+amWtyBRNRIbGiCi7v5NZICI
qZf2yF013JEKfVuzw6sMu33VnIEoOLayWRn0bhCHV+7RbauKyhc0VJazpmuZAt0pJxPE8CF3JbqhQSO6
kGx2W013Zfeoyndl8AHRw8GyAwuj8rEgQWIjd1XnUVjvahTR5ktOLd0VK0PfNuuv/hG0MJO1IqhftimV
h9dXkI1Ze6y0gJXlrKe/NMGAobQpYuiQuxLd0KARXUg2u62mu7K7MpXPvMx4+Wi4M0RUPhYkSGzLe1eW
fwt2qasWRkt3FbZMVH7Xu/fAjpRtytDuqluPlUawXA76OomFDQYMpU0RQ4fcleiGBo3oQrLZbTXd1Wbx
vvLK7yFx0WVTGHU3MLiu11UgsdE9sLpGqIlFozKH1MZaES3dlZ2jj5aNzxmVlmVodzVPj20eFK6gwWLA
UBYzxOAhdyW6oUEjupBsdpO7ioILc2SMKm9xEfZYsPJL5SS2pbvqEG3cFQcQ1mGZNW7bkMGxlQ3K0O5q
zh7JzKvSax2ictUMFmOGkswkCLkr0Q0NGtGFZLPbarore6JX97Cs5cPBuseCBIkdzl3R+FR3RXducxFY
wEEtjo/KO0kcsNs8QFTeLXPbZgkOkh2jdsKScFVXIBgzlOQkQchdiW5o0IguJJvdVtldce7u8/GIrAlR
rsm11jZVXnRJbOSu6vrqEL5ri0p3ZffVfHT4Snu34MTL1oSVbvMAgVhRj+C2zR7l1sLSVVqBYMxQTiaI
4UPuSnRDg0Z0IdnstoLuCi9iv0xX53h8BR/l3xz0jwUr7wmxMnJXfX2pnGOOjq3SXUW335p/87HHmKSu
ZEoGveszScjxHisf+LYPfiii4/floCeyUMGYobQpYuiQuxLdGPeg+fDDf0G0UiQg2ey2mu7KrE/DxTK6
90N9cuW2FWF3v+ou5BOTcdwDze+uOFrrNIpKd2W/FOmj7qtjQ0TZlPzZ31PRcpS/lj7/d6TIJ8pGZ9FL
y2MJxgylTRFDh9xVHbr+NjPiQfPPf/7XjRs/7e+/3tv7PtokhibZ7Laa7sq+t9TgrpofDpI3W1nXQr/u
itb8vSiajZxTpbuKfmEwqbsawO40RNQXZV9mrtwyZTnVSxmMGUqbIoYOuatKdP2dylgHDZYZXe/f/+32
7V+Q+cqVbyGqI4Yj2ey2gu6KszZ3xYJbVYqyPQq/umR3tk7Vv/mzvHu3x1W0w452p41jtkZYOfVb7dFd
rpTuihFVNiVuW98xyXOprwZZZwraiVqm7KvxBQ/GDCUnmyDkrsro+tuGsQ4aFL13793Dh39gn3d3X25v
P798+VVURwxHstltNd0Vp0yw4FZVRfTVJQyNmZjJFb1wTs2GKfI3HdzVn3/+6S0aB+OPloWp7iq6v5Xs
e1cEh1c2JW5b3/G+6nUMblsfUb4P13C/c5mCMUOJlAlC7qqMrr9tGOugQdRHj/64c+dXLPO5c19sbDyZ
R109P56VZLPbCrorLpCcMgaF03erqsKqhUGuwvXNF9p53BVuifq2IwYretTFYU91V5E1TOmuiMjuUDan
unNMDOjxvvr67QELDjtqv6/HjgsejBlKTj9ByF2V0fW3DaMcNBhndMU4X7/+o0mLd7569buoWjPU39v7
nlFy69a/Dw7eMDguXfomqiMqIf/JZje5q7rw96h8mEcx39PwWNCi87M5Di+8ZVV2Thz2rO4q2RsZLBhU
aUxJgntLUftyV72H3FWErr8tGeWguXbth7t33927945lpIWWwqAoI4MxgZyIevv2L5Q3b/5Mgzs7L7a2
nkX1RSWkK9nstoLuigskpzzVXRH+BpIFPoZd2jwWJCJ31fLuEXJ451R3G4ZjmOquykderjNccISRKRni
i+2cUdxL6bEgWrNynnOPDFzv7m0xgzFDiY4JQu4qQtffloxv0Hz44b/QBuOMKhcufIW02OcG48wmdvno
o//e339tigL78hGZ0ZVNVDh//su1tY+X8v5kv1j+k81uK+iu7JTbGA4updQMw99VInWuUk10+OYTdsrV
bvwdQ7qe6q7MQfqgfmJbYF4ntD692zvOMWyfsnxjCZfJ+nnOndES9jJV9+UIxgzlZIIYPuSuQnT9bc/4
Bo3dlnzw4HdUOXv2cyTZ3X2JhJHA6ORvPHpFGRasMUXZSlMGlWmEpvSLD1Ox/Ceb3VbQXZmJwSe1ud5H
Dwctpj4WJGZ1V6G1an6MiGpT3VVUh0Boty1JYGhCU0JZtj5zRvmxYDkPVmeertk37IXEug1LHQwYyskE
MXzIXYXo+tue8Q0atME4w6VL36yvf3L69KcI41VBqlBRFkxRbHKkaAjq0ho2HAftOxKVWP6TzW4r6K7s
qVlLdxU9YrNouLHkI3JXzd984hLu6hUH5tbWBKpNdVdE5y9+9RWhKaEEt6GPIAlR+5UWyrbO4yxpNuzF
rV32YMBQFjPE4CF3FaLrb3tGNmiQAQuMtPfuvdvefo7b3dx8irRIjoomKmV04zHSshKs99bWszNnPot6
FCE+/8lmN7mr5nj//n10E4iP5M1tro/27orDwCG5ei2sG4fkqhZR567yfvWKIEvelDQYoG5BlsKWwW04
HrZpnm99hXfI5mlnXMGAoSxmiMFD7sqj6+9MjGzQIBi6Pnr0x927786e/RzvfOHCVwgZ2uT2iobQ+M7O
C4ZL2J2I8PlPNrutoLuy36dr6a6I6CZQy9+/a++uQhvUxrqZZD7qbBPtRL6wR3PTMto8vOsQnFrYJmVd
0nwd93n2QB3fyzzf3xpXMFooyWqCkLvy6Po7Ews9aKJHuWiGqA8e/I66KHr69KdmdZHTFK278dgGXPnF
i1+jbstff1gFGvKfbHZbQXdlbqm9u4puArV5LEi0d1cciavU7g5T1HLDLjM9nRwo8CXe4lAy3tyGOaJ9
m75mN1fHXr4XSrd2BYLRQunmiIFjZd2Vrr9zMgJ3hWxY5ps3fz48fGvSovHly682Np5in6kT6dQN1KVN
hsv29vPwGFaZhvwnm91WzV1NrpeFm2n/pCx8EtfysSAROZu6L8LTmqtRBEfV3H70WJBoOKRy5ZbWsMeI
DArlnHeAovthzWfka3Z7qPdn8JX2OQ97XMFQoWRcJYgVd1e6/nZmQQcN6cYOHxy8uX305ThTF2nNOJ87
9wXeeWfnhVXuBQaKvRsNpcODWUHIRnP+k81uq+auOGX/vIxlt3Za+IeD7W//UNN2sahzV1y/XY2jaLiK
e2sYRrPhK3/7qv1ZWzBCZt0lCnb3ZsjKzg2GdoeSs3MbaoJqvn5LMx2G33d1vnFlwVChRKYEsYLuaur8
r+tvGxZo0JBTbDLKoaUX1T/KBdYgLfaZmphcvPPu7kuWI5GAdmwXFqJNDdCUPfo1z75qzJT/ZLPbqrkr
O18Llt3aafHq6HUJLXfhQo6PsV0s6m6VhcdjUecY2N0cW/RtKiI8KpbD71exV/S9MfwZurvN08K+o9Y+
UXWBZfSWyMr2x+AjslaUbkN9hN+ammrFovBfnIcOzmzUgeiUxQwxeNiPQDRbLh8zzf+6/rYh9aCJEkdC
9/a+txuPJmqoKNr4R7ksm7p2WxLjvLn5lAUvjC1Qn33v3PmVajTFXpXyV0LNixe/Xl//hEETHuQy0Vf+
k81uNrUVM+ryB9fI8N4PtqPlVZNEUb/lY0HqRI8FLfBG5d2xHW7zUdBLaI8sWGNHTjlxKsfvYPHRTsTu
VNG77WVBp5HVs0bc5ppgLzNz7bPUHDQYGiPK8mk2xEwPBH1024vg58LvVVZt6QPdKTnxBLFM7krX35Tk
GTSmQaQorhmZQ0VDWI9gqEvlCxe+QgN7RWxUjTFhNzAfPpzcwLxy5VtGQEuBqUZ9Bs3S/0mc+fOfbHZb
BXfFNfVREZEpIVhjm/AlZMPtUBWYjIbHgvgPWsDWUK18b8kHm6hANQ7JLAtlZH0sqIM0BM2yi19pe3HA
tsYHjVg7lOUTwUvZVh8cCY1UnjIr6dTqk5/mtMwUHHxkd6amneDgqRzuRVrctmlB434vXzb3yEGGd616
PP0RBdJTcu4JAjXpLppCR42uv2lIN2jIHeKholcUdU1Rs8lRriMYDfaVOnZpeOhLNQYB0mKf2UodM8JR
tTqoub39nKHDwpLRb/6TzW42tRUz6nIG58gJtgmu9G6fqrB0uQ+lsDTOFN4i0K9bVR+YofC+S91JYYnq
bkqxi3dpPrzb4xgI/BYO0rvDyptt80f5AR+wcpLf//kfzA3BwsRUlV7owBo2uYbaBe2ELfh2WG/dUaey
R5Zt6woG6lOSkwSxHO5K19/0DDJo/O1HFEU5Mo6QKAosIDBrTNFKm1wJoqIZsNfZs5+fOfMZDpr2o2o0
Sy8ITH2MMFIhMAtRtTpokGbXRv5K/gT5Tza7Lb27IjANOAacx8mTJzETBL6BYIE1rDeTUedL2gSXYRr0
XVj79OvD1vgeWSb54b6oUBdhZR+06TYfRWW1KLBQ3jw1BEdITbfPMGEey1uZqSXH01kgMlw2as3lPINh
CYIxQDmZIIaP0bkrXX/z4vM/yKCxG4/mkYGFbop62IVhgXG+f/83Dh1p4dKlb8rq0j41Dw/fUnIkSIvA
1Iyq1UGD9kp+M+YjJUH+k81uq+CuCM6USyzhPh+FrWSr+zxfWGvuQ01U1mFN2ffwEcNU9+Ukdtnb26MO
gWNr/40iTpa+8Hns6Ho6Ctawnq19JWRqYGI4ctxMpcWxkiHay/GQsYmla7RZdk/L7bDCwWCgJO0JYnTu
KsH8r+tvAz7/PQ8aVHzw4HeSS9PkFwNrNx6nKlrWKYJRgrq0TPaRFvvsv1IXQkd0eufOr9RnGSOMuhcv
fj21fYNquOatrWe0H53aKEiW/2Sz24q4q1EEl3/kwG0QLS0Fu7SpVhmmvnVHtOxxoLATmdwyOgo+stJt
7jtoPOxu0L7GGHJXlej6m5co/z0PGizbvXvvaNdscpS7OpCByg22mk0cMeqi2e7uy42Np5VfqTMYT1RD
YI4BXamJxnWVy3AW589/uTbOV/Iny7/clUKhyBVyV5Xo+puXKP89Dxq8JzLQR5SyOpATMTga9KDkgCpN
Lsdqv7BAHaTCO9sf046qGTSCc6RBFnZ2XlAZgXHE7e0zAwh18ebhqY2CZPmXu1IoFLlC7qqSZPO/rr+V
RPnvf9CQ1oODN3UuOALZMLnI9vDhRDl2x+SWZeBw79//jTosoCuC2XPZqJqBqPv7r6lp9zDX1z/Z3n7e
3jvTO7pubDxhL39SIyJN/uWuFApFrpC7qkPX37yE+e9/0JBZrCspDlNWCUdgsqEujo+04ouRhEaimlR7
8OB31GU0YITRjJrlagbNAlsZAWfPfo5ItFkeMQ0wFKwXO6NxkSb/clcKhSJXyF3VoetvXsL89z9oaBc7
fP36j2G+6qAale0XOHGs+GJki3wuUrEVdYHGyfvm5tMGdQ220qDdXZxJWqA+I2Okj37T5F/uSqFQ5Aq5
qzp0/c1LmP/+Bw2poXX0CPNVB4eC0cM4Hxy8QVTUBSQJ63h1cdl8xA6j7m7NXzjqBVq2V/JTRme3+KTJ
v9yVQqHIFXJXdej6m5cw/z0PGhSivHnzZ0CVMGWVoC7HgbpozGHhiMs3EmkH7R8+nPyFIxpHWpj1ZuNM
0PKV4pX8+HR/aqMgWf7lrhQKRa6Qu6pE19+8RPkfZNDcuPHT7du/XLv2Q5S1MhwBlfF61EdpHDEJje46
Uodj9erinQF/PZy6QEeMs9OnP7UzGhcJ8i93pVAocoXcVQO6/ubF53+QQYMeCEYfUcoq4SAwzqYuuuJY
SSvW1VcI1cUbIi0jILp72TsMHQ5mbe1jc6PjIkH+5a4UCkWukLtqQNffvPj8DzVoaP3g4E2UskoQdX//
NSAY0q4Xf3y7rO6D4hWoVsfUHdQ70/ilS9/gnbHz0amNgqHzL3elUChyhdxVM7r+5sXyP9SgQS0kQbmp
GiCeVdvZeYFyW1vP7LtsYQVTlyNOqS4jDJ/O8YTnNRaGzr/clUKhyBVyV83o+psXy/9Qg+Za8beyKaOs
1cEueFVANpbDTaG6ye5MAodxfrSv5B86/3JXCoUiV8hdNaPrb14s/0MNGrJzOMsr+fGqRrQeTN3793+j
QdTFzDar25enpp3d4pX8mOjo7BYfjn/Q/MtdKRSKXCF31Qzztq6/GeH4SdeAgwbvdtD6lfwN0ML+/mtT
l2a9un2pWAft4+U3Np7sFG/9Hx2D5l/uSqFQ5Aq5q6no+puXAe9dAZLcavdK/mZCdck40iIweR9aXcA1
09fm5tPo1EbBoPmXu1IoFLlC7moquv7mhaQNOGjs0WPLV/I3YOrevfsOdfmIulCnLpUZT8BCtKkDnMXY
H/0OlH+5K4VCkSvkrqai629eyP+Ag4bs3Gn9Sv4G0OnGjZ+QFoGRjXRH6pqinAx92as7KPnYbK7bWG/q
2KPfy8V3/cYFxz9c/uWuFApFrpC7mgpTt66/GeH4hx00ZLmXR79IxUBBXZz4zoWvUPfixa9tPcLfvPkz
W+/f/+3hwz8ePfqDkjVXr343/7NhdqeRjY0nDKno1EbBcPmXu1IoFLlC7qoNuv7mZdhBY2YWYxtlbVZo
AUd8797kT3mjq+UaCVljihoss4Ye2UodexFZ1FQZs95QOQoZJQymM2c+szMaF8PlX+5KoVDkCrmrNuj6
m5dhBw0pw9XO/+iXdtDMK0fGkdZ0NUXRHuFNJOpfuPDV2bOfU1I5bCcCObHetAm2e1QBsM87Oy9G+uh3
uPzLXSkUilwhd9WG4eZ/XX/bMOygITWoS+KilM0KMhwcvLl79x2tmYR8NEnYdPnyK4Tc3n5ucpoeqGu/
yRk15aERhsj9+78xRBgfyMyOtntYjY+49fX1TyjtpEbEcPmXu1IoFLkivbvS/K/r76wM6K5wuJRoQBLR
IEzZrLA72T88fItHNjkvXfrGFN3cfLqx8fT06U9ZYCXVsOps4uP5819yDFFTQAvXit+nMGkpGSU2RGiB
Yw4ro+6VK9/S2rlzX/hTGwWD5l/uSqFQ5Ir07krzv66/M8G5D37Dk3STR7IZpqwDtMAoQbnd3ZdeUThz
5jNsMkIiDFvx11TD59api2VGS6qhq0nrRwNUPipmDcOIvvxJjYiB8p/YXSkUCkUYid2V5n9df2dlcHeF
Ub1z51c0jlI2K3ZDErXsO24owYK5XXtTPh2hK2rh1lkZqctWdrehZpYZMONsQrn19U/sb4PjoKM7k8Aa
Olpb+5jWwlMbBQPlP+XsRkcKhUIRhZsgBg5zV5r/df2dlRRf1kPdg4M3UcqmUs4yICS+GPGQgZbDOoiH
uphi1GUrhhrZTF2kxSCz3uvKAg7aBgG64ouRlo+06Rv00AubqIPG/qRGxBD5T+muFAqFIlf4e1ea/3X9
nYkU7oqkA9mPstYBEl2pOiCh3XLEHdMpauGdWbh27Qf7Rp7XFZmpz1YEwxEj8M7Oi0rXbLCeUcVwAX9S
I2KI/MtdKRSKVQhzV5r/wc//ZXT9LZPCXeFbe3n0O5UbN37CpwNKI9ju7kvWHB6+td8dRVeWGWRYYLPM
djcSM85B1klrUIHRQH1/UiNiiPzLXSkUilUIc1ea/6ei629ECndFdsg4iQ7z1TsoalqiIgt4YdZgmfmI
tCwwvOxWJH4ZnaZa5hDqMFbYkfrR2S0+HH/v+Ze7UigUqxDmrjT/N6Prb5kU7grwzgd9vJK/DG0iG3Le
DN7Hf6t4Qe3+/mvW2DIG2fvlM2c+wwibTm2kBaoxMjY2njAgwvMaC73nX+5KoVCsQpi70vxfia6/DSRy
V0hrWa7LJpsQ6fr1HylZNlAuxK+3mihKs4wbM8j+9iMf0dV2p+sLxXtjTVcERld0Yn10AM1w2Fevfre1
9YyR4U9qRPSef7krhUKxCmHuSvO/X281df2dSiJ3hR7IgCRR1gyUQCdUOTx8yyAA+yIeKwGpKPlom2gH
Rxwq6kW13VEdXdEDFb2uHfxyBDtinNfG+Ur+3vMvd6VQKFYhzF0xi2r+9/O/rr9tSOSuSCiSoFOUMgM9
kMdEohoiAWp5WO958OB3z717k3fzo6iZZTpC0YsXv8bnsoxrPl288Wx7+znrWdlNV4N9aRl1zXqPi97z
L3elUChWIcxdaf43/MUXdP1tJpG7AjTAApurDbPGGrTBBaMcFeyWI2sis0xpH60d6iAnTV258i3pRshz
577YLN73ipZ0R7OIgXfmI5a5s67sSGuMDBox77y19cyf1IiwvPWVf7krhUKxCmHuSvO/fbR2dP1tQzp3
hWAIc630e6Gmrm0ig0gFLJBQw3ZnASGtwu7uy/Pnv0ROxDNFz5z5DFhgJRVoijYRBtWB3aNOm2FHsB7D
obO+/snGxpOR/nT1m3+5K4VCsQph7krzv66/s5LOXWF1scCVj37ZhMYohzlFNtyuQU6tBHJqhFqirtVh
LzTALNMIDWKu/XBhKFByAGGPZUxRqpmi7EWztI+cJiod0b4/ndHRb/7lrhQKxSqEuSvN/+H8r+tvG9K5
K0BdLG2UVoPM+rQCUiGY4WX2mJZUoz7KsaNZbBqhKTPjt2//QslKJAHq2NYIryjtUI2WGUAMHRQ9ffpT
lunI+/ex02P+5a4UCsUqhP9W+9jR9TcxSQfNzaNX8tcl2nINJBQs6aafx+fa6pebQt0bN37CO1tf7G7j
gF2sgvVCO6Yohp3Rg6LIiaj4ZdawyXpZJnrMv9yVQqFYhVgad6Xrb2KSDpprxe+FUnolBgJRMc4IfP36
j/RrZtyPD5TmIx58c/PpxsaTtbWPkZaPNgKWmB7zL3elUChWIZbGXen6m5ikgwZXe2f4V/IDHTGG8M72
WxJ44a2tZxhk8I9yccp8RHhvxpeeHvMvd6VQKFYhlsZd6fqbmNSDBnXJeCRGj9i9SuvLBDb7bB4Zs2yP
cnHQVmfV6Cv/clcKhWIVYmncFej6m5LUgwZpbzW+kr8bpmj4KHe7eOvG/v5rwD7zkZVL/+xvKn3lX+5K
oVCsQiyTu9L1NyWpBw1+9nb9K/lnAkUBRcNHuXbj0Wwya+gOdc0+ozrVqLw6jwLL9JV/uSuFQrEKsUzu
StfflKQeNKhyePi286NfU5R2TNHd4rVmdY9yqckuSEt32GfbxQT2x7NqkJBe8i93pVAoViGWyV0xh+v6
m4wMgwbvfFB82S2UrRmvqN14jN6KgbrY5Oh3OL3AHxV/09vuha6gwGV6yb/c1SoH6vtwq0YSYzxmRd5Y
JncFuv4mI8Og2S9+V5N0RxJGmKKIhGzogX744s3Np8hpNx532r0Vg6a8wHy01ihN/hWkl/wz3chdrWYU
/sQZlHB5FDG6A1ZkjyVzV7r+JiPDoCHLd2peyY+iQN7N5KLo9tFbMbDJlHzEO9OIad8SWjaBWaBxWrZn
wKsgcJle8s90I3e1mlH4kwp35ZcbFvyyha0h3OejcGuLcKtqVhJuVbtGLNzamnYUijCWzF3p+puMDIMG
YVAXBx0qynpT1B7lbm09M0VxyuGj3M7s7X2PwJQs0xptMlBW5P5kRC/5Z7qRu1rNKKyI8yLlZcI+Eu7z
8TVuaVo7lcvRAlFsn77jTMsKRRhL5q56mf9nZTWvv3kGza1b/z4o3rpBfi8Xj3J3iheO2aNcOHv0OnwT
fn5oxwYTPdIRXSDw0qtbx/z5Z7qRu1rNKHzIsQjX27JFeQ1hK32EK5uXw7D1PsKV8y8rFGEsmbsCXX/T
kGfQ2O8R4JRJsT3KJd1Ii59lZVS5L2ygYJzpEYbraPGZP/9MN3JXqxmFD2llUJrXzLrsI1w5xLJCEcby
uStdf9OQZ9DgYa9e/Y4UoygCk/GowkDQKT6d7nDlc97qHDXz55/pRu5qNaPwIa0MSvOaWZd9hCuHWFYo
wlg+d6XrbxqyDZorq/1Wz+zMmX+mG7mr1YzCh7QyKM1rOiz7hUGXifBj3bJiRWL53BXo+puAZRs0Ig1M
N3JXqxmFwWjlPMprCFvpI1xZXibsI+E+F+FWHUW4srxM2Ecfbu3x9W5VEeGaumXFisRSuiuRAA0a0QWm
G7krhUKx9CF3JbqhQSO6IHelUChWIeSuRDc0aEQX5K4UCsUqhNyV6IYGjeiC3JVCoViFkLsS3dCgEV2Q
u1IoFKsQcleiGxo0ogtyVwqFYhVC7kp0Q4NGdEHuSqFQrELIXYluaNCILshdKRSKVQi5K9ENDRrRBbkr
hUKxCiF3JbqhQSO6IHelUChWIeSuRDc0aEQX5K4UCsUqhNyV6IYGjeiC3JVCoViFkLsS3dCgEV2Qu1qE
YN5XLHc4pRX5AhXkrkQHNGhEF+SuFiFs3lcsceinLHvIXYluaNCILmjeX4SweX9v7z2cPPlqAeHwNjc3
Hytmjz///FM/ZYsQcleiGxo0ogua9xchvLt69eo/5rEWCpyVd1d4BcVMgb76KVuEkLsS3dCgEV3QvL8I
4d3V+/f/wWAtFMWNK7mr7oG++ilbhJC7Et3QoBFd0Ly/COHd1V9//YXBWijkruYM9NVP2SKE3JXohgaN
6ILm/UWI0F0tVMhdzR/oq5+yRQi5K9ENDRrRBc37ixC6d7XEgb76KVuEkLsS3dCgEV3QvL8I4d0Vbib6
2lN25K7mDPTVT9kihNyV6IYGjeiC5v1FCO+ucDOUC4Xc1ZyBvvopW4SQuxLd0KARXdC8vwjh3ZW5mUVD
7mqeQF/9lC1CyF2JbmjQiC5o3l+E8O7qyMosIM5duSNWzBL6KVuEkLsS3dCgEV3QvL8IYfO+YolDP2XZ
Q+5KdEODRnRB8/6CBCooljuc0opMIXcluqFBI7ogd6VQKFYh5K5ENzRoRBfkrhQKxSqE3JXohgaN6ILc
lUKhWIWQuxLd0KARXZC7UigUqxByV6IbGjSiC3JXCoViFULuSnRDg0Z0Qe5KoVCsQshdiW5o0IguyF0p
FIpVCLkr0Q0NGtEFuSuFQrEKIXcluqFBI7ogd6VQKFYh5K5ENzRoRBfkrhQKxSqE3JXohgaN6ILclUKh
WIWQuxLd0KARXZC7UigUqxByV6IbGjSiC3JXCoViFULuSnRDg0Z0Qe5KoVCsQshdiW5o0IguyF0pFIpV
CLkr0Q0NGtEFuSuFQrEKIXcluqFBI7ogd6VQKFYh5K5ENzRoRBeYbv766y/mHYVCoVjukLsSHdCgEV1g
ulEoFIoViWgCFGIqGjRCCCGEEH0idyWEEEII0SdyV0IIIYQQfSJ3JYQQQgjRJ3JXQgghhBB9InclhBBC
CNEncldCCCGEEH0idyWEEEII0SdyV0IIIYQQfTJud/Xhh/+CaKVIhvKfF+U/L8p/XpT/vCj/zYzYXf3z
n/9148ZP+/uv9/a+jzaJBCj/eVH+86L850X5z4vyP5WxuissM7rev//b7du/IPOVK99CVEcMh/KfF+U/
L8p/XpT/vCj/bRiru0LRe/fePXz4B/Z5d/fl9vbzy5dfRXXEcCj/eVH+86L850X5z4vy34axuitEffTo
jzt3fsUynzv3xcbGk3nUxYlDtFI0oPznRfnPi/KfF+U/L8p/G0bprjDO6Ipxvn79R5MW73z16ndRtWao
v7f3PaPk1q1/Hxy8YXBcuvRNVEdUovznRfnPi/KfF+U/L8p/S0bprq5d++Hu3Xf37r1jGWmhpTAoyshg
TCAnot6+/QvlzZs/0+DOzoutrWdRfVGJ8p8X5T8vyn9elP+8KP8tGZ+7+vDDf6ENxhlVLlz4Cmmxz8gW
VfOwiV0++ui/9/dfm6LAvnxEZnRlExXOn/9ybe3jpbw/2S/Kf16U/7wo/3lR/vOi/LdnfO4K83vnzq8P
HvyOKmfPfo4ku7svkTASGJ38jUevKMOCNaYoW2nKoDKN0NQV/eLDNJT/vCj/eVH+86L850X5b8/43BXa
YJzh0qVv1tc/OX36U4TxqiBVqCgLpig2OVI0BHVpDRuOg/YdiUqU/7wo/3lR/vOi/OdF+W/PyNwVMmCB
kfbevXfb289xu5ubT5EWyVHRRKWkTnjjMdKyEqz31tazM2c+i3oUIcp/XpT/vCj/eVH+86L8z8TI3BWC
oeujR3/cvfvu7NnP8c4XLnyFkCYqAmOT2ysaQuM7Oy8YLmF3IkL5z4vynxflPy/Kf16U/5lYaHeFnw0/
ohmiPnjwO+qi6OnTn5rVRU5TtO7GYxtw5Rcvfo26l9r9+sMqoPznRfnPi/KfF+U/L8r/nIzAXSEblvnm
zZ8PD9+atGh8+fKrjY2n2GfqRDp1A3Vpk+Gyvf08PIZVRvnPi/KfF+U/L8p/XpT/OVlQd0W6scMHB29u
H305ztRFWsA4nzv3Bd55Z+eFVe4FBgrNbmw8QenwYFYQsqH8Z4RsKP8ZIRvKf0bIhvKfEbKh/M/PArkr
copNRjm09KIisD3KBdYgLfaZmphcvPPu7kuWI5GAdmwXFqJNDdAUw2Vt7WNkjo5tFVD+86L850X5z4vy
nxflv3dSu6socSR0b+97u/FoooaKoo1/lMuyqWu3JTHOm5tPWfDC2AL12ffOnV+pRlPsVSl/JdS8ePHr
9fVPGDThQS4Tyn9elP+8KP95Uf7zovynJM+9K9MgUhTXjMyhoiGsRzDUpfKFC1+hwbniFbFRNcaE3cB8
+HByA/PKlW8ZAS0Fphr1GTRby/4nEZT/vCj/eVH+86L850X5T0M6d0XuEA8VvaKoa4oiCeJFuY5gNDwo
vlLHLuiKd96peuhLNQYB0mKf2UodM8JRtTqoub39nKHDwpKh/OdF+c+L8p8X5T8vyn96BnFXWFpbQFGU
I+MIiaLAAgKzxhSttMmVICqaAXudPfv5mTOf4aBpP6pGs/SCwNTHCCMVArMQVauDBml2beSv5Ff+86L8
50X5z4vynxflPy8+/4O4KzRDP/PIwEI3RT3swrDAON+//xuHjrRw6dI3ZXVpn5qHh28pORKkRWBqRtXq
oEEqb2w8YcfwjMaF8p8X5T8vyn9elP+8KP958fnv2V2h4oMHv5Ncmia/GFi78ThV0bJOEYwS1KVlso+0
2OfLR1+pC6EjOr1z51fqs4wRRt2LF7+e2r5BNVzz1tYz2o9ObRQo/3lR/vOi/OdF+c+L8p+XKP89uyss
271772gXRbGxUe7qQAYqN9hqNnHEqItmu7svNzaenqv6Sp3BeKIaAnMM6EpNNK6rXIazOH/+y7VxvpJf
+c+L8p8X5T8vyn9elP+8RPnv2V3hPZGBPqKU1YGciMHRoAclB1RpcjnWu8UvLFAHqfDOCEB3UTWDRnCO
NMjCzs4LKiMwjri9fWYAoS7ePDy1UaD850X5z4vynxflPy/Kf16i/Pf/vSvSenDwBtl8vhpANkwusj18
OFGO3TG5ZRk43Pv3f6MOC+iKYMhG5aiagaj7+6+pafcw19c/2d5+3t470zu6bmw8YS9/UiNC+c+L8p8X
5T8vyn9elP+8hPnv312RWawrKQ5TVglHYLKhLo6PtOKLkYRGoppUe/Dgd9RlNGCE0Yya5WoGzQJbGQFn
z36OSLRZHjENMBSsFzujcaH850X5z4vynxflPy/Kf17C/PfvrmgXO3z9+o9hvuqgGpXvFr/AiWPFFyMb
yQ3rIBVbURdonLxvbj5tUNdgKw0CCzNJC9RnZKyN89Gv8p8X5T8vyn9elP+8KP95CfPfv7siNbSOHmG+
6uBQMHoY54ODN4iKuoAkYR2vLi6bj9hh1N2t+QtHvUDLF4tX8lNGZ7f4KP95Uf7zovznRfnPi/KflzD/
PbsrFKK8efNnQJUwZZWgLseBumjMYeGIyzcSaQftHz6c/IUjGkdamPVm40zQ8pXilfz4dH9qo0D5z4vy
nxflPy/Kf16U/7xE+e//3hXcuPHT7du/XLv2Q5S1MhwBlfF61EdpHDEJRWMaCetwrF5dvDPgr4dTF+iI
cXb69Kd2RuNC+c+L8p8X5T8vyn9elP+8+PwP4q7QA8HoI0pZJRwExtnURVccK2nFuvoKobp4Q6RlBKCu
rzAEDB0OZm3tY3Oj40L5z4vynxflPy/Kf16U/7z4/A/iroDWDw7eRCmrBFH3918DgiHtevHHt8vqPihe
gWp1TF0E8HV6h8YvXfoG74ydj05tFCj/eVH+86L850X5z4vynxfL/1DuCrWQBOWmaoB4Vm1n5wXKbW09
s++yhRVMXY44pbqMMHw6xxOe11hQ/vOi/OdF+c+L8p8X5T8vlv+h3NW14m9lU0ZZq4Nd8KqAbCyHm0J1
k92ZBA7j/Ghfya/850X5z4vynxflPy/Kf14s/0O5K7JzOMsr+fGqRrQeTN3793+jQdTFzDar25enpp3d
4pX8mOjo7BYfjl/5zwjHr/xnhONX/jPC8Sv/GeH4lf+McPykayh3BXi3g9av5G+AFvb3X5u6NOvV7UvF
OmgfL7+x8WSneOv/6FD+86L850X5z4vynxflPy/kf0B3hSS32r2Sv5lQXTKOtAhM3odWF3DN9LW5+TQ6
tVGg/OdF+c+L8p8X5T8vyn9eSNqA7soePbZ8JX8Dpu7du+9Ql4+oC3XqUpnxBCxEmzrAWYz90a/ynwvl
Py/Kf16U/7wo/3kh/wO6K7Jzp/Ur+RtApxs3fkJaBEY20h2pa4pyMvSFW2dIUfKxUn5P81aDOvbo93Lx
Xb9xwfEr/xnh+JX/jHD8yn9GOH7lPyMcv/KfEY5/QHcFZLmXR79IxUBBXZz4zoWvUPfixa9tPcLfvPkz
W+/f/+3hwz8ePfqDkjVXr36HJG0kbIDdaWRj4wlDKjq1UaD850X5z4vynxflPy/Kf16GdVdmZjG2UdZm
hRZwxPfuTf6UN7parpGQNaaowTJr6JGt1MH2shA1VYbBR/tQOQoZJQymM2c+szMaF8p/XpT/vCj/eVH+
86L852VYd0XKcLUY3ihls0I7aOaVI+NIa7qaomiP8CYS9S9c+Ors2c8pqRy2E4GcWG/aBNs9qgDY552d
F2vjfPSr/OdF+c+L8p8X5T8vyn9ehnVXpAZ1SVyUsllBhoODN3fvvqM1k5CPJgmbLl9+hZDb289NTtMD
dSn5GDXloRGGyP37vzFEGB/IzI62e1iNj7j19fVPKO2kRoTynxflPy/Kf16U/7wo/3kZ0F3hcCnRgCSi
QZiyWWF3sn94+BaPbHJeuvSNKbq5+XRj4+np05+ywEqqYdXZxMfz57/kGKKmgBauFb9PYdJSMkpsiNAC
xxxWRt0rV76ltXPnvvCnNgqU/7wo/3lR/vOi/OdF+c8L5z7svSsg3eSRbIYp6wAtMEpQbnf3pVcUzpz5
DJuMkAjDVvw11fC5depimdGSauhq0vrRAJWPilnDMKIvf1IjQvnPi/KfF+U/L8p/XpT/jAzurjCqd+78
isZRymYFVQC18LAoihIsoAqi4m2tI3RFLdw6KyN12cruNtSoY9JixtmEcuvrnwAN4qAxy7aLhzV0tLb2
Ma2FpzYKlP+8KP95Uf7zovznRfnPyODuClD34OBNlLKplLMMCIkvRjxkoOWwDuKhLqYYddmKoUY2Uxdp
Mcis97qygIO2QYCu+GKk5SNt+gY99MIm6qCxP6kRofznRfnPi/KfF+U/L8p/LlK4K5IOZD/KWgdIdKXq
gIQIhrq4YzpFLbwzC9eu/cDYYr3XFZmpz1YEwxEj8M7OCwZEXcusZ1QxXMCf1IhQ/vOi/OdF+c+L8p8X
5T8XKdwVvpWMk+Uoa71z48ZP+HRAaQTb3X3JmsPDt/a7o+jKMoMMC4yiWGZgEGDGOcg6aQ0qMBqo709q
RCj/eVH+86L850X5z4vyn4sU7orskHESHeard1DUtERFFvDCrMEy8xFpWWB42a1I/DI6scAIaLDMIdRh
rLAj9aOzW3w4fuU/Ixy/8p8Rjl/5zwjHr/xnhONX/rOQwl0B3vmgj1fyl6FNZEPOm8H7+G8VL6jd33/N
GlvGICMnosKZM59hhE2nNtIC1RgZGxtPGBDheY0F5T8vyn9elP+8KP95Uf6zkMhdIa1luS6bbEKk69d/
pGTZQLkQv95qoijNMm7MICMqHpkFPqKr7U7XF4r3xpquCIyu6MT66ACa4bCvXv1ua+sZI8Of1IhQ/vOi
/OdF+c+L8p8X5T8LidwVeiADkkRZM1ACnVDl8PAtgwAwwsBKQCpKPtom2sERh4p6UW13VEdX9EBFryuq
oOtMfjmCHTHOa+N8Jb/ynxflPy/Kf16U/7wo/1lI5K5IKJKgU5QyAz2Qx0SiGiIBanlY73nw4HfPvXuT
d/OjKC0zROgIRS9e/BqfyzKu+XTxxrPt7eesZ2U3XQ32pWXUpSl/XmNB+c+L8p8X5T8vyn9elP8sJHJX
gAZYYHO1YdZYgza4YJSjAv4asVkTmWVK+2jtUAc5aerKlW9JN0KeO/fFZvG+V7SkO5pFjLPFWzewzJ11
ZUdaY2TQiHnnra1n/qRGhOVN+c+F5U35z4XlTfnPheVN+c+F5U35T0k6d4VgCHOt9Huhpq5tIoNIBSyQ
UMN2ZwEhrcLu7svz579ETsQzRc+c+QxYYCUVaIo2EQbVgd2jTpthR7Aew6Gzvv7JxsaTkf50Kf95Uf7z
ovznRfnPi/KfnnTuCquLBcYaR6kENqExymFOkQ23a5BTK4GcGqGWqGt12AsNMMs0QoOYaz9cGAqUHEDY
YxlTlGqmKHvRLO0jp4lKR7TvT2d0KP95Uf7zovznRfnPi/KfnnTuClAXSxul1SCzPq2AVAhmeJk9piXV
qI9y7GgWm0ZoioFCL7dv/0LJSiQB6tjWCK8o7VCNlhlADB0UPX36U5bpyPv3saP850X5z4vynxflPy/K
f2KSuqubxW8i4JTrEm25BhIKlnTTz+NzbfXLTaHujRs/4Z2tL3a3ccAuVsF6oR1TFMPO6EFR5ERU/DJr
2GS9LBPKf16U/7wo/3lR/vOi/Ccmqbu6VvxeKKVXYiAQFeOMwNev/0i/qIsF9uMDpfmIB9/cfLqx8WRt
7WOk5aONgCVG+c+L8p8X5T8vyn9elP/EJHVXuNo7w7+SH+iIMYR3Pih+SwIvvLX1DIMMWGMUxSPjlPmI
8N6MLz3Kf16U/7wo/3lR/vOi/CcmqbsC1CXjkRg9YvcqrS8T2OwziuKRMcvIbD7a6qwayn9elP+8KP95
Uf7zovynJLW7Qtpbja/k74Ypigv2j3K3i7du7O+/BuwzH1m59Pd+p6L850X5z4vynxflPy/Kf0pSuyv8
7O36V/LPBIoCimKEkQ1HjIR249FsMmvoDnXNPqM61ajMLuEhrRTKf16U/7wo/3lR/vOi/KcktbtClcPD
t50f/ZqitGOK7havNTNFy49yqckuSEt32GfbxQT2x7NqkBDlPyMkRPnPCAlR/jNCQpT/jJAQ5T8Zqd0V
4J0Pii+7hbI14xW1G48ourX191sxUBebzKawFy/wR8Xf9LZ7oSsocBnlPy/Kf16U/7wo/3lR/pORwV3t
F7+rSbojCSNMUURCNvRAP3zx5uZT5LQbjzvt3opBU15gPlprlCb/CqL850X5z4vynxflPy/KfzIyuCuy
fKfmlfwoCuTdTC6Kbh+9FQObTMlHvDONmPYtoWUTmAUap2UaoVzNHzDlPy/Kf16U/7wo/3lR/pORwV0h
DOrioENFWW+K2qPcra1npihOGcvsH+V2Zm/vewSmZJnWaJOBQo9hnRVB+c+L8p8X5T8vyn9elP9kZHBX
cOvWvw+Kt26Q38vFo9yd4oVj9igXzh69Dt+Enx/ascFEj3REFwi8mj9doPznRfnPi/KfF+U/L8p/GvK4
q+vF7xHglEnxZvEol3QjLX6WlVHlvrCBgnGmRxiuo8VH+c+L8p8X5T8vyn9elP805HFXeNirV78jxSiK
wGQ8qjAQdIpPpztc+Zy3OkeN8p8X5T8vyn9elP+8KP9pyOOu4Mpqv9UtO8p/XpT/vCj/eVH+86L8JyCb
uxJCCCGEWErkroQQQggh+kTuSgghhBCiT+SuhBBCCCH6RO5KCCGEEKJP5K6EEEIIIfpE7koIIYQQok/k
roQQQggh+kTuSgghhBCiT+SuhBBCCCH6RO5KCCGEEKJP5K6EEEIIIfpE7koIIYQQok/kroQQQggh+kTu
SgghhBCiT+SuhBBCCCH6RO5KCCGEEKJP5K6EEEIIIfpE7koIIYQQok/kroQQQggh+kTuSgghhBCiT+Su
hBBCCCH6RO5KCCGEEKJP5K6EEEIIIfpE7koIIYQQok/kroQQQggh+kTuSgghhBCiT+SuhBBCCCH6RO5K
CCGEEKJP5K6EEEIIIfpE7koIIYQQok/kroQQQggh+kTuSgghhBCiT+SuhBBCCCH6RO5KCCGEEKJP5K6E
EEIIIfpE7koIIYQQok/kroQQQggh+kTuSgghhBCiT+SuhBBCCCH6RO5KCCGEEKJP5K6EEEIIIfpE7koI
IYQQok/kroQQQggh+kTuSgghhBCiT+SuhBBCCCH6RO5KCCGEEKJP5K6EEEIIIfpE7koIIYQQok/kroQQ
Qggh+kTuSgghhBCiT+SuhBBCCCH6RO5KCCGEEKJP5K6EEEIIIfpE7koIIYQQok/G7a4+/PBfEK0UyVD+
86L850X5z4vynxflv5kRu6t//vO/btz4aX//9d7e99EmkQDlPy/Kf16U/7wo/3lR/qcyVneFZUbX+/d/
u337F2S+cuVbiOqI4VD+86L850X5z4vynxflvw1jdVcoeu/eu4cP/8A+7+6+3N5+fvnyq6iOGA7lPy/K
f16U/7wo/3lR/tswVneFqI8e/XHnzq9Y5nPnvtjYeDKPujhxiFaKBpT/vCj/eVH+86L850X5b8Mo3RXG
GV0xztev/2jS4p2vXv0uqtYM9ff2vmeU3Lr174ODNwyOS5e+ieqISpT/vCj/eVH+86L850X5b8ko3dW1
az/cvfvu3r13LCMttBQGRRkZjAnkRNTbt3+hvHnzZxrc2XmxtfUsqi8qUf7zovznRfnPi/KfF+W/JeNz
Vx9++C+0wTijyoULXyEt9hnZomoeNrHLRx/99/7+a1MU2JePyIyubKLC+fNfrq19vJT3J/tF+c+L8p8X
5T8vyn9elP/2jM9dYX7v3Pn1wYPfUeXs2c+RZHf3JRJGAqOTv/HoFWVYsMYUZStNGVSmEZq6ol98mIby
nxflPy/Kf16U/7wo/+0Zn7tCG4wzXLr0zfr6J6dPf4owXhWkChVlwRTFJkeKhqAurWHDcdC+I1GJ8p8X
5T8vyn9elP+8KP/tGZm7QgYsMNLeu/due/s5bndz8ynSIjkqmqiU1AlvPEZaVoL13tp6dubMZ1GPIkT5
z4vynxflPy/Kf16U/5kYmbtCMHR99OiPu3ffnT37Od75woWvENJERWBscntFQ2h8Z+cFwyXsTkQo/3lR
/vOi/OdF+c+L8j8TC+2u8LPhRzRD1AcPfkddFD19+lOzushpitbdeGwDrvzixa9R91K7X39YBZT/vCj/
eVH+86L850X5n5MRuCtkwzLfvPnz4eFbkxaNL19+tbHxFPtMnUinbqAubTJctrefh8ewyij/eVH+86L8
50X5z4vyPycL6q5IN3b44ODN7aMvx5m6SAsY53PnvsA77+y8sMq9wECh2Y2NJygdHswKQjaU/4yQDeU/
I2RD+c8I2VD+M0I2lP/5WSB3RU6xySiHll5UBLZHucAapMU+UxOTi3fe3X3JciQS0I7twkK0qQGaYris
rX2MzNGxrQLKf16U/7wo/3lR/vOi/PdOancVJY6E7u19bzceTdRQUbTxj3JZNnXttiTGeXPzKQteGFug
PvveufMr1WiKvSrlr4SaFy9+vb7+CYMmPMhlQvnPi/KfF+U/L8p/XpT/lHR0V/9oEdEuIaZBpCiuGZnR
w+3fX7QUmGpuh6qITiHCVaqKqOZMuCYaI9qlDZZ/t39/QQ75mbQbyA8fTm4gX7nyLT+BUf5d7f4iOrsO
uIYaI9qlPW7/miiPfz+jTc0Vc6WvaYT5d5VqItoRkAm9mDS3tp65SjURneDoaJ5/wvx7WM8Fg8RS+cKF
r7gGnCteUR1VazP+6wjzHx3wkqH850X5T0OXiZLp9T8tIpqFyR3ioaJXFHVNUSRBPEtxy8bbx//8z//Q
ppewgcquNzc3oxOpY87dy1Q2WI6W7Uf5Z68///zzbX/x+PFj2uSHlh9CfrT45wud7uy8sH+INCd5zmiZ
gTpaHlK3XiaNv3812b9Usqk8/ssUh/e+EjZFlX3+m/uN9vJwwNvbz5k63ZGXejTY5E9wLLScf+ogsQ+K
r/SyS8OXTqaO/2ao6fO/ZCj/eVH+0zPXhR/jUhc2/6IoypFxhERRYAGBWWOKlm3y1JZnDTwEbUa9VGJd
vw9iVm9UPvh53BWUG4yisnF/+7ch/+yIJfrrr79cQ/MFTZ06dYo26Y5e+AHjh5B/iPCjwg8YC1GS3W4z
Bvu6peNRmYSZqGvZx0xdhPm38/3P3smJs/FlYXEqx38lRSPmlv4u37/aY31U0+e/od9olxAOmH+Yrh39
SYqGfu0EF5M2479u/qmD8cw1A9jr7NnPz5z5jETRflRt6vhvJsr/SFH+86L858Xnv2mWZA5tDnflKYXb
XB9RTkPYyjXANdRHzOOuCLNHLaN85G3cle3bEK6tUrjN9WE/UfwzpfwTxVYsEY1gsDjsmohvWhxxLMgw
p2nuivb5AT48fEvJqfGjxQ/YpUvfREm2458pJudThPscBCvDfNZhuzeEa64UbnN9RB2RYbJt/0Zk68SX
hBbHysLotIxJzo/MjS8r3ZXP/2QvqllfQTnjeHb9slfUb3TKC0WY/7rxPxPsQlb5h/v9+78xdXJpAUZ1
+eoydfw3Q4NU3th4wo7hGY0L5T8vyn9efP5rZ8libp0S7uJTCre5Pmi8nFZbsH5dQ32EuavyOChjXTtX
FURxyK3CdRnEVHdlnTaHa6sUbnN90Ljd+C3/RLHJ3BXVHgdhN7QKC8WBHV2hPbbyP++pQ03b5dGjR95d
0RH/arlz51d+qlnmHyL8dF28+PX8+rKjWyoFm6KslrF+m8M1Vwq3uSao4A+AWezBg9+ZXPjRYn4hFa7f
yFpZSUxSerx0/rXMMWtFWemufP4r+0Umouikbb90YtDppFzse1fl/NeN/4ip8wPjmasLLTP7c2nhn+/+
K70hU8d/M1TjX+1bW89oPzq1UaD850X5z0uU/ynuyq4uXD0cneN4C9FVARnwvGarj/U7Lajsw60qhbkr
HHfYYyVUm1xkqoJGCBZokDp4C1uJw7DwW6PgYkazUW5DrFNXu++g8egcPWzisKlD72aSCNb8ba3ev2IN
x49tsmCZNcXFmGP+22CF7oqW+XnmR4sfMH6q+bk6d+4LfsZ8/svnyxoL97kqpm6NslqGOgPlmQz4A+Cf
LPfuvePninNnPLvzJWMQWauGsmSkKstKdwWW/8p+kYmo6NHK4+2bqQrxK/35Lhrl/LchnH+iTQabmDG5
upDY3d2XGxtPK7/SazSP/6lwFufPf7k2zj8JovznRfnPS5T/du6KMG/UeJGrjdK+/qqAnIjB0aAH5eSA
Wl8Freb79xPsCuc2HA98D5twxFPt81GDFTHxVsvurvhYtlZUC8NsFtf1SZ0jgxW5K0TEuSMoCzs7L/iH
Dj9gPv/UqTxf1rulUjRssqBClNUydf2W49Wr/5z8xyvP3h7CNu1IovwBcI5MQ/yMhXmm31pDc1SSQ2r6
4KNLMltryjp3ZflnU7nfou2ihWKN6RuWdX2dOHHCLy/yvaty/pspzz+VswRz5d3iF6aow6WCIW1/zD+q
ZjSP/6lQjQsYV5fLl1+FpzYKlP+8KP95ifLf2l0R5pCmXeriqNqLxq17ZMPkItvDhxPlfL+YFVe1Jqwa
YUaH6x9XQVa6zUHQFOvbeGdrs2gtjtA/UYeSZXNXVoYVwrCLVpjYCOvU1W4RJ0/uuaWjwNa4pVLQeHSO
HjZxzNSh97K14gp68uTkYlxc4ycZ4PrKR4IFwl37C4NlPix0V/v7rxlhdg95ff2T7e3nPv/UocfKU2aT
WwqicmUU1ImyWsb6dTvUROirWDbjzrgyj+UqlSJ0V8C0cnDwxv8rcNIvvgSOGx1fRr4qDDaFFicqG9wV
+WfTpBoEfRWt/sMvo52FVwQdK/tCcb+8yO4Kovw3U55/GKjlywCD+f7936jDAtcVRrV9LySqZjSP/6nQ
O9eVjY0n7OVPakQo/3lR/vMS5n8Wd0WYT2pxwXNRU5/G6ZsjMNlQF8dHWvHF1i8lZsXVLoXVIbgwTK78
xSXQLnKuRhC0w/ryiCljzRYNHgtasGCZBumU0tabqfILRfVJFD1Pol93ReWyuyLqDBb1o3P0sClyV5ST
K2hx+bTDxmAVfmsSnBSXWFba+sll2K6+/5nkwbsrC5Tl1PgJPHv2c35I+DHz+WcrrVlpBxlGsfffIkYf
64I6YUoroU5ljz7MRRlu1VHUrbeI3BUzC/90Y4oJzze0OL40mzI1JkbWUn28rHNXJB/YVO63aK9o4ejr
7eXStx+WbPLLC+6uovw3UDn/MFZpJKpJtQcPfufqwtWIf4hzzaBmuZph+Wdr5fhvA5ci68XOaFwo/3lR
/vMS5n9Gd0WYWyqueVySqVYXvqYPu5wXbbirwvXrP+Kd7Rc4caz4Yqs5ObKaA7D1RNla+fbD4NrvG7RO
67CWizb/jol1KoLGKd3aI2tFv7ZsBiWsQNC7XbGi3IZYp3aozUHNiQMI3FVoqioNVsMps4kDpiQ4+L29
yT0qu3xaMi04I0s1W/++y/LB5BHh5KpP/f+402QN9ssWqMKpISiwEP5oWQO2YAcZhVWoDFejFGyyTFpK
K2FrQ569f6q0UP6eVuUdLEuX74ifK4Y0A9uf78SXQCdrZVFpsOrclcGmSbWiL18Wjf197yr4Gf2fSYvB
R8P3NXFXx/v157toRPlvpjz/cNmI/p3NpYKtXF2Axpn3NzefNlxdDLZWjv82UJ8r00i/eqL850X5z0uY
/9pZcjILF1cjMwpciQmur5Or+NHsS9jWcvg67nMR1LcLEguWRw4Fo4dxPjh4g6jmrpBkcmRVl0NbSVRa
K8LVCwJ/wFbbkdL6rcTqFM26YF8LuuDcKa0XwtbYSgtWWmW3cxF9uSuqcaZc5qMLfGiqwmWLhvNlE0H+
KXFFHHyluyos1H/ol4Rzsm5tsUuxiYN37oq9qODdVdSdx29iwQ7Sx6RdsrF3kqVKCFf1eBRbnL5Rej1W
we1wPLyvAreqFL4CQ86tOgpLl++IqYGfLuYjf5r0G1qc0Oj4IHVua2FfLNXshy5WwaQJy+nuqtRv0VLR
glv+O7uTRl2Ofbj11J+4q+P9+vNdNKL8N1Oef8DmH4+/uvCvfD7yz3GuLrs1f2GtF2j5YvEnQSijs1t8
lP+8KP95CfPf5Wo0CZt6C0/D1TQKv9V9PnWKaliNyYTt9nZXBdTlOFAXjTksHLG/kVg+AFtDlK2Vla7e
8cDu2I62YP1WYtVot/BIf4edI1s/+OADs1OUrPFPyrj2sIZqbociiiPsx11Rx6yVnbJbexQcSbTggx2j
c/TYJnNXHDmVQ3fFmbKeE2SZfgkKS4JF5K6oRiOUU92VhzrFMbqYfCQV+ABOcNJDbbgdgmCl5ZCFKL0e
XycK8umdE2fq1pbC1ynnn7P2/TJDUd68+TMwK9lpTnxJYHEozTz5iLZOfI6tL8KW2cXU8eV0d0W1ok23
+/F7V7Y+CtPRhi4fi0OZ3MFC7qhfO99Fo5z/ZhrmH1+Hdrj2PHw4+QtrNM6lBWZ92DETtHyl+JMg5859
4U9tFCj/eVH+8xLlv+3ViNmWade7isn1uLgcgl31PX59uJJgF9q01liwPHIEN4o/+ni7+BUDHDEJtbuO
0QHw0Ucx+R+zVnZpZ9nVrgocDxW8hGXYSo/mjaIwk0ScPHmSDFiQB1wIwQIVXNXjMb+7ooK3VoS/unMA
dQs+2Dc6x4jJCDj6iptzV8VFlGRy5JQsF48FJzcw7HvuBKdMX6G7svzbXmyiTtRRGeoUxzgJljFVk9aO
LvmMNEvgq3/s2QJhpsTtUxVsjdLrYVNlnr1tAjLs1pYiNGFu1VFw1lG/DGnG87VrP9hpFrIF5um4rQnX
T8oja1UOl/CiDuV0d1X0y4L98Ph+4x73TjKAWc+JoCM/WihuohfV2ft/Ju7qeL/h+S4aYf6baZh/wjrM
lf7qwr/dgX/fD3d1ATriOnf69Kd2RuNC+c+L8p8Xn/+Zr0YWbGUWnsy7BWahJhen0hogqMwuXB397j6P
HATG2dRFVxwracW6RgfAx5Mn9+wCwHJkrSYHc3Sds/rl4PLMVt9vGbbSI9VokCgu6O4WFB/39ibf9cZh
EOYhKH34mraX351NNBvlNsQ6dYdYnGYUobWibHBXRLhMsHt0jmWow3FS+W93xQKXUmOysuj61Z5dgwlz
k8XWye+dcbJk3oL1s7qryQJJ4Epf/NYnB0M7RfImEborgk1+x3KwKUqvh02chat3FN4wQcONK2Imd8V8
xITFz5idpsvkkZUxj2jBsl9vpdtwFHFl6hwZrOnuimrF/SobVbY8WTg6hkmFol+WOQt0ZACbr/JR7FG4
q+P9hue7aIT5n0rd/OMrhFcX/m3KpYUrUPT0pHe4dHEwa2sf27+Gx4XynxflPy8+/9OvRky4TLsEMzLB
tZNltrJ+ci0v5m7gwh8uhxC2C6VdkFj2eUTU/f3XgGBIu1788e1Kd3V0AZis5GOwZmI4WM+FgZUcZLFH
HFyb2er7LcNWO1QfdkWnfQvW0PjETBWPAi04BsKqUdqOPqhJs1FuQ6xTd4hc70/ucZmPsLBkendFeC9V
XrBoPl+DOhw2la2TyUV0UtrCURy9G4kIrRUbyLllwIJNHAPVol7KUMcf5OQaf2QsOBiyitk5+WqPbZNj
KwYVCwRdUMd2LAebovR62MR5uHpH4Q0T2Liqi5ncFfDTdXDwxk5zksDAQrHGR7jeZ8CHtzI+Jjm3zM93
74rSrTzql7HKAI6sFVHUGtm9K/D5n0rd/OMr2NXlQfEKZqtjV5dB/+1O45cufcO/3XeLP4I7OpT/vCj/
ebH8z3Y1smATEzEXUS78k2tSMVN7zAR4CCqzC5dMt//xqz7iITDZ3Nl5gXJbW8/su2zRAfCRC4Ctodni
GCZOiMZtjV0YGq6+XJvDfstYjxOPUJg2H+xILxZ8ZGthq475KoIFqx/GrO7Ke6koLJlsrfydwQZ3NfVn
gDocOZXppchhaLCOPNaRJyhbK87R8mDR1V2571rRAgdDbilf/WPirgxbQ1DB71gONkXp9bCJ83D1iggN
U9kzhUHmZ3VXzFZMSQzsSb+kqzAxVrLGR7R+kmpnaFgutrpPLmyNlTPdu5qk5iisL1tjvbPAALafIBY4
KTsS1hS1RnbvCnz+p47/uvknrGBXF2bMlFcXrnBnz37O8YTnNRaU/7wo/3mx/E+/GplL4PLGVZNJlmU2
MQXz0S75YNM3+DUewnahLC5Gk+BjlE16xKsCsrHMGn8APmyNraTlojxmrSgbrr5cm8v9hlj7tBDG5OSP
DJa1w4IPv4YKVpNwexYxq7uqvHcVMqu7is6xDHU4eCpzGBx8kcnIYLnv5k+1VkRXdzX5PUGCFjiYsrvi
owUV/I7lYFOUXg+bwjwT3i0BiXVrUfPVXghrJmk/qhneO7SwQ4q6u1b8rXhK6/fkf155WOMjWk9NggVS
7Ckquji2/tVkU5RVD5t8vyxbGi0mg+Too6/AGLYfIs6IZRb4yAKb6Avpo36j8100fP6jtNTBLtH84wmv
LsmejACHcX60fxJE+c+L8p8Xy/8MVyMLm4iZoLnkmH+ymdpjKw3CJmiul27/IlgTpRKvavg1lQdgK239
pOuitKtCcTHo7d4VB4xRoGQZD8G+E990/D7W5GofhFWw3Qnbd1Z3xUeu3xHmq4xB3RUHzCkU+UQ8DgwV
J99qpw4x1VoR3dwV/03+VwSNcDxkL3RXUOR4KHflxtKro9dKeYoHYYbVtH3DsEOKuuMED4s/icAmczAe
1vg4SbN+09FDwInQ3kUVVsbH3+s5uBp3ZT9EbPIts0xqOP1JE0c/QSzYVpwT4ddbFD9Nk59cdrUKRNhv
dL6LBhmw/Pu0NFOefzx2dbl//zca5OrCP6abry6VjXSAdnaLPwnCP+Kjs1t8OH7lPyMcv/KfEY6fdE2/
GnER5VLHJZPplWXWM+3ykQvS5Jp0dPGLlg3CdqG0S5EFa8I8VuIPIApbb5voorACzlrZ9Z4KVjMKrs3N
/VrLtGCBUSA4dx9mHfzK6GMUvhGajXIbYp26QyzOLorIYHl3RdfRAhEuE8XuU34vlzpkhsr+3EljkVVn
sExB1K+zVuGy5YT6US9lqGMHSUyWCyxop7BS7vaVLVCynq1un6pga5ReD5vCPBPeWplnMmvlvZThzZZ9
bO+ugH+7TB69F/16ozNhz7koguVjmyYK/+2fALldVSqf3As31bkrg02u38K0kRo+hjFpMPB2fCTctiKK
FZP3XUWMwl2B5X/q+J8KLezvv7arC836q0tfV5E6aP/SpW82Np7sFH91ZHQo/3lR/vMy870rVpq14iKA
m+GzYV4qWkPYP3+xGm7/o2BllMoylQdgYZuISmtV7s6Cy3Nzv9YsjdCUtYZXwFWw3t68wIJF9JGwNQTL
7MKO1s6s7qocVAgNVoO7iqwVwb4fTfuTCNQhM1S2c7fgyMlqkV73inbzGbbSkhOGX9PZXU0+FljQFEcV
BmtY73aoCSpE6fWwKcpz6K6cl7L7VZ4jszUxmviQ4vHlpDwedmBRd8CUdKv4a8rewTiO7lFZHLt9Fbmr
6MZVeE+L45vmrqxBFiyxXl8WJqmYNPn3sbk2j0VsrRCXcizuyvI/dfxPJby6MONzaeECw7w/9NUF+Fc7
fW1uPo1ObRQo/3lR/vNC0qZfjbhwcn21KzcrMUyEzc5+1g7Dr6ca+04m6VKwMspjGX8AUbDermfWHRf7
yFoRrmoRXJhZb1doFqJeQqxNmiKsPkGzZrAop4ZVs2OwduZ3VwR1vMEKnwxaNLuruj+JwCa/wHFSmcOY
XHuPgpXk1t+7KtxV9QNBTpbS1nt3NfXfTNSxg7Tg42TNEZXhqpbCb2IhSq+HTVGey+4qxN+18tbK3BVM
7qgFwVlX9usevRf9ehPjCG5fEaHBMh8z4bi1Iv7eVFDprkg78ymwadJvzY0rCzb5rqPGK7FjGIu7svy3
/JMgDdjV5e7dd1xd+MjVBequLj7/U8d/GziLsX/1RPnPhfKfF/I/w9WIYKW5K7vMgH2Mwm8l7ModBeuj
PHr8JhYqD2ByPT9yV5XWKuoRh8QmwhZ8R+XBwVbaZHeicFaTr1hR0jieCd9Q9DwJKlhHhK1h6wcffGB1
bF/b2ou7IqhmBityV6GjqnRX/GBEp2mwibAFzo5D5TDsXHyYu8JncLLeXbltQbDVTtwWzF0xtip//KxT
W3BHGQQrfZgFKfyNrfg7XO2j8Cspo/R62BTleZLMwF25tUfhbRZeCl/FSJjsfjSqWe3q1bsrzvHOnV/Z
5J1TSNHM3zF5RFgYnYmPKTy023AUE28deZ0jd2UzGglHa3t1jb9nRmnHzMEThVzu3hVh52LH49o0/xSU
nknVUbkry3/d+G8P6b1x4ycuLVxgyDPTfXR1qcx/3fj3NG81qGNfPblcfNd4XHD8yn9GOH7lPyMc//Sr
EZdMgkumXYNZb/O1Tc114evYFSgKKoRJDLHdbcEOwAdr7PKAd7GPU60VQWXfoO+lEirQIy1YsGPhFf82
WARdFIdwLLAUbDKHYfUJa6Qvd0VQk0sspfs8zVoRVK579M4mDo+SsFPgY3E2f4e5Kzujqe7KTJVfuHr1
u8pn80WHTg53lMfDKkQxMQp/Oh/AgoXbodjFMhkmNoKt5Tz/7a6Kb7WHwRrbROswycLRPxssXL16dwXM
MmyiXzvyYxx/PtgmIoNlLoeJ7+bNn5lG79//7eHDPx49+oOSNWyiX0o7ZuBjFHYuNrAt7KMvaaBYPQlU
LvocjbsC8t/LV0+4VJBhri7Xr/+4c+Erri4XL35t6+vyXzf+Z4LdaWRj4wmXtOjURoHynxflPy+1s2Qx
t1Zd9f18PTXqa9J4lEeP9VvZOyu5knGlZ5mLHx/NELAwMVZV1oqgPhWiXkLMeoN1SoO0Q0wsUvAbgqz/
oPijN7iHKFhp7sR2sd0tenRXBJUJ9yEIjsEtHQ8q8wPGqUWnDGzi8Khjp0zs7U1ehR8GzZ48OfkzKRYs
s8ZtC4LMe1NlwXnx88A/O1go91upb7HfJMx5WElFFia+ypaPHIm91d3tWezr81nHZK9Snid3iQoLxYJb
VQwtv967K49F+HCQDLAm6s7gH3NscnaqzOwGq+yubEYzWL537x2K0zWb6IIyPHjTizxY2OlQjcbsJyiM
cCXq85Hw/YanubDYP6Yrx/9M0AL/Iie3NMh1xeZ6LiGsqct/3fgv4+efyqsgVykuZmfOfGZnNC6U/7wo
/3mpnSWZQCfzbxR+pm4ZNfVpPEqix/qt6LrYC+/CAtc/go92YbMLgHmFcrBLXXfIifVmNADjxrq2K1Bh
jf7+9hXuipL15qWiMM9hu4TByn7dFUF9t3QU9O6WSkFl/lVR+eidTRwhdfwpR2FnTYXiDpY9hHW35VyN
oyD53l3ZT/KFC1+dPfs5JScYdgqV52s+YPIo8Oi+1CRYLnyV+1hE8f2nyRehWHY7F6cZprSSyb5Vefb3
qHBU5qvCJ4aT20V7zmCF0ebJIJANNtGvs1OVHP8OVhR2t9KHt1be5diMxtzHALZJiiSTeTbRL6UdvIFM
BAtsIlgg7DBYCBv3+PVF3cmy9Rud6WJCNurG/0zQDlOEv3Iw43NpsetKXf7rxn9INP/YvhH8831n58VI
v3qi/OdF+c/LLO7KT9MzRdVeNB4l0VPRbxBsNWtFyTLRbK0I3ADVol4ALRki9+//xhBhfCAz1WjZHANR
GKS/DRZha8xM+LDKYQULW08Fmo1yG2KdumPtO2icny4GbnTuwCYOkjrhKUeBYZr13hVnZD8P/HTZb9KW
+7Xz9ePiiImXmlzEcVTHbdaRo0L4yU0jFibfhmKfo2DZ57OOSTv1eQ4dlTNVR3ezsJV0OjmOo4jsLBlg
ZdSdQSrY9LeRquPVXuSxJi9fOPoNwdBg2RrDXA4z1OXLr5jItref23Rm+WeTtcxCmOWQSZ3gW+1O5uNx
rMexuStSUTf+Z4IkHxy8uXv3Ha3ZJYSPdkmoy3/d+PeU5x92tN3Dany8ePHr9fVPKO2kRoTynxflPy+1
syQT6LGrkZ+UO0RpXxoPMxgS91sKKvgonFWTtSIwPdQMu2BAXCt+n8KkpWSUMESoRteFZaoI808+Cgfl
wta4eqWg2Si3IdapO9a+g8b5GWAQc8phBoBNHDl16N1MUhScUYd7V/yQ8E8lfsw2N5+eP/8l/8op92vn
yxXdj4uCyQ0hu1/1t8eicuiripKVFpMzLILlKKtlqDNPnjk2TpDew7tWFmSg8gA4d0rr1xxMG0I304y5
HPK8sfH09OlPWbh06Ruf/7/7rX/+6K1Vy35RmXIs7sryXzf+Z4LdSezh4VsmDbuckGq7otTlv278Q938
w160wDGHlbm6XLnyLa2dO/eFP7VRoPznRfnPC+fezl35a2DnON4CjYcZDDnWb1XgCcxUWZhFaAjcQNgd
lhktseHoatL60QDUrAuOCnsRhbkNwlWqiiixEVRoPt95gsYZ7oxjRrPPgMGmZndlYfeu/BfO3NrjgQre
XZFYfpj5d0bdT1d0vlzX/dBgkw/ntKi8dzK6deT2DIKVUVbLUKcuz+40WoTb4XiwvuEA2GQWp4kjiwOh
m5n4mGb+8Y8zZz7jn4mkmomJkezzP3S/0WkuLHXjf1ZogcSS4d3dl4xtu6JAXf7rxn/z/FP5VRXWcBmj
L39SI0L5z4vyn5F27up4sKlluB1KwaYogx42TXUb2AIfblV9mPXBL6OrDTUUNWkx4/SIcuvrn9jfBsdB
R3cmwQ7J+amjMFPlY+o9qjoazpdNLcPtUAo2ceJ37vzKiZdPyrLHwZtPrQt7RSql+1wK7IV3V+SWfy3x
kxb9dPn8U6fyfLnAH3ks9zWsMFylmqBClNUy1KnslyQUPbSKSoPV7K44cdu3IbzFgWMuZ1rYv/b4t511
xLwW5t9Vqg8S0q3f8AQXnLrxPyuMXmA823dsSS8LzfmvHP8d5h/W0NHa2se0Fp7aKFD+86L8Z2RmdzXT
3Eplt9vxYH2UQU9dv50D90CbGGRU97qygIO2QYCu+GKk5SPHXHk8uIc2QeXw9NtQd74zNUVlt9vxsEb4
6To4eFM+L4yFGaP5A4/l712RZ35I+AcNPzb208WPls8/dfrVl7DTbKau3zb7eqjsdgui2V1BZf4NOypv
cSKXY0YnrM9Exr8LGahkmJbDmYjJi9ltav5t/M/UL73QIz8jzHHheY2Fhvw3UJ7loa/8t59/QPn3KP8d
UP5zUXtVsPnXXUCOB5uiypVQze1QinDujrC9ivtBvQVtorrXFZnpCGeNYDhiBN7ZecGAqBxPwO4tI8pA
G9hr0DxTgUEPjP7opLAFWKK+Ao9Fm+SZf53QKT8tZJiFa9d+4Gfb5586defbOew0m6EONTnlcrTZHajm
dihFcwuV+TcJnMUJntbFz+DguNGpG6VMYXbLvTn/jP9Z+6VHZlWmS/AnNSLq8t+BXvI/6/yj/HuU/w4o
/7louiowvTZEVDnCVaqJKH0RrlJ/Yb87iq6Hh28ZZFhgs8zAIMCMc8B10hpUYDRQ359gj7ijrImocoSr
VBNWh383MOIZ5dFJuUr9xY0bP/HvJOAnjR+Y3d2XrCHnUf5d7f7CZ6MZV7smosoRrlJNRJUj6vIPbv/G
iHZpoGX+Gf+u6cYIW+Yshhv/Q9OQ/35pn/+Fmn+GRvnPi/Kfi7ZXpnkgO2ScRIf56h0UNS1RkQW8MGuw
zHxEWhYYXnYrEr+MTiwwAhoscwh1GCvsSP3o7BYfjl/5zwjHr/xnhONX/jPC8Sv/GeH4lf8spHBXgHc+
6OOV/GVoE9mQ82bwPv5bxQtq9/dfs8aWMcjIiahw5sxnGGHTqY20QDVGxsbGEwZEeF5jQfnPi/KfF+U/
L8p/XpT/LCRyV0hrWa7LJpsQ6fr1HylZNlAuxK+3mihKs4wbM8iIikdmgY/oarvT9YXivbGmKwKjKzqx
PjqAZjjsq1e/29p6xsjwJzUilP+8KP95Uf7zovznRfnPwuQLFtGqIUAPZECSKGsGSqATqhwevmUQAEYY
WAlIRclH20Q7OOJQUS+q7Y7q6IoeqOh1RRV0nckvR7AjxnltnK/kV/7zovznRfnPi/KfF+U/C4ncFQlF
EnSKUmagB/KYSFRDJEAtD+s9Dx787rl3b/JufhSlZYYIHaHoxYtf43NZxjWfLt54tr39nPWs7Karwb60
jLo05c9rLCj/eVH+86L850X5z4vyn4WJu0pjsNAAC2yuNswaa9AGF4xyVMBfIzZrIrNMaR+tHeogJ01d
ufIt6UbIc+e+2Cze94qWdEeziHG2eOsGlrmzruxIa4wMGjHvvLX1zJ/UiLC8Kf+5sLwp/7mwvCn/ubC8
Kf+5sLwp/8lw1soi2tY7CIYw10q/F2rq2iYyiFTAAgk1bHcWENIq7O6+PH/+S+REPFP0zJnPgAVWUoGm
aBNhUB3YPeq0GXYE6zEcOuvrn2xsPBnpT5fynxflPy/Kf16U/7wo/ylxpiqKqFKPYHWxwFjjKJXAJjRG
OcwpsuF2DXJqJZBTI9QSda0Oe6EBZplGaBBz7YcLQ4GSAwh7LGOKUs0UZS+apX3kNFHpiPb96YwO5T8v
yn9elP+8KP95Uf7T4IwU8Y9//P8IiVmRCup0FgAAAABJRU5ErkJggg==
</value>
</data>
<metadata name="VMStatusBar.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>337, 17</value>
</metadata>
<metadata name="CDBrowser.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>452, 17</value>
</metadata>
<metadata name="MainMenu2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>563, 17</value>
</metadata>
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>61</value>
</metadata>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAMAEBAQAAAAAAAoAQAANgAAACAgAAAAAAAAqAgAAF4BAAAwMAAAAAAAAKgOAAAGCgAAKAAAABAA
AAAgAAAAAQAEAAAAAADAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAAIAAAACAgACAAAAAgACAAICA
AADAwMAAgICAAAAA/wAA/wAAAP//AP8AAAD/AP8A//8AAP///wAAAAd3d3AAAAAAAHd3AAAAAAAAd3cA
AAB3d3d4d3d3d3d3d3d3d3d3AAAAAAAAAAAIiIiIiIiIgAiIiIiIiIiACIiIiIiIiIAIiIiIiIiIgAiI
iIiIiIiACIiIiIiIiIAIiIiIiIiIgAiIiIiIiIiACIiIiIiIiIAAAAAAAAAAAPgfAAD8PwAA/D8AAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAoAAAAIAAAAEAA
AAABAAgAAAAAAIAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAgAAAAICAAIAAAACAAIAAgIAAAMDA
wADA3MAA8MqmAAQEBAAICAgADAwMABEREQAWFhYAHBwcACIiIgApKSkAVVVVAE1NTQBCQkIAOTk5AIB8
/wBQUP8AkwDWAP/szADG1u8A1ufnAJCprQAAADMAAABmAAAAmQAAAMwAADMAAAAzMwAAM2YAADOZAAAz
zAAAM/8AAGYAAABmMwAAZmYAAGaZAABmzAAAZv8AAJkAAACZMwAAmWYAAJmZAACZzAAAmf8AAMwAAADM
MwAAzGYAAMyZAADMzAAAzP8AAP9mAAD/mQAA/8wAMwAAADMAMwAzAGYAMwCZADMAzAAzAP8AMzMAADMz
MwAzM2YAMzOZADMzzAAzM/8AM2YAADNmMwAzZmYAM2aZADNmzAAzZv8AM5kAADOZMwAzmWYAM5mZADOZ
zAAzmf8AM8wAADPMMwAzzGYAM8yZADPMzAAzzP8AM/8zADP/ZgAz/5kAM//MADP//wBmAAAAZgAzAGYA
ZgBmAJkAZgDMAGYA/wBmMwAAZjMzAGYzZgBmM5kAZjPMAGYz/wBmZgAAZmYzAGZmZgBmZpkAZmbMAGaZ
AABmmTMAZplmAGaZmQBmmcwAZpn/AGbMAABmzDMAZsyZAGbMzABmzP8AZv8AAGb/MwBm/5kAZv/MAMwA
/wD/AMwAmZkAAJkzmQCZAJkAmQDMAJkAAACZMzMAmQBmAJkzzACZAP8AmWYAAJlmMwCZM2YAmWaZAJlm
zACZM/8AmZkzAJmZZgCZmZkAmZnMAJmZ/wCZzAAAmcwzAGbMZgCZzJkAmczMAJnM/wCZ/wAAmf8zAJnM
ZgCZ/5kAmf/MAJn//wDMAAAAmQAzAMwAZgDMAJkAzADMAJkzAADMMzMAzDNmAMwzmQDMM8wAzDP/AMxm
AADMZjMAmWZmAMxmmQDMZswAmWb/AMyZAADMmTMAzJlmAMyZmQDMmcwAzJn/AMzMAADMzDMAzMxmAMzM
mQDMzMwAzMz/AMz/AADM/zMAmf9mAMz/mQDM/8wAzP//AMwAMwD/AGYA/wCZAMwzAAD/MzMA/zNmAP8z
mQD/M8wA/zP/AP9mAAD/ZjMAzGZmAP9mmQD/ZswAzGb/AP+ZAAD/mTMA/5lmAP+ZmQD/mcwA/5n/AP/M
AAD/zDMA/8xmAP/MmQD/zMwA/8z/AP//MwDM/2YA//+ZAP//zABmZv8AZv9mAGb//wD/ZmYA/2b/AP//
ZgAhAKUAX19fAHd3dwCGhoYAlpaWAMvLywCysrIA19fXAN3d3QDj4+MA6urqAPHx8QD4+PgA8Pv/AKSg
oACAgIAAAAD/AAD/AAAA//8A/wAAAP8A/wD//wAA////AAoKCgoKCgoKCgoKBwcHBwcHBwcHBwoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoHBwcHBwcHBwoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcH
BwcKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHCgcHBwcHBwcHBwcHBwcH
B+zsBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH7OwHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoK
EhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhIS
CgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoKEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKChISEhISEhISEhISEhISEhISEhIS
EhISEhISEhIKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhIS
EhISEhISEhISEhISCgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoKEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKChISEhISEhIS
EhISEhISEhISEhISEhISEhISEhIKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhIS
EhISEhISEhISEhISEhISEhISEhISEhISCgoKChISEhISEhISEhISEhISEhISEhISEhISEhISEhIKCgoK
EhISEhISEhISEhISEhISEhISEhISEhISEhISEgoKCgoSEhISEhISEhISEhISEhISEhISEhISEhISEhIS
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgr/4Af///AP///wD///8A////AP/4AA
AAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAAAB/////ygAAAAwAAAAYAAAAAEA
CAAAAAAAgAoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAACAAAAAgIAAgAAAAIAAgACAgAAAwMDAAMDc
wADwyqYABAQEAAgICAAMDAwAERERABYWFgAcHBwAIiIiACkpKQBVVVUATU1NAEJCQgA5OTkAgHz/AFBQ
/wCTANYA/+zMAMbW7wDW5+cAkKmtAAAAMwAAAGYAAACZAAAAzAAAMwAAADMzAAAzZgAAM5kAADPMAAAz
/wAAZgAAAGYzAABmZgAAZpkAAGbMAABm/wAAmQAAAJkzAACZZgAAmZkAAJnMAACZ/wAAzAAAAMwzAADM
ZgAAzJkAAMzMAADM/wAA/2YAAP+ZAAD/zAAzAAAAMwAzADMAZgAzAJkAMwDMADMA/wAzMwAAMzMzADMz
ZgAzM5kAMzPMADMz/wAzZgAAM2YzADNmZgAzZpkAM2bMADNm/wAzmQAAM5kzADOZZgAzmZkAM5nMADOZ
/wAzzAAAM8wzADPMZgAzzJkAM8zMADPM/wAz/zMAM/9mADP/mQAz/8wAM///AGYAAABmADMAZgBmAGYA
mQBmAMwAZgD/AGYzAABmMzMAZjNmAGYzmQBmM8wAZjP/AGZmAABmZjMAZmZmAGZmmQBmZswAZpkAAGaZ
MwBmmWYAZpmZAGaZzABmmf8AZswAAGbMMwBmzJkAZszMAGbM/wBm/wAAZv8zAGb/mQBm/8wAzAD/AP8A
zACZmQAAmTOZAJkAmQCZAMwAmQAAAJkzMwCZAGYAmTPMAJkA/wCZZgAAmWYzAJkzZgCZZpkAmWbMAJkz
/wCZmTMAmZlmAJmZmQCZmcwAmZn/AJnMAACZzDMAZsxmAJnMmQCZzMwAmcz/AJn/AACZ/zMAmcxmAJn/
mQCZ/8wAmf//AMwAAACZADMAzABmAMwAmQDMAMwAmTMAAMwzMwDMM2YAzDOZAMwzzADMM/8AzGYAAMxm
MwCZZmYAzGaZAMxmzACZZv8AzJkAAMyZMwDMmWYAzJmZAMyZzADMmf8AzMwAAMzMMwDMzGYAzMyZAMzM
zADMzP8AzP8AAMz/MwCZ/2YAzP+ZAMz/zADM//8AzAAzAP8AZgD/AJkAzDMAAP8zMwD/M2YA/zOZAP8z
zAD/M/8A/2YAAP9mMwDMZmYA/2aZAP9mzADMZv8A/5kAAP+ZMwD/mWYA/5mZAP+ZzAD/mf8A/8wAAP/M
MwD/zGYA/8yZAP/MzAD/zP8A//8zAMz/ZgD//5kA///MAGZm/wBm/2YAZv//AP9mZgD/Zv8A//9mACEA
pQBfX18Ad3d3AIaGhgCWlpYAy8vLALKysgDX19cA3d3dAOPj4wDq6uoA8fHxAPj4+ADw+/8ApKCgAICA
gAAAAP8AAP8AAAD//wD/AAAA/wD/AP//AAD///8ACgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHBwcH
BwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgcHBwcHBwcHBwcHBwcHBwcKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
BwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcH
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoKCgoHBwcH
BwcHBwcHBwcHBwcHBwcHBwfs7AcHBwcHBwcHBwcHBwcHBwcHBwcHBwoKCgcHBwcHBwcHBwcHBwcHBwcH
BwcHB+zs7OwHBwcHBwcHBwcHBwcHBwcHBwcHBwcKBwcHBwcHBwcHBwcHBwcHBwcHBwcHB+zs7OwHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHB+zs7OwHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH
BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISEhISEhISEhISEhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhIS
EhISCgoKCgoKEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKEhIS
EhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISEhISCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK
CgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoK//4AAH//
AAD//wAA//8AAP//wAP//wAA///AA///AAD//8AD//8AAP//wAP//wAA///AA///AAD//8AD//8AAMAA
AAAAAwAAgAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAAAAB
AADAAAAAAAMAAP///////wAA
</value>
</data>
</root>

64
frmVirtualMacintosh.vb Normal file
View File

@ -0,0 +1,64 @@
Option Strict Off
Option Explicit On
Friend Class frmVirtualMacintosh
Inherits System.Windows.Forms.Form
Public Sub mnuActionClose_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles mnuActionClose.Click
Me.Close()
End Sub
Public Sub mnuCDCapture_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles mnuCDCapture.Click
CDBrowser.ShowDialog()
If CDBrowser.FileName <> "" Then
MsgBox(CDBrowser.FileName)
mnuCDRelease.Enabled = True
End If
End Sub
Private Sub mnuCDRelease_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuCDRelease.Click
CDBrowser.FileName = ""
mnuCDRelease.Enabled = True
End Sub
Public Sub mnuFloppyCapture_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles mnuFloppyCapture.Click
FloppyBrowser.ShowDialog()
If FloppyBrowser.FileName <> "" Then
MsgBox(FloppyBrowser.FileName)
mnuFloppyRelease.Enabled = True
End If
End Sub
Private Sub mnuFloppyRelease_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuFloppyRelease.Click
FloppyBrowser.FileName = ""
mnuFloppyRelease.Enabled = True
End Sub
Public Sub mnuHelpAbout_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles mnuHelpAbout.Click
frmAbout.Show()
End Sub
Private Sub VMStatusBar_ItemClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolStripItemClickedEventArgs) Handles VMStatusBar.ItemClicked
End Sub
Private Sub VMStatusBar_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles VMStatusBar.Resize
'Me.Width = VMStatusBar.Width +
End Sub
Private Sub frmVirtualMacintosh_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
Dim Close As Integer
Close = frmVirtualMacintoshClose.ShowDialog()
If Close = 2 Then
e.Cancel = True
Else
Me.Visible = False
End If
End Sub
Protected Overrides Sub Finalize()
MyBase.Finalize()
End Sub
End Class

91
frmVirtualMacintoshClose.Designer.vb generated Normal file
View File

@ -0,0 +1,91 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmVirtualMacintoshClose
Inherits System.Windows.Forms.Form
'Form reemplaza a Dispose para limpiar la lista de componentes.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
'Requerido por el Diseñador de Windows Forms
Private components As System.ComponentModel.IContainer
'NOTA: el Diseñador de Windows Forms necesita el siguiente procedimiento
'Se puede modificar usando el Diseñador de Windows Forms.
'No lo modifique con el editor de código.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmVirtualMacintoshClose))
Me.TableLayoutPanel1 = New System.Windows.Forms.TableLayoutPanel
Me.OK_Button = New System.Windows.Forms.Button
Me.Cancel_Button = New System.Windows.Forms.Button
Me.ShutdownHelp = New System.Windows.Forms.Label
Me.ShutdownIcon = New System.Windows.Forms.PictureBox
Me.TableLayoutPanel1.SuspendLayout()
CType(Me.ShutdownIcon, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'TableLayoutPanel1
'
resources.ApplyResources(Me.TableLayoutPanel1, "TableLayoutPanel1")
Me.TableLayoutPanel1.Controls.Add(Me.OK_Button, 0, 0)
Me.TableLayoutPanel1.Controls.Add(Me.Cancel_Button, 1, 0)
Me.TableLayoutPanel1.Name = "TableLayoutPanel1"
'
'OK_Button
'
resources.ApplyResources(Me.OK_Button, "OK_Button")
Me.OK_Button.Name = "OK_Button"
'
'Cancel_Button
'
resources.ApplyResources(Me.Cancel_Button, "Cancel_Button")
Me.Cancel_Button.DialogResult = System.Windows.Forms.DialogResult.Cancel
Me.Cancel_Button.Name = "Cancel_Button"
'
'ShutdownHelp
'
resources.ApplyResources(Me.ShutdownHelp, "ShutdownHelp")
Me.ShutdownHelp.Name = "ShutdownHelp"
'
'ShutdownIcon
'
Me.ShutdownIcon.Image = Global.VirtualMac.My.Resources.Resources.Shutdown_Icon
resources.ApplyResources(Me.ShutdownIcon, "ShutdownIcon")
Me.ShutdownIcon.Name = "ShutdownIcon"
Me.ShutdownIcon.TabStop = False
'
'frmVirtualMacintoshDialog
'
Me.AcceptButton = Me.OK_Button
resources.ApplyResources(Me, "$this")
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.CancelButton = Me.Cancel_Button
Me.Controls.Add(Me.ShutdownHelp)
Me.Controls.Add(Me.ShutdownIcon)
Me.Controls.Add(Me.TableLayoutPanel1)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
Me.MaximizeBox = False
Me.MinimizeBox = False
Me.Name = "frmVirtualMacintoshDialog"
Me.ShowInTaskbar = False
Me.TableLayoutPanel1.ResumeLayout(False)
CType(Me.ShutdownIcon, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents TableLayoutPanel1 As System.Windows.Forms.TableLayoutPanel
Friend WithEvents OK_Button As System.Windows.Forms.Button
Friend WithEvents Cancel_Button As System.Windows.Forms.Button
Friend WithEvents ShutdownIcon As System.Windows.Forms.PictureBox
Friend WithEvents ShutdownHelp As System.Windows.Forms.Label
End Class

View File

@ -0,0 +1,297 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
<data name="TableLayoutPanel1.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
<value>Bottom, Right</value>
</data>
<assembly alias="mscorlib" name="mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
<data name="TableLayoutPanel1.ColumnCount" type="System.Int32, mscorlib">
<value>2</value>
</data>
<data name="OK_Button.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
<value>None</value>
</data>
<data name="OK_Button.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
<value>NoControl</value>
</data>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="OK_Button.Location" type="System.Drawing.Point, System.Drawing">
<value>3, 3</value>
</data>
<data name="OK_Button.Size" type="System.Drawing.Size, System.Drawing">
<value>67, 23</value>
</data>
<data name="OK_Button.TabIndex" type="System.Int32, mscorlib">
<value>0</value>
</data>
<data name="OK_Button.Text" xml:space="preserve">
<value>OK</value>
</data>
<data name="&gt;&gt;OK_Button.Name" xml:space="preserve">
<value>OK_Button</value>
</data>
<data name="&gt;&gt;OK_Button.Type" xml:space="preserve">
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;OK_Button.Parent" xml:space="preserve">
<value>TableLayoutPanel1</value>
</data>
<data name="&gt;&gt;OK_Button.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<data name="Cancel_Button.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
<value>None</value>
</data>
<data name="Cancel_Button.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
<value>NoControl</value>
</data>
<data name="Cancel_Button.Location" type="System.Drawing.Point, System.Drawing">
<value>76, 3</value>
</data>
<data name="Cancel_Button.Size" type="System.Drawing.Size, System.Drawing">
<value>67, 23</value>
</data>
<data name="Cancel_Button.TabIndex" type="System.Int32, mscorlib">
<value>1</value>
</data>
<data name="Cancel_Button.Text" xml:space="preserve">
<value>Cancel</value>
</data>
<data name="&gt;&gt;Cancel_Button.Name" xml:space="preserve">
<value>Cancel_Button</value>
</data>
<data name="&gt;&gt;Cancel_Button.Type" xml:space="preserve">
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;Cancel_Button.Parent" xml:space="preserve">
<value>TableLayoutPanel1</value>
</data>
<data name="&gt;&gt;Cancel_Button.ZOrder" xml:space="preserve">
<value>1</value>
</data>
<data name="TableLayoutPanel1.Location" type="System.Drawing.Point, System.Drawing">
<value>170, 68</value>
</data>
<data name="TableLayoutPanel1.RowCount" type="System.Int32, mscorlib">
<value>1</value>
</data>
<data name="TableLayoutPanel1.Size" type="System.Drawing.Size, System.Drawing">
<value>146, 29</value>
</data>
<data name="TableLayoutPanel1.TabIndex" type="System.Int32, mscorlib">
<value>0</value>
</data>
<data name="&gt;&gt;TableLayoutPanel1.Name" xml:space="preserve">
<value>TableLayoutPanel1</value>
</data>
<data name="&gt;&gt;TableLayoutPanel1.Type" xml:space="preserve">
<value>System.Windows.Forms.TableLayoutPanel, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;TableLayoutPanel1.Parent" xml:space="preserve">
<value>$this</value>
</data>
<data name="&gt;&gt;TableLayoutPanel1.ZOrder" xml:space="preserve">
<value>2</value>
</data>
<data name="TableLayoutPanel1.LayoutSettings" type="System.Windows.Forms.TableLayoutSettings, System.Windows.Forms">
<value>&lt;?xml version="1.0" encoding="utf-16"?&gt;&lt;TableLayoutSettings&gt;&lt;Controls&gt;&lt;Control Name="OK_Button" Row="0" RowSpan="1" Column="0" ColumnSpan="1" /&gt;&lt;Control Name="Cancel_Button" Row="0" RowSpan="1" Column="1" ColumnSpan="1" /&gt;&lt;/Controls&gt;&lt;Columns Styles="Percent,50,Percent,50" /&gt;&lt;Rows Styles="Percent,50" /&gt;&lt;/TableLayoutSettings&gt;</value>
</data>
<data name="ShutdownHelp.AutoSize" type="System.Boolean, mscorlib">
<value>True</value>
</data>
<data name="ShutdownHelp.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
<value>NoControl</value>
</data>
<data name="ShutdownHelp.Location" type="System.Drawing.Point, System.Drawing">
<value>66, 32</value>
</data>
<data name="ShutdownHelp.Size" type="System.Drawing.Size, System.Drawing">
<value>222, 13</value>
</data>
<data name="ShutdownHelp.TabIndex" type="System.Int32, mscorlib">
<value>2</value>
</data>
<data name="ShutdownHelp.Text" xml:space="preserve">
<value>Are you sure you want to shutdown this Mac?</value>
</data>
<data name="&gt;&gt;ShutdownHelp.Name" xml:space="preserve">
<value>ShutdownHelp</value>
</data>
<data name="&gt;&gt;ShutdownHelp.Type" xml:space="preserve">
<value>System.Windows.Forms.Label, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;ShutdownHelp.Parent" xml:space="preserve">
<value>$this</value>
</data>
<data name="&gt;&gt;ShutdownHelp.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<data name="ShutdownIcon.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
<value>NoControl</value>
</data>
<data name="ShutdownIcon.Location" type="System.Drawing.Point, System.Drawing">
<value>12, 12</value>
</data>
<data name="ShutdownIcon.Size" type="System.Drawing.Size, System.Drawing">
<value>48, 48</value>
</data>
<data name="ShutdownIcon.SizeMode" type="System.Windows.Forms.PictureBoxSizeMode, System.Windows.Forms">
<value>StretchImage</value>
</data>
<data name="ShutdownIcon.TabIndex" type="System.Int32, mscorlib">
<value>1</value>
</data>
<data name="&gt;&gt;ShutdownIcon.Name" xml:space="preserve">
<value>ShutdownIcon</value>
</data>
<data name="&gt;&gt;ShutdownIcon.Type" xml:space="preserve">
<value>System.Windows.Forms.PictureBox, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;ShutdownIcon.Parent" xml:space="preserve">
<value>$this</value>
</data>
<data name="&gt;&gt;ShutdownIcon.ZOrder" xml:space="preserve">
<value>1</value>
</data>
<metadata name="$this.Localizable" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<data name="$this.AutoScaleDimensions" type="System.Drawing.SizeF, System.Drawing">
<value>6, 13</value>
</data>
<data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
<value>328, 109</value>
</data>
<data name="$this.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
<value>NoControl</value>
</data>
<data name="$this.StartPosition" type="System.Windows.Forms.FormStartPosition, System.Windows.Forms">
<value>CenterParent</value>
</data>
<data name="$this.Text" xml:space="preserve">
<value>Virtual Mac</value>
</data>
<data name="&gt;&gt;$this.Name" xml:space="preserve">
<value>frmVirtualMacintoshDialog</value>
</data>
<data name="&gt;&gt;$this.Type" xml:space="preserve">
<value>System.Windows.Forms.Form, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
</root>

View File

@ -0,0 +1,18 @@
Imports System.Windows.Forms
Public Class frmVirtualMacintoshClose
Private Sub OK_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK_Button.Click
Me.DialogResult = System.Windows.Forms.DialogResult.OK
Me.Close()
End Sub
Private Sub Cancel_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel_Button.Click
Me.DialogResult = System.Windows.Forms.DialogResult.Cancel
Me.Close()
End Sub
Private Sub frmVirtualMacintoshDialog_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
OK_Button.Focus()
End Sub
End Class