diff --git a/M64MM2/ColorCodeStudio.Designer.vb b/M64MM2/ColorCodeStudio.Designer.vb index 5bd51b7..4d545d7 100644 --- a/M64MM2/ColorCodeStudio.Designer.vb +++ b/M64MM2/ColorCodeStudio.Designer.vb @@ -46,9 +46,9 @@ Partial Class ColorCodeStudio Me.Label5 = New System.Windows.Forms.Label() Me.Label6 = New System.Windows.Forms.Label() Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components) + Me.PictureBox1 = New System.Windows.Forms.PictureBox() Me.ImportCCButton = New System.Windows.Forms.Button() Me.ExportCCButton = New System.Windows.Forms.Button() - Me.PictureBox1 = New System.Windows.Forms.PictureBox() Me.Label7 = New System.Windows.Forms.Label() CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() @@ -259,6 +259,17 @@ Partial Class ColorCodeStudio Me.ToolTip1.InitialDelay = 1000 Me.ToolTip1.ReshowDelay = 100 ' + 'PictureBox1 + ' + Me.PictureBox1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) + Me.PictureBox1.Image = CType(resources.GetObject("PictureBox1.Image"), System.Drawing.Image) + Me.PictureBox1.Location = New System.Drawing.Point(209, 40) + Me.PictureBox1.Name = "PictureBox1" + Me.PictureBox1.Size = New System.Drawing.Size(192, 272) + Me.PictureBox1.TabIndex = 32 + Me.PictureBox1.TabStop = False + Me.ToolTip1.SetToolTip(Me.PictureBox1, resources.GetString("PictureBox1.ToolTip")) + ' 'ImportCCButton ' Me.ImportCCButton.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) @@ -279,17 +290,6 @@ Partial Class ColorCodeStudio Me.ExportCCButton.Text = "Export color code..." Me.ExportCCButton.UseVisualStyleBackColor = True ' - 'PictureBox1 - ' - Me.PictureBox1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) - Me.PictureBox1.Image = CType(resources.GetObject("PictureBox1.Image"), System.Drawing.Image) - Me.PictureBox1.Location = New System.Drawing.Point(209, 40) - Me.PictureBox1.Name = "PictureBox1" - Me.PictureBox1.Size = New System.Drawing.Size(192, 272) - Me.PictureBox1.TabIndex = 32 - Me.PictureBox1.TabStop = False - Me.ToolTip1.SetToolTip(Me.PictureBox1, resources.GetString("PictureBox1.ToolTip")) - ' 'Label7 ' Me.Label7.Location = New System.Drawing.Point(12, 9) diff --git a/M64MM2/ColorCodeStudio.vb b/M64MM2/ColorCodeStudio.vb index f6c416a..ebe8321 100644 --- a/M64MM2/ColorCodeStudio.vb +++ b/M64MM2/ColorCodeStudio.vb @@ -14,6 +14,9 @@ Public Class ColorCodeStudio 'Private shoesColorMap As New ColorMap() Public returnedCode As String = "" + Private rand As Random = New Random() + Private cycleTime As Integer + Private cycleColors As Boolean = False Private CCCopyPaste As ColorCodeCopyPasteForm Private DefaultColors(23) As Color Private IsSettingAllColors As Boolean = False @@ -135,6 +138,31 @@ Public Class ColorCodeStudio IsSettingAllColors = False End Sub + Public Sub RefreshColorCycle() + If cycleColors = True Then + 'Uncomment the following If statement and adjust the cap (default = 1) to slow down the refresh rate + 'If cycleTime >= 1 Then + Dim buttonIndex As Integer + IsSettingAllColors = True + For Each control As Control In Controls + If TypeOf control Is Button Then + Dim foundButton As Button = DirectCast(control, Button) + 'If the button has no text, it's a color-selection button + If foundButton.Text = "" Then + foundButton.BackColor = Color.FromArgb(rand.Next(0, 256), rand.Next(0, 256), rand.Next(0, 256)) + foundButton.PerformClick() + buttonIndex += 1 + End If + End If + Next + IsSettingAllColors = False + ' cycleTime = 0 + 'Else + ' cycleTime += 1 + 'End If + End If + End Sub + Private Sub LoadFromRam(sender As Object, e As EventArgs) Handles LoadRamButton.Click Dim addresses As Integer() = {&H07EC38, &H07EC3C, &H07EC40, &H07EC44, &H07EC98, &H07EC9C, &H07ECA0, &H07ECA4, &H07EC80, &H07EC84, &H07EC88, &H07EC8C, &H07EC20, &H07EC24, &H07EC28, &H07EC2C, &H07EC50, &H07EC54, &H07EC58, &H07EC5C, &H07EC68, &H07EC6C, &H07EC70, &H07EC74} Dim val As Byte() = BigEndianRead("Project64", MainForm.Base + addresses(0), 4) @@ -366,4 +394,8 @@ Public Class ColorCodeStudio Dim height As Integer = image.Height End Sub + + Private Sub PictureBox1_DoubleClick(sender As Object, e As EventArgs) Handles PictureBox1.DoubleClick + cycleColors = Not cycleColors + End Sub End Class \ No newline at end of file diff --git a/M64MM2/MainForm.Designer.vb b/M64MM2/MainForm.Designer.vb index e403df1..34da72b 100644 --- a/M64MM2/MainForm.Designer.vb +++ b/M64MM2/MainForm.Designer.vb @@ -22,392 +22,395 @@ Partial Class MainForm 'Do not modify it using the code editor. _ Private Sub InitializeComponent() - Me.components = New System.ComponentModel.Container() - Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(MainForm)) - Me.b_Freeze = New System.Windows.Forms.Button() - Me.b_Unfreeze = New System.Windows.Forms.Button() - Me.b_ChangeCameraType = New System.Windows.Forms.Button() - Me.BaseAddressLabel = New System.Windows.Forms.Label() - Me.Timer1 = New System.Windows.Forms.Timer(Me.components) - Me.Label2 = New System.Windows.Forms.Label() - Me.Label3 = New System.Windows.Forms.Label() - Me.Label4 = New System.Windows.Forms.Label() - Me.MenuStrip1 = New System.Windows.Forms.MenuStrip() - Me.AboutMenu = New System.Windows.Forms.ToolStripMenuItem() - Me.AboutMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.HelpToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() - Me.SettingsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.RetainAnimationSwapsMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.UndoPreviousAnimationSwapsMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.ResetAnimationSwapsMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.ForceCameraPresetMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator() - Me.PrecisionModeMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.ToolsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.ColorCodeStudioMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.MemoryIODebugToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.ComboBox2 = New System.Windows.Forms.ComboBox() - Me.Label6 = New System.Windows.Forms.Label() - Me.ComboBox1 = New System.Windows.Forms.ComboBox() - Me.Label7 = New System.Windows.Forms.Label() - Me.b_SoftFreeze = New System.Windows.Forms.Button() - Me.b_SoftUnfreeze = New System.Windows.Forms.Button() - Me.Label5 = New System.Windows.Forms.Label() - Me.Label8 = New System.Windows.Forms.Label() - Me.NormalCamControls = New System.Windows.Forms.GroupBox() - Me.AnimSwapControls = New System.Windows.Forms.GroupBox() - Me.PrecisionCamControls = New System.Windows.Forms.GroupBox() - Me.PrecisionStatusLabel = New System.Windows.Forms.Label() - Me.b_PrecisionPlusOne = New System.Windows.Forms.Button() - Me.MenuStrip1.SuspendLayout() - Me.NormalCamControls.SuspendLayout() - Me.AnimSwapControls.SuspendLayout() - Me.PrecisionCamControls.SuspendLayout() - Me.SuspendLayout() - ' - 'b_Freeze - ' - Me.b_Freeze.Location = New System.Drawing.Point(7, 19) - Me.b_Freeze.Name = "b_Freeze" - Me.b_Freeze.Size = New System.Drawing.Size(144, 23) - Me.b_Freeze.TabIndex = 0 - Me.b_Freeze.Text = "Freeze Camera" - Me.b_Freeze.UseVisualStyleBackColor = True - ' - 'b_Unfreeze - ' - Me.b_Unfreeze.Location = New System.Drawing.Point(155, 19) - Me.b_Unfreeze.Name = "b_Unfreeze" - Me.b_Unfreeze.Size = New System.Drawing.Size(144, 23) - Me.b_Unfreeze.TabIndex = 1 - Me.b_Unfreeze.Text = "Unfreeze Camera" - Me.b_Unfreeze.UseVisualStyleBackColor = True - ' - 'b_ChangeCameraType - ' - Me.b_ChangeCameraType.Location = New System.Drawing.Point(303, 19) - Me.b_ChangeCameraType.Name = "b_ChangeCameraType" - Me.b_ChangeCameraType.Size = New System.Drawing.Size(144, 23) - Me.b_ChangeCameraType.TabIndex = 2 - Me.b_ChangeCameraType.Text = "Change Camera Type" - Me.b_ChangeCameraType.UseVisualStyleBackColor = True - ' - 'BaseAddressLabel - ' - Me.BaseAddressLabel.AutoSize = True - Me.BaseAddressLabel.Location = New System.Drawing.Point(10, 28) - Me.BaseAddressLabel.Name = "BaseAddressLabel" - Me.BaseAddressLabel.Size = New System.Drawing.Size(69, 13) - Me.BaseAddressLabel.TabIndex = 3 - Me.BaseAddressLabel.Text = "BaseAddress" - ' - 'Label2 - ' - Me.Label2.AutoSize = True - Me.Label2.Location = New System.Drawing.Point(59, 45) - Me.Label2.Name = "Label2" - Me.Label2.Size = New System.Drawing.Size(40, 13) - Me.Label2.TabIndex = 4 - Me.Label2.Text = "Ctrl + 1" - Me.Label2.TextAlign = System.Drawing.ContentAlignment.TopCenter - ' - 'Label3 - ' - Me.Label3.AutoSize = True - Me.Label3.Location = New System.Drawing.Point(207, 45) - Me.Label3.Name = "Label3" - Me.Label3.Size = New System.Drawing.Size(40, 13) - Me.Label3.TabIndex = 5 - Me.Label3.Text = "Ctrl + 2" - ' - 'Label4 - ' - Me.Label4.AutoSize = True - Me.Label4.Location = New System.Drawing.Point(355, 45) - Me.Label4.Name = "Label4" - Me.Label4.Size = New System.Drawing.Size(40, 13) - Me.Label4.TabIndex = 6 - Me.Label4.Text = "Ctrl + 3" - ' - 'MenuStrip1 - ' - Me.MenuStrip1.BackColor = System.Drawing.SystemColors.MenuBar - Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.AboutMenu, Me.SettingsToolStripMenuItem, Me.ToolsToolStripMenuItem}) - Me.MenuStrip1.Location = New System.Drawing.Point(0, 0) - Me.MenuStrip1.Name = "MenuStrip1" - Me.MenuStrip1.Size = New System.Drawing.Size(474, 24) - Me.MenuStrip1.TabIndex = 7 - Me.MenuStrip1.Text = "MenuStrip1" - ' - 'AboutMenu - ' - Me.AboutMenu.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.AboutMenuItem, Me.HelpToolStripMenuItem1}) - Me.AboutMenu.Name = "AboutMenu" - Me.AboutMenu.Size = New System.Drawing.Size(52, 20) - Me.AboutMenu.Text = "About" - ' - 'AboutMenuItem - ' - Me.AboutMenuItem.Name = "AboutMenuItem" - Me.AboutMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.A), System.Windows.Forms.Keys) - Me.AboutMenuItem.Size = New System.Drawing.Size(297, 22) - Me.AboutMenuItem.Text = "About Mario 64 Movie Maker 2.0..." - ' - 'HelpToolStripMenuItem1 - ' - Me.HelpToolStripMenuItem1.Enabled = False - Me.HelpToolStripMenuItem1.Name = "HelpToolStripMenuItem1" - Me.HelpToolStripMenuItem1.Size = New System.Drawing.Size(297, 22) - Me.HelpToolStripMenuItem1.Text = "Help..." - ' - 'SettingsToolStripMenuItem - ' - Me.SettingsToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.RetainAnimationSwapsMenuItem, Me.UndoPreviousAnimationSwapsMenuItem, Me.ResetAnimationSwapsMenuItem, Me.ForceCameraPresetMenuItem, Me.ToolStripSeparator1, Me.PrecisionModeMenuItem}) - Me.SettingsToolStripMenuItem.Name = "SettingsToolStripMenuItem" - Me.SettingsToolStripMenuItem.Size = New System.Drawing.Size(61, 20) - Me.SettingsToolStripMenuItem.Text = "Settings" - ' - 'RetainAnimationSwapsMenuItem - ' - Me.RetainAnimationSwapsMenuItem.Checked = True - Me.RetainAnimationSwapsMenuItem.CheckState = System.Windows.Forms.CheckState.Checked - Me.RetainAnimationSwapsMenuItem.Name = "RetainAnimationSwapsMenuItem" - Me.RetainAnimationSwapsMenuItem.Size = New System.Drawing.Size(347, 22) - Me.RetainAnimationSwapsMenuItem.Text = "Remeber previous animation swaps" - Me.RetainAnimationSwapsMenuItem.ToolTipText = "When you select a new animation to be overwritten, any previous animations" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "will " & - "remain swapped until you manually change or reset them." - ' - 'UndoPreviousAnimationSwapsMenuItem - ' - Me.UndoPreviousAnimationSwapsMenuItem.Name = "UndoPreviousAnimationSwapsMenuItem" - Me.UndoPreviousAnimationSwapsMenuItem.Size = New System.Drawing.Size(347, 22) - Me.UndoPreviousAnimationSwapsMenuItem.Text = "Undo previous animation swaps" - Me.UndoPreviousAnimationSwapsMenuItem.ToolTipText = "When you select a new animation to be overwritten, the previous one" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "will be retu" & - "rned to its default animation." - ' - 'ResetAnimationSwapsMenuItem - ' - Me.ResetAnimationSwapsMenuItem.Name = "ResetAnimationSwapsMenuItem" - Me.ResetAnimationSwapsMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.R), System.Windows.Forms.Keys) - Me.ResetAnimationSwapsMenuItem.Size = New System.Drawing.Size(347, 22) - Me.ResetAnimationSwapsMenuItem.Text = "Reset all animations to default" - Me.ResetAnimationSwapsMenuItem.ToolTipText = "This resets all animations to their original sequences." - ' - 'ForceCameraPresetMenuItem - ' - Me.ForceCameraPresetMenuItem.Name = "ForceCameraPresetMenuItem" - Me.ForceCameraPresetMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.F), System.Windows.Forms.Keys) - Me.ForceCameraPresetMenuItem.Size = New System.Drawing.Size(347, 22) - Me.ForceCameraPresetMenuItem.Text = "Force camera to be movable with C-buttons" - Me.ForceCameraPresetMenuItem.ToolTipText = resources.GetString("ForceCameraPresetMenuItem.ToolTipText") - ' - 'ToolStripSeparator1 - ' - Me.ToolStripSeparator1.Name = "ToolStripSeparator1" - Me.ToolStripSeparator1.Size = New System.Drawing.Size(344, 6) - ' - 'PrecisionModeMenuItem - ' - Me.PrecisionModeMenuItem.Name = "PrecisionModeMenuItem" - Me.PrecisionModeMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.P), System.Windows.Forms.Keys) - Me.PrecisionModeMenuItem.Size = New System.Drawing.Size(347, 22) - Me.PrecisionModeMenuItem.Text = "Enable Precision Mode" - Me.PrecisionModeMenuItem.ToolTipText = "Enables Precision Camera Mode, which lets you" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "control the angle of the camera fr" & - "om Mario's first-person" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "view and lock it wherever you want, and then readjust t" & - "he camera at will." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) - ' - 'ToolsToolStripMenuItem - ' - Me.ToolsToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ColorCodeStudioMenuItem, Me.MemoryIODebugToolStripMenuItem}) - Me.ToolsToolStripMenuItem.Name = "ToolsToolStripMenuItem" - Me.ToolsToolStripMenuItem.Size = New System.Drawing.Size(47, 20) - Me.ToolsToolStripMenuItem.Text = "Tools" - ' - 'ColorCodeStudioMenuItem - ' - Me.ColorCodeStudioMenuItem.Name = "ColorCodeStudioMenuItem" - Me.ColorCodeStudioMenuItem.Size = New System.Drawing.Size(177, 22) - Me.ColorCodeStudioMenuItem.Text = "Color Code Studio" - ' - 'MemoryIODebugToolStripMenuItem - ' - Me.MemoryIODebugToolStripMenuItem.Name = "MemoryIODebugToolStripMenuItem" - Me.MemoryIODebugToolStripMenuItem.Size = New System.Drawing.Size(177, 22) - Me.MemoryIODebugToolStripMenuItem.Text = "Memory I/O Debug" - ' - 'ComboBox2 - ' - Me.ComboBox2.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) - Me.ComboBox2.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList - Me.ComboBox2.Enabled = False - Me.ComboBox2.FormattingEnabled = True - Me.ComboBox2.Location = New System.Drawing.Point(7, 76) - Me.ComboBox2.Name = "ComboBox2" - Me.ComboBox2.Size = New System.Drawing.Size(440, 21) - Me.ComboBox2.TabIndex = 13 - ' - 'Label6 - ' - Me.Label6.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) - Me.Label6.AutoSize = True - Me.Label6.Location = New System.Drawing.Point(7, 61) - Me.Label6.Name = "Label6" - Me.Label6.Size = New System.Drawing.Size(99, 13) - Me.Label6.TabIndex = 12 - Me.Label6.Text = "With this animation:" - ' - 'ComboBox1 - ' - Me.ComboBox1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) - Me.ComboBox1.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList - Me.ComboBox1.Enabled = False - Me.ComboBox1.FormattingEnabled = True - Me.ComboBox1.Location = New System.Drawing.Point(7, 32) - Me.ComboBox1.Name = "ComboBox1" - Me.ComboBox1.Size = New System.Drawing.Size(440, 21) - Me.ComboBox1.TabIndex = 11 - ' - 'Label7 - ' - Me.Label7.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) - Me.Label7.AutoSize = True - Me.Label7.Location = New System.Drawing.Point(7, 17) - Me.Label7.Name = "Label7" - Me.Label7.Size = New System.Drawing.Size(128, 13) - Me.Label7.TabIndex = 10 - Me.Label7.Text = "Overwrite this animation..." - ' - 'b_SoftFreeze - ' - Me.b_SoftFreeze.Enabled = False - Me.b_SoftFreeze.Location = New System.Drawing.Point(92, 69) - Me.b_SoftFreeze.Name = "b_SoftFreeze" - Me.b_SoftFreeze.Size = New System.Drawing.Size(128, 23) - Me.b_SoftFreeze.TabIndex = 14 - Me.b_SoftFreeze.Text = "Soft-Freeze Camera" - Me.b_SoftFreeze.UseVisualStyleBackColor = True - ' - 'b_SoftUnfreeze - ' - Me.b_SoftUnfreeze.Enabled = False - Me.b_SoftUnfreeze.Location = New System.Drawing.Point(235, 69) - Me.b_SoftUnfreeze.Name = "b_SoftUnfreeze" - Me.b_SoftUnfreeze.Size = New System.Drawing.Size(128, 23) - Me.b_SoftUnfreeze.TabIndex = 14 - Me.b_SoftUnfreeze.Text = "Soft-Unfreeze Camera" - Me.b_SoftUnfreeze.UseVisualStyleBackColor = True - ' - 'Label5 - ' - Me.Label5.AutoSize = True - Me.Label5.Location = New System.Drawing.Point(136, 95) - Me.Label5.Name = "Label5" - Me.Label5.Size = New System.Drawing.Size(40, 13) - Me.Label5.TabIndex = 4 - Me.Label5.Text = "Ctrl + 4" - ' - 'Label8 - ' - Me.Label8.AutoSize = True - Me.Label8.Location = New System.Drawing.Point(279, 95) - Me.Label8.Name = "Label8" - Me.Label8.Size = New System.Drawing.Size(40, 13) - Me.Label8.TabIndex = 4 - Me.Label8.Text = "Ctrl + 5" - ' - 'NormalCamControls - ' - Me.NormalCamControls.Controls.Add(Me.b_SoftFreeze) - Me.NormalCamControls.Controls.Add(Me.b_SoftUnfreeze) - Me.NormalCamControls.Controls.Add(Me.Label5) - Me.NormalCamControls.Controls.Add(Me.Label8) - Me.NormalCamControls.Controls.Add(Me.Label2) - Me.NormalCamControls.Controls.Add(Me.Label4) - Me.NormalCamControls.Controls.Add(Me.b_Freeze) - Me.NormalCamControls.Controls.Add(Me.Label3) - Me.NormalCamControls.Controls.Add(Me.b_ChangeCameraType) - Me.NormalCamControls.Controls.Add(Me.b_Unfreeze) - Me.NormalCamControls.Location = New System.Drawing.Point(10, 44) - Me.NormalCamControls.Name = "NormalCamControls" - Me.NormalCamControls.Size = New System.Drawing.Size(454, 129) - Me.NormalCamControls.TabIndex = 15 - Me.NormalCamControls.TabStop = False - Me.NormalCamControls.Text = "Normal Camera Controls" - ' - 'AnimSwapControls - ' - Me.AnimSwapControls.Anchor = System.Windows.Forms.AnchorStyles.Bottom - Me.AnimSwapControls.Controls.Add(Me.Label7) - Me.AnimSwapControls.Controls.Add(Me.ComboBox1) - Me.AnimSwapControls.Controls.Add(Me.ComboBox2) - Me.AnimSwapControls.Controls.Add(Me.Label6) - Me.AnimSwapControls.Location = New System.Drawing.Point(10, 265) - Me.AnimSwapControls.Name = "AnimSwapControls" - Me.AnimSwapControls.Size = New System.Drawing.Size(454, 109) - Me.AnimSwapControls.TabIndex = 16 - Me.AnimSwapControls.TabStop = False - Me.AnimSwapControls.Text = "Animation Swap Control" - ' - 'PrecisionCamControls - ' - Me.PrecisionCamControls.Controls.Add(Me.PrecisionStatusLabel) - Me.PrecisionCamControls.Controls.Add(Me.b_PrecisionPlusOne) - Me.PrecisionCamControls.Location = New System.Drawing.Point(10, 179) - Me.PrecisionCamControls.Name = "PrecisionCamControls" - Me.PrecisionCamControls.Size = New System.Drawing.Size(454, 80) - Me.PrecisionCamControls.TabIndex = 17 - Me.PrecisionCamControls.TabStop = False - Me.PrecisionCamControls.Text = "Precision Camera Control" - ' - 'PrecisionStatusLabel - ' - Me.PrecisionStatusLabel.Location = New System.Drawing.Point(8, 17) - Me.PrecisionStatusLabel.Name = "PrecisionStatusLabel" - Me.PrecisionStatusLabel.Size = New System.Drawing.Size(438, 32) - Me.PrecisionStatusLabel.TabIndex = 1 - Me.PrecisionStatusLabel.Text = "Precision Mode is disabled." - Me.PrecisionStatusLabel.TextAlign = System.Drawing.ContentAlignment.TopCenter - ' - 'b_PrecisionPlusOne - ' - Me.b_PrecisionPlusOne.Enabled = False - Me.b_PrecisionPlusOne.Location = New System.Drawing.Point(161, 51) - Me.b_PrecisionPlusOne.Name = "b_PrecisionPlusOne" - Me.b_PrecisionPlusOne.Size = New System.Drawing.Size(132, 23) - Me.b_PrecisionPlusOne.TabIndex = 0 - Me.b_PrecisionPlusOne.Text = "Precision Mode Disabled" - Me.b_PrecisionPlusOne.UseVisualStyleBackColor = True - ' - 'MainForm - ' - Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) - Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font - Me.ClientSize = New System.Drawing.Size(474, 385) - Me.Controls.Add(Me.PrecisionCamControls) - Me.Controls.Add(Me.AnimSwapControls) - Me.Controls.Add(Me.NormalCamControls) - Me.Controls.Add(Me.BaseAddressLabel) - Me.Controls.Add(Me.MenuStrip1) - Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle - Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) - Me.MainMenuStrip = Me.MenuStrip1 - Me.MaximizeBox = False - Me.MinimizeBox = False - Me.Name = "MainForm" - Me.SizeGripStyle = System.Windows.Forms.SizeGripStyle.Hide - Me.Text = "Mario 64 Movie Maker 2.0" - Me.MenuStrip1.ResumeLayout(False) - Me.MenuStrip1.PerformLayout() - Me.NormalCamControls.ResumeLayout(False) - Me.NormalCamControls.PerformLayout() - Me.AnimSwapControls.ResumeLayout(False) - Me.AnimSwapControls.PerformLayout() - Me.PrecisionCamControls.ResumeLayout(False) - Me.ResumeLayout(False) - Me.PerformLayout() + Me.components = New System.ComponentModel.Container() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(MainForm)) + Me.b_Freeze = New System.Windows.Forms.Button() + Me.b_Unfreeze = New System.Windows.Forms.Button() + Me.b_ChangeCameraType = New System.Windows.Forms.Button() + Me.BaseAddressLabel = New System.Windows.Forms.Label() + Me.Timer1 = New System.Windows.Forms.Timer(Me.components) + Me.Label2 = New System.Windows.Forms.Label() + Me.Label3 = New System.Windows.Forms.Label() + Me.Label4 = New System.Windows.Forms.Label() + Me.MenuStrip1 = New System.Windows.Forms.MenuStrip() + Me.AboutMenu = New System.Windows.Forms.ToolStripMenuItem() + Me.AboutMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.HelpToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.SettingsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.RetainAnimationSwapsMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.UndoPreviousAnimationSwapsMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ResetAnimationSwapsMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ForceCameraPresetMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator() + Me.PrecisionModeMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ColorCodeStudioMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.MemoryIODebugToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ComboBox2 = New System.Windows.Forms.ComboBox() + Me.Label6 = New System.Windows.Forms.Label() + Me.ComboBox1 = New System.Windows.Forms.ComboBox() + Me.Label7 = New System.Windows.Forms.Label() + Me.b_SoftFreeze = New System.Windows.Forms.Button() + Me.b_SoftUnfreeze = New System.Windows.Forms.Button() + Me.Label5 = New System.Windows.Forms.Label() + Me.Label8 = New System.Windows.Forms.Label() + Me.NormalCamControls = New System.Windows.Forms.GroupBox() + Me.AnimSwapControls = New System.Windows.Forms.GroupBox() + Me.PrecisionCamControls = New System.Windows.Forms.GroupBox() + Me.PrecisionStatusLabel = New System.Windows.Forms.Label() + Me.b_PrecisionPlusOne = New System.Windows.Forms.Button() + Me.MenuStrip1.SuspendLayout() + Me.NormalCamControls.SuspendLayout() + Me.AnimSwapControls.SuspendLayout() + Me.PrecisionCamControls.SuspendLayout() + Me.SuspendLayout() + ' + 'b_Freeze + ' + Me.b_Freeze.Location = New System.Drawing.Point(7, 19) + Me.b_Freeze.Name = "b_Freeze" + Me.b_Freeze.Size = New System.Drawing.Size(144, 23) + Me.b_Freeze.TabIndex = 0 + Me.b_Freeze.Text = "Freeze Camera" + Me.b_Freeze.UseVisualStyleBackColor = True + ' + 'b_Unfreeze + ' + Me.b_Unfreeze.Location = New System.Drawing.Point(155, 19) + Me.b_Unfreeze.Name = "b_Unfreeze" + Me.b_Unfreeze.Size = New System.Drawing.Size(144, 23) + Me.b_Unfreeze.TabIndex = 1 + Me.b_Unfreeze.Text = "Unfreeze Camera" + Me.b_Unfreeze.UseVisualStyleBackColor = True + ' + 'b_ChangeCameraType + ' + Me.b_ChangeCameraType.Location = New System.Drawing.Point(303, 19) + Me.b_ChangeCameraType.Name = "b_ChangeCameraType" + Me.b_ChangeCameraType.Size = New System.Drawing.Size(144, 23) + Me.b_ChangeCameraType.TabIndex = 2 + Me.b_ChangeCameraType.Text = "Change Camera Type" + Me.b_ChangeCameraType.UseVisualStyleBackColor = True + ' + 'BaseAddressLabel + ' + Me.BaseAddressLabel.AutoSize = True + Me.BaseAddressLabel.Location = New System.Drawing.Point(10, 28) + Me.BaseAddressLabel.Name = "BaseAddressLabel" + Me.BaseAddressLabel.Size = New System.Drawing.Size(69, 13) + Me.BaseAddressLabel.TabIndex = 3 + Me.BaseAddressLabel.Text = "BaseAddress" + ' + 'Label2 + ' + Me.Label2.AutoSize = True + Me.Label2.Location = New System.Drawing.Point(59, 45) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(40, 13) + Me.Label2.TabIndex = 4 + Me.Label2.Text = "Ctrl + 1" + Me.Label2.TextAlign = System.Drawing.ContentAlignment.TopCenter + ' + 'Label3 + ' + Me.Label3.AutoSize = True + Me.Label3.Location = New System.Drawing.Point(207, 45) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(40, 13) + Me.Label3.TabIndex = 5 + Me.Label3.Text = "Ctrl + 2" + ' + 'Label4 + ' + Me.Label4.AutoSize = True + Me.Label4.Location = New System.Drawing.Point(355, 45) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(40, 13) + Me.Label4.TabIndex = 6 + Me.Label4.Text = "Ctrl + 3" + ' + 'MenuStrip1 + ' + Me.MenuStrip1.BackColor = System.Drawing.SystemColors.MenuBar + Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.AboutMenu, Me.SettingsToolStripMenuItem, Me.ToolsToolStripMenuItem}) + Me.MenuStrip1.Location = New System.Drawing.Point(0, 0) + Me.MenuStrip1.Name = "MenuStrip1" + Me.MenuStrip1.Size = New System.Drawing.Size(474, 24) + Me.MenuStrip1.TabIndex = 7 + Me.MenuStrip1.Text = "MenuStrip1" + ' + 'AboutMenu + ' + Me.AboutMenu.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.AboutMenuItem, Me.HelpToolStripMenuItem1}) + Me.AboutMenu.Name = "AboutMenu" + Me.AboutMenu.Size = New System.Drawing.Size(52, 20) + Me.AboutMenu.Text = "About" + ' + 'AboutMenuItem + ' + Me.AboutMenuItem.Name = "AboutMenuItem" + Me.AboutMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.A), System.Windows.Forms.Keys) + Me.AboutMenuItem.Size = New System.Drawing.Size(297, 22) + Me.AboutMenuItem.Text = "About Mario 64 Movie Maker 2.0..." + ' + 'HelpToolStripMenuItem1 + ' + Me.HelpToolStripMenuItem1.Enabled = False + Me.HelpToolStripMenuItem1.Name = "HelpToolStripMenuItem1" + Me.HelpToolStripMenuItem1.Size = New System.Drawing.Size(297, 22) + Me.HelpToolStripMenuItem1.Text = "Help..." + ' + 'SettingsToolStripMenuItem + ' + Me.SettingsToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.RetainAnimationSwapsMenuItem, Me.UndoPreviousAnimationSwapsMenuItem, Me.ResetAnimationSwapsMenuItem, Me.ForceCameraPresetMenuItem, Me.ToolStripSeparator1, Me.PrecisionModeMenuItem}) + Me.SettingsToolStripMenuItem.Name = "SettingsToolStripMenuItem" + Me.SettingsToolStripMenuItem.Size = New System.Drawing.Size(61, 20) + Me.SettingsToolStripMenuItem.Text = "Settings" + ' + 'RetainAnimationSwapsMenuItem + ' + Me.RetainAnimationSwapsMenuItem.Checked = True + Me.RetainAnimationSwapsMenuItem.CheckState = System.Windows.Forms.CheckState.Checked + Me.RetainAnimationSwapsMenuItem.Name = "RetainAnimationSwapsMenuItem" + Me.RetainAnimationSwapsMenuItem.Size = New System.Drawing.Size(347, 22) + Me.RetainAnimationSwapsMenuItem.Text = "Remeber previous animation swaps" + Me.RetainAnimationSwapsMenuItem.ToolTipText = "When you select a new animation to be overwritten, any previous animations" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "will " & + "remain swapped until you manually change or reset them." + ' + 'UndoPreviousAnimationSwapsMenuItem + ' + Me.UndoPreviousAnimationSwapsMenuItem.Name = "UndoPreviousAnimationSwapsMenuItem" + Me.UndoPreviousAnimationSwapsMenuItem.Size = New System.Drawing.Size(347, 22) + Me.UndoPreviousAnimationSwapsMenuItem.Text = "Undo previous animation swaps" + Me.UndoPreviousAnimationSwapsMenuItem.ToolTipText = "When you select a new animation to be overwritten, the previous one" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "will be retu" & + "rned to its default animation." + ' + 'ResetAnimationSwapsMenuItem + ' + Me.ResetAnimationSwapsMenuItem.Enabled = False + Me.ResetAnimationSwapsMenuItem.Name = "ResetAnimationSwapsMenuItem" + Me.ResetAnimationSwapsMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.R), System.Windows.Forms.Keys) + Me.ResetAnimationSwapsMenuItem.Size = New System.Drawing.Size(347, 22) + Me.ResetAnimationSwapsMenuItem.Text = "Reset all animations to default (Broken)" + Me.ResetAnimationSwapsMenuItem.ToolTipText = "This resets all animations to their original sequences." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "However, it currently do" & + "es not work as intended, so" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "I have disabled it until I determine how to fix it." & + "" + ' + 'ForceCameraPresetMenuItem + ' + Me.ForceCameraPresetMenuItem.Name = "ForceCameraPresetMenuItem" + Me.ForceCameraPresetMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.F), System.Windows.Forms.Keys) + Me.ForceCameraPresetMenuItem.Size = New System.Drawing.Size(347, 22) + Me.ForceCameraPresetMenuItem.Text = "Force camera to be movable with C-buttons" + Me.ForceCameraPresetMenuItem.ToolTipText = resources.GetString("ForceCameraPresetMenuItem.ToolTipText") + ' + 'ToolStripSeparator1 + ' + Me.ToolStripSeparator1.Name = "ToolStripSeparator1" + Me.ToolStripSeparator1.Size = New System.Drawing.Size(344, 6) + ' + 'PrecisionModeMenuItem + ' + Me.PrecisionModeMenuItem.Name = "PrecisionModeMenuItem" + Me.PrecisionModeMenuItem.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.P), System.Windows.Forms.Keys) + Me.PrecisionModeMenuItem.Size = New System.Drawing.Size(347, 22) + Me.PrecisionModeMenuItem.Text = "Enable Precision Mode" + Me.PrecisionModeMenuItem.ToolTipText = "Enables Precision Camera Mode, which lets you" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "control the angle of the camera fr" & + "om Mario's first-person" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "view and lock it wherever you want, and then readjust t" & + "he camera at will." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) + ' + 'ToolsToolStripMenuItem + ' + Me.ToolsToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ColorCodeStudioMenuItem, Me.MemoryIODebugToolStripMenuItem}) + Me.ToolsToolStripMenuItem.Name = "ToolsToolStripMenuItem" + Me.ToolsToolStripMenuItem.Size = New System.Drawing.Size(47, 20) + Me.ToolsToolStripMenuItem.Text = "Tools" + ' + 'ColorCodeStudioMenuItem + ' + Me.ColorCodeStudioMenuItem.Name = "ColorCodeStudioMenuItem" + Me.ColorCodeStudioMenuItem.Size = New System.Drawing.Size(177, 22) + Me.ColorCodeStudioMenuItem.Text = "Color Code Studio" + ' + 'MemoryIODebugToolStripMenuItem + ' + Me.MemoryIODebugToolStripMenuItem.Name = "MemoryIODebugToolStripMenuItem" + Me.MemoryIODebugToolStripMenuItem.Size = New System.Drawing.Size(177, 22) + Me.MemoryIODebugToolStripMenuItem.Text = "Memory I/O Debug" + ' + 'ComboBox2 + ' + Me.ComboBox2.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) + Me.ComboBox2.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.ComboBox2.Enabled = False + Me.ComboBox2.FormattingEnabled = True + Me.ComboBox2.Location = New System.Drawing.Point(7, 76) + Me.ComboBox2.Name = "ComboBox2" + Me.ComboBox2.Size = New System.Drawing.Size(440, 21) + Me.ComboBox2.TabIndex = 13 + ' + 'Label6 + ' + Me.Label6.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) + Me.Label6.AutoSize = True + Me.Label6.Location = New System.Drawing.Point(7, 61) + Me.Label6.Name = "Label6" + Me.Label6.Size = New System.Drawing.Size(99, 13) + Me.Label6.TabIndex = 12 + Me.Label6.Text = "With this animation:" + ' + 'ComboBox1 + ' + Me.ComboBox1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) + Me.ComboBox1.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.ComboBox1.Enabled = False + Me.ComboBox1.FormattingEnabled = True + Me.ComboBox1.Location = New System.Drawing.Point(7, 32) + Me.ComboBox1.Name = "ComboBox1" + Me.ComboBox1.Size = New System.Drawing.Size(440, 21) + Me.ComboBox1.TabIndex = 11 + ' + 'Label7 + ' + Me.Label7.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) + Me.Label7.AutoSize = True + Me.Label7.Location = New System.Drawing.Point(7, 17) + Me.Label7.Name = "Label7" + Me.Label7.Size = New System.Drawing.Size(128, 13) + Me.Label7.TabIndex = 10 + Me.Label7.Text = "Overwrite this animation..." + ' + 'b_SoftFreeze + ' + Me.b_SoftFreeze.Enabled = False + Me.b_SoftFreeze.Location = New System.Drawing.Point(92, 69) + Me.b_SoftFreeze.Name = "b_SoftFreeze" + Me.b_SoftFreeze.Size = New System.Drawing.Size(128, 23) + Me.b_SoftFreeze.TabIndex = 14 + Me.b_SoftFreeze.Text = "Soft-Freeze Camera" + Me.b_SoftFreeze.UseVisualStyleBackColor = True + ' + 'b_SoftUnfreeze + ' + Me.b_SoftUnfreeze.Enabled = False + Me.b_SoftUnfreeze.Location = New System.Drawing.Point(235, 69) + Me.b_SoftUnfreeze.Name = "b_SoftUnfreeze" + Me.b_SoftUnfreeze.Size = New System.Drawing.Size(128, 23) + Me.b_SoftUnfreeze.TabIndex = 14 + Me.b_SoftUnfreeze.Text = "Soft-Unfreeze Camera" + Me.b_SoftUnfreeze.UseVisualStyleBackColor = True + ' + 'Label5 + ' + Me.Label5.AutoSize = True + Me.Label5.Location = New System.Drawing.Point(136, 95) + Me.Label5.Name = "Label5" + Me.Label5.Size = New System.Drawing.Size(40, 13) + Me.Label5.TabIndex = 4 + Me.Label5.Text = "Ctrl + 4" + ' + 'Label8 + ' + Me.Label8.AutoSize = True + Me.Label8.Location = New System.Drawing.Point(279, 95) + Me.Label8.Name = "Label8" + Me.Label8.Size = New System.Drawing.Size(40, 13) + Me.Label8.TabIndex = 4 + Me.Label8.Text = "Ctrl + 5" + ' + 'NormalCamControls + ' + Me.NormalCamControls.Controls.Add(Me.b_SoftFreeze) + Me.NormalCamControls.Controls.Add(Me.b_SoftUnfreeze) + Me.NormalCamControls.Controls.Add(Me.Label5) + Me.NormalCamControls.Controls.Add(Me.Label8) + Me.NormalCamControls.Controls.Add(Me.Label2) + Me.NormalCamControls.Controls.Add(Me.Label4) + Me.NormalCamControls.Controls.Add(Me.b_Freeze) + Me.NormalCamControls.Controls.Add(Me.Label3) + Me.NormalCamControls.Controls.Add(Me.b_ChangeCameraType) + Me.NormalCamControls.Controls.Add(Me.b_Unfreeze) + Me.NormalCamControls.Location = New System.Drawing.Point(10, 44) + Me.NormalCamControls.Name = "NormalCamControls" + Me.NormalCamControls.Size = New System.Drawing.Size(454, 129) + Me.NormalCamControls.TabIndex = 15 + Me.NormalCamControls.TabStop = False + Me.NormalCamControls.Text = "Normal Camera Controls" + ' + 'AnimSwapControls + ' + Me.AnimSwapControls.Anchor = System.Windows.Forms.AnchorStyles.Bottom + Me.AnimSwapControls.Controls.Add(Me.Label7) + Me.AnimSwapControls.Controls.Add(Me.ComboBox1) + Me.AnimSwapControls.Controls.Add(Me.ComboBox2) + Me.AnimSwapControls.Controls.Add(Me.Label6) + Me.AnimSwapControls.Location = New System.Drawing.Point(10, 265) + Me.AnimSwapControls.Name = "AnimSwapControls" + Me.AnimSwapControls.Size = New System.Drawing.Size(454, 109) + Me.AnimSwapControls.TabIndex = 16 + Me.AnimSwapControls.TabStop = False + Me.AnimSwapControls.Text = "Animation Swap Control" + ' + 'PrecisionCamControls + ' + Me.PrecisionCamControls.Controls.Add(Me.PrecisionStatusLabel) + Me.PrecisionCamControls.Controls.Add(Me.b_PrecisionPlusOne) + Me.PrecisionCamControls.Location = New System.Drawing.Point(10, 179) + Me.PrecisionCamControls.Name = "PrecisionCamControls" + Me.PrecisionCamControls.Size = New System.Drawing.Size(454, 80) + Me.PrecisionCamControls.TabIndex = 17 + Me.PrecisionCamControls.TabStop = False + Me.PrecisionCamControls.Text = "Precision Camera Control" + ' + 'PrecisionStatusLabel + ' + Me.PrecisionStatusLabel.Location = New System.Drawing.Point(8, 17) + Me.PrecisionStatusLabel.Name = "PrecisionStatusLabel" + Me.PrecisionStatusLabel.Size = New System.Drawing.Size(438, 32) + Me.PrecisionStatusLabel.TabIndex = 1 + Me.PrecisionStatusLabel.Text = "Precision Mode is disabled." + Me.PrecisionStatusLabel.TextAlign = System.Drawing.ContentAlignment.TopCenter + ' + 'b_PrecisionPlusOne + ' + Me.b_PrecisionPlusOne.Enabled = False + Me.b_PrecisionPlusOne.Location = New System.Drawing.Point(161, 51) + Me.b_PrecisionPlusOne.Name = "b_PrecisionPlusOne" + Me.b_PrecisionPlusOne.Size = New System.Drawing.Size(132, 23) + Me.b_PrecisionPlusOne.TabIndex = 0 + Me.b_PrecisionPlusOne.Text = "Precision Mode Disabled" + Me.b_PrecisionPlusOne.UseVisualStyleBackColor = True + ' + 'MainForm + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(474, 385) + Me.Controls.Add(Me.PrecisionCamControls) + Me.Controls.Add(Me.AnimSwapControls) + Me.Controls.Add(Me.NormalCamControls) + Me.Controls.Add(Me.BaseAddressLabel) + Me.Controls.Add(Me.MenuStrip1) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle + Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) + Me.MainMenuStrip = Me.MenuStrip1 + Me.MaximizeBox = False + Me.MinimizeBox = False + Me.Name = "MainForm" + Me.SizeGripStyle = System.Windows.Forms.SizeGripStyle.Hide + Me.Text = "Mario 64 Movie Maker 2.0" + Me.MenuStrip1.ResumeLayout(False) + Me.MenuStrip1.PerformLayout() + Me.NormalCamControls.ResumeLayout(False) + Me.NormalCamControls.PerformLayout() + Me.AnimSwapControls.ResumeLayout(False) + Me.AnimSwapControls.PerformLayout() + Me.PrecisionCamControls.ResumeLayout(False) + Me.ResumeLayout(False) + Me.PerformLayout() - End Sub - Friend WithEvents b_Freeze As System.Windows.Forms.Button + End Sub + Friend WithEvents b_Freeze As System.Windows.Forms.Button Friend WithEvents b_Unfreeze As System.Windows.Forms.Button Friend WithEvents b_ChangeCameraType As System.Windows.Forms.Button Friend WithEvents BaseAddressLabel As System.Windows.Forms.Label diff --git a/M64MM2/MainForm.vb b/M64MM2/MainForm.vb index 3b3c401..daaa180 100644 --- a/M64MM2/MainForm.vb +++ b/M64MM2/MainForm.vb @@ -147,13 +147,13 @@ Public Class MainForm End Function Private Sub ResetAnimations() + ComboBox2.SelectedIndex = ComboBox1.SelectedIndex For Each anim As Animation In AnimList WriteInteger("Project64", Base + &H64040 + ((anim.Index + 1) * 8), Integer.Parse(GetChunks(anim.Value, 8)(0), NumberStyles.HexNumber)) WriteInteger("Project64", Base + &H64044 + ((anim.Index + 1) * 8), Integer.Parse(GetChunks(anim.Value, 8)(1), NumberStyles.HexNumber)) Next - ComboBox2.SelectedIndex = ComboBox1.SelectedIndex End Sub Private Sub ForceCameraPreset() @@ -280,6 +280,7 @@ Public Class MainForm foundButton.Enabled = True End If Next + ColorCodeWindow.RefreshColorCycle() End If If PrecisionStage = 0 Then PrecisionStatusLabel.Text = "Precision Mode is disabled." + vbCrLf +