コード例 #1
0
 private void Botón_Propiedades_Click(object sender, EventArgs e)
 {
     try
     {
         if (!PInvoke.SHObjectProperties(this.Handle, PInvoke.SHObjectPropertiesFlags.FilePath, Application.ExecutablePath, null))
         {
             SystemSounds.Beep.Play();
         }
     }
     catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); }
 }
コード例 #2
0
 private void Ventana_Visor_Arcanos_Load(object sender, EventArgs e)
 {
     try
     {
         this.Icon        = Program.Icono_Jupisoft.Clone() as Icon;
         this.Text        = Texto_Título + " - [Mostly in Spanish for now, sorry about that]";
         this.WindowState = FormWindowState.Maximized;
         CheckBox_Mostrar_Todos_CheckedChanged(CheckBox_Mostrar_Todos, EventArgs.Empty);
     }
     catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); Variable_Excepción_Total++; Variable_Excepción = true; }
 }
コード例 #3
0
 private void Picture_Arcano_MouseDown(object sender, MouseEventArgs e)
 {
     try
     {
         if (e.Button != MouseButtons.Right)
         {
             this.Close();
         }
     }
     catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); Variable_Excepción_Total++; Variable_Excepción = true; }
 }
コード例 #4
0
 private void Ventana_Acerca_SizeChanged(object sender, EventArgs e)
 {
     try
     {
         if (this.WindowState == FormWindowState.Maximized)
         {
             this.WindowState = FormWindowState.Normal;
         }
     }
     catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); }
 }
コード例 #5
0
 private void Menú_Contextual_Depurador_Excepciones_Click(object sender, EventArgs e)
 {
     try
     {
         Ventana_Depurador_Excepciones Ventana = new Ventana_Depurador_Excepciones();
         Ventana.ShowDialog(this);
         Ventana.Dispose();
         Ventana = null;
     }
     catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); Variable_Excepción_Total++; Variable_Excepción = true; }
 }
コード例 #6
0
 private void Barra_Estado_Etiqueta_Sugerencia_MouseDown(object sender, MouseEventArgs e)
 {
     try
     {
         if (e.Button != MouseButtons.Right)
         {
             Clipboard.SetText(Barra_Estado_Etiqueta_Sugerencia.Text);
             SystemSounds.Asterisk.Play();
         }
     }
     catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); Variable_Excepción_Total++; Variable_Excepción = true; }
 }
コード例 #7
0
 private void Menú_Contextual_Copiar_Click(object sender, EventArgs e)
 {
     try
     {
         /*if (Picture.Image != null)
          * {
          *  Clipboard.SetImage(Picture.Image);
          *  SystemSounds.Asterisk.Play();
          * }*/
     }
     catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); Variable_Excepción_Total++; Variable_Excepción = true; }
 }
コード例 #8
0
 private void Menú_Contextual_Guardar_Click(object sender, EventArgs e)
 {
     try
     {
         /*if (Picture.Image != null)
          * {
          *  Program.Crear_Carpetas(Program.Ruta_Minecraft);
          *  Picture.Image.Save(Program.Ruta_Minecraft + "\\" + Program.Obtener_Nombre_Temporal_Sin_Guiones() + ".png", ImageFormat.Png);
          *  SystemSounds.Asterisk.Play();
          * }*/
     }
     catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); Variable_Excepción_Total++; Variable_Excepción = true; }
 }
コード例 #9
0
 private void Ventana_Plantilla_Load(object sender, EventArgs e)
 {
     try
     {
         this.Icon        = Program.Icono_Jupisoft.Clone() as Icon;
         this.Text        = Texto_Título;
         this.WindowState = FormWindowState.Maximized;
         Ocupado          = true;
         Registro_Cargar_Opciones();
         Ocupado = false;
     }
     catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); Variable_Excepción_Total++; Variable_Excepción = true; }
 }
