diff --git a/Nueva carpeta/cuadricula.py b/Nueva carpeta/cuadricula.py new file mode 100644 index 0000000..d2c389b --- /dev/null +++ b/Nueva carpeta/cuadricula.py @@ -0,0 +1,25 @@ +text = "" +f = open("cuadricula.txt","w") + +""" +print column numbers +text = "\t" +for number in range(1,81): + text = text + str(number) + "\t" +f.write(text) +""" + +#print - +for row in range(0,25): + """ text = text + str(row) + "\t" """ + #columns + for column in range(0,80): + #next column + text = text + "-" + #write the result + f.write(text) + #new row + text = "\n" + +#close file +f.close() diff --git a/Nueva carpeta/cuadricula.txt b/Nueva carpeta/cuadricula.txt new file mode 100644 index 0000000..70f389b --- /dev/null +++ b/Nueva carpeta/cuadricula.txt @@ -0,0 +1,25 @@ +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +---------------------------------------*---------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- \ No newline at end of file diff --git a/Nueva carpeta/hack/.vs/hack/v15/.suo b/Nueva carpeta/hack/.vs/hack/v15/.suo new file mode 100644 index 0000000..e88ff84 Binary files /dev/null and b/Nueva carpeta/hack/.vs/hack/v15/.suo differ diff --git a/Nueva carpeta/hack/.vs/hack/v15/Server/sqlite3/db.lock b/Nueva carpeta/hack/.vs/hack/v15/Server/sqlite3/db.lock new file mode 100644 index 0000000..e69de29 diff --git a/Nueva carpeta/hack/.vs/hack/v15/Server/sqlite3/storage.ide b/Nueva carpeta/hack/.vs/hack/v15/Server/sqlite3/storage.ide new file mode 100644 index 0000000..56758a8 Binary files /dev/null and b/Nueva carpeta/hack/.vs/hack/v15/Server/sqlite3/storage.ide differ diff --git a/Nueva carpeta/hack/.vs/hack/v15/Server/sqlite3/storage.ide-shm b/Nueva carpeta/hack/.vs/hack/v15/Server/sqlite3/storage.ide-shm new file mode 100644 index 0000000..1e16066 Binary files /dev/null and b/Nueva carpeta/hack/.vs/hack/v15/Server/sqlite3/storage.ide-shm differ diff --git a/Nueva carpeta/hack/.vs/hack/v15/Server/sqlite3/storage.ide-wal b/Nueva carpeta/hack/.vs/hack/v15/Server/sqlite3/storage.ide-wal new file mode 100644 index 0000000..af13e7c Binary files /dev/null and b/Nueva carpeta/hack/.vs/hack/v15/Server/sqlite3/storage.ide-wal differ diff --git a/Nueva carpeta/hack/hack.sln b/Nueva carpeta/hack/hack.sln new file mode 100644 index 0000000..e1d3c1b --- /dev/null +++ b/Nueva carpeta/hack/hack.sln @@ -0,0 +1,25 @@ + +Microsoft Visual Studio Solution File, Format Version 12.00 +# Visual Studio 15 +VisualStudioVersion = 15.0.28010.2036 +MinimumVisualStudioVersion = 10.0.40219.1 +Project("{FAE04EC0-301F-11D3-BF4B-00C04F79EFBC}") = "hack", "hack\hack.csproj", "{1CB20101-6700-45A1-A44A-83AE18F5D096}" +EndProject +Global + GlobalSection(SolutionConfigurationPlatforms) = preSolution + Debug|Any CPU = Debug|Any CPU + Release|Any CPU = Release|Any CPU + EndGlobalSection + GlobalSection(ProjectConfigurationPlatforms) = postSolution + {1CB20101-6700-45A1-A44A-83AE18F5D096}.Debug|Any CPU.ActiveCfg = Debug|Any CPU + {1CB20101-6700-45A1-A44A-83AE18F5D096}.Debug|Any CPU.Build.0 = Debug|Any CPU + {1CB20101-6700-45A1-A44A-83AE18F5D096}.Release|Any CPU.ActiveCfg = Release|Any CPU + {1CB20101-6700-45A1-A44A-83AE18F5D096}.Release|Any CPU.Build.0 = Release|Any CPU + EndGlobalSection + GlobalSection(SolutionProperties) = preSolution + HideSolutionNode = FALSE + EndGlobalSection + GlobalSection(ExtensibilityGlobals) = postSolution + SolutionGuid = {D52885CD-C92D-4C2F-82AB-4931155FEB95} + EndGlobalSection +EndGlobal diff --git a/Nueva carpeta/hack/hack/App.config b/Nueva carpeta/hack/hack/App.config new file mode 100644 index 0000000..731f6de --- /dev/null +++ b/Nueva carpeta/hack/hack/App.config @@ -0,0 +1,6 @@ + + + + + + \ No newline at end of file diff --git a/Nueva carpeta/hack/hack/Form1.Designer.cs b/Nueva carpeta/hack/hack/Form1.Designer.cs new file mode 100644 index 0000000..c9a2769 --- /dev/null +++ b/Nueva carpeta/hack/hack/Form1.Designer.cs @@ -0,0 +1,206 @@ +namespace hack +{ + partial class frm + { + /// + /// Variable del diseñador necesaria. + /// + private System.ComponentModel.IContainer components = null; + + /// + /// Limpiar los recursos que se estén usando. + /// + /// true si los recursos administrados se deben desechar; false en caso contrario. + protected override void Dispose(bool disposing) + { + if (disposing && (components != null)) + { + components.Dispose(); + } + base.Dispose(disposing); + } + + #region Código generado por el Diseñador de Windows Forms + + /// + /// Método necesario para admitir el Diseñador. No se puede modificar + /// el contenido de este método con el editor de código. + /// + private void InitializeComponent() + { + this.gbColor = new System.Windows.Forms.GroupBox(); + this.txtAssembly = new System.Windows.Forms.TextBox(); + this.rbNegro = new System.Windows.Forms.RadioButton(); + this.rbVerde = new System.Windows.Forms.RadioButton(); + this.rbCafe = new System.Windows.Forms.RadioButton(); + this.rbLightMagenta = new System.Windows.Forms.RadioButton(); + this.rbBlanco = new System.Windows.Forms.RadioButton(); + this.rbMagenta = new System.Windows.Forms.RadioButton(); + this.rbRojo = new System.Windows.Forms.RadioButton(); + this.btnLimpiar = new System.Windows.Forms.Button(); + this.pbImagen = new System.Windows.Forms.PictureBox(); + this.gbColor.SuspendLayout(); + ((System.ComponentModel.ISupportInitialize)(this.pbImagen)).BeginInit(); + this.SuspendLayout(); + // + // gbColor + // + this.gbColor.Controls.Add(this.rbRojo); + this.gbColor.Controls.Add(this.rbMagenta); + this.gbColor.Controls.Add(this.rbBlanco); + this.gbColor.Controls.Add(this.rbLightMagenta); + this.gbColor.Controls.Add(this.rbCafe); + this.gbColor.Controls.Add(this.rbVerde); + this.gbColor.Controls.Add(this.rbNegro); + this.gbColor.Location = new System.Drawing.Point(686, 12); + this.gbColor.Name = "gbColor"; + this.gbColor.Size = new System.Drawing.Size(200, 343); + this.gbColor.TabIndex = 1; + this.gbColor.TabStop = false; + this.gbColor.Text = "color"; + // + // txtAssembly + // + this.txtAssembly.Location = new System.Drawing.Point(389, 12); + this.txtAssembly.Multiline = true; + this.txtAssembly.Name = "txtAssembly"; + this.txtAssembly.Size = new System.Drawing.Size(258, 343); + this.txtAssembly.TabIndex = 2; + // + // rbNegro + // + this.rbNegro.AutoSize = true; + this.rbNegro.Location = new System.Drawing.Point(16, 24); + this.rbNegro.Name = "rbNegro"; + this.rbNegro.Size = new System.Drawing.Size(54, 17); + this.rbNegro.TabIndex = 0; + this.rbNegro.TabStop = true; + this.rbNegro.Tag = ""; + this.rbNegro.Text = "&Negro"; + this.rbNegro.UseVisualStyleBackColor = true; + // + // rbVerde + // + this.rbVerde.AutoSize = true; + this.rbVerde.Location = new System.Drawing.Point(19, 59); + this.rbVerde.Name = "rbVerde"; + this.rbVerde.Size = new System.Drawing.Size(53, 17); + this.rbVerde.TabIndex = 1; + this.rbVerde.TabStop = true; + this.rbVerde.Text = "&Verde"; + this.rbVerde.UseVisualStyleBackColor = true; + // + // rbCafe + // + this.rbCafe.AutoSize = true; + this.rbCafe.Location = new System.Drawing.Point(21, 98); + this.rbCafe.Name = "rbCafe"; + this.rbCafe.Size = new System.Drawing.Size(47, 17); + this.rbCafe.TabIndex = 2; + this.rbCafe.TabStop = true; + this.rbCafe.Text = "&Cafe"; + this.rbCafe.UseVisualStyleBackColor = true; + // + // rbLightMagenta + // + this.rbLightMagenta.AutoSize = true; + this.rbLightMagenta.Location = new System.Drawing.Point(17, 139); + this.rbLightMagenta.Name = "rbLightMagenta"; + this.rbLightMagenta.Size = new System.Drawing.Size(93, 17); + this.rbLightMagenta.TabIndex = 3; + this.rbLightMagenta.TabStop = true; + this.rbLightMagenta.Text = "&Light Magenta"; + this.rbLightMagenta.UseVisualStyleBackColor = true; + // + // rbBlanco + // + this.rbBlanco.AutoSize = true; + this.rbBlanco.Location = new System.Drawing.Point(18, 182); + this.rbBlanco.Name = "rbBlanco"; + this.rbBlanco.Size = new System.Drawing.Size(58, 17); + this.rbBlanco.TabIndex = 4; + this.rbBlanco.TabStop = true; + this.rbBlanco.Text = "&Blanco"; + this.rbBlanco.UseVisualStyleBackColor = true; + // + // rbMagenta + // + this.rbMagenta.AutoSize = true; + this.rbMagenta.Location = new System.Drawing.Point(15, 224); + this.rbMagenta.Name = "rbMagenta"; + this.rbMagenta.Size = new System.Drawing.Size(67, 17); + this.rbMagenta.TabIndex = 5; + this.rbMagenta.TabStop = true; + this.rbMagenta.Text = "&Magenta"; + this.rbMagenta.UseVisualStyleBackColor = true; + // + // rbRojo + // + this.rbRojo.AutoSize = true; + this.rbRojo.Location = new System.Drawing.Point(16, 269); + this.rbRojo.Name = "rbRojo"; + this.rbRojo.Size = new System.Drawing.Size(47, 17); + this.rbRojo.TabIndex = 6; + this.rbRojo.TabStop = true; + this.rbRojo.Text = "&Rojo"; + this.rbRojo.UseVisualStyleBackColor = true; + // + // btnLimpiar + // + this.btnLimpiar.Location = new System.Drawing.Point(481, 361); + this.btnLimpiar.Name = "btnLimpiar"; + this.btnLimpiar.Size = new System.Drawing.Size(75, 23); + this.btnLimpiar.TabIndex = 3; + this.btnLimpiar.Text = "Limpiar"; + this.btnLimpiar.UseVisualStyleBackColor = true; + this.btnLimpiar.Click += new System.EventHandler(this.btnLimpiar_Click); + // + // pbImagen + // + this.pbImagen.Image = global::hack.Properties.Resources.imagen2; + this.pbImagen.Location = new System.Drawing.Point(12, 12); + this.pbImagen.Name = "pbImagen"; + this.pbImagen.Size = new System.Drawing.Size(343, 224); + this.pbImagen.SizeMode = System.Windows.Forms.PictureBoxSizeMode.AutoSize; + this.pbImagen.TabIndex = 0; + this.pbImagen.TabStop = false; + this.pbImagen.Click += new System.EventHandler(this.pbImagen_Click); + this.pbImagen.Paint += new System.Windows.Forms.PaintEventHandler(this.pbImagen_Paint); + this.pbImagen.MouseDown += new System.Windows.Forms.MouseEventHandler(this.pbImagen_MouseDown); + this.pbImagen.MouseUp += new System.Windows.Forms.MouseEventHandler(this.pbImagen_MouseUp); + // + // frm + // + this.AutoScaleDimensions = new System.Drawing.SizeF(6F, 13F); + this.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font; + this.ClientSize = new System.Drawing.Size(1033, 450); + this.Controls.Add(this.btnLimpiar); + this.Controls.Add(this.txtAssembly); + this.Controls.Add(this.gbColor); + this.Controls.Add(this.pbImagen); + this.Name = "frm"; + this.Text = "Form1"; + this.gbColor.ResumeLayout(false); + this.gbColor.PerformLayout(); + ((System.ComponentModel.ISupportInitialize)(this.pbImagen)).EndInit(); + this.ResumeLayout(false); + this.PerformLayout(); + + } + + #endregion + + private System.Windows.Forms.PictureBox pbImagen; + private System.Windows.Forms.GroupBox gbColor; + private System.Windows.Forms.RadioButton rbRojo; + private System.Windows.Forms.RadioButton rbMagenta; + private System.Windows.Forms.RadioButton rbBlanco; + private System.Windows.Forms.RadioButton rbLightMagenta; + private System.Windows.Forms.RadioButton rbCafe; + private System.Windows.Forms.RadioButton rbVerde; + private System.Windows.Forms.RadioButton rbNegro; + private System.Windows.Forms.TextBox txtAssembly; + private System.Windows.Forms.Button btnLimpiar; + } +} + diff --git a/Nueva carpeta/hack/hack/Form1.cs b/Nueva carpeta/hack/hack/Form1.cs new file mode 100644 index 0000000..e3fd7f9 --- /dev/null +++ b/Nueva carpeta/hack/hack/Form1.cs @@ -0,0 +1,128 @@ +using System; +using System.Collections.Generic; +using System.ComponentModel; +using System.Data; +using System.Drawing; +using System.Linq; +using System.Text; +using System.Threading.Tasks; +using System.Windows.Forms; + +namespace hack +{ + public partial class frm : Form + { + int x = 0; + int y = 0; + + int x0 = 0, x1 = 0; + int y0 = 0, y1 = 0; + + public frm() + { + InitializeComponent(); + } + + private void pbImagen_Click(object sender, EventArgs e) + { + //x0 = x1; + //y0 = y1; + x1 = Row(y); + y1 = Column(x); + //if ((x0 != x1) && (y0 != y1)) + //{ + txtAssembly.Text = txtAssembly.Text + ";posicion\r\n"; + txtAssembly.Text = txtAssembly.Text + "mov dh, " + x1 + " ;columna\r\n"; + txtAssembly.Text = txtAssembly.Text + "mov dl, " + y1 + " ;fila\r\n"; + txtAssembly.Text = txtAssembly.Text + "mov ah, 02h ;servicio\r\n"; + txtAssembly.Text = txtAssembly.Text + "int 10h ;interrupcion\r\n"; + txtAssembly.Text = txtAssembly.Text + ";impresion\r\n"; + txtAssembly.Text = txtAssembly.Text + "mov al, 219 ;caracter\r\n"; + txtAssembly.Text = txtAssembly.Text + "mov bl, " + Convert.ToString(Color()) + " ;color\r\n"; + txtAssembly.Text = txtAssembly.Text + "mov cx, 1 ;cantidad caracteres\r\n"; + txtAssembly.Text = txtAssembly.Text + "mov ah, 09 ;servicio\r\n"; + txtAssembly.Text = txtAssembly.Text + "int 10h ;interrupcion\r\n"; + txtAssembly.Text = txtAssembly.Text + "\r\n"; + //} + + } + + public int Color() + { + int color = 0; + + if (rbNegro.Checked) + { + color = 0; + } + else if (rbVerde.Checked) + { + color = 2; + } + else if (rbCafe.Checked) + { + color = 6; + } + else if (rbLightMagenta.Checked) + { + color = 13; + } + else if (rbBlanco.Checked) + { + color = 15; + } + else if (rbMagenta.Checked) + { + color = 5; + } + else if (rbRojo.Checked) + { + color = 4; + } + + return color; + } + + public int Column(int x_axis) + { + int column = 0; + + //width msdos + int width = 8; + column = Convert.ToInt32(x_axis / width) + 10; + return column; + } + + public int Row(int y_axis) + { + int row = 0; + + //heigth msdos + int heigth = 10; + row = Convert.ToInt32(y_axis / heigth); + + return row; + } + + private void pbImagen_MouseDown(object sender, MouseEventArgs e) + { + x = e.X; + y = e.Y; + } + + private void pbImagen_Paint(object sender, PaintEventArgs e) + { + + } + + private void pbImagen_MouseUp(object sender, MouseEventArgs e) + { + + } + + private void btnLimpiar_Click(object sender, EventArgs e) + { + txtAssembly.Clear(); + } + } +} diff --git a/Nueva carpeta/hack/hack/Form1.resx b/Nueva carpeta/hack/hack/Form1.resx new file mode 100644 index 0000000..1af7de1 --- /dev/null +++ b/Nueva carpeta/hack/hack/Form1.resx @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + \ No newline at end of file diff --git a/Nueva carpeta/hack/hack/Program.cs b/Nueva carpeta/hack/hack/Program.cs new file mode 100644 index 0000000..4c3fd6d --- /dev/null +++ b/Nueva carpeta/hack/hack/Program.cs @@ -0,0 +1,22 @@ +using System; +using System.Collections.Generic; +using System.Linq; +using System.Threading.Tasks; +using System.Windows.Forms; + +namespace hack +{ + static class Program + { + /// + /// Punto de entrada principal para la aplicación. + /// + [STAThread] + static void Main() + { + Application.EnableVisualStyles(); + Application.SetCompatibleTextRenderingDefault(false); + Application.Run(new frm()); + } + } +} diff --git a/Nueva carpeta/hack/hack/Properties/AssemblyInfo.cs b/Nueva carpeta/hack/hack/Properties/AssemblyInfo.cs new file mode 100644 index 0000000..928e94b --- /dev/null +++ b/Nueva carpeta/hack/hack/Properties/AssemblyInfo.cs @@ -0,0 +1,36 @@ +using System.Reflection; +using System.Runtime.CompilerServices; +using System.Runtime.InteropServices; + +// La información general de un ensamblado se controla mediante el siguiente +// conjunto de atributos. Cambie estos valores de atributo para modificar la información +// asociada con un ensamblado. +[assembly: AssemblyTitle("hack")] +[assembly: AssemblyDescription("")] +[assembly: AssemblyConfiguration("")] +[assembly: AssemblyCompany("")] +[assembly: AssemblyProduct("hack")] +[assembly: AssemblyCopyright("Copyright © 2019")] +[assembly: AssemblyTrademark("")] +[assembly: AssemblyCulture("")] + +// Si establece ComVisible en false, los tipos de este ensamblado no estarán visibles +// para los componentes COM. Si es necesario obtener acceso a un tipo en este ensamblado desde +// COM, establezca el atributo ComVisible en true en este tipo. +[assembly: ComVisible(false)] + +// El siguiente GUID sirve como id. de typelib si este proyecto se expone a COM. +[assembly: Guid("1cb20101-6700-45a1-a44a-83ae18f5d096")] + +// La información de versión de un ensamblado consta de los cuatro valores siguientes: +// +// Versión principal +// Versión secundaria +// Número de compilación +// Revisión +// +// Puede especificar todos los valores o utilizar los números de compilación y de revisión predeterminados +// mediante el carácter '*', como se muestra a continuación: +// [assembly: AssemblyVersion("1.0.*")] +[assembly: AssemblyVersion("1.0.0.0")] +[assembly: AssemblyFileVersion("1.0.0.0")] diff --git a/Nueva carpeta/hack/hack/Properties/Resources.Designer.cs b/Nueva carpeta/hack/hack/Properties/Resources.Designer.cs new file mode 100644 index 0000000..aabf408 --- /dev/null +++ b/Nueva carpeta/hack/hack/Properties/Resources.Designer.cs @@ -0,0 +1,93 @@ +//------------------------------------------------------------------------------ +// +// 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. +// +//------------------------------------------------------------------------------ + +namespace hack.Properties { + using System; + + + /// + /// Clase de recurso fuertemente tipado, para buscar cadenas traducidas, etc. + /// + // 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 recompile su proyecto de VS. + [global::System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "15.0.0.0")] + [global::System.Diagnostics.DebuggerNonUserCodeAttribute()] + [global::System.Runtime.CompilerServices.CompilerGeneratedAttribute()] + internal class Resources { + + private static global::System.Resources.ResourceManager resourceMan; + + private static global::System.Globalization.CultureInfo resourceCulture; + + [global::System.Diagnostics.CodeAnalysis.SuppressMessageAttribute("Microsoft.Performance", "CA1811:AvoidUncalledPrivateCode")] + internal Resources() { + } + + /// + /// Devuelve la instancia de ResourceManager almacenada en caché utilizada por esta clase. + /// + [global::System.ComponentModel.EditorBrowsableAttribute(global::System.ComponentModel.EditorBrowsableState.Advanced)] + internal static global::System.Resources.ResourceManager ResourceManager { + get { + if (object.ReferenceEquals(resourceMan, null)) { + global::System.Resources.ResourceManager temp = new global::System.Resources.ResourceManager("hack.Properties.Resources", typeof(Resources).Assembly); + resourceMan = temp; + } + return resourceMan; + } + } + + /// + /// Reemplaza la propiedad CurrentUICulture del subproceso actual para todas las + /// búsquedas de recursos mediante esta clase de recurso fuertemente tipado. + /// + [global::System.ComponentModel.EditorBrowsableAttribute(global::System.ComponentModel.EditorBrowsableState.Advanced)] + internal static global::System.Globalization.CultureInfo Culture { + get { + return resourceCulture; + } + set { + resourceCulture = value; + } + } + + /// + /// Busca un recurso adaptado de tipo System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap imagen { + get { + object obj = ResourceManager.GetObject("imagen", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Busca un recurso adaptado de tipo System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap imagen1 { + get { + object obj = ResourceManager.GetObject("imagen1", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + + /// + /// Busca un recurso adaptado de tipo System.Drawing.Bitmap. + /// + internal static System.Drawing.Bitmap imagen2 { + get { + object obj = ResourceManager.GetObject("imagen2", resourceCulture); + return ((System.Drawing.Bitmap)(obj)); + } + } + } +} diff --git a/Nueva carpeta/hack/hack/Properties/Resources.resx b/Nueva carpeta/hack/hack/Properties/Resources.resx new file mode 100644 index 0000000..56aba2b --- /dev/null +++ b/Nueva carpeta/hack/hack/Properties/Resources.resx @@ -0,0 +1,130 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + + ..\Resources\imagen.PNG;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\imagen.JPG;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\imagen1.PNG;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + \ No newline at end of file diff --git a/Nueva carpeta/hack/hack/Properties/Settings.Designer.cs b/Nueva carpeta/hack/hack/Properties/Settings.Designer.cs new file mode 100644 index 0000000..49df120 --- /dev/null +++ b/Nueva carpeta/hack/hack/Properties/Settings.Designer.cs @@ -0,0 +1,30 @@ +//------------------------------------------------------------------------------ +// +// This code was generated by a tool. +// Runtime Version:4.0.30319.42000 +// +// Changes to this file may cause incorrect behavior and will be lost if +// the code is regenerated. +// +//------------------------------------------------------------------------------ + +namespace hack.Properties +{ + + + [global::System.Runtime.CompilerServices.CompilerGeneratedAttribute()] + [global::System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "11.0.0.0")] + internal sealed partial class Settings : global::System.Configuration.ApplicationSettingsBase + { + + private static Settings defaultInstance = ((Settings)(global::System.Configuration.ApplicationSettingsBase.Synchronized(new Settings()))); + + public static Settings Default + { + get + { + return defaultInstance; + } + } + } +} diff --git a/Nueva carpeta/hack/hack/Properties/Settings.settings b/Nueva carpeta/hack/hack/Properties/Settings.settings new file mode 100644 index 0000000..3964565 --- /dev/null +++ b/Nueva carpeta/hack/hack/Properties/Settings.settings @@ -0,0 +1,7 @@ + + + + + + + diff --git a/Nueva carpeta/hack/hack/Resources/imagen.JPG b/Nueva carpeta/hack/hack/Resources/imagen.JPG new file mode 100644 index 0000000..cd766a3 Binary files /dev/null and b/Nueva carpeta/hack/hack/Resources/imagen.JPG differ diff --git a/Nueva carpeta/hack/hack/Resources/imagen.PNG b/Nueva carpeta/hack/hack/Resources/imagen.PNG new file mode 100644 index 0000000..55bf18f Binary files /dev/null and b/Nueva carpeta/hack/hack/Resources/imagen.PNG differ diff --git a/Nueva carpeta/hack/hack/Resources/imagen1.PNG b/Nueva carpeta/hack/hack/Resources/imagen1.PNG new file mode 100644 index 0000000..9701ada Binary files /dev/null and b/Nueva carpeta/hack/hack/Resources/imagen1.PNG differ diff --git a/Nueva carpeta/hack/hack/bin/Debug/hack.exe b/Nueva carpeta/hack/hack/bin/Debug/hack.exe new file mode 100644 index 0000000..0f1fd58 Binary files /dev/null and b/Nueva carpeta/hack/hack/bin/Debug/hack.exe differ diff --git a/Nueva carpeta/hack/hack/bin/Debug/hack.exe.config b/Nueva carpeta/hack/hack/bin/Debug/hack.exe.config new file mode 100644 index 0000000..731f6de --- /dev/null +++ b/Nueva carpeta/hack/hack/bin/Debug/hack.exe.config @@ -0,0 +1,6 @@ + + + + + + \ No newline at end of file diff --git a/Nueva carpeta/hack/hack/bin/Debug/hack.pdb b/Nueva carpeta/hack/hack/bin/Debug/hack.pdb new file mode 100644 index 0000000..cbed770 Binary files /dev/null and b/Nueva carpeta/hack/hack/bin/Debug/hack.pdb differ diff --git a/Nueva carpeta/hack/hack/hack.csproj b/Nueva carpeta/hack/hack/hack.csproj new file mode 100644 index 0000000..0512ce0 --- /dev/null +++ b/Nueva carpeta/hack/hack/hack.csproj @@ -0,0 +1,93 @@ + + + + + Debug + AnyCPU + {1CB20101-6700-45A1-A44A-83AE18F5D096} + WinExe + hack + hack + v4.6.1 + 512 + true + true + + + AnyCPU + true + full + false + bin\Debug\ + DEBUG;TRACE + prompt + 4 + + + AnyCPU + pdbonly + true + bin\Release\ + TRACE + prompt + 4 + + + + + + + + + + + + + + + + + Form + + + Form1.cs + + + + + Form1.cs + + + ResXFileCodeGenerator + Resources.Designer.cs + Designer + + + True + Resources.resx + True + + + SettingsSingleFileGenerator + Settings.Designer.cs + + + True + Settings.settings + True + + + + + + + + + + + + + + + + \ No newline at end of file diff --git a/Nueva carpeta/hack/hack/obj/Debug/DesignTimeResolveAssemblyReferences.cache b/Nueva carpeta/hack/hack/obj/Debug/DesignTimeResolveAssemblyReferences.cache new file mode 100644 index 0000000..541773c Binary files /dev/null and b/Nueva carpeta/hack/hack/obj/Debug/DesignTimeResolveAssemblyReferences.cache differ diff --git a/Nueva carpeta/hack/hack/obj/Debug/DesignTimeResolveAssemblyReferencesInput.cache b/Nueva carpeta/hack/hack/obj/Debug/DesignTimeResolveAssemblyReferencesInput.cache new file mode 100644 index 0000000..6c814ea Binary files /dev/null and b/Nueva carpeta/hack/hack/obj/Debug/DesignTimeResolveAssemblyReferencesInput.cache differ diff --git a/Nueva carpeta/hack/hack/obj/Debug/TempPE/Properties.Resources.Designer.cs.dll b/Nueva carpeta/hack/hack/obj/Debug/TempPE/Properties.Resources.Designer.cs.dll new file mode 100644 index 0000000..82ce3e9 Binary files /dev/null and b/Nueva carpeta/hack/hack/obj/Debug/TempPE/Properties.Resources.Designer.cs.dll differ diff --git a/Nueva carpeta/hack/hack/obj/Debug/TemporaryGeneratedFile_036C0B5B-1481-4323-8D20-8F5ADCB23D92.cs b/Nueva carpeta/hack/hack/obj/Debug/TemporaryGeneratedFile_036C0B5B-1481-4323-8D20-8F5ADCB23D92.cs new file mode 100644 index 0000000..e69de29 diff --git a/Nueva carpeta/hack/hack/obj/Debug/TemporaryGeneratedFile_5937a670-0e60-4077-877b-f7221da3dda1.cs b/Nueva carpeta/hack/hack/obj/Debug/TemporaryGeneratedFile_5937a670-0e60-4077-877b-f7221da3dda1.cs new file mode 100644 index 0000000..e69de29 diff --git a/Nueva carpeta/hack/hack/obj/Debug/TemporaryGeneratedFile_E7A71F73-0F8D-4B9B-B56E-8E70B10BC5D3.cs b/Nueva carpeta/hack/hack/obj/Debug/TemporaryGeneratedFile_E7A71F73-0F8D-4B9B-B56E-8E70B10BC5D3.cs new file mode 100644 index 0000000..e69de29 diff --git a/Nueva carpeta/hack/hack/obj/Debug/hack.Properties.Resources.resources b/Nueva carpeta/hack/hack/obj/Debug/hack.Properties.Resources.resources new file mode 100644 index 0000000..21708a8 Binary files /dev/null and b/Nueva carpeta/hack/hack/obj/Debug/hack.Properties.Resources.resources differ diff --git a/Nueva carpeta/hack/hack/obj/Debug/hack.csproj.CoreCompileInputs.cache b/Nueva carpeta/hack/hack/obj/Debug/hack.csproj.CoreCompileInputs.cache new file mode 100644 index 0000000..5125352 --- /dev/null +++ b/Nueva carpeta/hack/hack/obj/Debug/hack.csproj.CoreCompileInputs.cache @@ -0,0 +1 @@ +08bf06d9cc1fca392bb7a08d0cd993c764c4ee4c diff --git a/Nueva carpeta/hack/hack/obj/Debug/hack.csproj.FileListAbsolute.txt b/Nueva carpeta/hack/hack/obj/Debug/hack.csproj.FileListAbsolute.txt new file mode 100644 index 0000000..b0cb42d --- /dev/null +++ b/Nueva carpeta/hack/hack/obj/Debug/hack.csproj.FileListAbsolute.txt @@ -0,0 +1,10 @@ +D:\Interfaz\hack\hack\bin\Debug\hack.exe.config +D:\Interfaz\hack\hack\bin\Debug\hack.exe +D:\Interfaz\hack\hack\bin\Debug\hack.pdb +D:\Interfaz\hack\hack\obj\Debug\hack.csprojAssemblyReference.cache +D:\Interfaz\hack\hack\obj\Debug\hack.frm.resources +D:\Interfaz\hack\hack\obj\Debug\hack.Properties.Resources.resources +D:\Interfaz\hack\hack\obj\Debug\hack.csproj.GenerateResource.cache +D:\Interfaz\hack\hack\obj\Debug\hack.csproj.CoreCompileInputs.cache +D:\Interfaz\hack\hack\obj\Debug\hack.exe +D:\Interfaz\hack\hack\obj\Debug\hack.pdb diff --git a/Nueva carpeta/hack/hack/obj/Debug/hack.csproj.GenerateResource.cache b/Nueva carpeta/hack/hack/obj/Debug/hack.csproj.GenerateResource.cache new file mode 100644 index 0000000..3b562d8 Binary files /dev/null and b/Nueva carpeta/hack/hack/obj/Debug/hack.csproj.GenerateResource.cache differ diff --git a/Nueva carpeta/hack/hack/obj/Debug/hack.csprojAssemblyReference.cache b/Nueva carpeta/hack/hack/obj/Debug/hack.csprojAssemblyReference.cache new file mode 100644 index 0000000..bf89843 Binary files /dev/null and b/Nueva carpeta/hack/hack/obj/Debug/hack.csprojAssemblyReference.cache differ diff --git a/Nueva carpeta/hack/hack/obj/Debug/hack.exe b/Nueva carpeta/hack/hack/obj/Debug/hack.exe new file mode 100644 index 0000000..0f1fd58 Binary files /dev/null and b/Nueva carpeta/hack/hack/obj/Debug/hack.exe differ diff --git a/Nueva carpeta/hack/hack/obj/Debug/hack.frm.resources b/Nueva carpeta/hack/hack/obj/Debug/hack.frm.resources new file mode 100644 index 0000000..6c05a97 Binary files /dev/null and b/Nueva carpeta/hack/hack/obj/Debug/hack.frm.resources differ diff --git a/Nueva carpeta/hack/hack/obj/Debug/hack.pdb b/Nueva carpeta/hack/hack/obj/Debug/hack.pdb new file mode 100644 index 0000000..cbed770 Binary files /dev/null and b/Nueva carpeta/hack/hack/obj/Debug/hack.pdb differ diff --git a/Nueva carpeta/hack/imagen.JPG b/Nueva carpeta/hack/imagen.JPG new file mode 100644 index 0000000..cd766a3 Binary files /dev/null and b/Nueva carpeta/hack/imagen.JPG differ diff --git a/Nueva carpeta/hack/imagen.PNG b/Nueva carpeta/hack/imagen.PNG new file mode 100644 index 0000000..9701ada Binary files /dev/null and b/Nueva carpeta/hack/imagen.PNG differ diff --git a/Nueva carpeta/instaladores.rar b/Nueva carpeta/instaladores.rar new file mode 100644 index 0000000..a08c55c Binary files /dev/null and b/Nueva carpeta/instaladores.rar differ diff --git a/Unidad1/00/TEST.ASM b/Unidad1/00/TEST.ASM new file mode 100644 index 0000000..32e0a43 --- /dev/null +++ b/Unidad1/00/TEST.ASM @@ -0,0 +1 @@ +END \ No newline at end of file diff --git a/Unidad1/00/TEST.EXE b/Unidad1/00/TEST.EXE new file mode 100644 index 0000000..f9cfc22 Binary files /dev/null and b/Unidad1/00/TEST.EXE differ diff --git a/Unidad1/00/TEST.MAP b/Unidad1/00/TEST.MAP new file mode 100644 index 0000000..939bbef Binary files /dev/null and b/Unidad1/00/TEST.MAP differ diff --git a/Unidad1/00/TEST.OBJ b/Unidad1/00/TEST.OBJ new file mode 100644 index 0000000..1a853e0 Binary files /dev/null and b/Unidad1/00/TEST.OBJ differ diff --git a/Unidad1/01 CARACTER/CARACTER.EXE b/Unidad1/01 CARACTER/CARACTER.EXE new file mode 100644 index 0000000..3b3e3bb Binary files /dev/null and b/Unidad1/01 CARACTER/CARACTER.EXE differ diff --git a/Unidad1/01 CARACTER/CARACTER.MAP b/Unidad1/01 CARACTER/CARACTER.MAP new file mode 100644 index 0000000..7bef5d6 --- /dev/null +++ b/Unidad1/01 CARACTER/CARACTER.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 0000AH 0000BH _TEXT CODE + 0000CH 0000CH 00000H _DATA DATA + 00010H 0004FH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad1/01 CARACTER/CARACTER.OBJ b/Unidad1/01 CARACTER/CARACTER.OBJ new file mode 100644 index 0000000..b342c12 Binary files /dev/null and b/Unidad1/01 CARACTER/CARACTER.OBJ differ diff --git a/Unidad1/02 ANA/ANA.EXE b/Unidad1/02 ANA/ANA.EXE new file mode 100644 index 0000000..a6bab87 Binary files /dev/null and b/Unidad1/02 ANA/ANA.EXE differ diff --git a/Unidad1/02 ANA/ANA.MAP b/Unidad1/02 ANA/ANA.MAP new file mode 100644 index 0000000..9b2a3e7 --- /dev/null +++ b/Unidad1/02 ANA/ANA.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 00018H 00019H _TEXT CODE + 0001AH 0001AH 00000H _DATA DATA + 00020H 0005FH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad1/02 ANA/ANA.OBJ b/Unidad1/02 ANA/ANA.OBJ new file mode 100644 index 0000000..a290255 Binary files /dev/null and b/Unidad1/02 ANA/ANA.OBJ differ diff --git a/Unidad1/02 ANA/ana.asm b/Unidad1/02 ANA/ana.asm new file mode 100644 index 0000000..a6e9161 --- /dev/null +++ b/Unidad1/02 ANA/ana.asm @@ -0,0 +1,15 @@ +.model small +.stack 64 +.data +.code + mov dx,65 + mov ah,02h + int 21h + mov dx,78 + mov ah,02h + int 21h + mov dx,65 + mov ah,02h + int 21h +.Exit +end \ No newline at end of file diff --git a/Unidad1/03 PABLO/PABLO.EXE b/Unidad1/03 PABLO/PABLO.EXE new file mode 100644 index 0000000..b39cb08 Binary files /dev/null and b/Unidad1/03 PABLO/PABLO.EXE differ diff --git a/Unidad1/03 PABLO/PABLO.MAP b/Unidad1/03 PABLO/PABLO.MAP new file mode 100644 index 0000000..68faf5d --- /dev/null +++ b/Unidad1/03 PABLO/PABLO.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 00026H 00027H _TEXT CODE + 00028H 00028H 00000H _DATA DATA + 00030H 0006FH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad1/03 PABLO/PABLO.OBJ b/Unidad1/03 PABLO/PABLO.OBJ new file mode 100644 index 0000000..b95bd15 Binary files /dev/null and b/Unidad1/03 PABLO/PABLO.OBJ differ diff --git a/Unidad1/03 PABLO/pablo.asm b/Unidad1/03 PABLO/pablo.asm new file mode 100644 index 0000000..9497987 --- /dev/null +++ b/Unidad1/03 PABLO/pablo.asm @@ -0,0 +1,21 @@ +.model small +.stack 64 +.data +.code + mov dx,80 + mov ah,02h + int 21h + mov dx,65 + mov ah,02h + int 21h + mov dx,66 + mov ah,02h + int 21h + mov dx,76 + mov ah,02h + int 21h + mov dx,79 + mov ah,02h + int 21h +.Exit +end \ No newline at end of file diff --git a/Unidad1/04 CARACTER CENTRADO/CARACTER.EXE b/Unidad1/04 CARACTER CENTRADO/CARACTER.EXE new file mode 100644 index 0000000..561b169 Binary files /dev/null and b/Unidad1/04 CARACTER CENTRADO/CARACTER.EXE differ diff --git a/Unidad1/04 CARACTER CENTRADO/CARACTER.MAP b/Unidad1/04 CARACTER CENTRADO/CARACTER.MAP new file mode 100644 index 0000000..7bf19d9 --- /dev/null +++ b/Unidad1/04 CARACTER CENTRADO/CARACTER.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 00012H 00013H _TEXT CODE + 00014H 00014H 00000H _DATA DATA + 00020H 0005FH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad1/04 CARACTER CENTRADO/CARACTER.OBJ b/Unidad1/04 CARACTER CENTRADO/CARACTER.OBJ new file mode 100644 index 0000000..51c06a6 Binary files /dev/null and b/Unidad1/04 CARACTER CENTRADO/CARACTER.OBJ differ diff --git a/Unidad1/04 CARACTER CENTRADO/caracter.asm b/Unidad1/04 CARACTER CENTRADO/caracter.asm new file mode 100644 index 0000000..ad6af65 --- /dev/null +++ b/Unidad1/04 CARACTER CENTRADO/caracter.asm @@ -0,0 +1,16 @@ +.model small +.stack 64 +.data +.code + ;posición de un caracter en el centro de la terminal + mov dh,12 ;renglón + mov dl,40 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + ;impresión arroba + mov dx,64 ;arroba + mov ah,02h ;servicio impresión + int 21h ;interrupción +.exit +end \ No newline at end of file diff --git a/Unidad1/05 NOMBRE CENTRADO/NOMBRE.EXE b/Unidad1/05 NOMBRE CENTRADO/NOMBRE.EXE new file mode 100644 index 0000000..f82561e Binary files /dev/null and b/Unidad1/05 NOMBRE CENTRADO/NOMBRE.EXE differ diff --git a/Unidad1/05 NOMBRE CENTRADO/NOMBRE.MAP b/Unidad1/05 NOMBRE CENTRADO/NOMBRE.MAP new file mode 100644 index 0000000..15c3ce4 --- /dev/null +++ b/Unidad1/05 NOMBRE CENTRADO/NOMBRE.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 0004EH 0004FH _TEXT CODE + 00050H 00050H 00000H _DATA DATA + 00050H 0008FH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad1/05 NOMBRE CENTRADO/NOMBRE.OBJ b/Unidad1/05 NOMBRE CENTRADO/NOMBRE.OBJ new file mode 100644 index 0000000..0c21c98 Binary files /dev/null and b/Unidad1/05 NOMBRE CENTRADO/NOMBRE.OBJ differ diff --git a/Unidad1/05 NOMBRE CENTRADO/nombre.asm b/Unidad1/05 NOMBRE CENTRADO/nombre.asm new file mode 100644 index 0000000..f0300bc --- /dev/null +++ b/Unidad1/05 NOMBRE CENTRADO/nombre.asm @@ -0,0 +1,51 @@ +.model small +.stack 64 +.data +.code + ;posición de un caracter en el centro de la terminal + mov dh,12 ;renglón + mov dl,38 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + mov dx,80 + mov ah,02h + int 21h + + mov dh,12 ;renglón + mov dl,39 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + mov dx,65 + mov ah,02h + int 21h + + mov dh,12 ;renglón + mov dl,40 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + mov dx,66 + mov ah,02h + int 21h + + mov dh,12 ;renglón + mov dl,41 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + mov dx,76 + mov ah,02h + int 21h + + mov dh,12 ;renglón + mov dl,42 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + mov dx,79 + mov ah,02h + int 21h +.exit +end \ No newline at end of file diff --git a/Unidad1/06 NOMBRE HOR Y VERT/NOMBRE.EXE b/Unidad1/06 NOMBRE HOR Y VERT/NOMBRE.EXE new file mode 100644 index 0000000..848d5c9 Binary files /dev/null and b/Unidad1/06 NOMBRE HOR Y VERT/NOMBRE.EXE differ diff --git a/Unidad1/06 NOMBRE HOR Y VERT/NOMBRE.MAP b/Unidad1/06 NOMBRE HOR Y VERT/NOMBRE.MAP new file mode 100644 index 0000000..786807c --- /dev/null +++ b/Unidad1/06 NOMBRE HOR Y VERT/NOMBRE.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 0006AH 0006BH _TEXT CODE + 0006CH 0006CH 00000H _DATA DATA + 00070H 000AFH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad1/06 NOMBRE HOR Y VERT/NOMBRE.OBJ b/Unidad1/06 NOMBRE HOR Y VERT/NOMBRE.OBJ new file mode 100644 index 0000000..7c43886 Binary files /dev/null and b/Unidad1/06 NOMBRE HOR Y VERT/NOMBRE.OBJ differ diff --git a/Unidad1/06 NOMBRE HOR Y VERT/nombre.asm b/Unidad1/06 NOMBRE HOR Y VERT/nombre.asm new file mode 100644 index 0000000..e722577 --- /dev/null +++ b/Unidad1/06 NOMBRE HOR Y VERT/nombre.asm @@ -0,0 +1,74 @@ +.model small +.stack 64 +.data +.code + ;code + ;posición de un caracter en el centro de la terminal + mov dh,12 ;renglón + mov dl,42 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + ;impresión PABLO + mov dx,80 + mov ah,02h + int 21h + mov dx,65 + mov ah,02h + int 21h + mov dx,66 + mov ah,02h + int 21h + mov dx,76 + mov ah,02h + int 21h + mov dx,79 + mov ah,02h + int 21h + + ;posición de un caracter debajo de la P de PABLO + mov dh,13 ;renglón + mov dl,42 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + ;impresión A + mov dx,65 + mov ah,02h + int 21h + + ;posición de un caracter debajo de la A anterior + mov dh,14 ;renglón + mov dl,42 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + ;impresión B + mov dx,66 + mov ah,02h + int 21h + + ;posición de un caracter debajo de la B anterior + mov dh,15 ;renglón + mov dl,42 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + ;impresión L + mov dx,76 + mov ah,02h + int 21h + + ;posición de un caracter debajo de la L anterior + mov dh,16 ;renglón + mov dl,42 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + ;impresión O + mov dx,79 + mov ah,02h + int 21h + +.exit +end \ No newline at end of file diff --git a/Unidad1/07 CIRCULO/CIRCULO.EXE b/Unidad1/07 CIRCULO/CIRCULO.EXE new file mode 100644 index 0000000..b2c8a12 Binary files /dev/null and b/Unidad1/07 CIRCULO/CIRCULO.EXE differ diff --git a/Unidad1/07 CIRCULO/CIRCULO.MAP b/Unidad1/07 CIRCULO/CIRCULO.MAP new file mode 100644 index 0000000..988e544 --- /dev/null +++ b/Unidad1/07 CIRCULO/CIRCULO.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 000F8H 000F9H _TEXT CODE + 000FAH 000FAH 00000H _DATA DATA + 00100H 0013FH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad1/07 CIRCULO/CIRCULO.OBJ b/Unidad1/07 CIRCULO/CIRCULO.OBJ new file mode 100644 index 0000000..a1ec424 Binary files /dev/null and b/Unidad1/07 CIRCULO/CIRCULO.OBJ differ diff --git a/Unidad1/07 CIRCULO/circulo.asm b/Unidad1/07 CIRCULO/circulo.asm new file mode 100644 index 0000000..92d2a02 --- /dev/null +++ b/Unidad1/07 CIRCULO/circulo.asm @@ -0,0 +1,142 @@ +.model small +.stack 64 +.data +.code + ;circulo + + Limpiar: + mov ax, 03 + int 10h + + Circulo: + ;cruz principal + mov dh, 5 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 12 + mov dl, 26 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 12 + mov dl, 54 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 19 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + ;complemento del circulo + mov dh, 6 + mov dl, 34 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 6 + mov dl, 46 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 29 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 51 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 10 + mov dl, 27 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 10 + mov dl, 53 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 14 + mov dl, 27 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 14 + mov dl, 53 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 29 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 51 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 18 + mov dl, 34 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 18 + mov dl, 46 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h +.exit +end diff --git a/Unidad1/07 CIRCULO/cuadricula.txt b/Unidad1/07 CIRCULO/cuadricula.txt new file mode 100644 index 0000000..87e53f5 --- /dev/null +++ b/Unidad1/07 CIRCULO/cuadricula.txt @@ -0,0 +1,25 @@ +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +---------------------------------------*---------------------------------------- +---------------------------------*-----------*---------------------------------- +-------------------------------------------------------------------------------- +----------------------------*---------------------*----------------------------- +-------------------------------------------------------------------------------- +--------------------------*-------------------------*--------------------------- +-------------------------------------------------------------------------------- +-------------------------*-------------c-------------*-------------------------- +-------------------------------------------------------------------------------- +--------------------------*-------------------------*--------------------------- +-------------------------------------------------------------------------------- +----------------------------*---------------------*----------------------------- +-------------------------------------------------------------------------------- +---------------------------------*-----------*---------------------------------- +---------------------------------------*---------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- \ No newline at end of file diff --git a/Unidad1/08 CORAZON/CORAZON.EXE b/Unidad1/08 CORAZON/CORAZON.EXE new file mode 100644 index 0000000..88d4f53 Binary files /dev/null and b/Unidad1/08 CORAZON/CORAZON.EXE differ diff --git a/Unidad1/08 CORAZON/CORAZON.MAP b/Unidad1/08 CORAZON/CORAZON.MAP new file mode 100644 index 0000000..858784f --- /dev/null +++ b/Unidad1/08 CORAZON/CORAZON.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 00138H 00139H _TEXT CODE + 0013AH 0013AH 00000H _DATA DATA + 00140H 0017FH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad1/08 CORAZON/CORAZON.OBJ b/Unidad1/08 CORAZON/CORAZON.OBJ new file mode 100644 index 0000000..c77e6e8 Binary files /dev/null and b/Unidad1/08 CORAZON/CORAZON.OBJ differ diff --git a/Unidad1/08 CORAZON/corazon.asm b/Unidad1/08 CORAZON/corazon.asm new file mode 100644 index 0000000..1ade085 --- /dev/null +++ b/Unidad1/08 CORAZON/corazon.asm @@ -0,0 +1,175 @@ +.model small +.stack 64 +.data +.code + ;corazon + + Limpiar: + mov ax, 03 + int 10h + + Corazon: + mov dh, 6 + mov dl, 30 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 6 + mov dl, 33 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 6 + mov dl, 47 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 6 + mov dl, 50 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 7 + mov dl, 28 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 7 + mov dl, 35 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 7 + mov dl, 45 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 7 + mov dl, 52 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 29 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 51 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 10 + mov dl, 31 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 10 + mov dl, 49 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 12 + mov dl, 33 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 12 + mov dl, 47 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 14 + mov dl, 35 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 14 + mov dl, 45 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 37 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 43 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 17 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad1/08 CORAZON/cuadricula.txt b/Unidad1/08 CORAZON/cuadricula.txt new file mode 100644 index 0000000..76d61f7 --- /dev/null +++ b/Unidad1/08 CORAZON/cuadricula.txt @@ -0,0 +1,33 @@ +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-----------------------------*--*-------------*--*----------------------------- +---------------------------*------*---------*------*----------------------------------- +----------------------------*----------*----------*----------------------------- +------------------------------------------------------------------------------- +------------------------------*-----------------*------------------------------------ +-------------------------------------------------------------------------------- +--------------------------------*------c------*--------------------------------- +-------------------------------------------------------------------------------- +----------------------------------*---------*----------------------------------- +-------------------------------------------------------------------------------- +------------------------------------*-----*------------------------------------- +---------------------------------------*---------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- + +ALT + 219 = █ + +ALT + 220 = ▄ + +ALT + 223 = ▀ + +ALT + 254 = ■ \ No newline at end of file diff --git a/Unidad1/09 ESTRELLA/ESTRELLA.EXE b/Unidad1/09 ESTRELLA/ESTRELLA.EXE new file mode 100644 index 0000000..022d736 Binary files /dev/null and b/Unidad1/09 ESTRELLA/ESTRELLA.EXE differ diff --git a/Unidad1/09 ESTRELLA/ESTRELLA.MAP b/Unidad1/09 ESTRELLA/ESTRELLA.MAP new file mode 100644 index 0000000..a6f705a --- /dev/null +++ b/Unidad1/09 ESTRELLA/ESTRELLA.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 00174H 00175H _TEXT CODE + 00176H 00176H 00000H _DATA DATA + 00180H 001BFH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad1/09 ESTRELLA/ESTRELLA.OBJ b/Unidad1/09 ESTRELLA/ESTRELLA.OBJ new file mode 100644 index 0000000..cc9ef9f Binary files /dev/null and b/Unidad1/09 ESTRELLA/ESTRELLA.OBJ differ diff --git a/Unidad1/09 ESTRELLA/cuadricula.txt b/Unidad1/09 ESTRELLA/cuadricula.txt new file mode 100644 index 0000000..ae03c73 --- /dev/null +++ b/Unidad1/09 ESTRELLA/cuadricula.txt @@ -0,0 +1,25 @@ +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +---------------------------------------*---------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------*---*-------------------------------------- +-------------------------------------------------------------------------------- +---------------------------*---*---*-------*---*---*---------------------------- +-------------------------------------------------------------------------------- +-----------------------------*-------------------*------------------------------ +-------------------------------------------------------------------------------- +-------------------------------*-------*-------*-------------------------------- +-------------------------------------------------------------------------------- +-----------------------------*-------------------*------------------------------ +-------------------------------------------------------------------------------- +---------------------------*---*---*-------*---*---*---------------------------- +-------------------------------------------------------------------------------- +-------------------------------------*---*-------------------------------------- +-------------------------------------------------------------------------------- +---------------------------------------*---------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- \ No newline at end of file diff --git a/Unidad1/09 ESTRELLA/estrella.asm b/Unidad1/09 ESTRELLA/estrella.asm new file mode 100644 index 0000000..9e13a5a --- /dev/null +++ b/Unidad1/09 ESTRELLA/estrella.asm @@ -0,0 +1,208 @@ +.model small +.stack 64 +.data +.code + ; + + Limpiar: + mov ax, 03 + int 10h + + Estrella: + mov dh, 4 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 6 + mov dl, 38 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 6 + mov dl, 42 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 28 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 32 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 36 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 44 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 48 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 52 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 10 + mov dl, 30 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 10 + mov dl, 50 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 12 + mov dl, 32 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 12 + mov dl, 48 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 14 + mov dl, 30 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 14 + mov dl, 50 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 28 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 32 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 36 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 44 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 48 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 52 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 18 + mov dl, 38 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 18 + mov dl, 42 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 20 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad1/10 CARITA FELIZ/CARA.EXE b/Unidad1/10 CARITA FELIZ/CARA.EXE new file mode 100644 index 0000000..66d1644 Binary files /dev/null and b/Unidad1/10 CARITA FELIZ/CARA.EXE differ diff --git a/Unidad1/10 CARITA FELIZ/CARA.MAP b/Unidad1/10 CARITA FELIZ/CARA.MAP new file mode 100644 index 0000000..ac7fc67 --- /dev/null +++ b/Unidad1/10 CARITA FELIZ/CARA.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 001ECH 001EDH _TEXT CODE + 001EEH 001EEH 00000H _DATA DATA + 001F0H 0022FH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad1/10 CARITA FELIZ/CARA.OBJ b/Unidad1/10 CARITA FELIZ/CARA.OBJ new file mode 100644 index 0000000..13b4c2a Binary files /dev/null and b/Unidad1/10 CARITA FELIZ/CARA.OBJ differ diff --git a/Unidad1/10 CARITA FELIZ/cara.asm b/Unidad1/10 CARITA FELIZ/cara.asm new file mode 100644 index 0000000..0ca6471 --- /dev/null +++ b/Unidad1/10 CARITA FELIZ/cara.asm @@ -0,0 +1,277 @@ +.model small +.stack 64 +.data +.code + ; + + Limpiar: + mov ax, 03 + int 10h + + Circulo: + ;cruz principal + mov dh, 5 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 12 + mov dl, 26 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 12 + mov dl, 54 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 19 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + ;complemento del circulo + mov dh, 6 + mov dl, 34 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 6 + mov dl, 46 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 29 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 51 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 10 + mov dl, 27 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 10 + mov dl, 53 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 14 + mov dl, 27 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 14 + mov dl, 53 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 29 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 51 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 18 + mov dl, 34 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 18 + mov dl, 46 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + Cara: + ;ojos + mov dh, 8 + mov dl, 34 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 35 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 45 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 46 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 9 + mov dl, 34 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 9 + mov dl, 35 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 9 + mov dl, 45 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 9 + mov dl, 46 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + ;nariz + mov dh, 12 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + ;boca + mov dh, 14 + mov dl, 32 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 14 + mov dl, 48 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 15 + mov dl, 34 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 15 + mov dl, 46 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 37 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 43 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 17 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad1/10 CARITA FELIZ/cuadricula.txt b/Unidad1/10 CARITA FELIZ/cuadricula.txt new file mode 100644 index 0000000..030856c --- /dev/null +++ b/Unidad1/10 CARITA FELIZ/cuadricula.txt @@ -0,0 +1,25 @@ +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +---------------------------------------*---------------------------------------- +---------------------------------*-----------*---------------------------------- +-------------------------------------------------------------------------------- +----------------------------*----**---------**----*----------------------------- +---------------------------------**---------**---------------------------------- +--------------------------*-------------------------*--------------------------- +-------------------------------------------------------------------------------- +-------------------------*-------------*-------------*-------------------------- +-------------------------------------------------------------------------------- +--------------------------*----*---------------*----*--------------------------- +---------------------------------*-----------*---------------------------------- +----------------------------*-------*-----*------*----------------------------- +---------------------------------------*---------------------------------------- +---------------------------------*-----------*---------------------------------- +---------------------------------------*---------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- \ No newline at end of file diff --git a/Unidad1/11 CUADRICULA DE AJEDREZ/AJEDREZ.EXE b/Unidad1/11 CUADRICULA DE AJEDREZ/AJEDREZ.EXE new file mode 100644 index 0000000..618dc00 Binary files /dev/null and b/Unidad1/11 CUADRICULA DE AJEDREZ/AJEDREZ.EXE differ diff --git a/Unidad1/11 CUADRICULA DE AJEDREZ/AJEDREZ.MAP b/Unidad1/11 CUADRICULA DE AJEDREZ/AJEDREZ.MAP new file mode 100644 index 0000000..0c8bb19 --- /dev/null +++ b/Unidad1/11 CUADRICULA DE AJEDREZ/AJEDREZ.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 003CCH 003CDH _TEXT CODE + 003CEH 003CEH 00000H _DATA DATA + 003D0H 0040FH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad1/11 CUADRICULA DE AJEDREZ/AJEDREZ.OBJ b/Unidad1/11 CUADRICULA DE AJEDREZ/AJEDREZ.OBJ new file mode 100644 index 0000000..426c074 Binary files /dev/null and b/Unidad1/11 CUADRICULA DE AJEDREZ/AJEDREZ.OBJ differ diff --git a/Unidad1/11 CUADRICULA DE AJEDREZ/ajedrez.asm b/Unidad1/11 CUADRICULA DE AJEDREZ/ajedrez.asm new file mode 100644 index 0000000..b46d954 --- /dev/null +++ b/Unidad1/11 CUADRICULA DE AJEDREZ/ajedrez.asm @@ -0,0 +1,591 @@ +.model small +.stack 64 +.data +.code + ; + + Limpiar: + mov ax, 03 + int 10h + + Cuadricula: + mov dh, 5 + mov dl, 35 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 5 + mov dl, 36 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 5 + mov dl, 39 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 5 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 5 + mov dl, 43 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 5 + mov dl, 44 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 5 + mov dl, 47 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 5 + mov dl, 48 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 6 + mov dl, 37 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 6 + mov dl, 38 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 6 + mov dl, 41 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 6 + mov dl, 42 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 6 + mov dl, 45 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 6 + mov dl, 46 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 6 + mov dl, 49 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 6 + mov dl, 50 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 7 + mov dl, 35 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 7 + mov dl, 36 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 7 + mov dl, 39 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 7 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 7 + mov dl, 43 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 7 + mov dl, 44 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 7 + mov dl, 47 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 7 + mov dl, 48 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 8 + mov dl, 37 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 8 + mov dl, 38 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 8 + mov dl, 41 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 8 + mov dl, 42 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 8 + mov dl, 45 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 8 + mov dl, 46 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 8 + mov dl, 49 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 8 + mov dl, 50 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 9 + mov dl, 35 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 9 + mov dl, 36 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 9 + mov dl, 39 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 9 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 9 + mov dl, 43 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 9 + mov dl, 44 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 9 + mov dl, 47 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 9 + mov dl, 48 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 10 + mov dl, 37 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 10 + mov dl, 38 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 10 + mov dl, 41 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 10 + mov dl, 42 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 10 + mov dl, 45 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 10 + mov dl, 46 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 10 + mov dl, 49 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 10 + mov dl, 50 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 11 + mov dl, 35 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 11 + mov dl, 36 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 11 + mov dl, 39 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 11 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 11 + mov dl, 43 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 11 + mov dl, 44 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 11 + mov dl, 47 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 11 + mov dl, 48 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 12 + mov dl, 37 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 12 + mov dl, 38 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 12 + mov dl, 41 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 12 + mov dl, 42 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 12 + mov dl, 45 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 12 + mov dl, 46 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 12 + mov dl, 49 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 12 + mov dl, 50 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad1/11 CUADRICULA DE AJEDREZ/ajedrez.py b/Unidad1/11 CUADRICULA DE AJEDREZ/ajedrez.py new file mode 100644 index 0000000..f060a40 --- /dev/null +++ b/Unidad1/11 CUADRICULA DE AJEDREZ/ajedrez.py @@ -0,0 +1,22 @@ +print(".model small\n.stack 64\n.data\n.code\n") + +row = 5 +column = 35 + +while row <= 12: + column = 35 + while column < 50: + print("\n\nmov dh, {0}\nmov dl, {1}\nmov ah, 02h\nint 10h\nmov dx, 219\nmov ah, 02h\nint 21h".format(row,column)) + column = column + 1 + print("\n\nmov dh, {0}\nmov dl, {1}\nmov ah, 02h\nint 10h\nmov dx, 219\nmov ah, 02h\nint 21h".format(row,column)) + column = column + 3 + row = row + 1 + + column = 37 + while column <= 50: + print("\n\nmov dh, {0}\nmov dl, {1}\nmov ah, 02h\nint 10h\nmov dx, 219\nmov ah, 02h\nint 21h".format(row,column)) + column = column + 1 + print("\n\nmov dh, {0}\nmov dl, {1}\nmov ah, 02h\nint 10h\nmov dx, 219\nmov ah, 02h\nint 21h".format(row,column)) + column = column + 3 + row = row + 1 +print(".exit\nend") diff --git a/Unidad1/11 CUADRICULA DE AJEDREZ/cuadricula.txt b/Unidad1/11 CUADRICULA DE AJEDREZ/cuadricula.txt new file mode 100644 index 0000000..882e072 --- /dev/null +++ b/Unidad1/11 CUADRICULA DE AJEDREZ/cuadricula.txt @@ -0,0 +1,27 @@ +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +----------------------------------bbnnbbnnbbnnbb-------------------------------- +----------------------------------nnbbnnbbnnbbnn-------------------------------- +----------------------------------bbnnbbnnbbnnbb-------------------------------- +----------------------------------nnbbnnbbnnbbnn-------------------------------- +----------------------------------bbnnbbnnbbnnbb-------------------------------- +----------------------------------nnbbnnbbnnbbnn-------------------------------- +----------------------------------bbnnbbnnbbnnbb-------------------------------- +----------------------------------nnbbnnbbnnbbnn-------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- + +alt + 219 = █ [b] \ No newline at end of file diff --git a/Unidad1/12 CARACTER CON COLOR/PINTAR.EXE b/Unidad1/12 CARACTER CON COLOR/PINTAR.EXE new file mode 100644 index 0000000..77aa187 Binary files /dev/null and b/Unidad1/12 CARACTER CON COLOR/PINTAR.EXE differ diff --git a/Unidad1/12 CARACTER CON COLOR/PINTAR.MAP b/Unidad1/12 CARACTER CON COLOR/PINTAR.MAP new file mode 100644 index 0000000..f18851c --- /dev/null +++ b/Unidad1/12 CARACTER CON COLOR/PINTAR.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 0001FH 00020H _TEXT CODE + 00020H 00020H 00000H _DATA DATA + 00020H 0005FH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad1/12 CARACTER CON COLOR/PINTAR.OBJ b/Unidad1/12 CARACTER CON COLOR/PINTAR.OBJ new file mode 100644 index 0000000..2653572 Binary files /dev/null and b/Unidad1/12 CARACTER CON COLOR/PINTAR.OBJ differ diff --git a/Unidad1/12 CARACTER CON COLOR/cuadricula.txt b/Unidad1/12 CARACTER CON COLOR/cuadricula.txt new file mode 100644 index 0000000..70f389b --- /dev/null +++ b/Unidad1/12 CARACTER CON COLOR/cuadricula.txt @@ -0,0 +1,25 @@ +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +---------------------------------------*---------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- \ No newline at end of file diff --git a/Unidad1/12 CARACTER CON COLOR/pintar.asm b/Unidad1/12 CARACTER CON COLOR/pintar.asm new file mode 100644 index 0000000..057da76 --- /dev/null +++ b/Unidad1/12 CARACTER CON COLOR/pintar.asm @@ -0,0 +1,27 @@ +.model small +.stack 64 +.data +.code + Limpiar: + mov ax, 03 + int 10h + + Centrar: + ;posición de un caracter en el centro de la terminal + mov dh,12 ;renglón + mov dl,40 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + Pintar: + mov al, 64 ;caracter + mov bl, 4 ;color + mov cx, 1 ;cantidad de caracteres + mov ah, 09 ;servicio + int 10h ;interrupción + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad1/13 CARITA FELIZ COLOR/CARITA.EXE b/Unidad1/13 CARITA FELIZ COLOR/CARITA.EXE new file mode 100644 index 0000000..497a597 Binary files /dev/null and b/Unidad1/13 CARITA FELIZ COLOR/CARITA.EXE differ diff --git a/Unidad1/13 CARITA FELIZ COLOR/CARITA.MAP b/Unidad1/13 CARITA FELIZ COLOR/CARITA.MAP new file mode 100644 index 0000000..2959d09 --- /dev/null +++ b/Unidad1/13 CARITA FELIZ COLOR/CARITA.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 00188H 00189H _TEXT CODE + 0018AH 0018AH 00000H _DATA DATA + 00190H 001CFH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad1/13 CARITA FELIZ COLOR/CARITA.OBJ b/Unidad1/13 CARITA FELIZ COLOR/CARITA.OBJ new file mode 100644 index 0000000..a79933d Binary files /dev/null and b/Unidad1/13 CARITA FELIZ COLOR/CARITA.OBJ differ diff --git a/Unidad1/13 CARITA FELIZ COLOR/carita.asm b/Unidad1/13 CARITA FELIZ COLOR/carita.asm new file mode 100644 index 0000000..6565265 --- /dev/null +++ b/Unidad1/13 CARITA FELIZ COLOR/carita.asm @@ -0,0 +1,218 @@ +.model small +.stack 64 +.data +.code + ; + + Limpiar: + mov ax, 03 + int 10h + + Circulo: + ;posición + mov dh,2 + mov dl,10 + mov ah ,02h + int 10h + ;pintar + mov al, 219 ;caracter + mov bl, 4 ;rojo + mov cx, 10 ;cantidad de caracteres + mov ah, 09 ;servicio + int 10h ;interrupción + + mov dh,3 + mov dl,8 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 14 + mov ah, 09 + int 10h + + mov dh,4 + mov dl,6 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 18 + mov ah, 09 + int 10h + + mov dh,5 + mov dl,4 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 6 + mov ah, 09 + int 10h + + mov dh,5 + mov dl,12 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 6 + mov ah, 09 + int 10h + + mov dh,5 + mov dl,20 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 6 + mov ah, 09 + int 10h + + mov dh,6 + mov dl,4 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 6 + mov ah, 09 + int 10h + + mov dh,6 + mov dl,12 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 6 + mov ah, 09 + int 10h + + mov dh,6 + mov dl,20 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 6 + mov ah, 09 + int 10h + + mov dh,7 + mov dl,4 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 22 + mov ah, 09 + int 10h + + mov dh,8 + mov dl,4 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 4 + mov ah, 09 + int 10h + + mov dh,8 + mov dl,10 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 10 + mov ah, 09 + int 10h + + mov dh,8 + mov dl,22 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 4 + mov ah, 09 + int 10h + + mov dh,9 + mov dl,4 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 6 + mov ah, 09 + int 10h + + mov dh,9 + mov dl,12 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 6 + mov ah, 09 + int 10h + + mov dh,9 + mov dl,20 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 6 + mov ah, 09 + int 10h + + mov dh,10 + mov dl,6 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 6 + mov ah, 09 + int 10h + + mov dh,10 + mov dl,18 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 6 + mov ah, 09 + int 10h + + mov dh,11 + mov dl,8 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 14 + mov ah, 09 + int 10h + + mov dh,12 + mov dl,10 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 10 + mov ah, 09 + int 10h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad1/13 CARITA FELIZ COLOR/cuadricula.txt b/Unidad1/13 CARITA FELIZ COLOR/cuadricula.txt new file mode 100644 index 0000000..70f389b --- /dev/null +++ b/Unidad1/13 CARITA FELIZ COLOR/cuadricula.txt @@ -0,0 +1,25 @@ +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +---------------------------------------*---------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- \ No newline at end of file diff --git a/Unidad1/14 CORAZON COLOREADO/CORAZON.EXE b/Unidad1/14 CORAZON COLOREADO/CORAZON.EXE new file mode 100644 index 0000000..6efd5ee Binary files /dev/null and b/Unidad1/14 CORAZON COLOREADO/CORAZON.EXE differ diff --git a/Unidad1/14 CORAZON COLOREADO/CORAZON.MAP b/Unidad1/14 CORAZON COLOREADO/CORAZON.MAP new file mode 100644 index 0000000..f81ab67 --- /dev/null +++ b/Unidad1/14 CORAZON COLOREADO/CORAZON.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 0033DH 0033EH _TEXT CODE + 0033EH 0033EH 00000H _DATA DATA + 00340H 0037FH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad1/14 CORAZON COLOREADO/CORAZON.OBJ b/Unidad1/14 CORAZON COLOREADO/CORAZON.OBJ new file mode 100644 index 0000000..6741eda Binary files /dev/null and b/Unidad1/14 CORAZON COLOREADO/CORAZON.OBJ differ diff --git a/Unidad1/14 CORAZON COLOREADO/corazon.asm b/Unidad1/14 CORAZON COLOREADO/corazon.asm new file mode 100644 index 0000000..3be2666 --- /dev/null +++ b/Unidad1/14 CORAZON COLOREADO/corazon.asm @@ -0,0 +1,531 @@ +.model small +.stack 64 +.data +.code + ;corazon + + Limpiar: + mov ax, 03 + int 10h + + Corazon: + ;posición + mov dh, 6 + mov dl, 30 + mov ah, 02h + int 10h + ;pintar + mov al, 220 ;caracter + mov bl, 4 ;color + mov cx, 1 ;cantidad de caracteres + mov ah, 09 ;servicio + int 10h ;interrupción + + ;posición + mov dh, 6 + mov dl, 31 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 6 + mov dl, 32 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 6 + mov dl, 33 + mov ah, 02h + int 10h + ;pintar + mov al, 220 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 6 + mov dl, 47 + mov ah, 02h + int 10h + ;pintar + mov al, 220 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 6 + mov dl, 48 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 6 + mov dl, 49 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 6 + mov dl, 50 + mov ah, 02h + int 10h + ;pintar + mov al, 220 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 7 + mov dl, 29 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 7 + mov dl, 30 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 6 + mov ah, 09 + int 10h + + ;posición + mov dh, 7 + mov dl, 45 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 6 + mov ah, 09 + int 10h + + ;posición + mov dh, 7 + mov dl, 51 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 8 + mov dl, 30 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 8 + mov dl, 31 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 7 + mov ah, 09 + int 10h + + ;posición + mov dh, 8 + mov dl, 43 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 7 + mov ah, 09 + int 10h + + ;posición + mov dh, 8 + mov dl, 50 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 9 + mov dl, 31 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 9 + mov dl, 32 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 8 + mov ah, 09 + int 10h + + ;posición + mov dh, 9 + mov dl, 40 + mov ah, 02h + int 10h + ;pintar + mov al, 220 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 9 + mov dl, 41 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 8 + mov ah, 09 + int 10h + + ;posición + mov dh, 9 + mov dl, 49 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 10 + mov dl, 32 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 10 + mov dl, 33 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 15 + mov ah, 09 + int 10h + + ;posición + mov dh, 10 + mov dl, 48 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 11 + mov dl, 33 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 11 + mov dl, 34 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 13 + mov ah, 09 + int 10h + + ;posición + mov dh, 11 + mov dl, 47 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 12 + mov dl, 34 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 12 + mov dl, 35 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 11 + mov ah, 09 + int 10h + + ;posición + mov dh, 12 + mov dl, 46 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 13 + mov dl, 35 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 13 + mov dl, 36 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 9 + mov ah, 09 + int 10h + + ;posición + mov dh, 13 + mov dl, 45 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 14 + mov dl, 36 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 14 + mov dl, 37 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 7 + mov ah, 09 + int 10h + + ;posición + mov dh, 14 + mov dl, 44 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 15 + mov dl, 37 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 15 + mov dl, 38 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 5 + mov ah, 09 + int 10h + + ;posición + mov dh, 15 + mov dl, 43 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 16 + mov dl, 38 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 16 + mov dl, 39 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 3 + mov ah, 09 + int 10h + + ;posición + mov dh, 16 + mov dl, 42 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 17 + mov dl, 40 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad1/14 CORAZON COLOREADO/cuadricula.txt b/Unidad1/14 CORAZON COLOREADO/cuadricula.txt new file mode 100644 index 0000000..75d32eb --- /dev/null +++ b/Unidad1/14 CORAZON COLOREADO/cuadricula.txt @@ -0,0 +1,33 @@ +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-----------------------------▄██▄-------------▄██▄------------------------------ +---------------------------*▀██████---------██████▀*---------------------------- +----------------------------*▀███████--*--███████▀*----------------------------- +------------------------------▀████████▄████████▀------------------------------- +------------------------------*▀███████████████▀*------------------------------- +--------------------------------▀█████████████▀--------------------------------- +--------------------------------*▀███████████▀*--------------------------------- +----------------------------------▀█████████▀----------------------------------- +----------------------------------*▀███████▀*----------------------------------- +------------------------------------▀█████▀------------------------------------- +------------------------------------*▀███▀*------------------------------------- +---------------------------------------▀---------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- + +ALT + 219 = █ + +ALT + 220 = ▄ + +ALT + 223 = ▀ + +ALT + 254 = ■ \ No newline at end of file diff --git a/Unidad1/15 FIGURAS/CIRCULO ROJO/CIRCULO.EXE b/Unidad1/15 FIGURAS/CIRCULO ROJO/CIRCULO.EXE new file mode 100644 index 0000000..affefad Binary files /dev/null and b/Unidad1/15 FIGURAS/CIRCULO ROJO/CIRCULO.EXE differ diff --git a/Unidad1/15 FIGURAS/CIRCULO ROJO/CIRCULO.MAP b/Unidad1/15 FIGURAS/CIRCULO ROJO/CIRCULO.MAP new file mode 100644 index 0000000..5f2d71a --- /dev/null +++ b/Unidad1/15 FIGURAS/CIRCULO ROJO/CIRCULO.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 000DDH 000DEH _TEXT CODE + 000DEH 000DEH 00000H _DATA DATA + 000E0H 0011FH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad1/15 FIGURAS/CIRCULO ROJO/CIRCULO.OBJ b/Unidad1/15 FIGURAS/CIRCULO ROJO/CIRCULO.OBJ new file mode 100644 index 0000000..ceaa4d3 Binary files /dev/null and b/Unidad1/15 FIGURAS/CIRCULO ROJO/CIRCULO.OBJ differ diff --git a/Unidad1/15 FIGURAS/CIRCULO ROJO/circulo.asm b/Unidad1/15 FIGURAS/CIRCULO ROJO/circulo.asm new file mode 100644 index 0000000..4779ff6 --- /dev/null +++ b/Unidad1/15 FIGURAS/CIRCULO ROJO/circulo.asm @@ -0,0 +1,129 @@ +.model small +.stack 64 +.data +.code + ; + + Limpiar: + mov ax, 03 + int 10h + + Circulo: + ;posición + mov dh,2 + mov dl,10 + mov ah ,02h + int 10h + ;pintar + mov al, 219 ;caracter + mov bl, 4 ;rojo + mov cx, 10 ;cantidad de caracteres + mov ah, 09 ;servicio + int 10h ;interrupción + + mov dh,3 + mov dl,8 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 14 + mov ah, 09 + int 10h + + mov dh,4 + mov dl,6 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 18 + mov ah, 09 + int 10h + + mov dh,5 + mov dl,4 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 22 + mov ah, 09 + int 10h + + mov dh,6 + mov dl,4 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 22 + mov ah, 09 + int 10h + + mov dh,7 + mov dl,4 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 22 + mov cx, 22 + mov ah, 09 + int 10h + + mov dh,8 + mov dl,4 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 22 + mov ah, 09 + int 10h + + mov dh,9 + mov dl,4 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 22 + mov ah, 09 + int 10h + + mov dh,10 + mov dl,6 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 18 + mov ah, 09 + int 10h + + mov dh,11 + mov dl,8 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 14 + mov ah, 09 + int 10h + + mov dh,12 + mov dl,10 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 10 + mov ah, 09 + int 10h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad1/15 FIGURAS/CIRCULO ROJO/cuadricula.txt b/Unidad1/15 FIGURAS/CIRCULO ROJO/cuadricula.txt new file mode 100644 index 0000000..50f0a95 --- /dev/null +++ b/Unidad1/15 FIGURAS/CIRCULO ROJO/cuadricula.txt @@ -0,0 +1,25 @@ +-------------------------------------------------------------------------------- +---------------------------------------*---------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +---------------------------------------c---------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +---------------------------------------*---------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- \ No newline at end of file diff --git a/Unidad1/15 FIGURAS/CUADRADO AMARILLO/CUADRADO.EXE b/Unidad1/15 FIGURAS/CUADRADO AMARILLO/CUADRADO.EXE new file mode 100644 index 0000000..0b7a13b Binary files /dev/null and b/Unidad1/15 FIGURAS/CUADRADO AMARILLO/CUADRADO.EXE differ diff --git a/Unidad1/15 FIGURAS/CUADRADO AMARILLO/CUADRADO.MAP b/Unidad1/15 FIGURAS/CUADRADO AMARILLO/CUADRADO.MAP new file mode 100644 index 0000000..4fa15e8 --- /dev/null +++ b/Unidad1/15 FIGURAS/CUADRADO AMARILLO/CUADRADO.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 000A4H 000A5H _TEXT CODE + 000A6H 000A6H 00000H _DATA DATA + 000B0H 000EFH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad1/15 FIGURAS/CUADRADO AMARILLO/CUADRADO.OBJ b/Unidad1/15 FIGURAS/CUADRADO AMARILLO/CUADRADO.OBJ new file mode 100644 index 0000000..ca8fd7c Binary files /dev/null and b/Unidad1/15 FIGURAS/CUADRADO AMARILLO/CUADRADO.OBJ differ diff --git a/Unidad1/15 FIGURAS/CUADRADO AMARILLO/cuadrado.asm b/Unidad1/15 FIGURAS/CUADRADO AMARILLO/cuadrado.asm new file mode 100644 index 0000000..151fa72 --- /dev/null +++ b/Unidad1/15 FIGURAS/CUADRADO AMARILLO/cuadrado.asm @@ -0,0 +1,112 @@ +.model small +.stack 64 +.data +.code + ; + + Limpiar: + mov ax, 03 + int 10h + + Cuadrado: + ;posición + mov dh, 8 + mov dl, 33 + mov ah, 02h + int 10h + ;pintar + mov al, 219 ;caracter + mov bl, 14 ;yellow + mov cx, 16 ;cantidad de caracteres + mov ah, 09 ;servicio + int 10h ;interrupción + + ;posición + mov dh, 9 + mov dl, 33 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 14 ;yellow + mov cx, 16 + mov ah, 09 + int 10h + + ;posición + mov dh, 10 + mov dl, 33 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 14 ;yellow + mov cx, 16 + mov ah, 09 + int 10h + + ;posición + mov dh, 11 + mov dl, 33 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 14 ;yellow + mov cx, 16 + mov ah, 09 + int 10h + + ;posición + mov dh, 12 + mov dl, 33 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 14 ;yellow + mov cx, 16 + mov ah, 09 + int 10h + + ;posición + mov dh, 13 + mov dl, 33 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 14 ;yellow + mov cx, 16 + mov ah, 09 + int 10h + + ;posición + mov dh, 14 + mov dl, 33 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 14 ;yellow + mov cx, 16 + mov ah, 09 + int 10h + + ;posición + mov dh, 15 + mov dl, 33 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 14 ;yellow + mov cx, 16 + mov ah, 09 + int 10h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad1/15 FIGURAS/CUADRADO AMARILLO/cuadricula.txt b/Unidad1/15 FIGURAS/CUADRADO AMARILLO/cuadricula.txt new file mode 100644 index 0000000..752973e --- /dev/null +++ b/Unidad1/15 FIGURAS/CUADRADO AMARILLO/cuadricula.txt @@ -0,0 +1,22 @@ +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +--------------------------------████████████████-------------------------------- +--------------------------------████████████████-------------------------------- +--------------------------------████████████████-------------------------------- +--------------------------------████████████████-------------------------------- +--------------------------------████████████████-------------------------------- +--------------------------------████████████████-------------------------------- +--------------------------------████████████████-------------------------------- +--------------------------------████████████████---------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- + +ALT + 219 = █ \ No newline at end of file diff --git a/Unidad1/15 FIGURAS/RECTANGULO VERDE/RECTAN~1.EXE b/Unidad1/15 FIGURAS/RECTANGULO VERDE/RECTAN~1.EXE new file mode 100644 index 0000000..dc55b07 Binary files /dev/null and b/Unidad1/15 FIGURAS/RECTANGULO VERDE/RECTAN~1.EXE differ diff --git a/Unidad1/15 FIGURAS/RECTANGULO VERDE/RECTAN~1.MAP b/Unidad1/15 FIGURAS/RECTANGULO VERDE/RECTAN~1.MAP new file mode 100644 index 0000000..4fa15e8 --- /dev/null +++ b/Unidad1/15 FIGURAS/RECTANGULO VERDE/RECTAN~1.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 000A4H 000A5H _TEXT CODE + 000A6H 000A6H 00000H _DATA DATA + 000B0H 000EFH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad1/15 FIGURAS/RECTANGULO VERDE/RECTAN~1.OBJ b/Unidad1/15 FIGURAS/RECTANGULO VERDE/RECTAN~1.OBJ new file mode 100644 index 0000000..b6f5ecc Binary files /dev/null and b/Unidad1/15 FIGURAS/RECTANGULO VERDE/RECTAN~1.OBJ differ diff --git a/Unidad1/15 FIGURAS/RECTANGULO VERDE/cuadricula.txt b/Unidad1/15 FIGURAS/RECTANGULO VERDE/cuadricula.txt new file mode 100644 index 0000000..e55b1be --- /dev/null +++ b/Unidad1/15 FIGURAS/RECTANGULO VERDE/cuadricula.txt @@ -0,0 +1,27 @@ +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------█████████████████████████████-------------------------- +-------------------------█████████████████████████████-------------------------- +-------------------------█████████████████████████████-------------------------- +-------------------------█████████████████████████████-------------------------- +-------------------------█████████████████████████████-------------------------- +-------------------------█████████████████████████████-------------------------- +-------------------------█████████████████████████████-------------------------- +-------------------------█████████████████████████████-------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- + +ALT + 219 = █ \ No newline at end of file diff --git a/Unidad1/15 FIGURAS/RECTANGULO VERDE/rectangulo.asm b/Unidad1/15 FIGURAS/RECTANGULO VERDE/rectangulo.asm new file mode 100644 index 0000000..4fd0fb4 --- /dev/null +++ b/Unidad1/15 FIGURAS/RECTANGULO VERDE/rectangulo.asm @@ -0,0 +1,112 @@ +.model small +.stack 64 +.data +.code + ; + + Limpiar: + mov ax, 03 + int 10h + + Rectangulo: + ;posición + mov dh, 8 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 ;caracter + mov bl, 2 ;green + mov cx, 29 ;cantidad de caracteres + mov ah, 09 ;servicio + int 10h ;interrupción + + ;posición + mov dh, 9 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 2 ;green + mov cx, 29 + mov ah, 09 + int 10h + + ;posición + mov dh, 10 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 2 ;green + mov cx, 29 + mov ah, 09 + int 10h + + ;posición + mov dh, 11 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 2 ;green + mov cx, 29 + mov ah, 09 + int 10h + + ;posición + mov dh, 12 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 2 ;green + mov cx, 29 + mov ah, 09 + int 10h + + ;posición + mov dh, 13 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 2 ;green + mov cx, 29 + mov ah, 09 + int 10h + + ;posición + mov dh, 14 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 2 ;green + mov cx, 29 + mov ah, 09 + int 10h + + ;posición + mov dh, 15 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 2 ;green + mov cx, 29 + mov ah, 09 + int 10h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad1/15 FIGURAS/TRIANGULO AZUL/TRIANG~1.EXE b/Unidad1/15 FIGURAS/TRIANGULO AZUL/TRIANG~1.EXE new file mode 100644 index 0000000..a761846 Binary files /dev/null and b/Unidad1/15 FIGURAS/TRIANGULO AZUL/TRIANG~1.EXE differ diff --git a/Unidad1/15 FIGURAS/TRIANGULO AZUL/TRIANG~1.MAP b/Unidad1/15 FIGURAS/TRIANGULO AZUL/TRIANG~1.MAP new file mode 100644 index 0000000..4fa15e8 --- /dev/null +++ b/Unidad1/15 FIGURAS/TRIANGULO AZUL/TRIANG~1.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 000A4H 000A5H _TEXT CODE + 000A6H 000A6H 00000H _DATA DATA + 000B0H 000EFH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad1/15 FIGURAS/TRIANGULO AZUL/TRIANG~1.OBJ b/Unidad1/15 FIGURAS/TRIANGULO AZUL/TRIANG~1.OBJ new file mode 100644 index 0000000..d8954f7 Binary files /dev/null and b/Unidad1/15 FIGURAS/TRIANGULO AZUL/TRIANG~1.OBJ differ diff --git a/Unidad1/15 FIGURAS/TRIANGULO AZUL/cuadricula.txt b/Unidad1/15 FIGURAS/TRIANGULO AZUL/cuadricula.txt new file mode 100644 index 0000000..9aae7b7 --- /dev/null +++ b/Unidad1/15 FIGURAS/TRIANGULO AZUL/cuadricula.txt @@ -0,0 +1,27 @@ +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +--------------------------------------██---------------------------------------- +-------------------------------------████--------------------------------------- +------------------------------------██████-------------------------------------- +-----------------------------------████████------------------------------------- +----------------------------------██████████------------------------------------ +---------------------------------████████████----------------------------------- +--------------------------------██████████████---------------------------------- +-------------------------------████████████████-------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- + +ALT + 219 = █ \ No newline at end of file diff --git a/Unidad1/15 FIGURAS/TRIANGULO AZUL/triangulo.asm b/Unidad1/15 FIGURAS/TRIANGULO AZUL/triangulo.asm new file mode 100644 index 0000000..5edad2d --- /dev/null +++ b/Unidad1/15 FIGURAS/TRIANGULO AZUL/triangulo.asm @@ -0,0 +1,111 @@ +.model small +.stack 64 +.data +.code + ; + + Limpiar: + mov ax, 03 + int 10h + + Triangulo: + ;posición + mov dh, 8 + mov dl, 39 + mov ah, 02h + int 10h + ;pintar + mov al, 219 ;caracter + mov bl, 1 ;azul + mov cx, 2 ;cantidad de caracteres + mov ah, 09 ;servicio + int 10h ;interrupción + + ;posición + mov dh, 9 + mov dl, 38 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 1 ;azul + mov cx, 4 + mov ah, 09 + int 10h + + ;posición + mov dh, 10 + mov dl, 37 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 1 ;azul + mov cx, 6 + mov ah, 09 + int 10h + + ;posición + mov dh, 11 + mov dl, 36 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 1 ;azul + mov cx, 8 + mov ah, 09 + int 10h + + ;posición + mov dh, 12 + mov dl, 35 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 1 ;azul + mov cx, 10 + mov ah, 09 + int 10h + + ;posición + mov dh, 13 + mov dl, 34 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 1 ;azul + mov cx, 12 + mov ah, 09 + int 10h + + ;posición + mov dh, 14 + mov dl, 33 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 1 ;azul + mov cx, 14 + mov ah, 09 + int 10h + + ;posición + mov dh, 15 + mov dl, 32 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 1 ;azul + mov cx, 16 + mov ah, 09 + int 10h + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad1/16 BANDERA/BANDERA.EXE b/Unidad1/16 BANDERA/BANDERA.EXE new file mode 100644 index 0000000..a564c12 Binary files /dev/null and b/Unidad1/16 BANDERA/BANDERA.EXE differ diff --git a/Unidad1/16 BANDERA/BANDERA.MAP b/Unidad1/16 BANDERA/BANDERA.MAP new file mode 100644 index 0000000..4fa15e8 --- /dev/null +++ b/Unidad1/16 BANDERA/BANDERA.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 000A4H 000A5H _TEXT CODE + 000A6H 000A6H 00000H _DATA DATA + 000B0H 000EFH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad1/16 BANDERA/BANDERA.OBJ b/Unidad1/16 BANDERA/BANDERA.OBJ new file mode 100644 index 0000000..302275b Binary files /dev/null and b/Unidad1/16 BANDERA/BANDERA.OBJ differ diff --git a/Unidad1/16 BANDERA/bandera.asm b/Unidad1/16 BANDERA/bandera.asm new file mode 100644 index 0000000..2c927dd --- /dev/null +++ b/Unidad1/16 BANDERA/bandera.asm @@ -0,0 +1,111 @@ +.model small +.stack 64 +.data +.code + ; + + Limpiar: + mov ax, 03 + int 10h + + Bandera: + ;posición + mov dh, 8 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 ;caracter + mov bl, 13 ;color: light magenta + mov cx, 29 ;cantidad de caracteres + mov ah, 09 ;servicio + int 10h ;interrupción + + ;posición + mov dh, 9 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 ;red + mov cx, 29 + mov ah, 09 + int 10h + + ;posición + mov dh, 10 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 12 ;light red + mov cx, 29 + mov ah, 09 + int 10h + + ;posición + mov dh, 11 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 14 ;yellow + mov cx, 29 + mov ah, 09 + int 10h + + ;posición + mov dh, 12 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 2 ;green + mov cx, 29 + mov ah, 09 + int 10h + + ;posición + mov dh, 13 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 11 ;light cyan + mov cx, 29 + mov ah, 09 + int 10h + + ;posición + mov dh, 14 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 1 ;blue + mov cx, 29 + mov ah, 09 + int 10h + + ;posición + mov dh, 15 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 5 ;magenta + mov cx, 29 + mov ah, 09 + int 10h + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad1/16 BANDERA/cuadricula.txt b/Unidad1/16 BANDERA/cuadricula.txt new file mode 100644 index 0000000..e55b1be --- /dev/null +++ b/Unidad1/16 BANDERA/cuadricula.txt @@ -0,0 +1,27 @@ +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------█████████████████████████████-------------------------- +-------------------------█████████████████████████████-------------------------- +-------------------------█████████████████████████████-------------------------- +-------------------------█████████████████████████████-------------------------- +-------------------------█████████████████████████████-------------------------- +-------------------------█████████████████████████████-------------------------- +-------------------------█████████████████████████████-------------------------- +-------------------------█████████████████████████████-------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- +-------------------------------------------------------------------------------- + +ALT + 219 = █ \ No newline at end of file diff --git a/Unidad1/TASM.EXE b/Unidad1/TASM.EXE new file mode 100644 index 0000000..f3867a6 Binary files /dev/null and b/Unidad1/TASM.EXE differ diff --git a/Unidad1/TLINK.EXE b/Unidad1/TLINK.EXE new file mode 100644 index 0000000..806a3b5 Binary files /dev/null and b/Unidad1/TLINK.EXE differ diff --git a/Unidad1/Unidad1/00.ASM b/Unidad1/Unidad1/00.ASM new file mode 100644 index 0000000..32e0a43 --- /dev/null +++ b/Unidad1/Unidad1/00.ASM @@ -0,0 +1 @@ +END \ No newline at end of file diff --git a/Unidad1/Unidad1/01.asm b/Unidad1/Unidad1/01.asm new file mode 100644 index 0000000..5a5f8a1 --- /dev/null +++ b/Unidad1/Unidad1/01.asm @@ -0,0 +1,10 @@ +.model small +.stack 64 +.data +.code + ;impresión caracter + mov dx,64 ;arroba + mov ah,02h ;servicio impresión + int 21h ;interrupción +.exit +end \ No newline at end of file diff --git a/Unidad1/Unidad1/02.asm b/Unidad1/Unidad1/02.asm new file mode 100644 index 0000000..a6e9161 --- /dev/null +++ b/Unidad1/Unidad1/02.asm @@ -0,0 +1,15 @@ +.model small +.stack 64 +.data +.code + mov dx,65 + mov ah,02h + int 21h + mov dx,78 + mov ah,02h + int 21h + mov dx,65 + mov ah,02h + int 21h +.Exit +end \ No newline at end of file diff --git a/Unidad1/Unidad1/03.asm b/Unidad1/Unidad1/03.asm new file mode 100644 index 0000000..9497987 --- /dev/null +++ b/Unidad1/Unidad1/03.asm @@ -0,0 +1,21 @@ +.model small +.stack 64 +.data +.code + mov dx,80 + mov ah,02h + int 21h + mov dx,65 + mov ah,02h + int 21h + mov dx,66 + mov ah,02h + int 21h + mov dx,76 + mov ah,02h + int 21h + mov dx,79 + mov ah,02h + int 21h +.Exit +end \ No newline at end of file diff --git a/Unidad1/Unidad1/04.asm b/Unidad1/Unidad1/04.asm new file mode 100644 index 0000000..ad6af65 --- /dev/null +++ b/Unidad1/Unidad1/04.asm @@ -0,0 +1,16 @@ +.model small +.stack 64 +.data +.code + ;posición de un caracter en el centro de la terminal + mov dh,12 ;renglón + mov dl,40 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + ;impresión arroba + mov dx,64 ;arroba + mov ah,02h ;servicio impresión + int 21h ;interrupción +.exit +end \ No newline at end of file diff --git a/Unidad1/Unidad1/05.asm b/Unidad1/Unidad1/05.asm new file mode 100644 index 0000000..f0300bc --- /dev/null +++ b/Unidad1/Unidad1/05.asm @@ -0,0 +1,51 @@ +.model small +.stack 64 +.data +.code + ;posición de un caracter en el centro de la terminal + mov dh,12 ;renglón + mov dl,38 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + mov dx,80 + mov ah,02h + int 21h + + mov dh,12 ;renglón + mov dl,39 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + mov dx,65 + mov ah,02h + int 21h + + mov dh,12 ;renglón + mov dl,40 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + mov dx,66 + mov ah,02h + int 21h + + mov dh,12 ;renglón + mov dl,41 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + mov dx,76 + mov ah,02h + int 21h + + mov dh,12 ;renglón + mov dl,42 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + mov dx,79 + mov ah,02h + int 21h +.exit +end \ No newline at end of file diff --git a/Unidad1/Unidad1/06.asm b/Unidad1/Unidad1/06.asm new file mode 100644 index 0000000..e722577 --- /dev/null +++ b/Unidad1/Unidad1/06.asm @@ -0,0 +1,74 @@ +.model small +.stack 64 +.data +.code + ;code + ;posición de un caracter en el centro de la terminal + mov dh,12 ;renglón + mov dl,42 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + ;impresión PABLO + mov dx,80 + mov ah,02h + int 21h + mov dx,65 + mov ah,02h + int 21h + mov dx,66 + mov ah,02h + int 21h + mov dx,76 + mov ah,02h + int 21h + mov dx,79 + mov ah,02h + int 21h + + ;posición de un caracter debajo de la P de PABLO + mov dh,13 ;renglón + mov dl,42 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + ;impresión A + mov dx,65 + mov ah,02h + int 21h + + ;posición de un caracter debajo de la A anterior + mov dh,14 ;renglón + mov dl,42 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + ;impresión B + mov dx,66 + mov ah,02h + int 21h + + ;posición de un caracter debajo de la B anterior + mov dh,15 ;renglón + mov dl,42 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + ;impresión L + mov dx,76 + mov ah,02h + int 21h + + ;posición de un caracter debajo de la L anterior + mov dh,16 ;renglón + mov dl,42 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + ;impresión O + mov dx,79 + mov ah,02h + int 21h + +.exit +end \ No newline at end of file diff --git a/Unidad1/Unidad1/07.asm b/Unidad1/Unidad1/07.asm new file mode 100644 index 0000000..92d2a02 --- /dev/null +++ b/Unidad1/Unidad1/07.asm @@ -0,0 +1,142 @@ +.model small +.stack 64 +.data +.code + ;circulo + + Limpiar: + mov ax, 03 + int 10h + + Circulo: + ;cruz principal + mov dh, 5 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 12 + mov dl, 26 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 12 + mov dl, 54 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 19 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + ;complemento del circulo + mov dh, 6 + mov dl, 34 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 6 + mov dl, 46 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 29 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 51 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 10 + mov dl, 27 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 10 + mov dl, 53 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 14 + mov dl, 27 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 14 + mov dl, 53 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 29 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 51 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 18 + mov dl, 34 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 18 + mov dl, 46 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h +.exit +end diff --git a/Unidad1/Unidad1/08.asm b/Unidad1/Unidad1/08.asm new file mode 100644 index 0000000..1ade085 --- /dev/null +++ b/Unidad1/Unidad1/08.asm @@ -0,0 +1,175 @@ +.model small +.stack 64 +.data +.code + ;corazon + + Limpiar: + mov ax, 03 + int 10h + + Corazon: + mov dh, 6 + mov dl, 30 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 6 + mov dl, 33 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 6 + mov dl, 47 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 6 + mov dl, 50 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 7 + mov dl, 28 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 7 + mov dl, 35 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 7 + mov dl, 45 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 7 + mov dl, 52 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 29 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 51 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 10 + mov dl, 31 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 10 + mov dl, 49 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 12 + mov dl, 33 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 12 + mov dl, 47 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 14 + mov dl, 35 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 14 + mov dl, 45 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 37 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 43 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 17 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad1/Unidad1/09.asm b/Unidad1/Unidad1/09.asm new file mode 100644 index 0000000..9e13a5a --- /dev/null +++ b/Unidad1/Unidad1/09.asm @@ -0,0 +1,208 @@ +.model small +.stack 64 +.data +.code + ; + + Limpiar: + mov ax, 03 + int 10h + + Estrella: + mov dh, 4 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 6 + mov dl, 38 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 6 + mov dl, 42 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 28 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 32 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 36 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 44 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 48 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 52 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 10 + mov dl, 30 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 10 + mov dl, 50 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 12 + mov dl, 32 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 12 + mov dl, 48 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 14 + mov dl, 30 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 14 + mov dl, 50 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 28 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 32 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 36 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 44 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 48 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 52 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 18 + mov dl, 38 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 18 + mov dl, 42 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 20 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad1/Unidad1/10.asm b/Unidad1/Unidad1/10.asm new file mode 100644 index 0000000..0ca6471 --- /dev/null +++ b/Unidad1/Unidad1/10.asm @@ -0,0 +1,277 @@ +.model small +.stack 64 +.data +.code + ; + + Limpiar: + mov ax, 03 + int 10h + + Circulo: + ;cruz principal + mov dh, 5 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 12 + mov dl, 26 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 12 + mov dl, 54 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 19 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + ;complemento del circulo + mov dh, 6 + mov dl, 34 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 6 + mov dl, 46 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 29 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 51 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 10 + mov dl, 27 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 10 + mov dl, 53 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 14 + mov dl, 27 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 14 + mov dl, 53 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 29 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 51 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 18 + mov dl, 34 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 18 + mov dl, 46 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + Cara: + ;ojos + mov dh, 8 + mov dl, 34 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 35 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 45 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 8 + mov dl, 46 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 9 + mov dl, 34 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 9 + mov dl, 35 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 9 + mov dl, 45 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 9 + mov dl, 46 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + ;nariz + mov dh, 12 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + ;boca + mov dh, 14 + mov dl, 32 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 14 + mov dl, 48 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 15 + mov dl, 34 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 15 + mov dl, 46 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 37 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 16 + mov dl, 43 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + + mov dh, 17 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 46 + mov ah, 02h + int 21h + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad1/Unidad1/11.asm b/Unidad1/Unidad1/11.asm new file mode 100644 index 0000000..b46d954 --- /dev/null +++ b/Unidad1/Unidad1/11.asm @@ -0,0 +1,591 @@ +.model small +.stack 64 +.data +.code + ; + + Limpiar: + mov ax, 03 + int 10h + + Cuadricula: + mov dh, 5 + mov dl, 35 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 5 + mov dl, 36 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 5 + mov dl, 39 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 5 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 5 + mov dl, 43 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 5 + mov dl, 44 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 5 + mov dl, 47 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 5 + mov dl, 48 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 6 + mov dl, 37 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 6 + mov dl, 38 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 6 + mov dl, 41 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 6 + mov dl, 42 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 6 + mov dl, 45 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 6 + mov dl, 46 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 6 + mov dl, 49 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 6 + mov dl, 50 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 7 + mov dl, 35 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 7 + mov dl, 36 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 7 + mov dl, 39 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 7 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 7 + mov dl, 43 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 7 + mov dl, 44 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 7 + mov dl, 47 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 7 + mov dl, 48 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 8 + mov dl, 37 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 8 + mov dl, 38 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 8 + mov dl, 41 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 8 + mov dl, 42 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 8 + mov dl, 45 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 8 + mov dl, 46 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 8 + mov dl, 49 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 8 + mov dl, 50 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 9 + mov dl, 35 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 9 + mov dl, 36 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 9 + mov dl, 39 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 9 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 9 + mov dl, 43 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 9 + mov dl, 44 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 9 + mov dl, 47 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 9 + mov dl, 48 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 10 + mov dl, 37 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 10 + mov dl, 38 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 10 + mov dl, 41 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 10 + mov dl, 42 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 10 + mov dl, 45 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 10 + mov dl, 46 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 10 + mov dl, 49 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 10 + mov dl, 50 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 11 + mov dl, 35 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 11 + mov dl, 36 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 11 + mov dl, 39 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 11 + mov dl, 40 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 11 + mov dl, 43 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 11 + mov dl, 44 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 11 + mov dl, 47 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 11 + mov dl, 48 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 12 + mov dl, 37 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 12 + mov dl, 38 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 12 + mov dl, 41 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 12 + mov dl, 42 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 12 + mov dl, 45 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 12 + mov dl, 46 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 12 + mov dl, 49 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + + mov dh, 12 + mov dl, 50 + mov ah, 02h + int 10h + mov dx, 219 + mov ah, 02h + int 21h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad1/Unidad1/12.asm b/Unidad1/Unidad1/12.asm new file mode 100644 index 0000000..057da76 --- /dev/null +++ b/Unidad1/Unidad1/12.asm @@ -0,0 +1,27 @@ +.model small +.stack 64 +.data +.code + Limpiar: + mov ax, 03 + int 10h + + Centrar: + ;posición de un caracter en el centro de la terminal + mov dh,12 ;renglón + mov dl,40 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + Pintar: + mov al, 64 ;caracter + mov bl, 4 ;color + mov cx, 1 ;cantidad de caracteres + mov ah, 09 ;servicio + int 10h ;interrupción + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad1/Unidad1/13.asm b/Unidad1/Unidad1/13.asm new file mode 100644 index 0000000..6565265 --- /dev/null +++ b/Unidad1/Unidad1/13.asm @@ -0,0 +1,218 @@ +.model small +.stack 64 +.data +.code + ; + + Limpiar: + mov ax, 03 + int 10h + + Circulo: + ;posición + mov dh,2 + mov dl,10 + mov ah ,02h + int 10h + ;pintar + mov al, 219 ;caracter + mov bl, 4 ;rojo + mov cx, 10 ;cantidad de caracteres + mov ah, 09 ;servicio + int 10h ;interrupción + + mov dh,3 + mov dl,8 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 14 + mov ah, 09 + int 10h + + mov dh,4 + mov dl,6 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 18 + mov ah, 09 + int 10h + + mov dh,5 + mov dl,4 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 6 + mov ah, 09 + int 10h + + mov dh,5 + mov dl,12 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 6 + mov ah, 09 + int 10h + + mov dh,5 + mov dl,20 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 6 + mov ah, 09 + int 10h + + mov dh,6 + mov dl,4 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 6 + mov ah, 09 + int 10h + + mov dh,6 + mov dl,12 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 6 + mov ah, 09 + int 10h + + mov dh,6 + mov dl,20 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 6 + mov ah, 09 + int 10h + + mov dh,7 + mov dl,4 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 22 + mov ah, 09 + int 10h + + mov dh,8 + mov dl,4 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 4 + mov ah, 09 + int 10h + + mov dh,8 + mov dl,10 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 10 + mov ah, 09 + int 10h + + mov dh,8 + mov dl,22 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 4 + mov ah, 09 + int 10h + + mov dh,9 + mov dl,4 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 6 + mov ah, 09 + int 10h + + mov dh,9 + mov dl,12 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 6 + mov ah, 09 + int 10h + + mov dh,9 + mov dl,20 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 6 + mov ah, 09 + int 10h + + mov dh,10 + mov dl,6 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 6 + mov ah, 09 + int 10h + + mov dh,10 + mov dl,18 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 6 + mov ah, 09 + int 10h + + mov dh,11 + mov dl,8 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 14 + mov ah, 09 + int 10h + + mov dh,12 + mov dl,10 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 10 + mov ah, 09 + int 10h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad1/Unidad1/14.asm b/Unidad1/Unidad1/14.asm new file mode 100644 index 0000000..3be2666 --- /dev/null +++ b/Unidad1/Unidad1/14.asm @@ -0,0 +1,531 @@ +.model small +.stack 64 +.data +.code + ;corazon + + Limpiar: + mov ax, 03 + int 10h + + Corazon: + ;posición + mov dh, 6 + mov dl, 30 + mov ah, 02h + int 10h + ;pintar + mov al, 220 ;caracter + mov bl, 4 ;color + mov cx, 1 ;cantidad de caracteres + mov ah, 09 ;servicio + int 10h ;interrupción + + ;posición + mov dh, 6 + mov dl, 31 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 6 + mov dl, 32 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 6 + mov dl, 33 + mov ah, 02h + int 10h + ;pintar + mov al, 220 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 6 + mov dl, 47 + mov ah, 02h + int 10h + ;pintar + mov al, 220 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 6 + mov dl, 48 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 6 + mov dl, 49 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 6 + mov dl, 50 + mov ah, 02h + int 10h + ;pintar + mov al, 220 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 7 + mov dl, 29 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 7 + mov dl, 30 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 6 + mov ah, 09 + int 10h + + ;posición + mov dh, 7 + mov dl, 45 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 6 + mov ah, 09 + int 10h + + ;posición + mov dh, 7 + mov dl, 51 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 8 + mov dl, 30 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 8 + mov dl, 31 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 7 + mov ah, 09 + int 10h + + ;posición + mov dh, 8 + mov dl, 43 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 7 + mov ah, 09 + int 10h + + ;posición + mov dh, 8 + mov dl, 50 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 9 + mov dl, 31 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 9 + mov dl, 32 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 8 + mov ah, 09 + int 10h + + ;posición + mov dh, 9 + mov dl, 40 + mov ah, 02h + int 10h + ;pintar + mov al, 220 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 9 + mov dl, 41 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 8 + mov ah, 09 + int 10h + + ;posición + mov dh, 9 + mov dl, 49 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 10 + mov dl, 32 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 10 + mov dl, 33 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 15 + mov ah, 09 + int 10h + + ;posición + mov dh, 10 + mov dl, 48 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 11 + mov dl, 33 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 11 + mov dl, 34 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 13 + mov ah, 09 + int 10h + + ;posición + mov dh, 11 + mov dl, 47 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 12 + mov dl, 34 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 12 + mov dl, 35 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 11 + mov ah, 09 + int 10h + + ;posición + mov dh, 12 + mov dl, 46 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 13 + mov dl, 35 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 13 + mov dl, 36 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 9 + mov ah, 09 + int 10h + + ;posición + mov dh, 13 + mov dl, 45 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 14 + mov dl, 36 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 14 + mov dl, 37 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 7 + mov ah, 09 + int 10h + + ;posición + mov dh, 14 + mov dl, 44 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 15 + mov dl, 37 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 15 + mov dl, 38 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 5 + mov ah, 09 + int 10h + + ;posición + mov dh, 15 + mov dl, 43 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 16 + mov dl, 38 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 16 + mov dl, 39 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 + mov cx, 3 + mov ah, 09 + int 10h + + ;posición + mov dh, 16 + mov dl, 42 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + + ;posición + mov dh, 17 + mov dl, 40 + mov ah, 02h + int 10h + ;pintar + mov al, 223 + mov bl, 4 + mov cx, 1 + mov ah, 09 + int 10h + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad1/Unidad1/15.1.asm b/Unidad1/Unidad1/15.1.asm new file mode 100644 index 0000000..4779ff6 --- /dev/null +++ b/Unidad1/Unidad1/15.1.asm @@ -0,0 +1,129 @@ +.model small +.stack 64 +.data +.code + ; + + Limpiar: + mov ax, 03 + int 10h + + Circulo: + ;posición + mov dh,2 + mov dl,10 + mov ah ,02h + int 10h + ;pintar + mov al, 219 ;caracter + mov bl, 4 ;rojo + mov cx, 10 ;cantidad de caracteres + mov ah, 09 ;servicio + int 10h ;interrupción + + mov dh,3 + mov dl,8 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 14 + mov ah, 09 + int 10h + + mov dh,4 + mov dl,6 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 18 + mov ah, 09 + int 10h + + mov dh,5 + mov dl,4 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 22 + mov ah, 09 + int 10h + + mov dh,6 + mov dl,4 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 22 + mov ah, 09 + int 10h + + mov dh,7 + mov dl,4 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 22 + mov cx, 22 + mov ah, 09 + int 10h + + mov dh,8 + mov dl,4 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 22 + mov ah, 09 + int 10h + + mov dh,9 + mov dl,4 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 22 + mov ah, 09 + int 10h + + mov dh,10 + mov dl,6 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 18 + mov ah, 09 + int 10h + + mov dh,11 + mov dl,8 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 14 + mov ah, 09 + int 10h + + mov dh,12 + mov dl,10 + mov ah ,02h + int 10h + mov al, 219 + mov bl, 4 + mov cx, 10 + mov ah, 09 + int 10h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad1/Unidad1/15.2.asm b/Unidad1/Unidad1/15.2.asm new file mode 100644 index 0000000..151fa72 --- /dev/null +++ b/Unidad1/Unidad1/15.2.asm @@ -0,0 +1,112 @@ +.model small +.stack 64 +.data +.code + ; + + Limpiar: + mov ax, 03 + int 10h + + Cuadrado: + ;posición + mov dh, 8 + mov dl, 33 + mov ah, 02h + int 10h + ;pintar + mov al, 219 ;caracter + mov bl, 14 ;yellow + mov cx, 16 ;cantidad de caracteres + mov ah, 09 ;servicio + int 10h ;interrupción + + ;posición + mov dh, 9 + mov dl, 33 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 14 ;yellow + mov cx, 16 + mov ah, 09 + int 10h + + ;posición + mov dh, 10 + mov dl, 33 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 14 ;yellow + mov cx, 16 + mov ah, 09 + int 10h + + ;posición + mov dh, 11 + mov dl, 33 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 14 ;yellow + mov cx, 16 + mov ah, 09 + int 10h + + ;posición + mov dh, 12 + mov dl, 33 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 14 ;yellow + mov cx, 16 + mov ah, 09 + int 10h + + ;posición + mov dh, 13 + mov dl, 33 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 14 ;yellow + mov cx, 16 + mov ah, 09 + int 10h + + ;posición + mov dh, 14 + mov dl, 33 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 14 ;yellow + mov cx, 16 + mov ah, 09 + int 10h + + ;posición + mov dh, 15 + mov dl, 33 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 14 ;yellow + mov cx, 16 + mov ah, 09 + int 10h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad1/Unidad1/15.3.asm b/Unidad1/Unidad1/15.3.asm new file mode 100644 index 0000000..4fd0fb4 --- /dev/null +++ b/Unidad1/Unidad1/15.3.asm @@ -0,0 +1,112 @@ +.model small +.stack 64 +.data +.code + ; + + Limpiar: + mov ax, 03 + int 10h + + Rectangulo: + ;posición + mov dh, 8 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 ;caracter + mov bl, 2 ;green + mov cx, 29 ;cantidad de caracteres + mov ah, 09 ;servicio + int 10h ;interrupción + + ;posición + mov dh, 9 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 2 ;green + mov cx, 29 + mov ah, 09 + int 10h + + ;posición + mov dh, 10 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 2 ;green + mov cx, 29 + mov ah, 09 + int 10h + + ;posición + mov dh, 11 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 2 ;green + mov cx, 29 + mov ah, 09 + int 10h + + ;posición + mov dh, 12 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 2 ;green + mov cx, 29 + mov ah, 09 + int 10h + + ;posición + mov dh, 13 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 2 ;green + mov cx, 29 + mov ah, 09 + int 10h + + ;posición + mov dh, 14 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 2 ;green + mov cx, 29 + mov ah, 09 + int 10h + + ;posición + mov dh, 15 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 2 ;green + mov cx, 29 + mov ah, 09 + int 10h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad1/Unidad1/15.4.asm b/Unidad1/Unidad1/15.4.asm new file mode 100644 index 0000000..5edad2d --- /dev/null +++ b/Unidad1/Unidad1/15.4.asm @@ -0,0 +1,111 @@ +.model small +.stack 64 +.data +.code + ; + + Limpiar: + mov ax, 03 + int 10h + + Triangulo: + ;posición + mov dh, 8 + mov dl, 39 + mov ah, 02h + int 10h + ;pintar + mov al, 219 ;caracter + mov bl, 1 ;azul + mov cx, 2 ;cantidad de caracteres + mov ah, 09 ;servicio + int 10h ;interrupción + + ;posición + mov dh, 9 + mov dl, 38 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 1 ;azul + mov cx, 4 + mov ah, 09 + int 10h + + ;posición + mov dh, 10 + mov dl, 37 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 1 ;azul + mov cx, 6 + mov ah, 09 + int 10h + + ;posición + mov dh, 11 + mov dl, 36 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 1 ;azul + mov cx, 8 + mov ah, 09 + int 10h + + ;posición + mov dh, 12 + mov dl, 35 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 1 ;azul + mov cx, 10 + mov ah, 09 + int 10h + + ;posición + mov dh, 13 + mov dl, 34 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 1 ;azul + mov cx, 12 + mov ah, 09 + int 10h + + ;posición + mov dh, 14 + mov dl, 33 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 1 ;azul + mov cx, 14 + mov ah, 09 + int 10h + + ;posición + mov dh, 15 + mov dl, 32 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 1 ;azul + mov cx, 16 + mov ah, 09 + int 10h + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad1/Unidad1/16.asm b/Unidad1/Unidad1/16.asm new file mode 100644 index 0000000..2c927dd --- /dev/null +++ b/Unidad1/Unidad1/16.asm @@ -0,0 +1,111 @@ +.model small +.stack 64 +.data +.code + ; + + Limpiar: + mov ax, 03 + int 10h + + Bandera: + ;posición + mov dh, 8 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 ;caracter + mov bl, 13 ;color: light magenta + mov cx, 29 ;cantidad de caracteres + mov ah, 09 ;servicio + int 10h ;interrupción + + ;posición + mov dh, 9 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 4 ;red + mov cx, 29 + mov ah, 09 + int 10h + + ;posición + mov dh, 10 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 12 ;light red + mov cx, 29 + mov ah, 09 + int 10h + + ;posición + mov dh, 11 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 14 ;yellow + mov cx, 29 + mov ah, 09 + int 10h + + ;posición + mov dh, 12 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 2 ;green + mov cx, 29 + mov ah, 09 + int 10h + + ;posición + mov dh, 13 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 11 ;light cyan + mov cx, 29 + mov ah, 09 + int 10h + + ;posición + mov dh, 14 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 1 ;blue + mov cx, 29 + mov ah, 09 + int 10h + + ;posición + mov dh, 15 + mov dl, 26 + mov ah, 02h + int 10h + ;pintar + mov al, 219 + mov bl, 5 ;magenta + mov cx, 29 + mov ah, 09 + int 10h + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad1/exentar/EXENTAR.EXE b/Unidad1/exentar/EXENTAR.EXE new file mode 100644 index 0000000..9e4a498 Binary files /dev/null and b/Unidad1/exentar/EXENTAR.EXE differ diff --git a/Unidad1/exentar/EXENTAR.MAP b/Unidad1/exentar/EXENTAR.MAP new file mode 100644 index 0000000..8b062db --- /dev/null +++ b/Unidad1/exentar/EXENTAR.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 02AE4H 02AE5H _TEXT CODE + 02AE6H 02AE6H 00000H _DATA DATA + 02AF0H 02B2FH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad1/exentar/EXENTAR.OBJ b/Unidad1/exentar/EXENTAR.OBJ new file mode 100644 index 0000000..911751b Binary files /dev/null and b/Unidad1/exentar/EXENTAR.OBJ differ diff --git a/Unidad1/exentar/exentar.JPG b/Unidad1/exentar/exentar.JPG new file mode 100644 index 0000000..03605e8 Binary files /dev/null and b/Unidad1/exentar/exentar.JPG differ diff --git a/Unidad1/exentar/exentar.PNG b/Unidad1/exentar/exentar.PNG new file mode 100644 index 0000000..5065ccc Binary files /dev/null and b/Unidad1/exentar/exentar.PNG differ diff --git a/Unidad1/exentar/exentar.asm b/Unidad1/exentar/exentar.asm new file mode 100644 index 0000000..99804a8 --- /dev/null +++ b/Unidad1/exentar/exentar.asm @@ -0,0 +1,6939 @@ +.model small +.stack 64 +.data +.code + ; + + Limpiar: + mov ax, 03 + int 10h + Dibujo: + ;posicion + mov dh, 1 ;columna + mov dl, 16 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 1 ;columna + mov dl, 17 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 2 ;columna + mov dl, 16 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 2 ;columna + mov dl, 17 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 1 ;columna + mov dl, 18 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 1 ;columna + mov dl, 19 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 2 ;columna + mov dl, 17 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 2 ;columna + mov dl, 18 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 2 ;columna + mov dl, 19 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 2 ;columna + mov dl, 19 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 2 ;columna + mov dl, 42 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 4 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 2 ;columna + mov dl, 43 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 4 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 3 ;columna + mov dl, 17 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 3 ;columna + mov dl, 18 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 3 ;columna + mov dl, 19 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 3 ;columna + mov dl, 20 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 3 ;columna + mov dl, 20 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 3 ;columna + mov dl, 43 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 4 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 3 ;columna + mov dl, 44 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 4 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 4 ;columna + mov dl, 18 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 4 ;columna + mov dl, 19 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 4 ;columna + mov dl, 20 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 4 ;columna + mov dl, 21 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 4 ;columna + mov dl, 21 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 4 ;columna + mov dl, 43 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 4 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 3 ;columna + mov dl, 44 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 4 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 4 ;columna + mov dl, 18 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 4 ;columna + mov dl, 19 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 4 ;columna + mov dl, 20 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 4 ;columna + mov dl, 20 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 4 ;columna + mov dl, 22 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 4 ;columna + mov dl, 32 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 4 ;columna + mov dl, 33 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 4 ;columna + mov dl, 39 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 4 ;columna + mov dl, 40 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 4 ;columna + mov dl, 44 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 4 ;columna + mov dl, 45 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 4 ;columna + mov dl, 48 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 4 ;columna + mov dl, 49 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 5 ;columna + mov dl, 19 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 5 ;columna + mov dl, 20 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 5 ;columna + mov dl, 20 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 5 ;columna + mov dl, 21 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 5 ;columna + mov dl, 22 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 5 ;columna + mov dl, 26 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 5 ;columna + mov dl, 27 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 5 ;columna + mov dl, 27 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 5 ;columna + mov dl, 28 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 5 ;columna + mov dl, 29 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 5 ;columna + mov dl, 32 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 5 ;columna + mov dl, 33 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 5 ;columna + mov dl, 33 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 5 ;columna + mov dl, 39 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 5 ;columna + mov dl, 40 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 5 ;columna + mov dl, 40 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 5 ;columna + mov dl, 44 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 5 ;columna + mov dl, 45 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 5 ;columna + mov dl, 47 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 5 ;columna + mov dl, 48 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 5 ;columna + mov dl, 49 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 20 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 20 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 21 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 22 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 23 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 24 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 25 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 26 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 26 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 27 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 28 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 29 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 30 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 31 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 32 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 33 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 33 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 38 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 40 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 40 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 44 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 45 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 47 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 48 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 49 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 21 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 22 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 23 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 24 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 25 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 26 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 26 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 32 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 38 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 39 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 39 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 45 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 47 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 48 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 6 ;columna + mov dl, 49 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 7 ;columna + mov dl, 16 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 7 ;columna + mov dl, 17 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 7 ;columna + mov dl, 22 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 7 ;columna + mov dl, 23 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 7 ;columna + mov dl, 24 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 7 ;columna + mov dl, 25 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 7 ;columna + mov dl, 26 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 7 ;columna + mov dl, 28 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 7 ;columna + mov dl, 29 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 7 ;columna + mov dl, 30 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 7 ;columna + mov dl, 31 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 7 ;columna + mov dl, 32 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 7 ;columna + mov dl, 38 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 7 ;columna + mov dl, 38 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 7 ;columna + mov dl, 42 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 7 ;columna + mov dl, 43 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 7 ;columna + mov dl, 44 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 7 ;columna + mov dl, 46 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 7 ;columna + mov dl, 47 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 7 ;columna + mov dl, 48 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 7 ;columna + mov dl, 49 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 16 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 17 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 18 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 21 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 22 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 23 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 24 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 27 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 28 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 29 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 30 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 31 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 32 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 32 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 33 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 37 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 39 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 40 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 41 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 42 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 43 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 44 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 45 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 45 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 46 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 47 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 48 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 17 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 18 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 21 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 21 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 22 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 23 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 26 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 26 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 27 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 28 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 29 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 30 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 31 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 32 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 33 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 33 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 38 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 39 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 39 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 40 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 41 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 42 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 43 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 44 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 45 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 46 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 8 ;columna + mov dl, 47 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 17 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 18 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 19 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 20 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 21 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 22 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 25 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 26 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 26 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 27 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 28 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 29 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 30 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 31 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 32 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 32 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 33 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 36 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 37 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 38 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 39 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 39 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 40 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 41 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 42 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 43 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 44 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 9 ;columna + mov dl, 45 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 18 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 19 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 20 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 21 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 21 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 22 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 24 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 25 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 26 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 31 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 32 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 33 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 33 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 35 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 36 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 37 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 38 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 39 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 39 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 40 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 41 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 42 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 43 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 44 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 45 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 11 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 12 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 13 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 14 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 15 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 18 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 19 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 20 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 20 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 21 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 22 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 24 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 25 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 26 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 27 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 28 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 31 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 32 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 32 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 33 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 34 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 35 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 36 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 37 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 38 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 39 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 40 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 40 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 41 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 42 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 43 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 44 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 10 ;columna + mov dl, 45 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 12 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 13 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 13 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 14 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 15 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 16 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 19 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 20 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 20 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 21 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 23 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 24 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 25 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 26 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 27 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 30 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 31 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 32 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 33 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 34 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 35 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 36 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 37 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 38 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 38 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 39 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 40 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 41 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 42 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 43 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 44 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 45 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 11 ;columna + mov dl, 45 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 13 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 14 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 15 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 16 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 17 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 18 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 20 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 20 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 21 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 23 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 24 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 25 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 26 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 26 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 27 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 28 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 29 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 30 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 31 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 32 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 34 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 35 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 36 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 37 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 38 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 39 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 39 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 40 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 41 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 42 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 43 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 44 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 45 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 46 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 16 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 17 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 18 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 19 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 20 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 20 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 22 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 23 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 24 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 25 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 25 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 27 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 27 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 28 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 29 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 30 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 5 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 31 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 5 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 31 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 5 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 32 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 34 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 35 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 36 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 37 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 12 ;columna + mov dl, 38 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 39 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 39 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 40 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 41 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 42 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 43 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 44 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 45 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 45 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 19 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 20 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 21 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 21 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 23 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 24 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 25 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 26 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 27 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 27 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 28 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 29 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 30 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 31 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 30 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 5 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 31 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 5 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 32 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 32 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 34 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 35 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 38 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 39 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 39 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 40 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 41 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 42 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 43 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 44 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 45 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 45 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 47 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 48 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 13 ;columna + mov dl, 49 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 18 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 19 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 20 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 20 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 21 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 23 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 24 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 25 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 26 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 26 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 27 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 28 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 29 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 30 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 5 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 31 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 5 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 32 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 33 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 33 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 34 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 35 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 36 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 39 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 40 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 41 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 42 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 43 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 44 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 45 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 46 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 46 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 47 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 48 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 49 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 50 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 16 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 17 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 18 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 19 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 21 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 21 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 22 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 24 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 25 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 26 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 27 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 27 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 28 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 28 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 29 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 30 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 5 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 31 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 32 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 33 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 36 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 37 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 38 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 42 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 43 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 44 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 47 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 14 ;columna + mov dl, 48 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 49 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 50 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 15 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 16 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 17 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 18 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 20 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 22 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 22 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 24 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 25 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 26 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 27 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 30 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 31 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 32 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 33 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 33 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 36 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 37 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 38 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 47 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 48 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 49 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 50 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 15 ;columna + mov dl, 51 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 16 ;columna + mov dl, 15 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 16 ;columna + mov dl, 15 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 16 ;columna + mov dl, 20 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 16 ;columna + mov dl, 21 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 16 ;columna + mov dl, 22 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 16 ;columna + mov dl, 24 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 16 ;columna + mov dl, 25 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 16 ;columna + mov dl, 26 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 16 ;columna + mov dl, 27 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 16 ;columna + mov dl, 28 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 16 ;columna + mov dl, 28 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 16 ;columna + mov dl, 31 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 16 ;columna + mov dl, 32 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 16 ;columna + mov dl, 32 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 16 ;columna + mov dl, 37 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 16 ;columna + mov dl, 37 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 16 ;columna + mov dl, 38 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 16 ;columna + mov dl, 38 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 16 ;columna + mov dl, 48 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 16 ;columna + mov dl, 49 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 16 ;columna + mov dl, 50 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 16 ;columna + mov dl, 51 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 17 ;columna + mov dl, 21 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 17 ;columna + mov dl, 22 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 17 ;columna + mov dl, 23 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 17 ;columna + mov dl, 25 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 17 ;columna + mov dl, 26 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 17 ;columna + mov dl, 31 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 17 ;columna + mov dl, 32 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 17 ;columna + mov dl, 37 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 17 ;columna + mov dl, 38 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 17 ;columna + mov dl, 39 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 17 ;columna + mov dl, 50 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 17 ;columna + mov dl, 51 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 15 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 17 ;columna + mov dl, 22 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 17 ;columna + mov dl, 23 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 17 ;columna + mov dl, 24 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 17 ;columna + mov dl, 26 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 17 ;columna + mov dl, 27 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 17 ;columna + mov dl, 28 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 17 ;columna + mov dl, 29 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 17 ;columna + mov dl, 30 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 13 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 17 ;columna + mov dl, 31 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 17 ;columna + mov dl, 33 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 17 ;columna + mov dl, 37 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 17 ;columna + mov dl, 38 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 17 ;columna + mov dl, 39 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 17 ;columna + mov dl, 39 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 18 ;columna + mov dl, 18 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 18 ;columna + mov dl, 19 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 18 ;columna + mov dl, 24 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 18 ;columna + mov dl, 25 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 18 ;columna + mov dl, 26 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 18 ;columna + mov dl, 31 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 18 ;columna + mov dl, 32 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 18 ;columna + mov dl, 33 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 18 ;columna + mov dl, 38 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 18 ;columna + mov dl, 40 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 19 ;columna + mov dl, 16 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 19 ;columna + mov dl, 17 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 19 ;columna + mov dl, 18 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 19 ;columna + mov dl, 18 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 19 ;columna + mov dl, 19 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 19 ;columna + mov dl, 20 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 19 ;columna + mov dl, 26 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 19 ;columna + mov dl, 26 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 19 ;columna + mov dl, 27 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 19 ;columna + mov dl, 28 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 19 ;columna + mov dl, 29 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 19 ;columna + mov dl, 30 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 19 ;columna + mov dl, 33 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 19 ;columna + mov dl, 33 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 19 ;columna + mov dl, 38 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 19 ;columna + mov dl, 39 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 19 ;columna + mov dl, 15 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 19 ;columna + mov dl, 16 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 19 ;columna + mov dl, 17 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 19 ;columna + mov dl, 18 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 19 ;columna + mov dl, 19 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 19 ;columna + mov dl, 20 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 19 ;columna + mov dl, 33 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 19 ;columna + mov dl, 33 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 19 ;columna + mov dl, 39 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 19 ;columna + mov dl, 39 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 6 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 20 ;columna + mov dl, 14 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 20 ;columna + mov dl, 15 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 20 ;columna + mov dl, 16 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 20 ;columna + mov dl, 17 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 20 ;columna + mov dl, 18 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 20 ;columna + mov dl, 18 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 21 ;columna + mov dl, 14 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 21 ;columna + mov dl, 14 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 21 ;columna + mov dl, 15 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + ;posicion + mov dh, 21 ;columna + mov dl, 16 ;fila + mov ah, 02h ;servicio + int 10h ;interrupcion + ;impresion + mov al, 219 ;caracter + mov bl, 2 ;color + mov cx, 1 ;cantidad caracteres + mov ah, 09 ;servicio + int 10h ;interrupcion + + Nombre: + ;posición de un caracter en el centro de la terminal + mov dh,12 ;renglón + mov dl,65 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + ;impresión PABLO + mov dx,80 + mov ah,02h + int 21h + mov dx,65 + mov ah,02h + int 21h + mov dx,66 + mov ah,02h + int 21h + mov dx,76 + mov ah,02h + int 21h + mov dx,79 + mov ah,02h + int 21h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad1/exentar/exentar_.JPG b/Unidad1/exentar/exentar_.JPG new file mode 100644 index 0000000..be5de1d Binary files /dev/null and b/Unidad1/exentar/exentar_.JPG differ diff --git a/Unidad2/01 HOLA MUNDO/01.EXE b/Unidad2/01 HOLA MUNDO/01.EXE new file mode 100644 index 0000000..455a9d6 Binary files /dev/null and b/Unidad2/01 HOLA MUNDO/01.EXE differ diff --git a/Unidad2/01 HOLA MUNDO/01.MAP b/Unidad2/01 HOLA MUNDO/01.MAP new file mode 100644 index 0000000..0f57e43 --- /dev/null +++ b/Unidad2/01 HOLA MUNDO/01.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 00018H 00019H _TEXT CODE + 0001AH 00026H 0000DH _DATA DATA + 00030H 0006FH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad2/01 HOLA MUNDO/01.OBJ b/Unidad2/01 HOLA MUNDO/01.OBJ new file mode 100644 index 0000000..bfeeb71 Binary files /dev/null and b/Unidad2/01 HOLA MUNDO/01.OBJ differ diff --git a/Unidad2/01 HOLA MUNDO/01.asm b/Unidad2/01 HOLA MUNDO/01.asm new file mode 100644 index 0000000..4d2a9ce --- /dev/null +++ b/Unidad2/01 HOLA MUNDO/01.asm @@ -0,0 +1,23 @@ +.model small +.stack 64 +.data + hola db 'hola mundo','$', 10,13 +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + HolaMundo: + mov ah,09h + lea dx, hola + int 21h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/02 NOMBRE/02.EXE b/Unidad2/02 NOMBRE/02.EXE new file mode 100644 index 0000000..c90c0c3 Binary files /dev/null and b/Unidad2/02 NOMBRE/02.EXE differ diff --git a/Unidad2/02 NOMBRE/02.MAP b/Unidad2/02 NOMBRE/02.MAP new file mode 100644 index 0000000..816a699 --- /dev/null +++ b/Unidad2/02 NOMBRE/02.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 00018H 00019H _TEXT CODE + 0001AH 0002EH 00015H _DATA DATA + 00030H 0006FH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad2/02 NOMBRE/02.OBJ b/Unidad2/02 NOMBRE/02.OBJ new file mode 100644 index 0000000..61bcb1d Binary files /dev/null and b/Unidad2/02 NOMBRE/02.OBJ differ diff --git a/Unidad2/02 NOMBRE/02.asm b/Unidad2/02 NOMBRE/02.asm new file mode 100644 index 0000000..2b8f212 --- /dev/null +++ b/Unidad2/02 NOMBRE/02.asm @@ -0,0 +1,23 @@ +.model small +.stack 64 +.data + nombre db 'pablo aguiar solis','$', 10,13 +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + ImprimirNombre: + mov ah,09h + lea dx, nombre + int 21h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/03 NOMBRE MULTILINEA/03.EXE b/Unidad2/03 NOMBRE MULTILINEA/03.EXE new file mode 100644 index 0000000..505aa7e Binary files /dev/null and b/Unidad2/03 NOMBRE MULTILINEA/03.EXE differ diff --git a/Unidad2/03 NOMBRE MULTILINEA/03.MAP b/Unidad2/03 NOMBRE MULTILINEA/03.MAP new file mode 100644 index 0000000..8892952 --- /dev/null +++ b/Unidad2/03 NOMBRE MULTILINEA/03.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 00018H 00019H _TEXT CODE + 0001AH 0002CH 00013H _DATA DATA + 00030H 0006FH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad2/03 NOMBRE MULTILINEA/03.OBJ b/Unidad2/03 NOMBRE MULTILINEA/03.OBJ new file mode 100644 index 0000000..77f7c6e Binary files /dev/null and b/Unidad2/03 NOMBRE MULTILINEA/03.OBJ differ diff --git a/Unidad2/03 NOMBRE MULTILINEA/03.asm b/Unidad2/03 NOMBRE MULTILINEA/03.asm new file mode 100644 index 0000000..af17e17 --- /dev/null +++ b/Unidad2/03 NOMBRE MULTILINEA/03.asm @@ -0,0 +1,24 @@ +.model small +.stack 64 +.data + nombre db 'pablo',10 ,'aguiar', 10, 'solis', '$' +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + ImprimirNombre: + ;nombre + mov ah,09h + lea dx, nombre + int 21h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/04 LEER NOMBRE/04.EXE b/Unidad2/04 LEER NOMBRE/04.EXE new file mode 100644 index 0000000..1101840 Binary files /dev/null and b/Unidad2/04 LEER NOMBRE/04.EXE differ diff --git a/Unidad2/04 LEER NOMBRE/04.MAP b/Unidad2/04 LEER NOMBRE/04.MAP new file mode 100644 index 0000000..20f869a --- /dev/null +++ b/Unidad2/04 LEER NOMBRE/04.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 0002CH 0002DH _TEXT CODE + 0002EH 000A7H 0007AH _DATA DATA + 000B0H 000EFH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad2/04 LEER NOMBRE/04.OBJ b/Unidad2/04 LEER NOMBRE/04.OBJ new file mode 100644 index 0000000..d318884 Binary files /dev/null and b/Unidad2/04 LEER NOMBRE/04.OBJ differ diff --git a/Unidad2/04 LEER NOMBRE/04.asm b/Unidad2/04 LEER NOMBRE/04.asm new file mode 100644 index 0000000..a665f12 --- /dev/null +++ b/Unidad2/04 LEER NOMBRE/04.asm @@ -0,0 +1,37 @@ +.model small +.stack 64 +.data + msj db 'Ingresa tu nombre: ', '$', 10 + nombre db 100 DUP(0), '$' +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + PedirNombre: + ;msj ingresa nombre + mov ah,09h + lea dx, msj + int 21h + + ;cachamos lo ingresado + mov ah, 3fh + mov bx, 00 + mov cx, 100 + lea dx, nombre + int 21h + + ;desplegar lo cachado + mov ah, 09h + lea dx, nombre + int 21h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/05 LEER NUMERO/05.EXE b/Unidad2/05 LEER NUMERO/05.EXE new file mode 100644 index 0000000..af095e3 Binary files /dev/null and b/Unidad2/05 LEER NUMERO/05.EXE differ diff --git a/Unidad2/05 LEER NUMERO/05.MAP b/Unidad2/05 LEER NUMERO/05.MAP new file mode 100644 index 0000000..8e5d81c --- /dev/null +++ b/Unidad2/05 LEER NUMERO/05.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 0002CH 0002DH _TEXT CODE + 0002EH 000A6H 00079H _DATA DATA + 000B0H 000EFH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad2/05 LEER NUMERO/05.OBJ b/Unidad2/05 LEER NUMERO/05.OBJ new file mode 100644 index 0000000..4b5993b Binary files /dev/null and b/Unidad2/05 LEER NUMERO/05.OBJ differ diff --git a/Unidad2/05 LEER NUMERO/05.asm b/Unidad2/05 LEER NUMERO/05.asm new file mode 100644 index 0000000..e0df5af --- /dev/null +++ b/Unidad2/05 LEER NUMERO/05.asm @@ -0,0 +1,37 @@ +.model small +.stack 64 +.data + msj db 'Ingresa un numero: ', '$' + numero db 100 DUP(?),'$' +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + PedirNombre: + ;msj ingresa número + mov ah,09h + lea dx, msj + int 21h + + ;cachamos lo ingresado + mov ah, 3fh + mov bx, 00 + mov cx, 100 + lea dx, numero + int 21h + + ;desplegar lo cachado + mov ah, 09h + lea dx, numero + int 21h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/12 PRACTICAS EXPOS/EXPO 1/06 NOMBRE DIAGONAL/06.EXE b/Unidad2/12 PRACTICAS EXPOS/EXPO 1/06 NOMBRE DIAGONAL/06.EXE new file mode 100644 index 0000000..4b391c7 Binary files /dev/null and b/Unidad2/12 PRACTICAS EXPOS/EXPO 1/06 NOMBRE DIAGONAL/06.EXE differ diff --git a/Unidad2/12 PRACTICAS EXPOS/EXPO 1/06 NOMBRE DIAGONAL/06.MAP b/Unidad2/12 PRACTICAS EXPOS/EXPO 1/06 NOMBRE DIAGONAL/06.MAP new file mode 100644 index 0000000..cd49a42 --- /dev/null +++ b/Unidad2/12 PRACTICAS EXPOS/EXPO 1/06 NOMBRE DIAGONAL/06.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 00057H 00058H _TEXT CODE + 00058H 00058H 00000H _DATA DATA + 00060H 0009FH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad2/12 PRACTICAS EXPOS/EXPO 1/06 NOMBRE DIAGONAL/06.OBJ b/Unidad2/12 PRACTICAS EXPOS/EXPO 1/06 NOMBRE DIAGONAL/06.OBJ new file mode 100644 index 0000000..5ab72fd Binary files /dev/null and b/Unidad2/12 PRACTICAS EXPOS/EXPO 1/06 NOMBRE DIAGONAL/06.OBJ differ diff --git a/Unidad2/12 PRACTICAS EXPOS/EXPO 1/06 NOMBRE DIAGONAL/06.asm b/Unidad2/12 PRACTICAS EXPOS/EXPO 1/06 NOMBRE DIAGONAL/06.asm new file mode 100644 index 0000000..ce5d167 --- /dev/null +++ b/Unidad2/12 PRACTICAS EXPOS/EXPO 1/06 NOMBRE DIAGONAL/06.asm @@ -0,0 +1,69 @@ +.model small +.stack 64 +.data +.code + Limpiar: + mov ax, 03h + int 10h + + Nombre: + ;posición de un caracter en el centro de la terminal + mov dh,12 ;renglón + mov dl,42 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + ;impresión P + mov dx,80 + mov ah,02h + int 21h + + ;posición de un caracter debajo de la P de PABLO + mov dh,13 ;renglón + mov dl,44 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + ;impresión A + mov dx,65 + mov ah,02h + int 21h + + ;posición de un caracter debajo de la A anterior + mov dh,14 ;renglón + mov dl,46 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + ;impresión B + mov dx,66 + mov ah,02h + int 21h + + ;posición de un caracter debajo de la B anterior + mov dh,15 ;renglón + mov dl,48 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + ;impresión L + mov dx,76 + mov ah,02h + int 21h + + ;posición de un caracter debajo de la L anterior + mov dh,16 ;renglón + mov dl,50 ;columna + mov ah,02h ;servicio impresión + int 10h ;interrupción + + ;impresión O + mov dx,79 + mov ah,02h + int 21h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/12 PRACTICAS EXPOS/EXPO 2/07 LEER NOMBRE E IMPRIMIR 20 VECES/07.EXE b/Unidad2/12 PRACTICAS EXPOS/EXPO 2/07 LEER NOMBRE E IMPRIMIR 20 VECES/07.EXE new file mode 100644 index 0000000..c43a9d9 Binary files /dev/null and b/Unidad2/12 PRACTICAS EXPOS/EXPO 2/07 LEER NOMBRE E IMPRIMIR 20 VECES/07.EXE differ diff --git a/Unidad2/12 PRACTICAS EXPOS/EXPO 2/07 LEER NOMBRE E IMPRIMIR 20 VECES/07.MAP b/Unidad2/12 PRACTICAS EXPOS/EXPO 2/07 LEER NOMBRE E IMPRIMIR 20 VECES/07.MAP new file mode 100644 index 0000000..df08d5c --- /dev/null +++ b/Unidad2/12 PRACTICAS EXPOS/EXPO 2/07 LEER NOMBRE E IMPRIMIR 20 VECES/07.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 0003FH 00040H _TEXT CODE + 00040H 0008AH 0004BH _DATA DATA + 00090H 000CFH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad2/12 PRACTICAS EXPOS/EXPO 2/07 LEER NOMBRE E IMPRIMIR 20 VECES/07.OBJ b/Unidad2/12 PRACTICAS EXPOS/EXPO 2/07 LEER NOMBRE E IMPRIMIR 20 VECES/07.OBJ new file mode 100644 index 0000000..98cb68b Binary files /dev/null and b/Unidad2/12 PRACTICAS EXPOS/EXPO 2/07 LEER NOMBRE E IMPRIMIR 20 VECES/07.OBJ differ diff --git a/Unidad2/12 PRACTICAS EXPOS/EXPO 2/07 LEER NOMBRE E IMPRIMIR 20 VECES/07.asm b/Unidad2/12 PRACTICAS EXPOS/EXPO 2/07 LEER NOMBRE E IMPRIMIR 20 VECES/07.asm new file mode 100644 index 0000000..634fbe8 --- /dev/null +++ b/Unidad2/12 PRACTICAS EXPOS/EXPO 2/07 LEER NOMBRE E IMPRIMIR 20 VECES/07.asm @@ -0,0 +1,53 @@ +.model small +.stack 64 +.data + msj db 'Ingresa tu nombre: ', '$' + leyenda0 db 'Hola soy ', '$' + nombre db 10 DUP(0), '$' + leyenda1 db ' y no voy a copiar esta practica.', '$' +.code + Limpiar: + mov ax,03h + int 10h + + Apuntador: + mov ax,@data + mov ds,ax + + LeerNombre: + ;desplegamos msj + mov ah,09h + lea dx,msj + int 21h + + ;leemos cadena + mov ah,3fh + mov bx,00 + mov cx,10 + mov dx,offset[nombre] + int 21h + + ;ciclo + mov cx,21 ;cuántas veces va a imprimir + ImprimirNombre: + ;desplegamos prefix + mov ah,09h + mov dx,offset[leyenda0] + int 21h + + ;desplegamos prefix + mov ah,09h + mov dx,offset[nombre] + int 21h + + ;desplegamos prefix + mov ah,09h + mov dx,offset[leyenda1] + int 21h + loop ImprimirNombre ;ciclo + + Salir: + mov ah,00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/12 PRACTICAS EXPOS/EXPO 2/08 AJUSTE/08.EXE b/Unidad2/12 PRACTICAS EXPOS/EXPO 2/08 AJUSTE/08.EXE new file mode 100644 index 0000000..0be0223 Binary files /dev/null and b/Unidad2/12 PRACTICAS EXPOS/EXPO 2/08 AJUSTE/08.EXE differ diff --git a/Unidad2/12 PRACTICAS EXPOS/EXPO 2/08 AJUSTE/08.MAP b/Unidad2/12 PRACTICAS EXPOS/EXPO 2/08 AJUSTE/08.MAP new file mode 100644 index 0000000..10f641d --- /dev/null +++ b/Unidad2/12 PRACTICAS EXPOS/EXPO 2/08 AJUSTE/08.MAP @@ -0,0 +1,9 @@ + + Start Stop Length Name Class + + 00000H 00038H 00039H _TEXT CODE + 0003AH 00058H 0001FH _DATA DATA + 00060H 0009FH 00040H STACK STACK + +Program entry point at 0000:0000 + diff --git a/Unidad2/12 PRACTICAS EXPOS/EXPO 2/08 AJUSTE/08.OBJ b/Unidad2/12 PRACTICAS EXPOS/EXPO 2/08 AJUSTE/08.OBJ new file mode 100644 index 0000000..1960070 Binary files /dev/null and b/Unidad2/12 PRACTICAS EXPOS/EXPO 2/08 AJUSTE/08.OBJ differ diff --git a/Unidad2/12 PRACTICAS EXPOS/EXPO 2/08 AJUSTE/08.asm b/Unidad2/12 PRACTICAS EXPOS/EXPO 2/08 AJUSTE/08.asm new file mode 100644 index 0000000..3a9a973 --- /dev/null +++ b/Unidad2/12 PRACTICAS EXPOS/EXPO 2/08 AJUSTE/08.asm @@ -0,0 +1,49 @@ +.model small +.stack 64 +.data + msjajuste db 'Con ajuste: ', '$',10,13 + msjsinajuste db ' Sin ajuste: ', '$',10,13 +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + ;msj ajuste + mov ah,09h + lea dx, msjajuste + int 21h + + ;ciclo del 5 al 1 + mov cx,5 + CicloAjuste: + mov ah,02h + mov dx,cx + + add dx,30h ;ajuste + + int 21h + loop CicloAjuste + + ;msj sin ajuste + mov ah,09h + lea dx, msjsinajuste + int 21h + + ;ciclo del 5 al 1 + mov cx,5 + CicloSinAjuste: + mov ah,02h + mov dx,cx + ;desplegar resultado + int 21h + loop CicloSinAjuste + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/12 PRACTICAS EXPOS/EXPO 3/09 COMPARAR TRES NUMEROS IMPRIMIR EL MAYOR/09.asm b/Unidad2/12 PRACTICAS EXPOS/EXPO 3/09 COMPARAR TRES NUMEROS IMPRIMIR EL MAYOR/09.asm new file mode 100644 index 0000000..91e1fd5 --- /dev/null +++ b/Unidad2/12 PRACTICAS EXPOS/EXPO 3/09 COMPARAR TRES NUMEROS IMPRIMIR EL MAYOR/09.asm @@ -0,0 +1,126 @@ +.model small +.stack 64 +.data + n1 db ? + n2 db ? + n3 db ? + msj db 10,13,'Ingresa numero: ','$' + mayorn1 db 10,13,'num1 es el mayor.','$' + mayorn2 db 10,13,'num2 es el mayor.','$' + mayorn3 db 10,13,'num3 es el mayor.','$' + iguales db 10,13,'Tdoos son iguales xd','$' +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds, ax + + Leer_n1: + ;msj ingresa número + mov ah,09h + lea dx, msj + int 21h + + ;cachamos lo ingresado + mov ah, 3fh + mov bx, 00 + mov cx, 1 + lea dx, n1 + int 21h + + ;ajuste manual + mov al, n1 + sub al,48 + mov n1, al + + Leer_n2: + ;msj ingresa número + mov ah,09h + lea dx, msj + int 21h + ;cachamos lo ingresado + mov ah, 3fh + mov bx, 00 + mov cx, 1 + lea dx, n2 + int 21h + + ;ajuste manual + mov al, n2 + sub al,48 + mov n2, al + + Leer_n3: + ;msj ingresa número + mov ah,09h + lea dx, msj + int 21h + + ;cachamos lo ingresado + mov ah, 3fh + mov bx, 00 + mov cx, 1 + lea dx, n3 + int 21h + + ;ajuste manual + mov al, n3 + sub al,48 + mov n3, al + + Comparar_n1_vs_n2: + mov al,n1 + cmp al,n2 + jg Comparar_n1_vs_n3 + jl Comparar_n2_vs_n3 + je Comparar_n1_vs_n3 + + Comparar_n1_vs_n3: + mov al,n1 + cmp al,n3 + jg Msj_n1_mayor + jl Comparar_n2_vs_n3 + je TodosIguales + + Comparar_n2_vs_n3: + mov al,n2 + cmp al,n3 + jg Msj_n2_mayor + jl Msj_n3_mayor + + Msj_n1_mayor: + ;msj mayor + mov ah,09h + lea dx, mayorn1 + int 21h + jmp Salir + + Msj_n2_mayor: + ;msj mayor + mov ah,09h + lea dx, mayorn2 + int 21h + jmp Salir + + Msj_n3_mayor: + ;msj mayor + mov ah,09h + lea dx, mayorn3 + int 21h + jmp Salir + + TodosIguales: + ;msj mayor + mov ah,09h + lea dx, iguales + int 21h + jmp Salir + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/12 PRACTICAS EXPOS/EXPO 3/10 IMPRIMIR NUMEROS EN PANTALL, SIN N/10.asm b/Unidad2/12 PRACTICAS EXPOS/EXPO 3/10 IMPRIMIR NUMEROS EN PANTALL, SIN N/10.asm new file mode 100644 index 0000000..64d22b8 --- /dev/null +++ b/Unidad2/12 PRACTICAS EXPOS/EXPO 3/10 IMPRIMIR NUMEROS EN PANTALL, SIN N/10.asm @@ -0,0 +1,54 @@ +.model small +.stack 64 +.data + br db 10,13,'','$' + num db 5 + msj db 10,13,'Ingresa al sujeto: ','$' +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + LeerNumero: + mov ah,09h + lea dx,msj + int 21h + + mov ah,01h + int 21h + sub al,30h + mov num,al + + mov cl,9 + Ciclo: + cmp cl,num + je EsElSujeto + + mov ah,09h + lea dx,br + int 21h + + mov ah,02h + mov dl,cl + add dl,30h + int 21h + + cmp cl,0 + je Salir + + dec cl + jmp Ciclo + + EsElSujeto: + dec cl + jmp Ciclo + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/12 PRACTICAS EXPOS/EXPO 5/11 inc y dec/11.asm b/Unidad2/12 PRACTICAS EXPOS/EXPO 5/11 inc y dec/11.asm new file mode 100644 index 0000000..f196f03 --- /dev/null +++ b/Unidad2/12 PRACTICAS EXPOS/EXPO 5/11 inc y dec/11.asm @@ -0,0 +1,66 @@ +.model small +.stack 64 +.data + msj db 10,13,'Ingresa un numero: ','$' + num db ? + msj_incremento db 10,13,'Incremento: ','$' + msj_decremento db 10,13,'Decremento: ','$' +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + Mensaje: + mov ah,09h + lea dx, msj + int 21h + + Leer: + mov ah,01h + int 21h + sub al,30h + mov num,al + + Incremento: + mov ah,09h + lea dx, msj_incremento + int 21h + + mov al,num + inc al + aam + mov bx,ax + mov ah,02h + mov dl,bh ;decenas + add dl,30h ;ajuste + int 21h + mov dl,bl ;unidades + add dl,30h ;ajuste + int 21h + + Decremento: + mov ah,09h + lea dx, msj_decremento + int 21h + + mov al,num + dec al + aam + mov bx,ax + mov ah,02h + mov dl,bh ;decenas + add dl,30h ;ajuste + int 21h + mov dl,bl ;unidades + add dl,30h ;ajuste + int 21h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/12 PRACTICAS EXPOS/EXPO 5/12 sum,resta,mul,div/12.asm b/Unidad2/12 PRACTICAS EXPOS/EXPO 5/12 sum,resta,mul,div/12.asm new file mode 100644 index 0000000..ae0ccc4 --- /dev/null +++ b/Unidad2/12 PRACTICAS EXPOS/EXPO 5/12 sum,resta,mul,div/12.asm @@ -0,0 +1,142 @@ +.model small +.stack 64 +.data + msj_numero db 10,13,'Ingresa un numero: ','$' + num1 db ? + num2 db ? + msj_suma db 10,13,'Suma: = ','$' + msj_resta db 10,13,'Resta: = ','$' + msj_multiplicacion db 10,13,'Multiplicacion: = ','$' + msj_division db 10,13,'Division: = ','$' + decenas db ? + unidades db ? +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + LeerNumero1: + mov ah,09h + lea dx,msj_numero + int 21h + + mov ah,01h + int 21h + sub al,30h + mov num1,al + + LeerNumero2: + mov ah,09h + lea dx,msj_numero + int 21h + + mov ah,01h + int 21h + sub al,30h + mov num2,al + + Suma: + mov ah,09h + lea dx,msj_suma + int 21h + + mov al,num1 + add al,num2 + aam + + mov decenas,ah + mov unidades,al + + add decenas,30h ;ajuste manual + add unidades,30h + + mov ah,02h + mov dl,decenas + int 21h + + mov ah,02h + mov dl,unidades + int 21h + + Resta: + mov ah,09h + lea dx,msj_resta + int 21h + + mov al,num1 + sub al,num2 + aam + + mov decenas,ah + mov unidades,al + + add decenas,30h ;ajuste manual + add unidades,30h + + mov ah,02h + mov dl,decenas + int 21h + + mov ah,02h + mov dl,unidades + int 21h + + Multiplicacion: + mov ah,09h + lea dx,msj_multiplicacion + int 21h + + mov al,num1 + mov bl,num2 + mul bl + aam + + mov decenas,ah + mov unidades,al + + add decenas,30h ;ajuste manual + add unidades,30h + + mov ah,02h + mov dl,decenas + int 21h + + mov ah,02h + mov dl,unidades + int 21h + + Division: + mov ah,09h + lea dx,msj_division + int 21h + + xor ax,ax + + mov al, num1 + mov bl,num2 + div bl + aam + + mov decenas,ah + mov unidades,al + + add decenas,30h + add unidades,30h + + mov ah,02h + mov dl,decenas + int 21h + + mov ah,02h + mov dl,unidades + int 21h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/12 PRACTICAS EXPOS/EXPO 6/13 AX a BX con pila/13.asm b/Unidad2/12 PRACTICAS EXPOS/EXPO 6/13 AX a BX con pila/13.asm new file mode 100644 index 0000000..7e9d79d --- /dev/null +++ b/Unidad2/12 PRACTICAS EXPOS/EXPO 6/13 AX a BX con pila/13.asm @@ -0,0 +1,24 @@ +.model small +.stack 100h +.data +.code + Limpiar: + mov ax, 03h + int 10h + + Main: + mov ax,5 ;ax=5 + mov bx,10 ;bx=10 + push ax ;Pila=5 + mov ax,bx ;ax=10 + pop bx ;bx=5 + mov dx,bx + add dx,30h + mov ah,02h + int 21h + + Salir: + mov ax,4C00h ;Terminar programa y salir al DOS + int 21h ; +.exit +end \ No newline at end of file diff --git a/Unidad2/12 PRACTICAS EXPOS/EXPO 6/14 Hex y Decimal/14.asm b/Unidad2/12 PRACTICAS EXPOS/EXPO 6/14 Hex y Decimal/14.asm new file mode 100644 index 0000000..485c7f8 --- /dev/null +++ b/Unidad2/12 PRACTICAS EXPOS/EXPO 6/14 Hex y Decimal/14.asm @@ -0,0 +1,21 @@ +.model small +.stack 64 +.data +.code + Limpiar: + mov ax, 03h + int 10h + + mov dl,49h + mov ah,02h + int 21h + + mov dl,49 + mov ah,02h + int 21h + + Salir: + mov ax,4C00h + int 21h ; +.exit +end \ No newline at end of file diff --git a/Unidad2/12 PRACTICAS EXPOS/EXPO 6/15 xor,not,and/15.asm b/Unidad2/12 PRACTICAS EXPOS/EXPO 6/15 xor,not,and/15.asm new file mode 100644 index 0000000..f4ef595 --- /dev/null +++ b/Unidad2/12 PRACTICAS EXPOS/EXPO 6/15 xor,not,and/15.asm @@ -0,0 +1,27 @@ +.model small +.stack 64 +.data +.code + Limpiar: + mov ax, 03h + int 10h + + + mov bl,1010b + + ;not bl + and bl,110b + ;or bl,110b + ;xor bl,110b + + add bl,48 + + mov ah,2 + mov dl,bl + int 21h + + Salir: + mov ax,4C00h + int 21h +.exit +end diff --git a/Unidad2/12 PRACTICAS EXPOS/EXPO 7/16 desplazamiento a la derecha de 3/16.asm b/Unidad2/12 PRACTICAS EXPOS/EXPO 7/16 desplazamiento a la derecha de 3/16.asm new file mode 100644 index 0000000..538eac6 --- /dev/null +++ b/Unidad2/12 PRACTICAS EXPOS/EXPO 7/16 desplazamiento a la derecha de 3/16.asm @@ -0,0 +1,19 @@ +.model small +.stack 64 +.data +.code + Limpiar: + mov ax, 03h + int 10h + + Desplazamiento: + ;SHR + mov cl,03 + mov al,10110111B ; AL = 10110111 = 183 = B7 + shr al,cl ; AL = 00001011 = 11 = B Tres desplazamientos más + + Salir: + mov ax,4C00h ;Terminar programa y salir al DOS + int 21h ; +.exit +end \ No newline at end of file diff --git a/Unidad2/12 PRACTICAS EXPOS/EXPO 7/17 rotacion 4 izquierda, 4 derecha/17.asm b/Unidad2/12 PRACTICAS EXPOS/EXPO 7/17 rotacion 4 izquierda, 4 derecha/17.asm new file mode 100644 index 0000000..454d120 --- /dev/null +++ b/Unidad2/12 PRACTICAS EXPOS/EXPO 7/17 rotacion 4 izquierda, 4 derecha/17.asm @@ -0,0 +1,25 @@ +.Model small +.Stack 64 +.data +.Code + Limpiar: + mov ax, 03h + int 10h + + Declaracion: + mov al,10101001B ; AL = 10101001 = 169 = A9 + mov cl,04 + + ROLROL: + ;ROL + rol al,cl ; AL = 01010011 = 83 = 53 Rotación a la Izquierda + + RORROR: + ;ROR + ror al,cl ; AL = 11010100 = 212 = D4 Rotación a la Derecha + + Salir: + mov ax,4C00h ;Terminar programa y salir al DOS + int 21h ; +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.01 Saludo lea/18.01.asm b/Unidad2/33 PRACTICAS PROFESORA/18.01 Saludo lea/18.01.asm new file mode 100644 index 0000000..6a47e0e --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.01 Saludo lea/18.01.asm @@ -0,0 +1,24 @@ +.model small +.stack 64 +.data + Saludo db 'HOLA MUNDO $' +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + Saludo: + ;imprimir saludo + mov ah,09h + lea dx, Saludo + int 21h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.02 Saludo offset/18.02.asm b/Unidad2/33 PRACTICAS PROFESORA/18.02 Saludo offset/18.02.asm new file mode 100644 index 0000000..2e246a5 --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.02 Saludo offset/18.02.asm @@ -0,0 +1,20 @@ +.model small +.stack 64 +.data +Saludo db 'Hola a todos $' +.code + Limpiar: + mov ax, 03h + int 10h + + Saludo: + ;saludo con offset + mov dx, offset Saludo + mov ah,09h + int 21h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.03 Desplegar datos fijos/18.03.asm b/Unidad2/33 PRACTICAS PROFESORA/18.03 Desplegar datos fijos/18.03.asm new file mode 100644 index 0000000..51daa33 --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.03 Desplegar datos fijos/18.03.asm @@ -0,0 +1,82 @@ +.model small +.stack 64 +.data + Nombre db 'PABLO AGUIAR SOLIS $' + Carrera db 'INGENIERIA EN SISTEMAS COMPUTACIONALES $' + Semestre db '6to $' + Edad db '21 $' + Fecha db '30/JULIO/1998 $' +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + Nombre: + ;Posición + mov ah,02h + mov dh,1; Fila + mov dl,1; Columna + int 10h + + + mov ah,09h + lea dx, Nombre + int 21h + + Carrera: + ;Posición + mov ah,02h + mov dh,2; Fila + mov dl,1; Columna + int 10h + + + mov ah,09h + lea dx, Carrera + int 21h + + Semestre: + ;Posición + mov ah,02h + mov dh,3; Fila + mov dl,1; Columna + int 10h + + + mov ah,09h + lea dx, Semestre + int 21h + + Edad: + ;Posición + mov ah,02h + mov dh,4; Fila + mov dl,1; Columna + int 10h + + + mov ah,09h + lea dx, Edad + int 21h + + Fecha: + ;Posición + mov ah,02h + mov dh,5; Fila + mov dl,1; Columna + int 10h + + + mov ah,09h + lea dx, Fecha + int 21h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.04 Desplegar datos variables/18.04.asm b/Unidad2/33 PRACTICAS PROFESORA/18.04 Desplegar datos variables/18.04.asm new file mode 100644 index 0000000..ee3ee53 --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.04 Desplegar datos variables/18.04.asm @@ -0,0 +1,116 @@ +.model small +.stack 64 +.data + msgNombre db 'Dame un nombre por favor: $' + nombre db 25 dup ('$'),'$' + + msgCarrera db 'Dame una carrera por favor: $' + carrera db 45 dup ('$'),'$' + + msgSemestre db 'Dame tu semestre por favor: $' + semestre db 10 dup ('$'),'$' + + msgEdad db 'Dame tu edad por favor: $' + edad dt 10 dup ('$'),'$' + + msgFecha db 'Dame tu cumpleaños: $' + fecha db 60 dup ('$'),'$' +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + LeerNombre + mov ah,09h + lea dx, msgNombre + int 21h + + mov ah,3fh + mov bx,00 + mov cx,25 + mov dx, offset nombre + int 21h + + LeerCarrera: + mov ah,09h + lea dx, msgCarrera + int 21h + + mov ah,3fh + mov bx,00 + mov cx,25 + mov dx, offset carrera + int 21h + + LeerSemestre: + mov ah,09h + lea dx, msgSemestre + int 21h + + mov ah,3fh + mov bx,00 + mov cx,25 + mov dx, offset semestre + int 21h + + LeerEdad: + mov ah,09h + lea dx, msgEdad + int 21h + + mov ah,3fh + mov bx,00 + mov cx,25 + mov dx, offset edad + int 21h + + LeerFecha: + mov ah,09h + lea dx, msgFecha + int 21h + + mov ah,3fh + mov bx,00 + mov cx,25 + mov dx, offset fecha + int 21h + + ImprimirDatos: + ;Limpiar + mov ax,03 + int 10h + + + mov ah,09h + lea dx, nombre + int 21h + + + mov ah,09h + lea dx, carrera + int 21h + + + mov ah,09h + lea dx, semestre + int 21h + + + mov ah,09h + lea dx, edad + int 21h + + + mov ah,09h + lea dx, fecha + int 21h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.05 Desplegar numero como DD y DT/18.05.asm b/Unidad2/33 PRACTICAS PROFESORA/18.05 Desplegar numero como DD y DT/18.05.asm new file mode 100644 index 0000000..7bdb628 --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.05 Desplegar numero como DD y DT/18.05.asm @@ -0,0 +1,70 @@ +.model small +.stack 64 +.data + mensaje db 'Ingrese el numero: ','$',10,13 + num dd ?,? + num1 dt ?,? + msjdd db 'Con dd es: ','$',10,13 + msjdt db 'Con dt es: ','$',10,13 +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + Mensaje: + mov ah,09h + lea dx,mensaje + int 21h + + Leer: + mov ah,01h + int 21h + sub ax,30h + mov word ptr [num],ax + mov word ptr [num1],ax + + mov ah,02h + mov dl,0ah ;salto de línea + int 21h + mov ah,02h + mov dl,0dh ;retorno de carro + int 21h + + DDDD: + mov ah,09h + lea dx,msjdd + int 21h + + mov ah,02h + mov dx,word ptr [num] + add dx,30h + int 21h + + mov ah,02h + mov dl,0ah ;salto de línea + int 21h + mov ah,02h + mov dl,0dh ;retorno de carro + int 21h + + DTDT: + mov ax,@data + mov ds,ax + mov ah,09h + lea dx,msjdt + int 21h + + mov ah,02h + mov dx,word ptr [num1] + add dx,30h + int 21h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.06 Leer numero como DD y DT/18.06.asm b/Unidad2/33 PRACTICAS PROFESORA/18.06 Leer numero como DD y DT/18.06.asm new file mode 100644 index 0000000..dacbadf --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.06 Leer numero como DD y DT/18.06.asm @@ -0,0 +1,76 @@ +.model small +.stack 64 +.data + msgNombre db 'Dame un nombre por favor: $' + nombre dd 25 dup ('$'),'$' + + msgEdad db 'Dame tu edad por favor: $' + edad dt 10 dup ('$'),'$' + + msgnom db 'Nombre: $' + msgeda db 'Edad: $' +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + LeerNombre: + mov ah,09h + lea dx, msgNombre + int 21h + + mov ah,3fh + mov bx,00 + mov cx,25 + mov dx, offset nombre + int 21h + + + LeerEdad: + mov ah,09h + lea dx, msgEdad + int 21h + + mov ah,3fh + mov bx,00 + mov cx,10 + mov dx, offset edad + int 21h + + ;Limpiar + mov ax,03 + int 10h + + DesplegarDatos: + mov ah,09h + lea dx, msgnom + int 21h + + + mov ah,09h + lea dx, nombre + int 21h + + mov ah,02h + mov dl,0dh ;retorno de carro + int 21h + + + mov ah,09h + lea dx, msgeda + int 21h + + + mov ah,09h + lea dx, edad + int 21h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.07 Leer numero menor a 10/18.07.asm b/Unidad2/33 PRACTICAS PROFESORA/18.07 Leer numero menor a 10/18.07.asm new file mode 100644 index 0000000..0ffaf1a --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.07 Leer numero menor a 10/18.07.asm @@ -0,0 +1,65 @@ +.model small +.stack 64 +.data + num1 db ? + + msgnum db 10,13,'Ingrese un numero: ','$' + msg db 10,13,'El numero es menor que 10.','$' + msg2 db 10,13,'El numero no es menor que 10.','$' +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + LeerNumeroUno: + mov ah,09h + lea dx,msgnum + int 21h + + ;Capturar de numero 1 + mov ah,3fh + mov bx,00 + mov cx,1 + lea dx,num1 + int 21h + + ;ajuste manual + mov al,num1 + sub al,48 + mov num1,al + + Comparar: + ;Comparar, si 9 o menos, es menor a 10 xd + mov al,num1 + cmp al,9 + je Iguales + jl Menor + jg Mayor + + Mayor: + mov ah,09h + lea dx,msg2 + int 21h + jmp Salir + + Menor: + mov ah,09h + lea dx,msg + int 21h + jmp Salir + + Iguales: + mov ah,09h + lea dx,msg + int 21h + jmp Salir + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.08 Leer edad mayor o menor/18.08.asm b/Unidad2/33 PRACTICAS PROFESORA/18.08 Leer edad mayor o menor/18.08.asm new file mode 100644 index 0000000..bf4a9a2 --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.08 Leer edad mayor o menor/18.08.asm @@ -0,0 +1,65 @@ +.model small +.stack 64 +.data + msj_edad db 'Ingrese su edad en dos digitos: $' + unidades db ? + decenas db ? + msj_ma db 10,13,'Eres mayor de edad $' + msj_me db 10,13,'Eres menor de edad $' +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + LeerEdad: + mov ah,09h + lea dx,msj_edad + int 21h + + ;capturar decenas + mov ah,01h + int 21h + sub al,48 ;ajuste manual, ascii to decimal + mov decenas,al + + ;capturar unidades + mov ah,01h + int 21h + sub al,48 ;ajuste manual + mov unidades,al + + CmpDecenas: + mov al,decenas + cmp al,1 + jg mayor + jl menor + je CmpUnidades + + CmpUnidades: + mov al,unidades + cmp al,8 + jg mayor + jl menor + je mayor + + menor: + mov ah,09h + lea dx,msj_me + int 21h + jmp Salir + + mayor: + mov ah,09h + lea dx,msj_ma + int 21h + jmp Salir + + Salir: + mov ah, 00h + int 16h +.exit +end diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.09 Imprimir texto ciclo 5 veces/18.09.asm b/Unidad2/33 PRACTICAS PROFESORA/18.09 Imprimir texto ciclo 5 veces/18.09.asm new file mode 100644 index 0000000..e3d1a3d --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.09 Imprimir texto ciclo 5 veces/18.09.asm @@ -0,0 +1,25 @@ +.model small +.stack 64 +.data + msj db 10,13,'Esta cadena se repetira 5 veces','$' +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + mov cx,5 ;cinco veces + ciclo: + mov ah,09h + lea dx,msj + int 21h + loop ciclo + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.10 A-Z/18.10.asm b/Unidad2/33 PRACTICAS PROFESORA/18.10 A-Z/18.10.asm new file mode 100644 index 0000000..c4986e8 --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.10 A-Z/18.10.asm @@ -0,0 +1,23 @@ +.model small +.stack 64 +.data +.code + Limpiar: + mov ax, 03h + int 10h + + mov cx,26 ;contador + mov dx,65 ;codigo ascii + + ciclo: + mov ah,02h + int 21h + inc dx + + loop ciclo + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.11 Z-A/18.11.asm b/Unidad2/33 PRACTICAS PROFESORA/18.11 Z-A/18.11.asm new file mode 100644 index 0000000..1f5293b --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.11 Z-A/18.11.asm @@ -0,0 +1,23 @@ +.model small +.stack 64 +.data +.code + Limpiar: + mov ax, 03h + int 10h + + mov cx,26 ;contador + mov dx,90 ;codigo ascii + + ciclo: + mov ah,02h + int 21h + dec dx + + loop ciclo + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.12 0-9/18.12.asm b/Unidad2/33 PRACTICAS PROFESORA/18.12 0-9/18.12.asm new file mode 100644 index 0000000..0127103 --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.12 0-9/18.12.asm @@ -0,0 +1,23 @@ +.model small +.stack 64 +.data +.code + Limpiar: + mov ax, 03h + int 10h + + mov cx,10 ;contador + mov dx,48 ;codigo ascii + + ciclo: + mov ah,02h + int 21h + inc dx + + loop ciclo + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.13 9-0/18.13.asm b/Unidad2/33 PRACTICAS PROFESORA/18.13 9-0/18.13.asm new file mode 100644 index 0000000..7a89092 --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.13 9-0/18.13.asm @@ -0,0 +1,23 @@ +.model small +.stack 64 +.data +.code + Limpiar: + mov ax, 03h + int 10h + + mov cx,10 ;contador + mov dx,57 ;codigo ascii + + ciclo: + mov ah,02h + int 21h + dec dx + + loop ciclo + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.14 Leer nombre imprimir 20 veces/18.14.asm b/Unidad2/33 PRACTICAS PROFESORA/18.14 Leer nombre imprimir 20 veces/18.14.asm new file mode 100644 index 0000000..a4de059 --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.14 Leer nombre imprimir 20 veces/18.14.asm @@ -0,0 +1,34 @@ +.model small +.stack 64 +.data + msj db 'Ingresa tu nombre: ','$' + nombre db 20 DUP('$'), '$' + +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + LeerNombre: + mov ah,09h + lea dx, msj + int 21h + + mov ah,3fh + mov bx,00 + mov cx,20 + lea dx,nombre + int 21h + + mov cx,20 + Ciclo: + mov ah,09h + lea dx,nombre + int 21h + loop Ciclo +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.15 Blog de notas hasta una s/18.15.asm b/Unidad2/33 PRACTICAS PROFESORA/18.15 Blog de notas hasta una s/18.15.asm new file mode 100644 index 0000000..01f817a --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.15 Blog de notas hasta una s/18.15.asm @@ -0,0 +1,41 @@ +.model small +.stack 64 +.data + msj db 'Blog de notas hasta S:',10,13,'$' + caracter db ? +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + Mensaje: + mov ah,09h + lea dx,msj + int 21h + + LeerLetra: + mov ah,1 + int 21h + mov caracter,al + jmp Comparar + + Comparar: + mov al,caracter + + cmp al,83 ;S + je Salir + + cmp al,115 ;s + je Salir + + jmp LeerLetra + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.16 Numero primo 0 - 9/18.16.asm b/Unidad2/33 PRACTICAS PROFESORA/18.16 Numero primo 0 - 9/18.16.asm new file mode 100644 index 0000000..de01918 --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.16 Numero primo 0 - 9/18.16.asm @@ -0,0 +1,60 @@ +.model small +.stack 64 +.data + pedir db "Tecle un numero: ", "$" + msgprimo db 10,13,"Es un numero primo", "$" + msgnoprimo db 10,13,"No es un numero primo", "$" + num DB ? +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + LeerNumero: + mov ah, 09h; + lea dx, pedir; + int 21h; + + ;Capturar el número + mov ah, 01h + int 21h + sub al, 30h ;ajuste + mov num, al + + CmpPrimo: + ;Comparar con 2 + cmp al, 2 + JE PRIMO + + ;Comparar con 3 + cmp al, 3 + JE PRIMO + + ;Comparar con 5 + cmp al, 5 + JE PRIMO + + ;Comparar con 7 + cmp al, 7 + JE PRIMO + + ;Si no es primo + mov ah, 09 + lea dx, msgnoprimo + int 21h + JMP Salir ;SALTA + + PRIMO: + mov ah, 09 + lea dx, msgprimo + int 21h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.17 Par o impar/18.17.asm b/Unidad2/33 PRACTICAS PROFESORA/18.17 Par o impar/18.17.asm new file mode 100644 index 0000000..93509cf --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.17 Par o impar/18.17.asm @@ -0,0 +1,46 @@ +.model small +.stack 64 +.data + msg_num db 'Ingrese numero: ','$' + msg_par db 10,13,'PAR ','$' + msg_impar db 10,13,'IMPAR ','$' +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + LeerNumero: + ;pide numero + mov ah,09h + lea dx,msg_num + int 21h + + mov ah,01h + int 21h + sub al,30h + + ParOImpar: + and ax,1 + jz Par + + Impar: + mov ah,9 + leA dx,msg_impar + int 21h + jmp Salir + + Par: + mov ah,9 + leA dx,msg_par + int 21h + jmp Salir + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.18 Dia de la semana/18.18.asm b/Unidad2/33 PRACTICAS PROFESORA/18.18 Dia de la semana/18.18.asm new file mode 100644 index 0000000..1627b38 --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.18 Dia de la semana/18.18.asm @@ -0,0 +1,115 @@ +.model small +.stack 64 +.data + pedir db "Tecle un numero entre 1 y 7: ", "$" + msglunes db 10,13,"Es Lunes", "$" + msgmartes db 10,13,"Es Martes", "$" + msgmiercoles db 10,13,"Es Miercoles", "$" + msgjueves db 10,13,"Es Jueves", "$" + msgviernes db 10,13,"Es Viernes", "$" + msgsabado db 10,13,"Es Sabado", "$" + msgdomingo db 10,13,"Es Domingo", "$" + msgno_dia db 10,13,"No es un dia valido", "$" + num DB ? +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + LeerNumero: + mov ah, 09h; + lea dx, pedir; + int 21h; + + ;Capturar el número + mov ah, 01 + int 21h + sub al, 30h + mov num, al + + Comparar: + ;Comparar con 1 + cmp al, 1 + JE LUNES + + ;Comparar con 2 + cmp al, 2 + JE MARTES + + ;Comparar con 3 + cmp al, 3 + JE MIERCOLES + + ;Comparar con 4 + cmp al, 4 + JE JUEVES + + ;Comparar con 5 + cmp al, 5 + JE VIERNES + + ;Comparar con 6 + cmp al, 6 + JE SABADO + + ;Comparar con 7 + cmp al, 7 + JE DOMINGO + + ;Si no es ningúno + mov ah, 09 + lea dx, msgno_dia + int 21h + jmp Salir + + LUNES: + mov ah, 09 + lea dx, msglunes + int 21h + jmp Salir + + MARTES: + mov ah, 09 + lea dx, msgmartes + int 21h + jmp Salir + + MIERCOLES: + mov ah, 09 + lea dx, msgmiercoles + int 21h + jmp Salir + + JUEVES: + mov ah, 09 + lea dx, msgjueves + int 21h + jmp Salir + + VIERNES: + mov ah, 09 + lea dx, msgviernes + int 21h + jmp Salir + + SABADO: + mov ah, 09 + lea dx, msgsabado + int 21h + jmp Salir + + DOMINGO: + mov ah, 09 + lea dx, msgdomingo + int 21h + jmp Salir + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git "a/Unidad2/33 PRACTICAS PROFESORA/18.19 Meses del a\303\261o/18.19.asm" "b/Unidad2/33 PRACTICAS PROFESORA/18.19 Meses del a\303\261o/18.19.asm" new file mode 100644 index 0000000..20d7178 --- /dev/null +++ "b/Unidad2/33 PRACTICAS PROFESORA/18.19 Meses del a\303\261o/18.19.asm" @@ -0,0 +1,171 @@ +.model small +.stack 64 +.data + pedir db "Tecle un numero entre 1 y 12: ", "$" + msg_Ene db 10,13,"Es Enero", "$" + msg_Feb db 10,13,"Es Febrero", "$" + msg_Mar db 10,13,"Es Marzo", "$" + msg_Abr db 10,13,"Es Abril", "$" + msg_May db 10,13,"Es Mayo", "$" + msg_Jun db 10,13,"Es Junio", "$" + msg_Jul db 10,13,"Es Julio", "$" + msg_Ago db 10,13,"Es Agosto", "$" + msg_Sep db 10,13,"Es Septiembre", "$" + msg_Oct db 10,13,"Es Octubre", "$" + msg_Nov db 10,13,"Es Noviembre", "$" + msg_Dic db 10,13,"Es Diciembre", "$" + msg_nomes db "No es un mes", "$" + num DB ? +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + LeerNumero: + mov ah, 09h + lea dx, pedir; + int 21h + + ;Capturar el número + mov ah, 01 + int 21h + sub al, 30h + mov num, al + + Comparar: + mov al,num + + ;Comparar con 1 + cmp al, 1 + je ENERO + + ;Comparar con 2 + cmp al, 2 + je FEBRERO + + ;Comparar con 3 + cmp al, 3 + je MARZO + + ;Comparar con 4 + cmp al, 4 + je ABRIL + + ;Comparar con 5 + cmp al, 5 + je MAYO + + ;Comparar con 6 + cmp al, 6 + je JUNIO + + ;Comparar con 7 + cmp al, 7 + je JULIO + + ;Comparar con 8 + cmp al, 8 + je AGOSTO + + ;Comparar con 9 + cmp al, 9 + je SEPTIEMBRE + + ;Comparar con 10 + cmp al, 10 + je OCTUBRE + + ;Comparar con 11 + cmp al, 11 + je NOVIEMBRE + + ;Comparar con 12 + cmp al, 12 + je DICIEMBRE + + ;Si no es ningúno + mov ah,09h + lea dx, msg_nomes + int 21h + jmp Salir + + ENERO: + mov ah,09h + lea dx, msg_Ene + int 21h + jmp Salir + + FEBRERO: + mov ah,09h + lea dx, msg_Feb + int 21h + jmp Salir + + MARZO: + mov ah,09h + lea dx, msg_Mar + int 21h + jmp Salir + + ABRIL: + mov ah,09h + lea dx, msg_Abr + int 21h + jmp Salir + + MAYO: + mov ah,09h + lea dx, msg_May + int 21h + jmp Salir + + JUNIO: + mov ah,09h + lea dx, msg_Jun + int 21h + jmp Salir + + JULIO: + mov ah,09h + lea dx, msg_Jul + int 21h + jmp Salir + + AGOSTO: + mov ah,09h + lea dx, msg_Ago + int 21h + jmp Salir + + SEPTIEMBRE: + mov ah,09h + lea dx, msg_Sep + int 21h + jmp Salir + + OCTUBRE: + mov ah,09h + lea dx, msg_Oct + int 21h + jmp Salir + + NOVIEMBRE: + mov ah,09h + lea dx, msg_Nov + int 21h + jmp Salir + + DICIEMBRE: + mov ah,09h + lea dx, msg_Dic + int 21h + jmp Salir + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.20 Leer tres numeros y ordenarlos/18.20.asm b/Unidad2/33 PRACTICAS PROFESORA/18.20 Leer tres numeros y ordenarlos/18.20.asm new file mode 100644 index 0000000..ad8750d --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.20 Leer tres numeros y ordenarlos/18.20.asm @@ -0,0 +1,193 @@ +.model small +.stack 64 +.data + msj db 10,13,'Ingresa numero: ','$' + num1 DB ? + num2 DB ? + num3 DB ? + num_a DB ?; El primer número en ser impreso + num_b DB ?; El segundo número en ser impreso +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + Leer_n1: + ;msj ingresa número + mov ah,09h + lea dx, msj + int 21h + + ;cachamos lo ingresado + mov ah, 3fh + mov bx, 00 + mov cx, 1 + lea dx, num1 + int 21h + + ;ajuste manual + mov al, num1 + sub al,48 + mov num1, al + + Leer_n2: + ;msj ingresa número + mov ah,09h + lea dx, msj + int 21h + ;cachamos lo ingresado + mov ah, 3fh + mov bx, 00 + mov cx, 1 + lea dx, num2 + int 21h + + ;ajuste manual + mov al, num2 + sub al,48 + mov num2, al + + Leer_n3: + ;msj ingresa número + mov ah,09h + lea dx, msj + int 21h + + ;cachamos lo ingresado + mov ah, 3fh + mov bx, 00 + mov cx, 1 + lea dx, num3 + int 21h + + ;ajuste manual + mov al, num2 + sub al,48 + mov num2, al + + ;Movemos el registro para empezar la comparación + mov al, num1 + + ;Comparar con el 2do + cmp al, num2 + JAE SALTO1 + + ;Comparar con el 3do + cmp al, num3 + JB NUMERO1_A + + JMP NUMERO3_A + + SALTO1: + mov al, num2 + cmp al, num3 + JB NUMERO2_A + + NUMERO3_A: + mov dl, num3 + mov num_a, 3 ;ultimo número que imprimio + JMP SALTO2 + + NUMERO2_A: + mov dl, num2 + mov num_a, 2 ;ultimo número que imprimio + JMP SALTO2 + + NUMERO1_A: + mov dl, num1 + mov num_a, 1 ;ultimo número que imprimio + JMP SALTO2 + + SALTO2: + add dl, 30h + mov ah, 02h + int 21h + + ;Se evalua el segundo número + mov al, num_a + cmp al, 1 + JE SALTO3 + + mov al, num_a + cmp al, 2 + JE SALTO4 + + SALTO5: ;(se evaluan el 1er y 2do número) + mov al, num1 + cmp al, num2 + JB NUMERO1_B + + JMP NUMERO2_B + + SALTO4: ;(se evaluan el 1er y 3er número) + mov al, num1 + cmp al, num3 + JB NUMERO1_B + + JMP NUMERO3_B + + SALTO3: ;(se evaluan el 2do y 3er número) + mov al, num2 + cmp al, num3 + JB NUMERO2_B + + NUMERO3_B: + mov dl, num3 + mov num_b, 3 ;ultimo número que imprimio + JMP SALTO6 + + NUMERO2_B: + mov dl, num2 + mov num_b, 2 ;ultimo número que imprimio + JMP SALTO6 + + NUMERO1_B: + mov dl, num1 + mov num_b, 1 ;ultimo número que imprimio + JMP SALTO6 + + SALTO6: + add dl, 30h + mov ah, 02h + int 21h + + ;Se suman los dos números de referencia + mov al, num_a + add al, num_b + mov num_a, al + + ;Se evalua el tercer número + mov al, num_a + cmp al, 3 + JE NUMERO3_C + + mov al, num_a + cmp al, 4 + JE NUMERO2_C + + NUMERO1_C: + mov dl, num1 + JMP SALTO7 + + NUMERO2_C: + mov dl, num2 + JMP SALTO7 + + NUMERO3_C: + mov dl, num3 + JMP SALTO7 + + SALTO7: + add dl, 30h + mov ah, 02h + int 21h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.21 Leer tres numeros y ordenarlos/18.21.asm b/Unidad2/33 PRACTICAS PROFESORA/18.21 Leer tres numeros y ordenarlos/18.21.asm new file mode 100644 index 0000000..dcb222f --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.21 Leer tres numeros y ordenarlos/18.21.asm @@ -0,0 +1,158 @@ +.model small +.stack 64 +.data + msj db 10,13,'Ingresa numero: ','$' + num1 DB ? + num2 DB ? + num3 DB ? + num_a DB ?; El primer número en ser impreso + num_b DB ?; El segundo número en ser impreso +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + ;Capturar núm1 + mov ah, 01 + int 21h + sub al, 30h + mov num1, al + + ;Capturar núm2 + mov ah, 01 + int 21h + sub al, 30h + mov num2, al + + ;Capturar núm3 + mov ah, 01 + int 21h + sub al, 30h + mov num3, al + + ;Movemos el registro para empezar la comparación + mov al, num1 + + ;Comparar con el 2do + cmp al, num2 + JBE SALTO1 + + ;Comparar con el 3do + cmp al, num3 + JA NUMERO1_A + + JMP NUMERO3_A + + SALTO1: + mov al, num2 + cmp al, num3 + JA NUMERO2_A + + NUMERO3_A: + mov dl, num3 + mov num_a, 3 ;ultimo número que imprimio + JMP SALTO2 + + NUMERO2_A: + mov dl, num2 + mov num_a, 2 ;ultimo número que imprimio + JMP SALTO2 + + NUMERO1_A: + mov dl, num1 + mov num_a, 1 ;ultimo número que imprimio + JMP SALTO2 + + SALTO2: + add dl, 30h + mov ah, 02h + int 21h + + ;Se evalua el segundo número + mov al, num_a + cmp al, 1 + JE SALTO3 + + mov al, num_a + cmp al, 2 + JE SALTO4 + + SALTO5: ;(se evaluan el 1er y 2do número) + mov al, num1 + cmp al, num2 + JA NUMERO1_B + + JMP NUMERO2_B + + SALTO4: ;(se evaluan el 1er y 3er número) + mov al, num1 + cmp al, num3 + JB NUMERO1_B + + JMP NUMERO3_B + + SALTO3: ;(se evaluan el 2do y 3er número) + mov al, num2 + cmp al, num3 + JA NUMERO2_B + + NUMERO3_B: + mov dl, num3 + mov num_b, 3 ;ultimo número que imprimio + JMP SALTO6 + + NUMERO2_B: + mov dl, num2 + mov num_b, 2 ;ultimo número que imprimio + JMP SALTO6 + + NUMERO1_B: + mov dl, num1 + mov num_b, 1 ;ultimo número que imprimio + JMP SALTO6 + + SALTO6: + add dl, 30h + mov ah, 02h + int 21h + + ;Se suman los dos números de referencia + mov al, num_a + add al, num_b + mov num_a, al + + ;Se evalua el tercer número + mov al, num_a + cmp al, 3 + JE NUMERO3_C + + mov al, num_a + cmp al, 4 + JE NUMERO2_C + + NUMERO1_C: + mov dl, num1 + JMP SALTO7 + + NUMERO2_C: + mov dl, num2 + JMP SALTO7 + + NUMERO3_C: + mov dl, num3 + JMP SALTO7 + + SALTO7: + add dl, 30h + mov ah, 02h + int 21h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.22 Solo permite introducir s y n/18.22.asm b/Unidad2/33 PRACTICAS PROFESORA/18.22 Solo permite introducir s y n/18.22.asm new file mode 100644 index 0000000..f76c20a --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.22 Solo permite introducir s y n/18.22.asm @@ -0,0 +1,47 @@ +.model small +.stack 64 +.data + msj db 'Solo admite S y N:',10,13,'$' + caracter db ? +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + Mensaje: + mov ah,09h + lea dx,msj + int 21h + + LeerLetra: + mov ah,1 + int 21h + mov caracter,al + jmp Comparar + + Comparar: + mov al,caracter + + cmp al,83 ;S + je LeerLetra + + cmp al,115 ;s + je LeerLetra + + cmp al,78 ;N + je LeerLetra + + cmp al,110 ;n + je LeerLetra + + jmp Salir + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.23 vocales/18.23.asm b/Unidad2/33 PRACTICAS PROFESORA/18.23 vocales/18.23.asm new file mode 100644 index 0000000..7ab0004 --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.23 vocales/18.23.asm @@ -0,0 +1,89 @@ +.model small +.stack 64 +.data + msj db 10,13,'Ingresa una letra: ','$' + es_vocal db 10,13,'Es vocal','$' + no_vocal db 10,13,'No es vocal','$' + letra db ? +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + LeerLetra: + mov ah, 09h + lea dx,msj + int 21h + + ;Capturar núm1 + mov ah, 01 + int 21h + mov letra, al + + Comparaciones: + mov al,letra + + ;A + cmp al,65 + je EsVocal + + ;E + cmp al,69 + je EsVocal + + ;I + cmp al,73 + je EsVocal + + ;O + cmp al,79 + je EsVocal + + ;U + cmp al,85 + je EsVocal + + ;a + cmp al,97 + je EsVocal + + ;e + cmp al,101 + je EsVocal + + ;i + cmp al,105 + je EsVocal + + ;o + cmp al,111 + je EsVocal + + ;u + cmp al,117 + je EsVocal + + ;no es vocal + jmp NoVocal + + EsVocal: + mov ah, 09h + lea dx,es_vocal + int 21h + + jmp Salir + + NoVocal: + mov ah, 09h + lea dx,no_vocal + int 21h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.24 Menu/18.24.asm b/Unidad2/33 PRACTICAS PROFESORA/18.24 Menu/18.24.asm new file mode 100644 index 0000000..b425d38 --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.24 Menu/18.24.asm @@ -0,0 +1,93 @@ +.model small +.stack 64 +.data + msj db 'Menu: ','$' + msj_archivo db 10,13,'1: Archivo $' + msj_buscar db 10,13,'2: Buscar $' + msj_salir db 10,13,'3: Salir $' + msj_opcion db 10,13,'Ingreso opcion: ','$' + br db '',10,13,'$' + num db ? + msj_clic_archivo db 10,13,'Selecciono Archivo $' + msj_clic_buscar db 10,13,'Selecciono Buscar $' + msj_clic_salir db 10,13,'Selecciono Salir $' +.code + Apuntador: + mov ax, @data + mov ds,ax + + Limpiar: + mov ax, 03h + int 10h + + Menu: + mov ah,09h + lea dx,msj + int 21h + + mov ah,09h + lea dx,msj_archivo + int 21h + + mov ah,09h + lea dx,msj_buscar + int 21h + + mov ah,09h + lea dx,msj_salir + int 21h + + mov ah,09h + lea dx,msj_opcion + int 21h + + LeerNumero: + mov ah,01h + int 21h + sub al,30h + mov num,al + + mov ah,09h + lea dx,br + int 21h + + Comparar: + mov al,num + + cmp al,1 + je Imprimir_msj_clic_archivo + + cmp al,2 + je Imprimir_msj_clic_buscar + + cmp al,3 + je Imprimir_msj_clic_salir + + jmp Limpiar + + Imprimir_msj_clic_archivo: + mov ah,09h + lea dx,msj_clic_archivo + int 21h + + jmp Salir + + Imprimir_msj_clic_buscar: + mov ah,09h + lea dx,msj_clic_buscar + int 21h + + jmp Salir + + Imprimir_msj_clic_salir: + mov ah,09h + lea dx,msj_clic_salir + int 21h + + jmp Salir + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.25 1 - 10 uno en uno/18.25.asm b/Unidad2/33 PRACTICAS PROFESORA/18.25 1 - 10 uno en uno/18.25.asm new file mode 100644 index 0000000..655f95c --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.25 1 - 10 uno en uno/18.25.asm @@ -0,0 +1,54 @@ +.model small +.stack 64 +.data + num db 1 + msj db 'Numeros pares del 0 al 20',10,13,'$' +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + Mensaje: + mov ah,09h + Lea dx,msj + int 21h + + Inicializacion: + mov bx,01 ;bx y + mov cx,01 ;cx a 01 + + mov cx,1 ;Iniciar + + Ciclo: ;Número de iteraciones + mov al,num + mul cx + aam + mov bx,ax + mov ah,02h + mov dl," " + int 21h + mov ah,02h + mov dl,bh + add dl,30h + int 21h + mov dl,bl + add dl,30h + int 21h + inc cx + + cmp cx,11 + ja Salir + jb Ciclo + + cmp cx,10 + jl Ciclo ; si es menor a 10 + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.26 0 -20 dos en dos/18.26.asm b/Unidad2/33 PRACTICAS PROFESORA/18.26 0 -20 dos en dos/18.26.asm new file mode 100644 index 0000000..aea7f8a --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.26 0 -20 dos en dos/18.26.asm @@ -0,0 +1,47 @@ +.model small +.stack 64 +.data + msj db 'Numeros pares del 0 al 20',10,13,'$' + num db 2 +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + Mensaje: + mov ah,09h + Lea dx,msj + int 21h + + + mov cl,01h + + Ciclo: + mov al,num + mul cl + aam + mov bx,ax + mov ah,02h + mov dl," " + int 21h + mov ah,02h + mov dl,bh + add dl,30h + int 21h + mov dl,bl + add dl,30h + int 21h + inc cx + cmp cx,11 + ja Salir + jb Ciclo + + Salir: + mov ah, 00h + int 16h +.exit +end diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.27 0 - 100 cinco en cinco/18.27.asm b/Unidad2/33 PRACTICAS PROFESORA/18.27 0 - 100 cinco en cinco/18.27.asm new file mode 100644 index 0000000..0cb445b --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.27 0 - 100 cinco en cinco/18.27.asm @@ -0,0 +1,60 @@ +.model small +.stack 64 +.data + num db 5 + msj db 'Numeros del 0 al 100 5 en 5',10,13,'$' + unidades db ? + decenas db ? + centenas db ? +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + Mensaje: + mov ah,09h + Lea dx,msj + int 21h + + Inicializacion: + mov cl,1 ;Iniciar + Ciclo: + mov ah,02h + mov dx," " + int 21h + mov al,num + mul cl + aam + + mov unidades,al + mov al,ah + aam + + mov centenas,ah + mov decenas,al + + mov ah,02h + mov dl,centenas + add dl,30h + int 21h + mov dl,decenas + add dl,30h + int 21h + mov dl,unidades + add dl,30h + int 21h + + inc cx + + cmp cx,21 + jl Ciclo + + Salir: + mov ah, 00h + int 16h +.exit +end diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.28 suma numero 1 - 10/18.28.asm b/Unidad2/33 PRACTICAS PROFESORA/18.28 suma numero 1 - 10/18.28.asm new file mode 100644 index 0000000..8bee837 --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.28 suma numero 1 - 10/18.28.asm @@ -0,0 +1,40 @@ +.model small +.stack 64 +.data + msj db 'Suma numeros del 1 - 10: $' +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + Mensaje: + mov ah,09h + lea dx,msj + int 21h + + mov al,0 + mov cl, 10 + Suma: + add al,cl + loop Suma + + Imprimir: + aam + mov bx,ax + mov ah,02h + mov dl,bh ;decenas + add dl,30h ;ajuste + int 21h + mov dl,bl ;unidades + add dl,30h ;ajuste + int 21h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.29 tabla multiplicar/18.29.asm b/Unidad2/33 PRACTICAS PROFESORA/18.29 tabla multiplicar/18.29.asm new file mode 100644 index 0000000..8be46a1 --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.29 tabla multiplicar/18.29.asm @@ -0,0 +1,57 @@ +.model small +.stack 64 +.data + msj DB "Ingresa un numero 0 - 9 : ","$" + num db ? + br db 10,13,'','$' +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + Mensaje: + ;imprimir: + mov ah,09h + Lea dx,msj + int 21h + + Inicio: + mov ah,01h ;Pedir el número al usuario + int 21h + sub al,30h + mov num,al ;guardamos el número digitado en num. + ;salto de linea: + mov ah,09h + Lea dx,br + int 21h + mov cl,01h ;Iniciamos el contador en 1 + + Tabla: + mov al,num ;movemos al número guardado en num a AL + mul cl ;se multiplica CL por AL, el resultado se guarda en AL + aam ;ajuste ASCII para multiplicación + mov bx,ax ;Se guarda la multiplicación el BX + mov ah,02h + mov dl," " ;imprimimos un espacio + int 21h + mov ah,02h + mov dl,bh ;Imprime la parte alta del registro BX, si el número es mayor de 9 imprime las decenas + add dl,30h ;Suma 30 para imprimir el número real. + int 21h + mov dl,bl ;imprime la parte baja de BX o las unidades. + add dl,30h + int 21h + inc cx ;incrementa nuestro contador + cmp cx,11 ;compara contador igual a 11 + ja Salir ; Si es mayor sale del programa + jb Tabla ;si es menor se repite el ciclo. + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.30 pedir numero de nuevo si es menor a 10/18.30.asm b/Unidad2/33 PRACTICAS PROFESORA/18.30 pedir numero de nuevo si es menor a 10/18.30.asm new file mode 100644 index 0000000..b0f4db4 --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.30 pedir numero de nuevo si es menor a 10/18.30.asm @@ -0,0 +1,54 @@ +.model small +.stack 64 +.data + msj db 10,13,'Ingrese un numero: $' + msj2 db 10,13,'Ingrese otro numero: $' + unidades db ? + decenas db ? +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + Mensaje: + mov ah,09h + lea dx,msj + int 21h + jmp LeerNumero + + MensajeOtroNumero: + mov ah,09h + lea dx,msj2 + int 21h + jmp LeerNumero + + LeerNumero: + ;capturar decenas + mov ah,01h + int 21h + sub al,48 ;ajuste manual, ascii to decimal + mov decenas,al + + ;capturar unidades + mov ah,01h + int 21h + sub al,48 ;ajuste manual + mov unidades,al + + Comparar: + mov al,decenas + cmp al,1 + je Salir + jg Salir + jl MensajeOtroNumero + + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.31 cuadrado de un numero/18.31.asm b/Unidad2/33 PRACTICAS PROFESORA/18.31 cuadrado de un numero/18.31.asm new file mode 100644 index 0000000..ff93fe5 --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.31 cuadrado de un numero/18.31.asm @@ -0,0 +1,51 @@ +.model small +.stack 64 +.data + msj db 'Suma numeros del 1 - 10: ','$' + br db '',10,13,'$' + num db ? +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + Mensaje: + mov ah,09h + lea dx,msj + int 21h + + LeerNumero: + mov ah,01h + int 21h + sub al,30h + mov num,al + + mov ah,09h + lea dx,br + int 21h + + Cuadrado: + mov al,num + mov bl,num + mul bl + aam + + Imprimir: + mov bx,ax + mov ah,02h + mov dl,bh ;decenas + add dl,30h ;ajuste + int 21h + mov dl,bl ;unidades + add dl,30h ;ajuste + int 21h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.32 sum,resta,multi, div/18.32.asm b/Unidad2/33 PRACTICAS PROFESORA/18.32 sum,resta,multi, div/18.32.asm new file mode 100644 index 0000000..ae0ccc4 --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.32 sum,resta,multi, div/18.32.asm @@ -0,0 +1,142 @@ +.model small +.stack 64 +.data + msj_numero db 10,13,'Ingresa un numero: ','$' + num1 db ? + num2 db ? + msj_suma db 10,13,'Suma: = ','$' + msj_resta db 10,13,'Resta: = ','$' + msj_multiplicacion db 10,13,'Multiplicacion: = ','$' + msj_division db 10,13,'Division: = ','$' + decenas db ? + unidades db ? +.code + Limpiar: + mov ax, 03h + int 10h + + Apuntador: + mov ax, @data + mov ds,ax + + LeerNumero1: + mov ah,09h + lea dx,msj_numero + int 21h + + mov ah,01h + int 21h + sub al,30h + mov num1,al + + LeerNumero2: + mov ah,09h + lea dx,msj_numero + int 21h + + mov ah,01h + int 21h + sub al,30h + mov num2,al + + Suma: + mov ah,09h + lea dx,msj_suma + int 21h + + mov al,num1 + add al,num2 + aam + + mov decenas,ah + mov unidades,al + + add decenas,30h ;ajuste manual + add unidades,30h + + mov ah,02h + mov dl,decenas + int 21h + + mov ah,02h + mov dl,unidades + int 21h + + Resta: + mov ah,09h + lea dx,msj_resta + int 21h + + mov al,num1 + sub al,num2 + aam + + mov decenas,ah + mov unidades,al + + add decenas,30h ;ajuste manual + add unidades,30h + + mov ah,02h + mov dl,decenas + int 21h + + mov ah,02h + mov dl,unidades + int 21h + + Multiplicacion: + mov ah,09h + lea dx,msj_multiplicacion + int 21h + + mov al,num1 + mov bl,num2 + mul bl + aam + + mov decenas,ah + mov unidades,al + + add decenas,30h ;ajuste manual + add unidades,30h + + mov ah,02h + mov dl,decenas + int 21h + + mov ah,02h + mov dl,unidades + int 21h + + Division: + mov ah,09h + lea dx,msj_division + int 21h + + xor ax,ax + + mov al, num1 + mov bl,num2 + div bl + aam + + mov decenas,ah + mov unidades,al + + add decenas,30h + add unidades,30h + + mov ah,02h + mov dl,decenas + int 21h + + mov ah,02h + mov dl,unidades + int 21h + + Salir: + mov ah, 00h + int 16h +.exit +end \ No newline at end of file diff --git a/Unidad2/33 PRACTICAS PROFESORA/18.33 Tabla multiplizar a por b eq z/18.33.asm b/Unidad2/33 PRACTICAS PROFESORA/18.33 Tabla multiplizar a por b eq z/18.33.asm new file mode 100644 index 0000000..57a6136 --- /dev/null +++ b/Unidad2/33 PRACTICAS PROFESORA/18.33 Tabla multiplizar a por b eq z/18.33.asm @@ -0,0 +1,93 @@ +.model small +.stack 100h +.data + msgnum db 'Ingrese un numero:','$',10,13 + num db 0 ,'$' +.code +Limpiar: + mov ax, 03h + int 10h + +Apuntador: + mov ax, @data + mov ds,ax +Mensaje: + mov ah,09h + lea dx,msgnum + int 21h + +LeerNumero: + mov ah,01h ;Pedir el número al usuario + int 21h + sub al,30h + mov num,al ;guardamos el número digitado en num. + +Inicializacion: + mov cl,01h ;Iniciamos el contador en 1 + + mov ah,02h + mov dl,32 + int 21h + +Tabla: + mov ah,02h + mov dl,0ah ;salto de línea + int 21h + mov ah,02h + mov dl,0dh ;retorno de carro + int 21h + + Mov al,cl; + AAM ; Ajuste divide el resultado en la parte alta y baja + Mov bx,ax + + Mov ah,02h;Servicio para imprimir + + Mov dl,bh + add dl,30h + int 21h;Imprimimos la parte Alta + + mov dl,bl + add dl,30h + int 21h;Imprimimos la parte baja + + mov ah,02h + mov dl,42 + int 21h + + mov ah,02h + mov dl,num + add dl,30h + int 21h + + mov ah,02h + mov dl,61 + int 21h + + mov al,num + mul cl + aam + mov bx,ax + + mov ah,02h + mov dl,bh + add dl,30h ;Suma 30 para imprimir el número real. + int 21h + mov dl,bl + add dl,30h + int 21h + + mov ah,02h + mov dl,32 + int 21h + + inc cx ;incrementa nuestro contador + cmp cx,11 + ja salir + jb Tabla + + Salir: + mov ah, 00h + int 16h +.exit +end diff --git a/Unidad2/TASM.EXE b/Unidad2/TASM.EXE new file mode 100644 index 0000000..f3867a6 Binary files /dev/null and b/Unidad2/TASM.EXE differ diff --git a/Unidad2/TLINK.EXE b/Unidad2/TLINK.EXE new file mode 100644 index 0000000..806a3b5 Binary files /dev/null and b/Unidad2/TLINK.EXE differ diff --git a/Unidad3/TASM.EXE b/Unidad3/TASM.EXE new file mode 100644 index 0000000..f3867a6 Binary files /dev/null and b/Unidad3/TASM.EXE differ diff --git a/Unidad3/TLINK.EXE b/Unidad3/TLINK.EXE new file mode 100644 index 0000000..806a3b5 Binary files /dev/null and b/Unidad3/TLINK.EXE differ diff --git a/Unidad4/TASM.EXE b/Unidad4/TASM.EXE new file mode 100644 index 0000000..f3867a6 Binary files /dev/null and b/Unidad4/TASM.EXE differ diff --git a/Unidad4/TLINK.EXE b/Unidad4/TLINK.EXE new file mode 100644 index 0000000..806a3b5 Binary files /dev/null and b/Unidad4/TLINK.EXE differ