Entradas

Suma de 2 numeros con libreria include emu8086.inc

Imagen
name "suma de dos numeros" include "emu8086.inc" org 100h .data suma db 2 dup (?) ;delcaramos un arreglo de tamaño 2 .code sumas proc far     print " Introduce el primer numero: "     call scan_num ;uso del procedimiento scan_num     mov suma[0],cl     printn " " ;macro que imprime un string y retorno de carro     print " Introduce el segundo numero: " macro print     call scan_num ;procedimiento scan_num     mov suma[1],cl     xor ax,ax ;para limpiar el registro ax     add al,suma[0]     add al,suma[1]     printn " "     print " La suma es: "     call print_num ;usa procedimiento de la macro para imprimir un numero en ax sumas endp     exit:        print " "     printn " "     print "Presiona enter para salir..."     mov ah,0  ;servicio de pulsación de teclado  ...

Aprobado o no aprobado.

Imagen
.model small .stack 64 .data    msg1 db 'Dame una calificacion (seguido de un enter):$'    aprobado db 13,10,'APROBADO$'    reprobado db 13,10,'REPROBADO$'    VAR1 dw ?,'$' ;de tipo write    VAR2 dw ?,'$'    VAR3 dw ?,'$'   .code ;inicia la seccion de codigo RESULTADO PROC FAR     MOV AX, @DATA     MOV DS, AX ;-----------------desplegar el primer mensaje     MOV AH,09H     LEA DX,msg1     INT 21h ;-----------------introducir un caracter     MOV AH,01     INT 21h     MOV VAR1,AX ;-----------------introducir un caracter     MOV AH,01     INT 21h     MOV VAR2,AX ;-----------------introducir un caracter     MOV AH,01     INT 21h     MOV VAR3,AX ;uso de if y compara     CMP AL,13 ;pregunta si en AL hay un     je continue     j...

Hola mundo AB.

Imagen
include emu8086.inc ORG    100h PRINT 'Hello World!' GOTOXY 10, 5 PUTC 65           ; 65 - is an ASCII code for 'A' PUTC 'B' RET               ; return to operating system. END               ; directive to stop

Hola mundo 'emu8086.inc'

Imagen
include 'emu8086.inc' org 100h .code gotoxy 6,10 ;usando la macro de la libreria print " "   ;macro que impide una cadena print "hola mundo" gotoxy 6,12 printn "hola mundo 2" print "letrero fin" gotoxy 6,16 putc 'A' print 'Dame un numero' call scan_num define_scan_num ret

Mayor o menor de edad.

Imagen
.model small .stack 64 .data diez db 10 num1 db 0 mens db 'Ingrese la edad: $' mens1 db 10,13,'Eres Mayor de Edad $' mens2 db 10,13,'Eres Menor de Edad $' .code   inicio proc Far     mov ax,@data ;direccionamiento     mov ds,ax ;los datos      ;poner el primer letrero     mov ah,09     lea dx,mens     int 21h         mov ah,01     int 21h     sub al,30 ;conviertir valor     mul diez ;se multiplica el numero siguiente     mov num1,al         mov ah,01     int 21h     sub al,30h     add num1,al     mov al,num1              cmp al,18     jge mayor     jmp menor         mayor:        mov ah,09        lea dx,mens1        int 21h ...

Multiplicacion hex.

Imagen
 ORG 100h  mov ax,80  mov bx,9  mul bx  ret

Resta de 2 numeros.

Imagen
org 100h .model small .stack 64 .data  n1 db 0  n2 db 0  resta db 0  msg1 db "Ingrese el primer valor:", '$'  msg2 db 10,13, "Ingrese el segundo valor:", '$'  msg3 db 10,13, "Resta=", '$'  .code  begin proc far     ;direccionamos al segmentos de datos     mov ax,@data     mov ds,ax         ;solicitamos el primer digito     mov ah,09     lea dx,msg1     int 21h      ;se lee el primer valor     mov ah,01     int 21h     sub al,30h; convierte el caracter en numero     mov n1,al                ;solicitamos el segundo digito     mov ah,09     lea dx,msg2     int 21h     mov ah,01     int 21h     sub al,30h;convierte el caracter en numero     mov n2,al       ...