コード例 #10
0
 private void Menú_Contextual_Visor_Ayuda_Click(object sender, EventArgs e)
 {
     try
     {
         /*Ventana_Visor_Ayuda Ventana = new Ventana_Visor_Ayuda();
          * Ventana.Ayuda = Ventana_Visor_Ayuda.Ayudas.Main_window;
          * Ventana.ShowDialog(this);
          * Ventana.Dispose();
          * Ventana = null;*/
         SystemSounds.Beep.Play();
     }
     catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); Variable_Excepción_Total++; Variable_Excepción = true; }
 }
コード例 #11
0
        private void Menú_Contextual_Visor_Ayuda_Click(object sender, EventArgs e)
        {
            try
            {
                MessageBox.Show(this, "The help window has not been implemented yet, sorry.", Program.Texto_Título_Versión, MessageBoxButtons.OK, MessageBoxIcon.Question);

                /*Ventana_Visor_Ayuda Ventana = new Ventana_Visor_Ayuda();
                 * Ventana.Ayuda = Ventana_Visor_Ayuda.Ayudas.Main_window;
                 * Ventana.Variable_Siempre_Visible = Variable_Siempre_Visible;
                 * Ventana.ShowDialog(this);
                 * Ventana.Dispose();
                 * Ventana = null;*/
            }
            catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); Variable_Excepción_Total++; Variable_Excepción = true; }
        }
コード例 #12
0
 private void ComboBox_Gente_SelectedIndexChanged(object sender, EventArgs e)
 {
     try
     {
         if (ComboBox_Gente.SelectedIndex > -1 && ComboBox_Gente.SelectedIndex < Línea_Vida.Líneas_Vida.Matriz_Líneas_Vida.Length)
         {
             Ocupado               = true;
             TextBox_Nombre.Text   = Línea_Vida.Líneas_Vida.Matriz_Líneas_Vida[ComboBox_Gente.SelectedIndex].Nombre;
             TextBox_Apellido.Text = Línea_Vida.Líneas_Vida.Matriz_Líneas_Vida[ComboBox_Gente.SelectedIndex].Apellido;
             NumericUpDown_Año_Nacimiento.Value    = Línea_Vida.Líneas_Vida.Matriz_Líneas_Vida[ComboBox_Gente.SelectedIndex].Año;
             ComboBox_Mes_Nacimiento.SelectedIndex = Línea_Vida.Líneas_Vida.Matriz_Líneas_Vida[ComboBox_Gente.SelectedIndex].Mes;
             Ocupado = false;
             Establecer_Línea_Vida();
         }
     }
     catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); Variable_Excepción_Total++; Variable_Excepción = true; }
 }
コード例 #13
0
 private void Ventana_Acerca_Load(object sender, EventArgs e)
 {
     try
     {
         this.Icon                  = Program.Icono_Jupisoft.Clone() as Icon;
         this.Text                  = "About " + Program.Texto_Título_Versión;
         TextBox_Programa.Text      = Program.Texto_Programa;
         TextBox_Versión.Text       = Program.Texto_Versión_Fecha;
         TextBox_Desarrollador.Text = Texto_Desarrollador;
         TextBox_Copyright.Text     = Texto_Copyright;
         TextBox_Comentarios.Text   = Texto_Comentarios;
         TextBox_Librerías.Text     = Texto_Librerías;
         TextBox_Imágenes.Text      = "The images of the arcana cards used only for demonstration are copyright by Heraclio Fournier, Vitoria, made in Spain";
         TextBox_Gracias.Text       = Texto_Gracias;
     }
     catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); }
 }
コード例 #14
0
 private void Ventana_Acerca_KeyDown(object sender, KeyEventArgs e)
 {
     try
     {
         if (!e.Alt && !e.Control && !e.Shift)
         {
             if (e.KeyCode == Keys.Escape || e.KeyCode == Keys.Delete)
             {
                 e.Handled          = true;
                 e.SuppressKeyPress = true;
                 this.DialogResult  = DialogResult.Cancel;
                 this.Close();
             }
         }
     }
     catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); }
 }
コード例 #15
0
 private void Temporizador_Principal_Tick(object sender, EventArgs e)
 {
     try
     {
         Picture.Image = Filtrar_Imagen(Índice_Matiz);
         Picture.Invalidate();
         Picture.Update();
         if (Modo_Color == 0)
         {
             Índice_Matiz++;
             if (Índice_Matiz >= 1530)
             {
                 Índice_Matiz = 0;
             }
         }
     }
     catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); }
 }
コード例 #16
0
 private void Barra_Estado_Botón_Excepción_Click(object sender, EventArgs e)
 {
     try
     {
         Variable_Excepción                     = false;
         Variable_Excepción_Imagen              = false;
         Variable_Excepción_Total               = 0;
         Barra_Estado_Botón_Excepción.Visible   = false;
         Barra_Estado_Separador_1.Visible       = false;
         Barra_Estado_Botón_Excepción.Image     = Resources.Excepción_Gris;
         Barra_Estado_Botón_Excepción.ForeColor = Color.Black;
         Barra_Estado_Botón_Excepción.Text      = "Exceptions: 0";
         Ventana_Depurador_Excepciones Ventana = new Ventana_Depurador_Excepciones();
         Ventana.ShowDialog(this);
         Ventana.Dispose();
         Ventana = null;
     }
     catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); Variable_Excepción_Total++; Variable_Excepción = true; }
 }
コード例 #17
0
 internal void Registro_Restablecer_Opciones()
 {
     try
     {
         /*RegistryKey Clave = Registry.CurrentUser.CreateSubKey("Software\\Jupisoft\\Minecraft Tools\\" + Program.Texto_Versión + "\\Template");
          * string[] Matriz_Nombres = Clave.GetValueNames();
          * if (Matriz_Nombres != null && Matriz_Nombres.Length > 0)
          * {
          *  for (int Índice = 0; Índice < Matriz_Nombres.Length; Índice++)
          *  {
          *      try { Clave.DeleteValue(Matriz_Nombres[Índice]); }
          *      catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); Variable_Excepción_Total++; Variable_Excepción = true; continue; }
          *  }
          *  Matriz_Nombres = null;
          * }
          * Clave.Close();
          * Clave = null;*/
     }
     catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); Variable_Excepción_Total++; Variable_Excepción = true; }
 }
コード例 #18
0
 private void Ventana_Principal_KeyDown(object sender, KeyEventArgs e)
 {
     try
     {
         if (!e.Alt && !e.Control && !e.Shift)
         {
             if (e.KeyCode == Keys.Escape)
             {
                 e.Handled          = true;
                 e.SuppressKeyPress = true;
                 this.Close();
             }
             else if (e.KeyCode == Keys.Enter)
             {
                 e.Handled          = true;
                 e.SuppressKeyPress = true;
             }
         }
     }
     catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); Variable_Excepción_Total++; Variable_Excepción = true; }
 }
コード例 #19
0
 private void Pictures_Arcanos_Mayores_MouseDown(object sender, MouseEventArgs e)
 {
     try
     {
         if (e.Button != MouseButtons.Right)
         {
             PictureBox Picture = sender as PictureBox;
             if (Picture != null)
             {
                 int Índice_Arcano             = int.Parse(Picture.Name.Replace("Picture_Arcano_Mayor_", null)) - 1;
                 Ventana_Visor_Arcanos Ventana = new Ventana_Visor_Arcanos();
                 Ventana.Matriz_Arcanos_Lína_Vida = Matriz_Arcanos_Lína_Vida;
                 Ventana.Índice_Arcano            = Índice_Arcano;
                 Ventana.Variable_Siempre_Visible = Variable_Siempre_Visible;
                 Ventana.ShowDialog(this);
                 Ventana.Dispose();
                 Ventana = null;
             }
         }
     }
     catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); Variable_Excepción_Total++; Variable_Excepción = true; }
 }
コード例 #20
0
 private void ComboBox_Arcano_SelectedIndexChanged(object sender, EventArgs e)
 {
     try
     {
         if (ComboBox_Arcano.SelectedIndex > -1)
         {
             if (!Variable_Mostrar_Todos)
             {
                 int Índice = ComboBox_Arcano.SelectedIndex;
                 int Arcano = Matriz_Arcanos_Lína_Vida[Índice];
                 Picture_Arcano.Image = Línea_Vida.Obtener_Imagen_Arcano(Arcano);
                 if (Arcano > 0)
                 {
                     TextBox_Descripción.Text = (Arcano <= 22 ? "Major" : "Minor") + " Arcanum: " + Arcano.ToString() + ", " + Línea_Vida.Matriz_Nombres_Arcanos[Arcano] + " (" + Línea_Vida.Matriz_Regentes_Arcanos[Arcano] + ").\r\n\r\n" + Línea_Vida.Matriz_Descripciones_Línea_Vida[Índice + 1] + "\r\n\r\n" + Línea_Vida.Matriz_Descripciones_Arcanos[Arcano];
                 }
                 else
                 {
                     TextBox_Descripción.Text = Línea_Vida.Matriz_Descripciones_Línea_Vida[Arcano];
                 }
             }
             else
             {
                 int Índice = ComboBox_Arcano.SelectedIndex;
                 Picture_Arcano.Image = Línea_Vida.Obtener_Imagen_Arcano(ComboBox_Arcano.SelectedIndex);
                 if (Índice > 0)
                 {
                     TextBox_Descripción.Text = (Índice <= 22 ? "Major" : "Minor") + " Arcanum: " + Índice.ToString() + ", " + Línea_Vida.Matriz_Nombres_Arcanos[Índice] + " (" + Línea_Vida.Matriz_Regentes_Arcanos[Índice] + ")\r\n\r\n" + Línea_Vida.Matriz_Descripciones_Arcanos[Índice];
                 }
                 else
                 {
                     TextBox_Descripción.Text = Línea_Vida.Matriz_Descripciones_Línea_Vida[Índice];
                 }
             }
         }
     }
     catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); Variable_Excepción_Total++; Variable_Excepción = true; }
 }
コード例 #21
0
 internal void Establecer_Línea_Vida()
 {
     try
     {
         if (!Ocupado)
         {
             bool     Reducción_Año_Mayor_22;
             string[] Matriz_Cálculos;
             int[]    Matriz_Arcanos = Línea_Vida.Calcular_Línea_Vida(TextBox_Nombre.Text, TextBox_Apellido.Text, (int)NumericUpDown_Año_Nacimiento.Value, ComboBox_Mes_Nacimiento.SelectedIndex, out Reducción_Año_Mayor_22, out Matriz_Cálculos);
             Matriz_Arcanos_Lína_Vida = Matriz_Arcanos;
             for (int Índice = 0; Índice < 5; Índice++)
             {
                 try
                 {
                     Matriz_TextBox_Cálculos[Índice].Text    = Matriz_Cálculos[Índice];
                     Matriz_TextBox_Arcanos[Índice].Text     = Matriz_Arcanos[Índice].ToString() + ", " + Línea_Vida.Matriz_Nombres_Arcanos[Matriz_Arcanos[Índice]];
                     Matriz_PictureBox_Arcanos[Índice].Image = Línea_Vida.Obtener_Imagen_Arcano(Matriz_Arcanos[Índice]);
                 }
                 catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); Variable_Excepción_Total++; Variable_Excepción = true; continue; }
             }
         }
     }
     catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); Variable_Excepción_Total++; Variable_Excepción = true; }
 }
コード例 #22
0
 internal void Registro_Cargar_Opciones()
 {
     try
     {
         /*RegistryKey Clave = Registry.CurrentUser.CreateSubKey("Software\\Jupisoft\\Minecraft Tools\\" + Program.Texto_Versión + "\\Template");
          *
          * // bool
          * try { Variable_ = bool.Parse((string)Clave.GetValue("Variable_", bool.TrueString)); }
          * catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); Variable_Excepción_Total++; Variable_Excepción = true; Variable_ = true; }
          *
          * // int
          * try { Variable_ = (int)Clave.GetValue("Variable_", 0); }
          * catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); Variable_Excepción_Total++; Variable_Excepción = true; Variable_ = 0; }
          *
          * // Correct any bad value after loading:
          * if ((int)Variable_ < 0 || (int)Variable_ > (int)Variables.Variable) Variable_ = Variables.Variable;
          *
          * // Apply all the loaded values:
          * ComboBox_Variable_.SelectedIndex = (int)Variable_;
          *
          * Menú_Contextual_Variable_.Checked = Variable_;*/
     }
     catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); Variable_Excepción_Total++; Variable_Excepción = true; }
 }
コード例 #23
0
 internal void Cargar_Errores()
 {
     try
     {
         if (!Ocupado)
         {
             long   Depurador_Errores = 0L, Depurador_Errores_Únicos = 0L;
             string Texto = null;
             Lector_Depurador = new FileStream(Application.StartupPath + "\\Debugger", FileMode.OpenOrCreate, FileAccess.Read, FileShare.ReadWrite);
             Lector_Depurador.Seek(0L, SeekOrigin.Begin);
             Lector_Depurador_Binario = new BinaryReader(Lector_Depurador, Encoding.ASCII);
             if (Lector_Depurador != null && Lector_Depurador_Binario != null && Lector_Depurador.Length > 0L)
             {
                 List <Excepciones> Lista_Excepciones = new List <Excepciones>();
                 for (long Índice = 0L; Índice < Lector_Depurador.Length;)
                 {
                     uint     CRC32         = 0;
                     DateTime Primera_Fecha = DateTime.MinValue;
                     DateTime Última_Fecha  = DateTime.MinValue;
                     long     Repeticiones  = 0L;
                     int      Longitud      = 0;
                     string   Mensaje       = null;
                     try { CRC32 = Lector_Depurador_Binario.ReadUInt32(); }
                     catch { CRC32 = 0; }
                     try { Primera_Fecha = DateTime.FromBinary(Lector_Depurador_Binario.ReadInt64()); }
                     catch { Primera_Fecha = DateTime.MinValue; }
                     try { Última_Fecha = DateTime.FromBinary(Lector_Depurador_Binario.ReadInt64()); }
                     catch { Última_Fecha = DateTime.MinValue; }
                     try { Repeticiones = Lector_Depurador_Binario.ReadInt64(); }
                     catch { Repeticiones = 0L; }
                     try { Longitud = Lector_Depurador_Binario.ReadInt32(); }
                     catch { Longitud = 0; }
                     try { Mensaje = Encoding.Unicode.GetString(Lector_Depurador_Binario.ReadBytes(Longitud)); }
                     catch { Mensaje = "Unknown error."; }
                     Depurador_Errores += Repeticiones;
                     Depurador_Errores_Únicos++;
                     Lista_Excepciones.Add(new Excepciones(CRC32, Primera_Fecha, Última_Fecha, Repeticiones, Longitud, Mensaje));
                     Índice += 32 + Longitud;
                 }
                 if (Lista_Excepciones.Count > 0)
                 {
                     Lista_Excepciones.Sort(new Comparador_Excepciones());
                     if (Invertir_Orden)
                     {
                         Lista_Excepciones.Reverse();
                     }
                     for (int Índice = 0; Índice < Lista_Excepciones.Count; Índice++)
                     {
                         Texto += "[" + (Índice + 1).ToString() + "] [x" + Program.Traducir_Número(Lista_Excepciones[Índice].Repeticiones) + /*"] [CRC-32: " + Program.Traducir_Número(Lista_Excepciones[Índice].CRC32) + */ "] [" + Program.Traducir_Fecha_Hora(Lista_Excepciones[Índice].Primera_Fecha) + "] [" + Program.Traducir_Fecha_Hora(Lista_Excepciones[Índice].Última_Fecha) + "] " + Lista_Excepciones[Índice].Mensaje + "\r\n\r\n";
                     }
                 }
             }
             this.Text = "Exception Debugger by Jupisoft - [Errors: " + Program.Traducir_Número(Depurador_Errores) + ", Unique Errors: " + Program.Traducir_Número(Depurador_Errores_Únicos) + "]";
             if (!string.IsNullOrEmpty(Texto))
             {
                 Texto = "[Dear " + Program.Texto_Usuario + " if you want to help with the debugging of these exceptions, please send the \"Debugger\" file to: [email protected]]\r\n\r\n" + Texto.TrimEnd("\r\n\r\n".ToCharArray());
             }
             Editor_RTF.Text = Texto;
         }
     }
     catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); }
 }
コード例 #24
0
 private void Temporizador_Principal_Tick(object sender, EventArgs e)
 {
     try
     {
         int Tick = Environment.TickCount;
         try
         {
             if (Variable_Excepción)
             {
                 if ((Environment.TickCount / 500) % 2 == 0)
                 {
                     if (!Variable_Excepción_Imagen)
                     {
                         Variable_Excepción_Imagen              = true;
                         Barra_Estado_Botón_Excepción.Image     = Resources.Excepción;
                         Barra_Estado_Botón_Excepción.ForeColor = Color.Red;
                         Barra_Estado_Botón_Excepción.Text      = "Exceptions: " + Program.Traducir_Número(Variable_Excepción_Total);
                     }
                 }
                 else
                 {
                     if (Variable_Excepción_Imagen)
                     {
                         Variable_Excepción_Imagen              = false;
                         Barra_Estado_Botón_Excepción.Image     = Resources.Excepción_Gris;
                         Barra_Estado_Botón_Excepción.ForeColor = Color.Black;
                         Barra_Estado_Botón_Excepción.Text      = "Exceptions: " + Program.Traducir_Número(Variable_Excepción_Total);
                     }
                 }
                 if (!Barra_Estado_Botón_Excepción.Visible)
                 {
                     Barra_Estado_Botón_Excepción.Visible = true;
                 }
                 if (!Barra_Estado_Separador_1.Visible)
                 {
                     Barra_Estado_Separador_1.Visible = true;
                 }
             }
         }
         catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); Variable_Excepción_Total++; Variable_Excepción = true; }
         try
         {
             try
             {
                 if (Tick % 250 == 0) // Only update every quarter second
                 {
                     if (Program.Rendimiento_Procesador != null)
                     {
                         double CPU = (double)Program.Rendimiento_Procesador.NextValue();
                         if (CPU < 0d)
                         {
                             CPU = 0d;
                         }
                         else if (CPU > 100d)
                         {
                             CPU = 100d;
                         }
                         Barra_Estado_Etiqueta_CPU.Text = "CPU: " + Program.Traducir_Número_Decimales_Redondear(CPU, 2) + " %";
                     }
                     Program.Proceso.Refresh();
                     long Memoria_Bytes = Program.Proceso.PagedMemorySize64;
                     Barra_Estado_Etiqueta_Memoria.Text = "RAM: " + Program.Traducir_Tamaño_Bytes_Automático(Memoria_Bytes, 2, true);
                     if (Memoria_Bytes < 4294967296L) // < 4 GB
                     {
                         if (Variable_Memoria)
                         {
                             Variable_Memoria = false;
                             Barra_Estado_Etiqueta_Memoria.ForeColor = Color.Black;
                         }
                     }
                     else // >= 4 GB
                     {
                         if ((Environment.TickCount / 500) % 2 == 0)
                         {
                             if (!Variable_Memoria)
                             {
                                 Variable_Memoria = true;
                                 Barra_Estado_Etiqueta_Memoria.ForeColor = Color.Red;
                             }
                         }
                         else
                         {
                             if (Variable_Memoria)
                             {
                                 Variable_Memoria = false;
                                 Barra_Estado_Etiqueta_Memoria.ForeColor = Color.Black;
                             }
                         }
                     }
                 }
             }
             catch { Barra_Estado_Etiqueta_Memoria.Text = "RAM: ? MB (? GB)"; }
         }
         catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); Variable_Excepción_Total++; Variable_Excepción = true; }
         long FPS_Milisegundo = FPS_Cronómetro.ElapsedMilliseconds;
         long FPS_Segundo     = FPS_Milisegundo / 1000L;
         if (FPS_Segundo != FPS_Segundo_Anterior)
         {
             FPS_Segundo_Anterior           = FPS_Segundo;
             FPS_Real                       = FPS_Temporal;
             Barra_Estado_Etiqueta_FPS.Text = FPS_Real.ToString() + " FPS";
             FPS_Temporal                   = 0L;
         }
         FPS_Temporal++;
     }
     catch (Exception Excepción) { Depurador.Escribir_Excepción(Excepción != null ? Excepción.ToString() : null); Variable_Excepción_Total++; Variable_Excepción = true; }
 }